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RQnOOl  THIS  LGC  FRCGRAM  IS  IMFNCFC  FTP  LSE  IN  THE  L CURING  THE  MANNEH  LLNAP  LANCING  NISSICN  CP  ANY  SLESET  TLERECF. 
ROOOn2  THE  DPTATLS  CF  I M F LE MF NT  AT T CM  ATE  SPECIFIEC  IN  PEFCRT  r-567,  AS  AMENDED. 


PriOT025  GLIDANCE  system  cffraticns  plan 

R CCCP3 FGP  MANNED  LM  EAPTF  QRflTAL  AND  LUNAR  i^ISSIONS 


ROOOr>3E 

USING  PRCGRAM  LLMINARY 

RSB^ 

.it". 

ROOAi'H 

ROO^OS 

ROOnOE 

This  FRCGRAM  AND  P-567  HAVE  PEFN  PREPARED  BY  THE  IN  ST R L ME  NT  AT  I C M LABCFATCFY,  M A S S A C FU S E T T S INSTITLTE  CF 
TECHNOLOGY  75  CAMBRIDGE  PARKVvAY,  CAMBRIDGE,  M A SS  ACHU  S ETT  S UNDER  PRC  J ^CT  5 E-23  £- 7C  , SPCNSORED  BY  THE  MANNED 
spacecraft  CENTER  CF  THF  NATICNAL  AFRCNALTICS  AND  SPACE  A C M I NT STP A T 1 C N , CCNTR/CT  NAS  5-A065. 

R CG0C7 

this 

FRCGPAM  IS  REFERRED  TO  AS  LUMINARY  IB 
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LSER'S  PAGE  NO, 

2 

EO 

ROOT  1 
PC002 

table  CF  ICG  CAROS 

ARSFMBI  Y AND  PPFRATICN  INcpRMATICN 

ROO  )3 
RC005 
ROO  'A 

tags  for  relative  SETLOG  and  blank  bank  cards 

ccntrcllec  cgnstams 

input/oltput  channel  bit  de ^cpi ptions 

R0007 

RCCOB 

FLAGWCRO  ASSIGNMENTS 
SLeRPLTINF  CAl LS 

ROO'iq 
ROC  10 

table  CF  SUBROUTINE  LOG  SECTICNS 
1 IJMFPASE 

ROOll 

R')012 

R0G13 

erasable  ASSIGNMENTS 
lEMCNAIO 

INTERRUPT  LEAC  INS 

ROniA 

R0015 

R0016 

T4RLPT  program 
RCS  FAILURE  MONITOR 
ncUNLINK  LISTS 

RG017 

ROOIB 

R0C19 

AGS  initialization 
FFESH  start  ANC  restart 
RFSTAPT  tables 

R0020 

P0C21 

R0022 

ACTMARK 

EYTFNCEr  VERBS 
PINBALL  NCUN  TABLES 

R0023 

R0C2A 

R0025 

LFM  geometry 

I MU  CCMP^^SATICN  PACKAGE 
P63 

R0026 

R0027 

R0n28 

ATTITUDE  MANEUVER  RPUTINfc 
GIMBAL  LCCK  AVCICANCE 
KAl.CMANU  STcpRING 

RT029 

R0030 

R0031 

SYSTEM  TEST  STANOARD  LEAD  INS 
IMU  PERF-rnMANCE  TESTS  '2 

iMu  performance  tests  4 

R0P32 

R0033 

R0034 

PINBALL  GAMES  PUTTCNS  ANC  LIGPTS 
R6C  ,R62 

S-EANC  antenna  for  LM 

RCC35' 

P0<^36 

R0037 

LSMP20S 

RADAR  LEAPTN  ROUTINES 
F20-P25 

R0C38 
P )039 
RCCAC 

LFMF3QS  ■ 

P30, P37 

P32-P3S,  P72-P75 

R0CA2 

R0OA3 

ROOAA 

KISSING 

GROUND  TRACKING  OETERM  INAT I ON  PROGRAM  - P21 
P34-P35,  F74-F75 

R00A5 

R0n46 

RffAT 

R3l 

F76 

R3C 

R0P49  FLV 

R’3050  BURN,  BABY,  BURN  — MASTER  IGMTICN  ROUTINE 
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EC 

R0051 

ROC5? 

R0053 

PA0-PA7 

TFF  LLNAF  LANCING 

thpcttle  ccntpcl  rcutines 

ponsA 

RCC55 

P0056 

LUNAR  landing  guicance  eolaticns 

P70-P71 
P 12 

R0057 

PCC58 

p.no5« 

ASCENT  GUT  dance 
SFPVICFP 

LANDING  ANALOG  DISPLAYS 

ROnfto 

pcr6 1 
Ron  6 2 

FINCCCUH  - GUICAF  INTERFACE 

LEMP5CS 

PS1-P53 

R0063 

R0064 

R0065 

LUNAR  AND  SCLAR  FFHcMERICES  SUPPCUTINES 

SKIPPFP 

DCWN-TFLEMFTRY  PROGRAM 

RC066  I^TeR-BA^K  CCI^MbMCATICN 

R0067  INTFRPRFTFR 

R006P F1XFC-FTXFD  CONSTANT  FCOL 


R0C6F  I NTERPP.F  T I VF  FCNSTSNTS 

R0070  SINGLE  PREPISION  SIB^OLTINFS 

RCC71  EXECUTIVE  


RCC72 

R0073 

RCC74 

WAITLIST 

LATiTuor  longitude  sleroutimes 
PLANETARY  INERTIAL  CRIENTATICN 

R007? 

■MFASURFNFNT  inccppgraticn 

P0076 

rcMc  subroutines 

R0C77 

INTEGRATICN  T M 7 I AL I Z AT  I C N 

R0078 

ORBITAL  INTEGRATION 

R0C79 

imflight  alignment  routines 

RCC8D 

PCWERFD  FLIGHT  SUBROUTINES 

R0081 

TIME  CF  FREE  FALL 

RCC82 

AGC  BLOCK  TWO  SELF-CHECK  , 

R0DR3 

PHASE  TABLE  MAINTENANCE 

R0r84 

RESTARTS  ROUTINE 

P0085 

IML  MCOF  SWITCHING  PCLTINES 

R0086 

KFYRLPT,  LPRUPT 

R0C87 

DISPLAY  INTERFACE  ROUTINES 

R0C88 

SERVICE  ROUTINES 

R0a89 

ALARM  AND  AEORT 

RCC90 

UPDATE  PPCGPAM 

P0091 

PTB  C P CODE  S 

R0092 

L MCAP 

R0C93 

T6-RLFT  FRCGPAMS 

R0094 

DAP  INTERFACE  SUBROUTINES 

R0096 

CAPIDLER  PROGRAM 

RCC96 

P-AXTS  PCS  ALTCPILCT 

R0C97 

C,P-AXIF  PCS  autopilot 

R0C98 

TJET  LAW 

P0C99 

KALMAN  FILTER 

Rono 

TRI^'  GIM'EAL  CONTROL  SYSTEM 
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ROlOl 

R0102 

ACSTASK  AND  ACSJOE 
SFS  EACK-UP  RCS  CCNTRCL 

R0103 

ROl 

SVYBOL  TABLE  LIFTING 

lnpfferfncec  symbol  listing 

ROlOt 

R0107 

ERASABLE  e FCUALS  CRG SS-R E F E P ENG E TABLE 
SUMMARY  GF  SY^ipCl  TABLE  LISTINGS 
ME'^OPY  TYPE  E AVATLAELITY  DISPLAY 

R01C8 

ROIOG 

ROllO 

GOLNT  TABLE 

paragraphs  generated  FOR  THIS  ASSEMBLY 
rCTAL  LISTING 

RO  11  1 
ROl  12 

CCCUPIED  LGCATICNS  TAELE 
SUBROS  CALLED  6 PROGRAM  STATES 

GAP: 
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T NFORMAT ICN 

USER ' S PAGE  NO.  5 

EC 

P0113 

VERS  LIST  FCR 

LIJMINAFY 

R0114 

RFGLLAR  VERBS 

R0115  no  NOT  IN  USO 

RG116  01  CISPL^y  octal  C C F I U FI 

P0117  C2  01 5PLAY  OCTAL  CC^F  2 IN  R1 

R0118  03  CISPLAV  OCTAL  COMP  3 IN  R1 

ROllF  CA  display  OCTAL  COMP  1,2  IN  F1,F2 

R012C  05  DISPLAY  OCTAL  CCMP  1,2,3  IN  R1,R2,F3 

R0121  06  DISPLAY  CECIMAL  IN  R1  CR  R1,R2  GR  R1,R2,R3 

R0122  C7  DISPLAY  OP  DECIMAL  IN  R1,R2  (TEST  ONLY) 

P0123  08 

R0L2A  00 

RC125  10 

R0126  11  MONITOR  OCTAL  COMP  1 IN'  PI 

R0127  12  MONITOR  OCTAL  COMP  2 IN  PI 

R0128  13  MONITOR  OCTAL  COMP  3 IN  RL 

R0129  14  MONITOR  OCTAL  COMP  1,2  IN'  R1,R2 

P013C  15  MCNITOP  OCTAL  COMP  1,2,3  IN  P1,R2,P3 

RQ131  16  MONITOR  OEOIMAL  IN  PI  GR  R1,R2  CP  P1,R2,R3 

R0132  17  MCNITOP  CP  CFPImAL  IN  R1,R2  (TEST  ONLY) 

R0133  16 

R0134  19 

R0135  2C 

R0136  21  LOAD  COMPONENT  1 INTO  R1 

R0137  22  LCAC  CCMPON'ENT  2 INTO  R2 

R0138  23  LOAD  COMPONENT  3 INTO  P3 

PD135  24  LOAC  COMPONENT  1,2  INTO  R1,R2 

R014n  25  LCAC  CCMPCNENT  1,2,3  INTO  R1,R2,R3 

R0141  26 

R0142  27  DTSPLAY  FIXEC  MFMORY 

RD143  26 

R0144  25 

P0145  30  PEQUFST  executive 

R 0146  31  RPCLEST  V-AITLIST 

R0147  32  recycle  PROGRAM 

R0148  33'PROCEFC  WITHOUT  DSKY  INPUTS 

R0145  34  TERMINATE  FLNCTICN 

R0  150  35  TEST  L IGFTS 

R0151  36  RECUEST  FPFSh  START' 

R0152  37  CHANGE  PROGRAM  (MAJOR  mode  ) 

R0153  38 

RQ154  3S 
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P0155  FXTFNCEC  VERBS 

RC156  AO  ZERC  CDU-S 

R'>157  41  COARSF  ALIGN  CGU-S 

P0198  42  FIAF  ALIGN  IN‘U 

R0159  4?  LOAF  INU  ATT  FRRCR  PFIERS 

R0160  44  TERMINATE  PR  CONTINUOUS  OESIGNATF  (V41N72  OPTION  2) 

RC161  45 

RQI62  46 

R0163  47  INITIALIZE  AGS  (R47) 

R0164  48  REGLEE7  CAP  DATA  LCAC  ROUTINE  (R03) 

R0165  49  REQUEST  pPFW  DFEINEO  PANELYER  ROUTINE  (R62I 

P0166  50  PLFASE  PERFCRN 

R0167  51 

R0168  52  mark  X-RFTTCLF 

POIAP  57  IVARK  V-RPTICLE 

Rni7G  54  MARK  X OR  V-RETICLE 

R3L71  55  INCREMENT  AGC  timf  (DECIMAL) 

RC17?  56  TERMINATE  TRATHING  ( P20  + P25 ) 

R0173  57  PERMIT  LAMDTNG  RADAR  UPDATES 

R0174  58  INHIBIT  LANDING  RAFAI  UPEATFS 

Rni  75  59  C^w^/^ND  LR  TC  FCSITICN  2„ 

R0176  6U  display  VEHICLF  ATTTTLDE  RATES  ON  FCAI  ERRCP  NEEDLES. 

R0I77  61  DISPLAY  CAP  FCLLCNING  ATTITUDE  RRRCRS. 

R0  178  62  DISPLAY  TOTAL  ATTITUDE  ERRORS  l^TTH  RESPECT  TC  NCUN  22. 

RT179  63  SAMPLE  PACAP  ONCE  PPR  SECOND  (R04). 

ROIFC  64  RECLFST  S-PANC  ANTENNA  ROUTINE  (R05) 

R0181  65  DISABLE  U AND  V JET  FIRINGS  DURING  DPS  BURNS. 

P0182  66  VEHICLES  ARE  ATTACRPC.  ''OVF  THIS  VEHICLE  STATE  TC  OTHER  VEHICLE. 

RO  IRT  67  PI  SPLAY  H MATRIX 

R0184  68 

P.niBS  69  CAUSE  RESTART 

RQ  186  70  LPCATF  LIFTOFF  TIi^F 

R0187  71  UNIVERSAL  UPC  A''' E- BLOC,  K ADR 

R018P  72  UNIVERSAL  U PC A T b-S I NG I E ADR 

R0189  73  UPDATE  AGC  TIMF  (CCTALI 

R019D  74  initialize  FPASAPLF  PUMP  VIA  DOWNLINK 

R0I91  75  ENABLE  U AND  V JET  FIRINGS  DURING  CPS  EURNS. 

_PjT^192'  76  MINIMUM  IMPULSE  CCmmanC  MODE 

R0193  77  RATF  COMMAND  ANC  ATTItijdE  HOLD  MODE 

P0194  76  LR  SPURICLS  PFTLPN  TEST  START  (R77) 

P0195  79  LR  SPURIOUS  RETURN  TEST  9TCP 

RC196  EC  LPDATE  LEM  STATE  VECTCR 

R0197  81  LPDATE  GSM  STATE  VECTOR 

R0I98  82  REQUEST  CRBIT  FARAM  DISPLAY  (R30) 

PC199  83  RECLEST  RENO  PARAM  DISPLAY  (R31) 

P02OO  F4 

R0201  85  DISPLAY  RR  LCS  AZ  AnP  ELEV 

R0202  86 

RD2T3  67 
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RC204  68 

R0205  89  PFCUEST  RFNCFZVQUS  cjkal  AITITLDE  RCLTINE  (R62) 

R02O6  90  REQUEST  PPNnrzVCUS  CUT  Qp  PLANE  CISFLAY  ROUTINE  (R36) 

R0207  FI  DISPLAY  RANK  SLR 

R02O8  92  QdfpatE  IMII  PERFORMANCE  TEST  (PD7) 

R02CF  93  FNABLE  R MATRIX  I MT  I A L I Z AT  I C N 

R021C  9 A 

R0211  95  NO  UFCATE  OF  FITPER  STATE  VECTOR  (P20  OR  P22) 

R0212  96  INTERRLPT  INTPGRATIQN  ANC  GC  TC  FCC 

R0213  97  PERFORM  ENGINE  FAIL  PRGCEDLRE 

R021A  98 

R02  15  99  PLFASF  ENABLE  ENGINE 
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P0216  TN  .THE  following  ncun  lis^  The  ;nc  loac:  pestricticn  neans  the  NCUN 

R0217  CCETAINS  AT  LEAST  CNE  CC'^FCNEA'^  WHICH  CANNOT  8E  LCADED,  I.E.  CF 
R02ie  SCALE  type  L (HIN/SEC),  FF  (2  INTEGERS)  CP  TT  (LANCING  RADAR  POSITICN). 

R0219  IN  THIS  CASE  VEPBS  2A  AND  25  ARE  NCI  ALLCFEO,  BIT  VFRBS  21,  22  CP  23 

R.0220  nay  be  used  TC  LCAC  ANY  OF  THE  NCUN:S  CCMFCNENTS  WHICH  ARE  MOT  OF  THE 

P022I  ABOVE  SCALE  Typps. 

P0222  THE  tree  CNLY:  RESTRICTION  HFANS  CNLY  DECIMAL  OPERATTCN  IS  ALLCWED  CN 
R0223  EVERY  CCNPONFNT  IN  THE  NCUN.  (NCTE  THAT  : NO  LGAC:  IMPLIES  :DEC  ONLY:.) 


R022A  NORMAL  NOUNS  COMPONENTS  SCALE  AND  CFCINAL  FCINT  RESTRICTIONS 

P.0226  .n  NCT  IN  USE 

PC227  n specify  machine  ACDPESS  (FRACTIONAL)  3CCMF  .XXXXX  FOR  EACH 

R022S  02  SPECIFY  MACHINE  ACnRFSS  (WHOLE)  3CCMF  XXXXX.  FOR  EACH 

R0229  03  SPECIFY  MACHINE  ADDRESS  (CEGREES) 3CCMF  XXX. XX  DEG  FOR  EACH 

R023C  CA  ANGLLAP  ERROR /C I F FFR f NCE  ICCMF  XXX. XX  CFG 

PQ231  05  ANGULAR  ERROR  / C I F FER  FNC.F  ICCMF  XXX.  XX  DEG 

R0232  C6  rpilCN  CO(^E 3CCMP  OCTAL  CNLY  FOR  EACH 

R0233  loading  NOUN  07  WILL  SET  OR  RESET  SELECTED  BITS  IN  ANY  FRASAELE  REGISTER 

R023A  07  ECACR  CF  WORD  TC  BE  RCCIFIfc  3C0MP  OCTAL  CNLY  FCR  EACH 

R0235 ONES  FCR  BITS  TC  EC-  *<CCIFIEC 

R0236  1 TO  SET  OR  0 TO  RESfT  SELECIED  BITS 

P0237  C8  ALARM  DATA  3CCMP  OCTAL  ONLY  Fqr  eaCH 

R0236  C9  ALARM  CODFS 3CCMF  CCTAL  CNLY  FOR  EACH 


R0239  10  CHANMFL  to  BE  SPECIFIED  ICOMP  OCTAL  CNLY 

P02A0  11  TIG  CF  CSI  3C0MP  OOXXX.  HRS  DEC  ONLY 

R02A2 QOexx.  MIN wpST  LOAC  3 COMPS 


R02A4 

OXX. XX 

SEC 

R02A5 

12 

CFTICN  CCDE 

2CCMF 

CDTAl 

CNLY 

FOR  EACH 

R0  2A6 

(USEC  BY  EXTENDED  VFRBS  CNLY) 

R02A7 

13 

TIG  CP  CDH 

3CCMP 

COX  XX. 

HR  S 

OEC  CNLY 

R02A9 

OOOXX. 

MIN 

MLST  LOAD 

C2 

COMPS 

R3251 

C XX. XX 

SEC 

RC2E2 

1 A 

CHECKL I 5 7 

3CCMP 

XXXXX  . 

FOR 

EACH 

P0253 

(USED  BY  EXTENDED  VERBS  CNLY) 

R025A 

(NCUN  25  TS  PASTED  AFTER  DISPLAY) 

PC  25  5 

15 

INCREMENT  nACHINE  ADDRESS 

irCMF 

CCTAL 

CNLY 

RD256, 

16 

TIME  OF  EVENT 

3CCMF 

CQXXX. 

HRS 

OEC  ONLY 

R025E 

(USEC  BY  EXTENDED  VERBS  CNLY) 

OCC  XX . 

MIN 

MLST  LCAC 

3 

CCMFS 

R0260 

OXX  . XX 

SEC 

R0261 

17 

SPARE 

RC262 

18 

ALTC  maneuver  ball  ANGLES 

3CCMP 

XXX  .XX 

DEG 

FOR  EACH 

R0263 

19 

SPARE 

R026A 

2D 

ICDU  ANGLES 

3CCMP 

XXX. XX 

DEG 

FCR  EACH 

R0265 

21 

PICAS 

3CCMF 

XXXXX. 

PULS 

ES  FOP  FACH 

R0267 

22 

MEW  ICDU  ANGLES 

3CCMF 

XXX. XX 

CEG 

FCR  EACH 

R026  8 

23 

SPARE 

R0269 

2A 

DELTA  time  Fhr  aGC  CLCCK 

3CCMF 

OOXXX. 

HRS 

DEC  ONLY 

R0271 

COOXX. 

(^IN 

MUST  LOAC 

3 

COMPS 

RC273 

OXX  .XX 

SEC 

% 


0 
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EE 

P1274 

25 

CPECKL  1ST 

3C0MP 

Y X X NX. 

FOR  each 

RC275 

(LSED  WITH  PLEASE  FERPCPP  ENLY ) 

R0276 

26 

PR  lOR  ITY/D'^LAY,  ADRFS,  BBCON 

3CCMP 

OCTAL 

CNLY  FCR  EACH 

PH277 

27 

SELF  f EST  CN/EFF  SW  ITCH 

ICCMP 

XXXXX. 

P.  0 2 7 8 

28 

SPARE 

R027'? 

29 

SPARE 

R028M 

3C 

spare 

RC28  1 

3 1 

SPARE 

> 

P0282 

32 

T IME  FROM  PFR  IGEE 

3CCMP 

00 XXX. 

FIPS 

DEC  CNLY 

R0284 

0 10XX  . 

M IN 

MUST  LOAD 

3 

CCMPS 

R02P6 

CXX.XX 

SEC 

3 

R02R7 

33 

TIME  CF  IGMTICN 

3C0MP 

ooxxx. 

HRS 

DEC  CNLY 

RC289 

oooxx. 

MIN 

MLST  LCAO 

■3 

CCMFS 

R0  2<5  1 

0 X X. XX 

SEC 

R0  29  2 

34 

TIME  CF  EVENT 

3CCMP 

ooxxx. 

HRS 

DEC  ENLY 

R0294 

ocoxx. 

MIN 

MUST  LOAC 

■3 

COMPS 

R0296 

0 XX. XX 

SEC 

RG297 

35 

TIME  FRCM  event 

3C0MP 

ooxxx . 

HRS 

DEC  CNLY 

' R0299 

OOOXX. 

MIN 

MLST  LOAC 

•3 

COMPS 

80301 

cxx. XX 

SEC 

R03^2 

36 

TIMF  EF  AGC  CLECK 

3CCMP 

ooxxx. 

HRS 

DEC  ONLY 

R 13^4 

oooxx. 

MIN 

MUST  LCAC 

3 

COMPS 

R03  >6 

c XX. XX 

SEC 

P0307 

37 

TIG  OF  TPI 

3CCNF 

ooxxx. 

HRS 

DEC  ONLY 

P03H9 

CQCXX. 

MI  N 

MUST  LCAC 

3 

COMPS 

R031  1 

nxx  .XX 

SEC 

P0312 

38 

TIME  OF  STATE  BEING  INTFGRATER 

3CCPP 

ooxxx. 

HRS 

DEC  ONLY 

R0314 

OOGXX. 

MIN 

MLST  LCAC 

3 

CCMPS 

RG316 

P0317 

39 

spare 

oxx.xx 

SEC 

I 
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P0318 

R032f» 

MIXEO  NOUNS 

4)  TI^'t  FRCN  IGMT  ICN/GUTOFF 

COMPONENTS 

3CCMP 

SCALE 
xxe  XX 

AND  CECIMAL 
MIN/SEC 

FCINT 

restrict  IONS 
NC  LCAC,  CFG 
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_2 DSPTFYl  »1 

3 rSPTE^'l  +2 

1 CSPTEV2 


V 

L 

C 

r; 

C 

C. 

F 

5 

1. 

S 

s 

s 


s 

1. 

<: 

S 

S. 

S 

s 

A 

s 

s 


s 

c 

D 

8 

8 

8 

G 

G 

JJ J 

J J 

S 

h 

C (MEN'QRY/inO  TC  CIFLAY  TENS  N.M.) 

P 

F 


G 

G 


C 

C 

c 

G 


GAP:  gSSgNBLF  REVISIHN  116  CF  AGC  CPCGpaN  LU^^IN^PV  BY  hiASA  20211  12-071 


I«;:09  AUG.  I1,196<; 


( ^AIN) 


PAGE 


17 


L ASSEMBLY  AND  OPFRATirN  INFORMATICN  USER'S  PAGE  NO.  17  EC 


R0661 

2 

CSFTER2  +1 

E 

R 06t2 

0 

CSPTEY2  +2 

C 

R0663  99 

1 

KWPOS 

X X 

RC664 

2 

K W V E 1 

YY 

R06641 

Q 

Vsl^BTAS 

AAA 

GAP: 

ASSPW9LE  REVISION  116 

CF  AGC  PROGRAM 

luminary  by 

NASA  20211  12-C71  19:09 

AUG.  11 

,1969  (MAIN) 

PAGE 
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L 

ASSENBLY  AND  PRERATI 

CA  lAFCRMATIClS 

LSER' 

S PAGE  NO.  18 

EO 

P0665 

NCUN  scales  ANC  FORMATS 

PQ666 

-SCALP  Type- 

PRECISION 

R06A7 

RT66R 

UNITS 

D>=r  I ^AL  format 

-- 

AGC  FCRMAT 

RC66P 

R0670 

~a~ 

OCTAL 

xxxxx 

SP 

CCTAL 

P0671 

R0672 

P0673 

-e- 

FRACTICNA L 

. XX  XXX 

(f^A>  o 99996) 

SP 

-14 

BIT  1 = 2 UMTS 

RC67A 

RC675 

-C- 

Vvt-OLE 

> XX  XX. 

SF 

BIT  1 = 1 UNIT 

RG676 

((MAX  163  S3.) 

R C677 

-D- 

15 

R0678 

Rn679 

RC6gC 

CCL  DEGREES 

XXX. XX  DEGRE=S 
(MAX  359.99) 

SP 

BIT  1 = 360/2  PEGPEES 

( LSES  15  BITS  FOR  MAGNI- 
TUDE ANC  2-S  COMP.) 

R068  1 
R0682 

-E- 

ELFVATICN  DEGREES 

XX. XXX  DEGREES 

SP 

14 

BIT  1 = cc/2  DEGREES 

R7683 

(MAX  89.999) 

RU684 

-F- 

14 

RC6F5 

R0686 

DEGREES  (180) 

XXX. XX  DEGREES 
(MAX  179.99) 

SP 

BIT  1 = 180/2  DEGREES 

R0687 

R0688 

90689 

-G- 

CP  OEGREESISO) 

XX. XXX  CEGREES 

DP 

BIT  1 CF  LOVy  REGISTER  = 
28 

P J690 
R0691 
P0692 

-H- 

CP  DFGPFES  (360) 

XXX, XX  DEGREES 

DP 

360/2  CEGREES 

BIT  1 CF  LOk  REGI STER  = 

P,  0 6 9 3 
R069A 

(MAX  359.99) 

28 

360/2  DEGREES 

GAP:  gSSF^*BlE  RFVISION  L16  CF  AGC  P=tCGRA»^  LUMNARV  BV  ^flSA  20211  12-071 
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r 


r 


€ 


PQ695 

R0696 

RC697 

RC698 

R0699 

RC70C 

P07G1 

RG70? 

Rn7G3 

R07(1A 

RC709 

RG706 

R07G7 


-K- 

TIMS  (PR,  MIN,  SEC)  Q.'tXXX.  HR  GP  BIT  i Qp  LGP  REGISTER  = 

pop XX.  MIN ::j 

nxx.xx  SEC  1C  SEC 

(DECIMAL  ONLY. 

RAX  ^<I^  CCMF=59 

MAX  SEC  CflMP  = 59.99 
M/ix  CAPACITY=745  PRS 

39  MRS  _ _ 

lA. 55  SECS. 

UHER  LCACING,  ALL  3 

CCMPCNENTS  MLST  EE 

SU^PL.  lEO.  ) 


R^7C8  -L- 


R0709 
8 0710 
R 0 7 1 1 

TtmF  (MIN/SEC) 

XXRXX  MIN/SEC 
(B  IS  A ELANK 
PCSITJCN,  CECIMAL 

DP 

BIT  1 CF  LOV>  REGISTER  = 
-2 

10  SEC 

R0712 

R0713 

R071A 

CNl  Y , DI  S°LAY  (3R 
MONITOR  ONLY.  CANNOT 
RE  LCAOEC. 

R0715 

R0716 

R'1717 

<^AX  MIN  CCMC  = 59 
MAX  SEC  CC''F  = 59 
VALLES  greater  thAN 

R3718 

RC719 

R0720 

59  MTN  59  SEC 
APE  nSPLAYEC  AS 
59  MIN  59  SEC. ) 

P0721 

R0722 

_ V- 

TINE  (SEC) 

XXX, XX  SEC 

SP 

- 2 

eiT  1 = 10  SFC 

R0723 

(MAX  163.83) 

RG724 

-N- 

P0725 
R0  72  6 
R0727 

TIMP(SEC)  nP 

XXX. XX  SEC 

CP 

BIT  1 CF  LCW  REGISTER  = 

-2 

1C  SEC 

R0  72  8 
RG729 

-0- 

VFLCC  ITY  2 

XXXXX.  FBET/SFC 

DP 

BIT  1 CF  HIGH  REGISTER  = 

RC73C 
, R0731 

(MAX  A199A.  ) 

-7 

2 METERS/CENT I-SEC 

P0732 

R0733 

R0734 

-c- 

POSTTIQN  A 

XXXX.X  NALTICAL  MILES 

CP 

BIT  1 CF  ICW  REGISTER  = 
2 METERS 

RC735 

RG736 

- c _ 

VELnC  ITY  3 

XXXX.  X F T/S'^C 

DP 

BIT  1 CF  HIGH  REGISTER  = 

R0737 
R 0 7 3 8 

-7 

2 meTEPS/CENT I-SEC 

rap: 

/\<;CFVm  c Rc\/TPiriN  116 

FP  AGE  FREGRAv. lUNINAFY 

BY 

NASA  202lll2-fi7l  19:09 

AUG.  11,; 

L969 

(MAIN) 

PAGE 

20 

1 

ASSEMBLY  AND  OPERATITN  TNFORPATICN 

USER’S 

PAGE 

NO.  20 

EC 

P0739 
R 0 74r 
R0741 

-T- 

G 

XXX. XX  G 
(MAX  163.831 

SF 

-2 

BIT  1 = 10  G 

RC742 

R0743 

-L- 

RFNDFZ\-nUS 

XXX. XX  NALT  mi 

SP 

USES  15  BITS  FOP  UNSICNEC 

R07433 
R 0 743  A 
P07439 

RATAP  range 

(DECIMAL  ONLY. 
nSFlAY  CR  MCNITCP 
ENI Y.  CANNGT  BE 

MAGNITLDE. 

bit  1 = 9.38  FEET 

P0744 

LOAEFC. ) 

P0745 

-V- 

R0746 
P 074 61 
R07462 

RENDFZVnUS 
PACAp  range  rate 

xxxxx.  ffet/ffc 
(DFCINAL  only, 
display  CR  MEMTCP 

SP 

USES  15  BITS  PER  LNSIGNEC 
MAGNITUDE. 

BIT  1 = -.6278  FEFT/SEC 

R07463 
P C7464 
RC7465 

CMLY,  cannot  be 
ICACED, 

BIAS  CF  170D"  CCLNTS 

R07466 

P3747 

subtracted  before 

DI SFLAY.  ) 

P0748 

RT749 

R0750 

— V\  - 

LANDTAG  RAC.AP 
AL  TI TLDE 

xxxxx.  FFFT 

DP 

LCW  ORDER  BIT  OF  LON  CRDER 
WCRC  = 1 .079  PEET 

RR751 

RC752 

-X- 

LANOING  radar 

XXXXX.  PEET/SFC 

DP 

LCW  GROEP  BIT  OF  LOW  CRDER 

R0753 

vflx 

WCRC  = -.6440  FFET/SEC 

R0754 

-Y- 

RC755 

R0756 

LANDING  RADAR 
VFLV 

XXXXX.  FFET/SEC  ' 

CP 

LCW  ERCER  BIT  CF  LOW  CRCFR 
WCPC  = 1.212  FEET/SFC 

RC757 

R0758 

RT759 

- Z- 

L AND  TNG  RADAR 
V>=LZ 

XXXXX.  feft/sec 

CP 

LCW  CRDER  BIT  OF  LOW  ERDEP 
WORD  = .6666  FEET/SEC 

RC76E 

RC761 

-AA- 

IN  IT TAL/F  INAL 

XXXXX.  FEET 

DP 

LCW  CPDER  BIT  CF  LCW  CRDFP 

R0762 

ALT  ITLCF 

WCRC  = 2.345  FEET 

R076  ? 

-BB- 

R0764 

RC765 

ALTTTLTE  RATE 

XXXXX.  feet/sec 
( max  08191.) 

SP 

LCW  CRDER  BIT  = .5 
FEET/SFC 

PC766  -CC-  ~~~  ■ ■ 

R07iS7  FCPW/SPC/L  ERAL  XXXXX.  FE^T/SEC  SP  LCV»  CPDFR  BIT  = , 5571 

P 0768  VELOCITY  ( >>AX  OQ126  . ) FEET/SEC 


-CC-  # 


R076P 
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RC770  RCTATICNAL  HAND  XXXXX.  CEG/SEC  SP  FRACTIONAL  FART  OF  PI  RAC 
R9771  CCNTROLLEP  ANGULAR  (MAX  OCCAA.)  4 SEC 
R0772  RATES 


RG773 

R0774 

-EE- 

optical  TRACKER 

XXX  .XX 

OEG. 

OP 

LCW  CROEP  BIT  CF  LCW  CPDER 

R077E 

R0776 

A7IMLIH  ANGLE 

15 

WCRC  = 360/2  CFGREES 

R0777 
P G778 
R0779 

-J  J- 

PC  SI TI CN5 

XXX  .XX 

NAUT  MI 

CP 

BIT  1 OF  LOW  RPGISTER  = 
2 METERS 

R0780 
R078  1 

-KK- 
NP  IGHTR 

XXXXX. 

LES 

SP 

U 

FRACTIONAL  FART  OF  2 KG 

R0782  -NN- 

R0783  TRIM  CFGREES  2 XXX. XX  CEG  SP  BIT  1= . C 1 SEC ( T I ME  ) 

R0784 (MAX  032.76) 


80785  -PP- 

R07P6  2 INTEGERS  +XXEYY  OP  BIT  1 OF  HIGH  REGISTER  = 


P.07R7 
R0788 
P 0789 
Rn79n 
R079  1 
R0792 


(B  IS  A BLANK  1 UNIT  CF  XX 

FCSTTICN.  CECIMAL  BIT  1 CF  LOW  REGISTER  = 

CN'LY,  DISPLAY  CR  1 UNIT  CF  YY  

MONITOR  ONLY.  CANNOT  (EACH  REGISTER  MUST 

BF  LOACEC.)  CONTAIN  A POSITIVE  INTEGER 

(MAX  99B99) LESS  TFAN  10' i) 


R0793  -CC- 

RC79^  POSITION? XXXX.X  NAUT  vj CP  BIT  1 OF  LOW  REGISTER  = 

R0795  (MAX  9CEE.9)  -4 

RQ796  2 METERS 


R0797 

R0798 

R0799 

-RR- 

computec  altitude 

XXXXX.  FEET 

DP  BIT  1 CF  LCW  PEGI STER  = 
-4 

RC8G0 

ROBOl 

-SS- 

2 METEFS 

RGR^? 

RORCIB 

CP  DEGREES 

XXXX.X  CEGPEFS 

CP  B IT  1 CF  FIGH  REGISTER  = 
1 CEGPEE 

R0  804 
RC6C5 
R08O6 

-TT- 

LANOING  RADAR 
FCSIT  TON 

+ 0f’C9X 

(DECIMAL  ONLY. 

channel  23, bit  6=NCT  POSIT.  1 
CHANNEL  33, BIT  7 = NCT  POSIT.  2 

pnpo7 

RoecR 

R0809 

cisflay  or  mcnttcr 
ONLY.  CANNOT  BE 
LOADED. 1 

X = 1 FOR  LR  PCSniON  1 
X = 2 FOP  LF  POSITION  2 

RCEl  C 

-WN- 

1 ^ 
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P081  1 36C-GCU  rFC-P.FFS  XXX. XX  DEGREES  SF  BIT  1 = 36t  - (360/2  ) 

R0E12  (FAX  359.99)  CEGREES 

R0ei3 (LSES  15  PITS  FOR  FAC-M- 


ROfil  A 

TLDF  AND  2-S  CCFF. ) 

RC81'= 

-XX- 

R0816 

ROfil? 

RCEIP 

POSITION  9 

XXXXX.  FEET 

DP 

BIT  1 CF  LCV^  REGISTFR  = 

-9 

2 FETERS 

R0fil9 

R0R2O 

-YY- 

VELCCITY  A 

XXXX.X  FEET/SEG 

DP 

FRACTIONAL  PART  OF 

R08201 

(FAX  328.0) 

FETERS /CENT  1-SEC 

R0821 

-AAA- 

RCF21 1 
R98212 
R0821 3 

RADIANS 

XX. XXX  RADIANS 
(FAX  31.999) 

CP 

E IT  1 C F F IGF  REGISTER  = 
-9 

2 RADIANS 

R0822 

THAT-S  ALL 

CN  THE  NOLNSo 

Gi\P:  ASSFMRLE  RFVISTPN  116  CF  t C,C  PRCGRA^'  LUMN/>RV  BV  NASA  20?]1  12-071 
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POP23 

R0R2A 

!(<g 

ALARM  CPCFS  FOP  LLMUAEY 
*18 

*60  COLLMN 

RC825 

CCOE 

* 

TYPE 

SET  BY 

PQF27 

CO  10  7 

MOPF  THAR  5 MARK  FAIRS 

ACTMAP  K 

R9828 

00111 

MARK  MISSING 

actmark 

P C829 

QP  1 12 

MARK  CP  MARK  RFjFCT  NCT  EFING  ACCEPTEC 

ACTMARK 

P083r 

00113 

NO  imbits 

actmapk 

R0831 

00114 

MARK  MACE  PUT  RTt  eES  IREC 

AOTMARK 

P0832 

OC  11  5 

NO  MARKS  IN  LAST  PAIR  TC  REJECT 

ACTMARK 

R0833 

00206 

ZERO  ENCOHE  NO'^  ALLOWED  WITH  COARSE  ALIGN 

IMU  MODE  SWITCHING 

RC83A 

C02C6 

+ GIMBAL  LCCK. 

RC8^5 

CC207 

ISS  •^URMOM,  REQUEST  NCT  RRESENT  FOR  90  SEC 

T4PLFT 

R0836 

n )21U 

TMU  NCT  CPEPATING 

IML  MODE  SWITCH,  IML-2, 

R02,  F51,  F57 

R f,83  8 

002  11 

COARSE  align  ERPCR 

IMU  MODE  SWITCH 

R0839 

00212 

PIPA  FAIt  BUT  PIPA  IS  NOT  BEING  USED 

TML  MODF  SWITCH,14RFT 

P0849 

0021  3 

IMIJ  NCT  CPERATING  WITH  TURN-CN  RfCUrST 

T4RUPT 

P08A  1 

G3214 

PROGRAM!  ISING  IMU  WHEN  TLRNEC  CFF 

T4RUPT 

R084? 

00217 

PAC  PETUPN  FROM  TMuSTALL 

P51  ,P52,P57 

R0893 

CC22G 

IML  MOT  ALIGNEC  - NC  PEFSMMAT 

R02,R47 

RC84A 

0040  1 

DESIRED  GIMBAL  ANGLE  YIFLDS  GIMBAL  LOCK 

INF  ALIGN,  IMU-2, 

Rf)84  5 

FINOCDLW 

R0846 

C0AO2 

FTNCCnUW  NCT  CCNTPCLLTNG  ATTITUCF 

F INDCDUW 

R08A7 

00404 

TWO  STARS  NOT  AVAILABLE  IN  ANY  DETENT 

R59,  LLNAR  SURFACE 

R08A8 

CC4C5 

TWO  STARS  NC"^  AVAIIAELE 

P52 

RC8^9 

0042  1 

W-MATR  1 X CVFRFl  CW 

I NTEGR V 

R085O 

00  501 

P 

RADAR  antenna  OUT  OF  LIMITS 

R 23 

RC85  1 

C0502 

BAD  RADAR  GIMBAL  ANGLE  INPUT 

V4  IN72 

R0852 

00503 

P 

RADAR  ANTEMNA  DESIGNATE  RAIL 

R21,  NCN-F  IN  V41N72 

R0853 

00510 

RADAR  AUTC  CFSCRETF  NOT  PRESENT 

P.2  5 

R085A 

CC511 

LP  NOT  IN  PCSTTICN  2 CR  REFCSITICMNG 

SERVICER 

RT855 

00  514 

P 

RR  GOES  CLT  OF  ALTO  MODE  WHILE  IN  US^ 

P2C 

Pn856 

CC515 

RR  ecu  FAIL.  DISCRETP  PRESENT  ' 

R25 

R0857 

CC520 

RADAR  PLPT  NCT  FXPFCTED  AT  THIS  TIME 

RADAR  READ 

R0888 

0052  1 

COULD  NCT  read  RADAR 

P2C 

R C 8 8 9 

CC522 

LANDING  RADAP  PCSITICN  CHANGE 

RADAR  READ 

8,0860 

30  5 2 3 

P 

LR  ANTENNA  DIDN'T  ACHIEVE  POSITICN  2 

SERVICER,  V60  (NCN-F  IN 

V6C  ) 

R0862  ' 

00525 

F 

CELTA  THFTA  GRFATFR  THAN  3 DEGREES 

P.  2 2 

R0863 

C0526 

F 

RANGE  GREATER  Tf-AN  400  NALT.  MILES 

F20,  F22 

R0864 

00527 

P 

LCS  NOT  IN  MODE  II  COVERAGE  WHILE  CN 

R21,P24 

R 1865 

LLNAR  SURFACE 

R0866 

OR  VFHICLF  mANFLVER  FECLIREC 

P24  (20) 

R08665 

00530 

P 

LOS  NOT  IN  M0DR2  COVERAGE 

P21 

R C 8 6 6 6 

GN  LUNAR  SURFACE  A FT F R 600  SECS. 

R0867 

00  600 

imaginary  RCCTS  CN  '=IRST  ITERATION 

P32,  P72 

R0868 

0160  1 

PFRTGFF  ALTITUOF  CSI  LT  PMINl 

P22  ,P72, 

RC86C 

C06  32 

PFRIGFE  ALTITUDE  CDH  LT  FMIK2 

F32,F72, 

R0870 

006'>3 

CSI  TO  CDH  T IMF  LT  TMIN12 

F22  ,F72,P33,F73 
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EO 

R 0 e 7 L 

0060A 

COH  TC  TPI  TIYf  LT  TNIN23 

F32,F72, 

RTB7  2 

OR  CtMFUTET  Crt-  ■"IME  GREATER  THAN  tnplt  TPI  TIME 

RC873 

00805 

NUf'BFR  PE  ITFRATTCNS  5XCFECS  LCQP  MAXIMUM 

P32,  P72 

RCE7A 

D08C6 

DV  EXCEEDS  MAXIMUM 

F32  ,F72, 

R0875 

0J611 

NO  TIG  FCR  GIVEN  BUEV  ANGLE 

F39  ,F79 

RC8  76 

CO  701 

ILLEGAL  CPTTCN  CCPF  SELECTED 

P57 

R0877 

00777 

PIPA  FAIL  CAUSED  THE  ISS  NARMNG 

T9RLFT 

RQ878 

01 102 

AGC  SELF  TEST  fRRCP 

SELF  CHECK 

R 0 8 8 1 

niioe 

PCHM  INK  TCC  FAST 

T9PUPT 

80882 

01106 

UPLINK  TCn  FAST 

T9P  LPT 

RO  8 83 

01107 

PHASE  TAELE  FAUUPE.  ASSUME 

RESTART 

RC88A 

ERASABLE  MFMCRV  IS  SUSPECT. 

PFSTAPT 

R0895 

01301 

arcsin-arccos  argument  too  large 

T NTERPPFTPP 

R 08^7 

01A06 

BAD  PETUFN  FFCM  RCCTFSPS 

DESCENT  GUIDANCE  EOS. 

R0898 

01A07 

VG  INCREASING  (OELTA-V  ACCUMULATED 

S90.8 

R0899 

.GT.  90  CEGPFES  AWAY  FROM  DESIRED  THRUST 

S90. 8 

RC8995 

VECTOR.  ) 

S9C.8 

R090n 

OIAIO 

UN  intent  ICNAL  PVFRFLCW  IN  GUIDANCE 

DESCENT  GUIDANCE  EOS. 

R09O  1 

01912 

CFSCENT  IGNALG  NOT  CONVERGING 

P63 

P090  5 

C152C 

V37  REQUEST  NQT  PERMITTED  AT  THIS  TIME 

V37 

R0906 

01600 

OVERFLOW  IM  DRIFT  TEST 

IMU  9 

8 0 907 

C16C1 

BAD  IML  TCRCUE 

OPT  PRE  ALIGN  CALIB 

R09n8 

01601 

IML  4 (LEM1 

R0909 

01703 

TGNTT  ICN  TIME  SLIPPED 

MIOTCAVE 

R0910 

01706 

IMCCPMECT  FPC6RAM  PECLFSTEC  FCP  VEHICLF 

R091  1 

CONE  I GUR  AT ICN 

P40,  P42 

R0913 

02CQ1 

JET  FAILURES  HAVE  CISABLED  Y-2  TRANS. 

CAD 

P091A 

''2002 

JET  FAILURES  HAVE  DISABLED  X TRANSLATICN 

CAP 

P0gi5 

0 2 003 

JET  FAILURES  HAVE  CISABLED  P-POTATIQN 

DAP 

RC916 

C2009 

JET  FAILURES  HAVF  nSABLEC  U-V  ROTATION 

DAP 

R0917 

03777 

ICDU  FAIL  CAUSED  THE  ISS  WARNING 

T4RUFT 

RC018 

04777 

ICCU  , FIPA  FAILS  CALSEC  THE  ISS  WARNING 

T^PUPT 

R0919 

07777 

IML  FAIL  CALSFD  THE  ISS  WARNING 

T^FUPT 

R0920 

10777 

IMU  , PIPA  FAILS  CAUSED  THE  T' S WARNING 

T9PLFT 

R092  1 

13  7 7 7 

IML  , TCrU  FAILS  CAUSFO  THE  ISS  WARNING 

T9RLPT 

R0922 

19  7 7 7 

IML, ICDL, PIPA  FAILS  CAUSED  TSS  WARNING 

T4PLFT 

R'192  3 

THE  FOILCWING  CPCES  INDICATE  THE  MORE  SERIOUS  '’CODOO  ABORTS  THAT  RESULT 

R092A 

IN  THE 

FRCGPAM  GCING  TO  ROO. 

R0925 

20  105 

AOTMA.RK  SYSTEM  IN  USE 

ACIMAPK 

R0926 

20^30 

ACOELFRA'F  ICN  CVERFLGW  IN  INTEGRATION 

ORBITAL  INTEGRATION 

R0927 

208C7 

NO  SPUN  from  tih-c-thETA  CP  TIME-RADIUS 

TIMETHET,  TIMEPAC 

R0928 

21103 

UNUSED  CCS  BRANCH  EXECUTED 

ABCRT 

R0929 

212C9 

WAITLIST,  VAPDFIAY,  FIXDELAY,  CP  LONGCALL 

WA  nu  1ST  POUT  INES 

R0930 

CALLFD  WITH  ZERO  CP  NFGATIVE  DELTA-TIME 

R0933 

21302 

SORT  CALLED  WITH  NEGATIVE  ARGUMENT 

INTERPRETER 

R093A 

21906 

BAD  RETURN  PPCM  Pr'CTPSRS 

IGMTICN  ALGCRITHMN 

R0935  21501  KEYBOARD  AMD  DISPLAY  ALAR"  OLPING  FirBALL 


• R0936  INTERNAL  US F ( NVSU E ). ABORT 
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F/SGE 


L 

ASSFNRLY 

AND  PPFRATICN  INFCPPATTCN 

USER'S  PAGE  NO. 

25 

EO 

R0938 

R0939 

THE  FCILOWING  CnOFS  INDICATE  A 
RESTART 

BAILOUT  ABORT  THAT 

RESULTS  IN  A SCETWAPE 

R09^r 

R0941 

P09^2 

21  lOA 

31201 

31202 

DELAY  RCLTINF  BLSY 
EXECUTIVE  OVEPFLOW-NC 
EXECUTIVE  CVERFLCW-NC 

VAC  AREAS 
CCRE  SETS 

EXEC 

EXEC 

EXEC 

R09-^  3 

R09434 

R09^3G 

31203 

3120-S 

WAITLIST  CVEPFLCW-TCC 
SECOND  JCB  ATTEMPTS  TO 
KEYBOAPD  AND  DISPLAY 

WANY  TASKS 
GO  TO  SLEEP  VIA 
program 

WAITLIST 

PINBALL 

R094A 

R0949 

P09'^6 

3 1207 

31210 

31211 

MO  VAC  AREAS  FOR  MARKS 

TWC  PROGRAMS  USING  DEVICE  AT  SAME  TIME 
ILLEGAL  INTFRRLFT  cF  EXTENDED  VERB 

AOTMARK 

MODE  SWITCHING 
ACTMARK 

R0946* 

R09A7 

31502 

32C00 

TWO  PRIP  DISPLAYS  WAITING 

DAP  STILL  IN  PROGRESS  AT  NEXT  TIMES  PUPT 

DSP  IN'TRFCE 
DAP 

-4? 


t 

€ 
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L ASSENELY  ANCOPEPATICN  INFQRMATICN  LSFR’S  PAGE  AC.  26  EO 


PQGA8 

CHECKLIST  CfCES  FGP  LUNINA'RY 

R0949 

>>9 

*17 

*26 

*9  CCLLMN 

R095L 

Rl.  COCF 

ACTICN  TC  RE  EFFECTEC 

PRCGRAM 

R0953 

R09'55 

R0957 

00C13 
COG  14 
C!;G14 

KFY  IN 

PROCEFC 

ENTER 

NORMAL  CR  GYRC  TCPGUE  CCAPSE  ALIGN 

TO  IMU  FINE  align  RCLTINF 

rC  LANDING  SITE  C FT E R N 1 N AT  IGN  (N 89C  I SP  ) 

P52 

R51  ,P63  , P57 
P57CPTICN2 

R0  96f; 
RC<562 
R C?6A 

nn^  1 5 
nno62 
00  201 

PERFORM 

SNITCH 

SNITCH 

CELESTIAL  BGOY  ACCLISITICN 
AGC  PrwFR  CGWN 
RR  NCnr  TG  AUTCMATIC 

R51,P51 

P06 

P20fP22fRC4 

R0966 

R0968 

R097C 

00203 
CO  20  5 

SWITCH 

PERFORM 

GUID  CCiNTRCl  TO  GNC,  MCDE  TC  ALTC... 
ALSC  THR  CGNT  TO  AUTO 
NANLAL  ACCLISITICN  CF  RP 

P12.P42, F71 
P40,P63,P7C 
R23 

R0972 

R097A 

R097'5 

00500 

SWITCH 

LR  ANTFNNA  TO  ROSITICN  1 

SNITCH  OEN'CTES  CHANGE  PCSITICN  CF  A CCNSOLE  SNITCH 

P63 

R0976 

R0P77 

PERFCPM  DENOTES  START  OR  END  CF  A TASK 
KEY  IN  CENCTPS  KEY  IN  CF  DATA  THRU  tee  DSKY 
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L iSSE^PLY  ANC  nPFPATIfN  INFQPMATIOM  USEE'S  PAGE  NO.  27  EO 

PCS7E  CFTIGK  CrPES  FCR  LUNUAFY 


RnQ79  THE  SPECIFIEO  OPTION  COD^S  '/'ILL  BE  FLASHFC  IN  CCMFCNFM  RI  IN 

PQ980  CCAJUNCTICN  WITH  V04N06  CP  V)AN12  (POP  EXTENCEn  VERBS)  TO  REQUEST  THE 
ROSE]  ASTRONAUT  T'R  l.OAD  INTO  CCRPCNENT  P2  THE  CFTICN  HE  CESIPFS. 


R0982 
R 0 9FA 

*9 

CPIICN 

«17 

* 52 

*11 

*25  COLUMN 

R0985 

COOF 

PURPOSE 

INFLT  FCF  CCNPCNENT  2 

f R0GPAN(S ) 

APPL  ICAPILITY 

P0987 

OOOO] 

SPECIFY 

INU  CRIENTATICN 

1=PRFF  2 = N'CR  3 = REFSMMAT 

P52 

ALL 

P 0989 

A=LANC  SITE 

R099O 

^000  2 

SP  EC  IFY 

VEHICLE 

1=THIS  2=CTHEP 

P21  ,R30 

ALL 

R0992 

00C03 

SPECIFY 

TRACKING 

ATTITUDE 

1=FRFFFRREC  2=0THER 

R63 

ALL 

R09  9A 

OOCOA 

SPECIFY 

RADAP 

1=RR  2=LR 

ROA 

SUNDANCE 

4 LUMINARY 

90996 

000  )5 

SPEC  IFY 

SOP  PHASE 

1=FIRST  2=SEC0ND 

F38 

CCLCSSUS 

4 LUMINARY 

RC998 

C0006 

specify 

PR  CCARSr 

ALIGN  CFTICN 

1=L0CKCN  2=C0NTINU0US  CESIG. 

VAIN  72 

SUNDANCE 

4 LUMINARY 

RIOOO 

OOC  10 

SPEC  IFY 

Ai  IGNRENT 

f‘'rOE 

0=ANY  TINE  1=REFSNNAT  +G 

P57 

luminary 

R10O2 

2=Twr  eCDIES  3=CNE  BCDV  4 G 

R 1003 

00012 

SPEC  TFY 

CS^  CEBIT 

CFTICN 

1=NC  CREIT  CHANGE  2=CHANCE 

P22 

LUNl NARY 

R1003  ORBIT  TO  PASS  CVFP  LR 


w 
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L 

TAGS 

FOR  relative 

SETLEC  ANC 

EL  'INK 

BANK 

.CARES 

USER'S  PAGE  NO. 

1 

EC 

T3'i  1 

PEF 

1 

CCLM 

e A N K S L R 

P'100  2 

POCULF  1 

CCNTAINS  EANKS  1 

TFRCUGF  5 

C003 

4000 

ELCCK 

02 

00 

400r 

RAUARFF 

EQLALS 

0005 

40  JO 

FFTAGl 

EQUALS 

0006 

4 ''00 

FFTAG2 

FCLALS 

0007 

4 000 

FFTA  G2 

EQLALS 

Q0C8 

400C 

FFTAG4 

EQUALS 

0009 

4000 

FFTAGl 

FCLALS 

OHIO 

40  JO 

FFTAGS 

EQUALS 

0011 

4000 

FFT AG9 

FCLI  ALS 

0012 

4000 

FFTAGIO 

EQUALS 

0010 

4)00 

FFTAGll 

equals 

0014 

4G0C 

FFTAG12 

EQUALS 

O'^l  5 

4000 

FFTAG13 

EQUALS 

CC16 

10 

V^CRCS  LEFT 

5765 

05765  0 

ENKSUN 

02 

0016 

5766 

''  5 766  C 

001  7 

6000 

BUrCK  P3 

001  8 

60'IG 

FFTAG5 

EQUALS 

0019 

6QC0 

FFTAG6 

EQUALS 

0C2C 

14 

V-CFCS  LEFT 

7761 

0776  1 

C 

BNKSUR  03 

7762 

07762 

C 

nj2i 

00.2000 

BANK 

oc 

0022 

on  ,2000 

CLAYJCB  equals 

0023 

2 WCRGS  LEFT 

07,^775 

03775  1 

ENKFL  N 

00 

002  3 

00,3776 

03776  1 

0C24 

0025 

0026 

Cl  ,2000 
01 , 2000 
01 ,2000 

RF  START 
LCACCAPl 

BANK 

equals 

EQUALS 

01 

0027  . 

0 

VvORGS 

LEFT 

Cl  ,2000 

NC  NEED 

ENKSUf' 

U1 

0028 

CC2C 

0030 

04, 2'30n 
C4,20)0 
04,2000 

R0  2 

VERB37 

BANK 

EQUALS 

EQUALS 

0 4 

0031 

0032 

0033 

v4,2C30 
C4 ,200C 
04,2000 

P INBALL4 
CCM  CSl 
KE YRUPT 

EQUALS 

EQUALS 

equals 

0034 

0035 

0036 

14.2000 
C4 , 2000 

04. 2000 

R36Lf^ 

UPrATE2 

F/PROG 

EQUALS 

EQUALS 

EQUALS 

CC365 

3037 

0037 

21 

WORDS 

LEFT 

'14,2J''J 
04,3752 
C4, 3753 

C3752  1 
03753  0 

ACTMARK2 

EQUALS 

ENKSUN 

04 
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L 

TAGS 

FCR  RELATIV'^ 

SETLCC  AND 

BLANK  rank 

CAROS 

USER'S  PAGE  NO.  2 EC 

0033 

C5, 2C0C 

BANK 

05 

0030 

05,2700 

FRANDRES 

EQUALS 

0040 

05,2000 

CCWNTELN 

EQUALS 

0041 

C5, 200C 

APCRT  SI 

equals 

0042 

05  ,2T0n 

EPFEM 

EQUAL  S 

00425 

C5 ,20<^0 

ASENT3 

ECLALS 

00426 

05,2300 

0PBITAL3 

ECLAL  S 

0043 

3 

WORDS  1.RFT 

05 ,3774 

03774 

0 

BNKSU'^ 

05 

0043 

05,^775 

C 3 7 7 5 

1 

ROOA4 


I^OCULE  2 CCNTATNS  eaNKS  6 ThROUGF  13 


OOA5 

0046 


0C47 

0048 

00485 


CC486 

004^ 

0049 


06 , 2 COO 

m6, 2000 


I ML:cr^'P 


RANK  06 
EQLALS 


06 ,20  10 
C6 , 2000 
06,2000 


tarup  equals 

RCSNCNT  ECLALS 
MlCDGIi^  EQLALS 


5 WORDS  LEf'T 


06,2000 

06,^772  G3772  C 

06,3773  03773  1 


EARTELOC  EQUALS 

BNKSLN  06 


0C50 

C7,200n 

BANK  07 

0051 

07,2000 

ACTWARK  1 

EQUALS 

CC52 

07,2000 

NGCESWl 

EQUALS 

0052  5 

C7,2000 

ASFNT2 

EQUALS 

0053 

11  WORDS  LEFT 

07, 3764 

0376A  1 

BNKSLN  07 

CC53 

07,3765 

03765  0 

0054 

10,2000 

BANK 

10 

0055 

I ',  2000 

RTBCnCES 

FQUALS 

0056 

1' ,2000 

displays 

EQUALS 

0057 

1C, 2000 

PhASFTAB 

ECLALS 

CC58 

1 ),  200n 

FLESELOC 

equals 

0C585 

10,2000 

S LCTNL 

EQUALS 

0059 

1 WORDS  LEFT 

10, 3776 

C3776  1 

BNKSLN 

1 C 

CP6C 

0061 

11 ,2000 
11 ,?COC 

ORBITAL 

BANK 

ECLALS 

1 1 

7062 

0063 

0065 

3 WORCS  LEFT 

11 , ROOO 
1 1 ,2000 
11  , :^774 

F2DPS=>  1 I 
TN-'  VE  L 

C3774  C 

EQUALS 

EQUALS 

BNKSLN 

1 1 

CC65  11,3775  03775  1 


0066 

• 0067 


12,2CCC  rank  12 

12, 2000  CONIC  S . EQLALS 
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L TfiGS  POP  RELATIVE  SETLOG  A\C  ELA^K  BANK  CARES  LSER'S  PAGE  NC.  3 EO 


12 ,2CCC 

cpbit/ili 

ECUALS 

00676 

12, 20TC 

INTPRET2 

EOIALS 

CC6E 

4 1-CRDS  LEFT 

12 ,3773 

03773  1 

BN'KSUA*  12 

0068 

12, 277A 

C211A  C 

0069 

0070 

0071 

13,2000 
13,2C00 
13. 2noc 

LATLCNG 

INTIMT 

BANK 

EGUALS 

EGLALS 

13 

0C72 

13,2000 

L EMGEOM 

EQUALS 

0073 

13 , 2000 

P76LCC 

EGLALS 

0074 

13, 2000 

ORB ITAL2 

EQUALS 

0E745 

13 ,2000 

APTFLCS 

EGUALS 

0079 

13  UGRES  LEFT 

13,3762 

C3762 

1 

eNKSUN 

13 

0075 

13, 3763 

C 3763 

C 
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L TAGS  FPRRELATIVE  SETLGC  ANH  BLANK  BANK  CAPOS  USER'S  PAGE  NC.  A EC 


P0076  i^CDULF  3 CONTAINS  EANKS  lA  TEPOUGH  21 


0077 

lA, 2 130 

BANK 

1 A 

0078 

CC7S 

007^5 

lA, 2 TOO 
lA, 2000 
lA,2CnC 

P EPS  1 

STARTAE 

ASENTA 

EQUALS 

EQUALS 

EQUALS 

ocat) 

0080 

2 

ECROS 

LEFT 

lA, 3775 
1A,3776 

03775 

03776 

1 

1 

BN'KSUN 

1 A 

3081 

CC82 

15,2000 

15,2000 

P SOS 

BANK 

EQUALS 

1 5 

0083 

008A 

CC8A 

15 

NCRCS 

LEFT 

1 5,2000 

15. 3760 

15.3761 

C3  760 
03  761 

C 

1 

EPHEW 

EQUALS 
BNK  SUN 

15 

008  5 

16, 2000 

BANK 

1 6 

0086 

0C87 

1 

NORDS 

LF.PT 

16,2000 

16,3776 

03776 

1 

CAPS  1 

EQUALS 

BNKSUP 

16 

0088 

17, 2000 

BANK 

17 

0C8S 

17,2000 

CAPS2 

EQUALS 

00805 

17,2000 

C13BANK 

EQUALS 

OrPO 

0 NCRCS  LFFT 

17,2'''n0  NG  NEEC 

BNKSUN 

1 7 

009  1 

20,2000 

BANK 

20 

0092 

2C,2ono 

0APS3 

FCLAL  S 

CC93 

2 ) ,2000 

LCACCAP 

EQUALS 

CC9A 

0 1.0RDS  LFPT 

2P,2Q00  NC  NEEC 

RNKSLN 

20 

0095 

0C96 

21,2000 
21 ,2000 

CAPSA 

BANK 

EQUALS 

21 

0098 

0099 

0100 

6 NCPOS  LFFT 

21.2COC 
21, 2000 
'21  , 3771 

■03  771 

0 

P 10 
R 11 

EQUALS 

EQUALS 

PNKSUN 

2 1 

0 1 10 

21,3772 

C 3 7 7 2 

0 
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PACE 
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1 ^ 


L 

TAGS 

FCP  RELATIVE 

SETLOC  ANE 

ELAAK  EAMK  cares 

LSFR'S  PAGE  NO.  5 EO 

poini 

M0DIL9  A 

rCNTAINS  eA^KS  22  TERGUGE  27 

on? 

22,2000 

BANK 

22 

0103 
31  'A 
010  5 

22  ,2000 
22,2CCC 
22,2000 

KALCWCM 

KALCNCA2 

R30LCC 

EQUALS 

eclals 

EQUALS 

0106 
ni  165 
C1C66 

22  ,2CQC 
22,2000 
22,20  10 

RENCEZ 

SERV2 

LANCCNST 

EQUALS 

ECLALS 

equals 

0107 

0107 

A 

UORnS  LEFT 

22  ,3773 
2 2 , 3 7 7 A 

03773  1 
0377A  C 

ENKSLN 

22 

Cirg 

0109 

23.2000 

28.2000 

PCViFLITE 

SANK 

ECLALS 

23 

01 1 o 

23,2000 

POWFL IT  1 

EQUALS 

0111 

23 ,200C 

INFLIGHT 

equals 

0112 

23,2C0C 

APOPERI 

FCLALS 

0113 

2 3 ,2000 

R61 

equals 

Oil  A 

23 , 2000 

R62 

ECLALS 

0115 

23,2300 

INTPRETI 

EOLALS 

0116 

2 3 ,2 '100 

MEAS  INC 

equals 

0117 

23,2CRC 

NFASINCl 

EQUALS 

0118 

23,2000 

extvb  1 

EQUALS 

01185 

23,2000 

P12A 

EQUALS 

■■■■■■ 

0118  6 

23.2000 

NCRMLI Z 

FCLALS 

0118  7 

23,2  100 

ASFNT7 

EQUALS 

Oil  PE 

23  ,20',1C 

R G PT  R A P 

EQUALS 

0119 

6 EORFS  LEFT 

23,3771 

03  7 7 1 

0 

PNK  SUN 

23 

Cl  19 

23,3772 

03772 

0 

0120 

f 2 C 0 

EANK 

2A 

0121 

0122 

0123 

1 VvORES  LEFT 

2 A, 2 000 
2A  ,2000 
2A.3776 

03776  1 

PLANT  IN 
fi20S 

EQUALS 

EQUALS 

BNKSLN 

2A 

C12A 

25,2000 

BANK 

25 

0125 

0126 
0127 

25 , 2QCC 
25,2000 
. 25,2000 

P20S1 
P 20S2 
RACARUPT 

ECLALS 

EQLALS 

EQUALS 

0128 

0129 

01295 

25 , 2CCG 
25,2000 
25  ,2Q00 

RRLEAC I N 

R29S  1 
PLANT  IN  3 

ECLALS 
EQUALS 
ECU  ALS 

0130 

0130 

3?  WORCS  LEFT 

25,3737 

25,3740 

C3737  1 
037A.)  1 

BN  K SL!" 

2 5 

» 

0 13  1 

26 ,2C0r 

EANK 

26 

. _ ^ ^ 
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L 

tags 

FCP  RPLATIVE 

SETLOC  AND 

PLANK  BANK 

r ARD  S 

LSEP'S  PAGE  NO.  6 EO 

0132 

26,2000 

P20S3 

EQUALS 

0133 

26 ,2CCC 

EAWLANGS 

EQUALS 

0134 

26,2000 

MANUVER 

EQUALS 

0135 

26,2000 

MAN)UV  ER  1 

equals 

01355 

2^  t 2000 

PLAMTM 

EQUALS 

01356 

26,2000 

PLANT  TN2 

EQUALS 

0 n6 

2 

VvCRDS  L'=F'f 

26 ,3775 

03775  1 

ENKSUN  26 

0136 

26,3776 

03776  1 

C!  37 
0138 

27,2000 
27, 2000 

TCF-FF 

BANK 

equals 

2 7 

01  39 

27,2000 

TGF-FFl 

EQUALS 

Cl  40 

27,2000 

P4'>S1 

EQUALS 

0141 

27,2000 

VFCDT 

EQUALS 

0142 

27,2000 

ASENT  1 

EQUALS 

01425 

27,2000 

SERV3 

E QU  A L S 

0143 

5 WCRCS  LEFT 

27, 3772 

03772  C 

ENKSUN 

2 7 

C143 

27,3773 

03773  1 

. ' . ' ’-A.  V --.-yry 

T>!»  Lk-^!' 


- ■- 


Ml 
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L 

TAGS 

FOR  RELATIVE 

SETLOr  AND 

BLANK  BANK 

CARDS 

USER'S  PAGE  NC. 

7 

EO 

POl 

ROCULE  5 

fCMAlNS  FAAKS  30  T-|-ftcUGE  2? 

01A£ 

30,2C0C 

EAAK 

30 

niA6 

G1A7 

014R 

30, 2O0P 
31  ,PO00 
30, 2000 

LOWSLPER 
P 12 
ASENT 

FQLALS 

EQUALS 

ECLALS 

0149 

01495 

01496 

3' , 2000 
30,2000 
30,2000 

FCDIJW 

FLCGSLB 

VB67A 

EQUALS 

EQUALS 

EQUALS 

G1491 

015C 

015C 

13 

1.0RDS  L'=FT 

30,2000 

30.376? 

30,^763 

03762  1 
02762  C 

ASFNT5 

equals 

BNKSLR 

30 

0151 

31  ,2  000 

BANK 

3 1 

0152 

31 ,2C0C 

F 7HP.CT 

EQUALS 

3153 

31 , 2000 

F20PS1'31 

EQUALS 

0154 

31  ,2000 

VP67 

EQUALS 

0155 

30  WORCS  LEFT 

31, '741 

03  741 

C 

ENK  SLR 

31 

C155 

31 ,3742 

03  742 

0 

0 156 
0157 

32 ,200r 
32, 2,'^  in 

P2QS4 

E AN  K 
EQUALS 

32 

01  5E 

33 ,2000 

F2CPS=!'32 

EQUALS 

0159 

32,2000 

ABORTS 

EQUALS 

0160 

22,2000 

LRS22 

FQUA  L S 

0161 

32,2000 

P66  LCC 

ECU  ALS 

0163 

32,2COr 

R47 

ECLALS 

01635 

32,2000 

S ERV 

EQUALS 

0164 

11  VvOROS  LEFT 

32  ,3764 

<33764  1 

e N K S U N 

32 

0164 

22, ’765 

C3765  C 

C165 

0166 

33,2000 
33 , 200C 

SERVICES 

EANK 

ECLALS 

32 

0167 

33,2000 

R29/SERV 

EQUALS 

01675 

33,2000 

ASENT6 

ECUALS 

'U68 

13  WGRCS  LEFT 

33,2762 

C3762  1 

BNKSL^' 

33 

C16g 

33,3763 

03763  0 

0169 

0170 
Cl  71 

34 , 2000 
34,2000 
34 , 2-VIO 

ASENT6 
P30S  1 

EANK  34 

ECLALS 

EQUALS 

0172 

34 , 2000 

CSI /CCHl 

ECLALS 

0173 

34,2000 

ASCF  ILT 

EQUALS 

01735 

34 ,2000 

P12STUFF 

EQUALS 

01736 

34,2C0C 

SERV4 

ECLALS 

Cl  73  7 

34,2000 

F 2 CPS *3 4 

equals 
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EC 

017A 

C17A 

87 

V^PRCS  LEFT 

3A,3650 
34,365 1 

0 3650 
03651 

1 

0 

ENKSLN 

34 

017  5 
0176 

35, 2CCC 
35,  2'!CC 

CS  I/CDF 

BANK 
EQLAL  S 

35 

C177 

0178 

0179 

35 , 2000 
35,2CCC 
35, 2000 

P3US 

P40S3 

P40S2 

EQUALS 

EQUALS 

EQUALS 

35.3736  33736  0 BNKSUN  35 

35.3737  03737  1 


oien 

0180 


33  IaCRCS  t FFT 
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1 

tags 

POP  RFLATIVP  SETLOC  AND 

blank  bank 

CARDS 

USER'S  PAGE  NO. 

9 

EO 

P0181 

^^OCULE  6 CCNTAINS  BANKS  26  ThPOLGE  ‘•1 

0182 

36,7000 

BANK 

36 

0183 

0184 
0184 

6 

26,2C0C 

VvTPCS  LEFT  36,3771 

36,3772 

03771  0 

03772  0 

P40S 

EQUALS 

BNKSUN 

36 

0185 

37, POOO 

BANK 

3 7 

0186 

0187 

0188 

37,2')00 
37,2000 
37, 2000 

P05P06 
I PIJ2 
IPL4 

FQUALS 

EQUALS 

EQUALS 

0185 

0190 

0191 

37 ,200r 
37, 2Q0r 
37,2000 

R31 

IMSLFER 

SERVl 

EQUALS 

EQUALS 

FQUALS 

0197 

0192 

6 

^>GRDS  LEFT  37,3771 

37,2772 

03771  0 
C2772  0 

ENKSUN 

37 

0153 

0194 

40 , 2000 
4C, 2000 

PINPALLl 

BANK 

equals 

4C 

0195 

40,2  IOC 

SELFSLPR 

EQUALS 

C156 

40 ,2 00 0 

P INSURER 

EQUALS 

01965 

AO, 2C0C 

R31 LCC 

EQUALS 

0197 

17  kCRCS  LEFT 

4 1,  3756 

03  7 56 

0 

bnksup 

4C 

0157 

40,3757 

03  75  7 

1 

0 198 
C199 

41,2000 
41  ,2000 

P I N B A L L 2 

BANK 
E CU  A L S 

41 

0200 

28 

ViORCS 

LEFT 

41 , 2743 

03743 

1 

BNKSLN 

41 

02  00 

41, 3744 

03  744 

C 

02C1 

42 ,2  COG 

BANK 

42 

0 20  2 

42, 2CO0 

SBANC 

FCLALS 

0203 

' 

42,2000 

P TNBA1.L3 

EQUALS 

02Q4 

7 

WCRDS 

LEFT 

42 ,3770 

03  7 70 

1 

BNKSUN 

42 

0204 

42,3771 

G377  1 

C 

C2C5 

43,2000 

BANK 

43 

0206 

0207 

43,2000 
4 3, 2 'JOG 

EX^VERBS 

SELFCFEC 

FCLALS 

EQLALS 

C2C8 

0208 

5 V^CRHS  lEFT 

43.3772 

43.3773 

03772  0 

03773  1 

ENKSUP 

43 
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L 

T AG5 

FOR 

PFL  AT 

IVF 

setloc  and  blank 

BANK  CARDS 

USER'S 

PAGE  NC 

• 

10 

EO 

C2G9 

REF 

1 

23,2523 

F lEZEROS 

EQUALS 

Z FRQVECS 

ZERC 

VECTOR 

ALWAYS 

IN 

FIGF 

RENCRY 

0210 

REF 

1 

12,2006 

LC6ZERCS 

ECLALS 

ZERFVEC 

ZF  PC 

VECTOR 

ALWAYS 

IN 

LCW 

MEMORY 

0211 

REF 

1 

23,2521 

F'  IDPFALF 

EQUALS 

UMTV 

C212 

PFF 

1 

12  ,2004 

LCCPFALF 

equals 

XUMT 

0213 

RFF 

1 

23, 2512 

HIOPl  /4 

EQUALS 

DPI /4TH 

021A 

rff 

1 

04 ,3')20 

LCD P 1/4 

EQUALS 

Dl/4 

2 DEC 

.25 

0215 

RFF 

2 

LAST 

31 

23,2521 

HIUMTX 

EQUALS 

UMTX 

02  U-. 

REF 

1 

23,2517 

FTUNITV 

fqlal  S 

UNITY 

0217 

PFF 

1 

27,2515 

F lUNITZ 

EQUALS 

UMTZ 

021P 

REF 

2 

LA  ST 

3 1 

12, 2004 

LCLNITX 

EQUALS 

XLMT 

2CEC 

.5 

0219 

P‘=F 

1 

12,2002 

LOLN ITY 

EQUALS 

YLN  I T 

2CEC 

0 

0 220 

RFF 

1 

12,2000 

LTUNITZ 

equals 

ZUN  IT 

2CEC 

C 

R0P21 


0222 

Ri^F 

1 

22 ,354  1 

CELRSFL 

EQUALS 

SPLRET 

CCL  PGM, 

ALSC  CALLED  B > 

P30  IN  LUMNAPY 

R0223 

ROPE- 

SPECIFIC 

ASSIGNS  obviating 

NEED  TC  CHECK  CCMFUTEF 

FLAG  IN 

CETFRMMNG  INTEGRATION 

AREA  ENTRIES. 

0225 

REF 

1 

13,2735 

ATOPTFI S 

EQUALS 

A TCPLFM 

0226 

RFF 

1 

13 ,7662 

ATOPCTF 

EQUALS 

ATOPCSM 

0227 

RFF 

1 

13,3044 

OTHPREC 

EQUALS 

CSMPREC 

3228 

RFF 

1 

P174 

MCONTHI  S 

EQUALS 

LMCPNFLG 

0229 

REF 

1 

0173 

MCGNCTH 

FQUALS 

CMCnNFLG 

0 2 30 

RFF 

1 

13,2750 

mcvathi S 

EQUALS 

MCVEALEM 

0231 

rff 

1 

12 ,2017 

RMM 

~ 

LOCPMAX 

0 232 

R«=F 

1 

12  , 202  1 

PRF 

= 

lccpmaxi 

0233 

REF 

1 

13,3060 

TFISPREC 

FQUALS 

LEA'PREC 

0234 

RFF 

2 LAST 

37  23,2515 

TFISAXIS 

= 

UNITZ 

0 23  5 

REF 

1 

23,25! = 

NB1N82 

EQUALS 

THISAXIS 

FCR  R31 

0236 

RFF 

1 

5011 

. EPASIC 

EQUALS 

BITS2-10 

CrWNL  INK 

ERASABLE  DUMP 

ID. 

0237 

RFF 

1 

4 752 

OFL  AYNUM 

EQUALS 

TWC 

gap: 
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L 

fONTpCLLEC  CriNSTAMTS 

USER'S 

PAGE 

NO.  1 

EO 

pomi 

DPS  AND  APS  ENGINE  FARAPETTPS 

0002 

0003 

OOOA 

PER 

REF 

1 

1 

36, 2000 
36, 2RP0 

SFTLCC 

BANK 

CCUNTX 

P90S 
$ J /P9'' 

ROOD  5 

*sl*« 

TFE  ORDER  OF 

THE  FOLLOWING 

SI  X CON  STANTS  PUST 

NCT  BE 

CFANGEC 

C006 

36,2000 

01G56 

0 

FTPS 

2CEC 

9.367’'  B-7 

9817.5  LBS  FCRCE 

IN  NEHCNS 

0006 

36 , 2C01 

37  167 

C 

0007 

36, 2002 

6 0 9 5 7 

1 

MDQTDPS 

2nFC 

Q.1980  R-3 

32.62  LBS/SEC  IN 

KGS/CS. 

CCC7 

36,  Ri,C3 

0325.3 

0 

0008 

36,2009 

7 7 7 7 7 

c 

DODECA Y 

2DEC 

-38 

0008 

36,2,005 

7773  1 

1 

0009 

36,2006 

00307 

0 

FAPS 

2CFC 

1.5569  B-7 

3500  L8S  FORCE  IN 

NEWTCNS 

0009 

36,2007 

1 1090 

c 

nnio 

36 ,2  no 

00  151 

1 

NPOT APS 

20EC 

0.05135  B-3 

11.32'  LBS/SEC  IN 

KGS/C  S 

0010 

36, 2011 

05219 

c 

001  1 

36,2012 

7 7 7 7 7 

c 

AIDECAY 

20EC 

-10 

0011 

36,2H3 

77765 

0 

0012  2 36,2"I4  00004  0 lOQPCTTO  2Prc  38  B-17 CPS  T/ilLCPf  TI^E  FRCf^  LOO  PERCE^T  THRUST 

Q0L22  36,2015  3''000  1 


0013 

36,2316 

00026 

0 

FRCS9 

20EC  0.17792  B-7 

900 

LBS  FORCE  IN 

NEWTCNS 

0013 

36,2017 

3C6C5 

1 

0019 

36,2020 

OOO  1 3 

0 

FRCS2 

2DEC  0.C8896  B-7 

200 

LBS  FCRCE  IN 

NEWTON'S 

001  9 

36, 2C21 

19303 

1 

3015 

REF 

1 

27,2000 

SETLCG  P93S1 

0016 

2 7, 2'3nrt 

DANK 

'00  17 

RFF 

1 

CCUNTX'  JS/P90 

Rool  a 

APS 

IPPULSE  CATA  FOP.  P92 

>>=!<!!= 

: $Sc  ^ ^ ^ 

0C19 

2 7, 20', 3-3 

00  3,30 

1 

K IVAL 

20FC  129.55  B-23 

2800 

LB- SEC 

CC  19 

27,2001 

0 7 6 2 2 

0 

0020 

27,2002 

00000 

1 

K2VAL 

2DEC  31.138  B-29 

7G0 

LB-SEC 

00  20 

27 , 2003 

00762 

1 

302  1 

27,20''9 

CCC30 

1 

K3VAL 

20FC  1.5569  E-10 

FAPS 

( 3 5'iU  LBS 

TFRUST ) 

0021 

27,2305 

35139 

1 

R0022 

00  2 3 

27, 20(  6 

07'n6 

r 

S90.  136 

20EC  .9671  B-9 

.9671  P AFWTCNS 

(CPS  ) 

0023 

27,2007 

36  2 37 

1 

0029 

27,2010 

3 5 7 1 1 

c 

S90.  136 

_ 2CEC  .9671  B+1 

S90. 

126  SHIFTED 

LEFT  1C. 

0029 

27, 2311 

35663 

1 

CC25 

RFF 

1 

27 ,20 30 

SETLCC  ASENTl 
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I ’ CCNTPCLLEi:  CONST  AM  S 
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0026 

CC27 

PPF 

1 

27, 2012 

BANK 
COUNT  X 

D/P7C 

0028 

27,2012 

03631 

0 

(1/3V)A 

2nFC 

15.20  B-7 

2 SECCNCS  WORTF  OF  INITIAL  ASCENT 

0028 

27,2013 

23  146 

0 

A0029 

stage  ACCELERATION  — INVERTED  (M/CS) 

A0n30 

1)  PREDICATED  CN  A LIFTOFF  NASS  OF 

A0031 

486S.S  KG  (SNA-8-D-C27  7/11/68) 

A0032 

2)  PRECICATFC  ON  A CONTRIBLTICN  TC  VFH- 

A0033 

ICLE  ACCELERATICN  FRCM  RCS  TFRLSTERS 

A0C3A 

EQLIV.  TO  1 JET  CN  C C N T I NLCL S L Y . 

003  5 

27,2014 

33226 

1 

K(  i/r\/) 

20EC 

436.70  B-9 

CPS  ENGINE  TFRLST  IN  NEWTONS  / mO  CS. 

0035 

27,2015 

14632 

c 

■0036 

27,2616 

05  306 

1 

(ADA 

2DEC 

3.2883  E-4  E9 

INITIAL  ASC.  STG.  ACCELERATICN  x<=i=  N/CS. 

0036 

27,2017 

155C3 

c 

ACC37 

ASSLNPTICNS  SA^'E  AS  FCP  (1/CV)A. 

0038 

27,2020 

26337 

1 

(TPIJP  ) A 

2CEC 

91902  B-17 

ESTIMATED  eURN-UP  TIME  CF  THE  ASCENT  STG 

0038 

27,  202  1 

3O00C 

1 

ACC39 

ASSLMPTICNS  SANE  AS  FCR  (1/DV)A  WITH  THE 

A0040 

ADCITICN.AL  ASSUMPTION  TEAT  NET  NASS-FLCW 

AOOAl 

RATE  = 5.299  KG/SEC  = 5.135  (APS)  + 

A00A2 

. 164  ( 1 RCS  JET). 

0043 

PEE 

1 

3C,2000 

SFTLCC 

ASENT 

CC44 

30 , 2000 

BANK 

0045 

REF 

1 

CCLNT^ 

$i/ASENT 

0046 

30,  2 '000 

F2445 

r 

M/RCS 

2DEC 

.CC00785  B+10 

4 JETS  IN  A CRY  LEN 

0 046 

30,2001 

00274 

G 

0047 

R'^F 

1 

33,20^0 

SETLCC 

SERVICES 

n04F 

33,2000 

E ANK 

0 049 

REF 

1 

’ 

CCUNT* 

$$/SERV 

RCC5P 

tfe  croer  of 

TFF  FCi lowing 

TWC  CCNSTAN'TS  NUS7 

MOT  BE 

CFANGEC  =!>!X44=>^ 

0051 

3 3,  2' '00 

41545 

C 

APSVFX 

CEC 

-3030  E-2  B-5 

9942  FT/SEC  IN  M/CS. 

00  52 

33  , 20  ' 1 

^2  24  1 

1 

DPSVE  > 

DEC.  4 

-2.95588e68r•^ 

ie-05X=  VF  (CPS)  -f2  .95588868E+  2 

R0053 

0054 

RFF 

1 

31  , 200C 

SFTLCC 

F2DPS=i=31 

00  5 5 

31  , 2'ion 

BANK 

0056 

RFF 

1 

CCUNT=f 

S$/F2CPS 

0057 

31, 2D0C 

CC222 

r 

OR  INACCL 

2DECX. 

+3.5C1327C8E- 

5P+08*  A (T)  +3  .50  1327C8E-  1 

C057 

3 1 , 2.13  1 

33316 

0 
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CONTROLLFD 
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P0058 

TFFCfTLING 

ANC  TI-PUST  OFTECTICN  PARAMETERS 

T059 

P'^F  2 

LAST  36 

36,2000 

SFTLCC 

P60S 

0060 

36,2022 

BANK 

0061 

REF  2 

LAST  38  TC 

38  : 

18  1£>! 

COLNT=» 

i 5/P60 

0062 

36, 2022 

0CC30  1 

TFRESFl 

CFG 

26 

0063 

36,2023 

rociA  1 

TFRFSF3 

CFG 

12 

CC64 

REF  1 

6737 

F IRTFRCT 

= 

B IT  13 

0066 

PFF  1 

60CC 

SETLCC 

'^FTAGE 

0066 

6ono 

BANK 

0067 

RE6  1 

CCUNT=!’ 

$ J/P60 

006  8 

6000 

00666  1 

THRE  SH2 

DEC 

3C8 

CC6C 

REF  1 

31,2000 

SETLOC 

F7FR0T 

0070 

31, 2002 

BANK 

0071 

PPF  1 

CCUNT=A 

$t/THROT 

0072 

31  ,20C2 

07601  0 

FN AXCCC 

FFC 

+ 3B61 

FSAT 

+ 6.  ei65|6612E+  6 

V, 

1 (J  6 6 0 ^ 

007  3 

31,2003 

06613  0 

FMAXPCS 

CFG 

+ 3667 

FMAX 

+6.36 566 76SF+  6 

0076 

31 ,2006 

O0T26  1 

T PRUT  LA  C 

LEG 

+ 20 

lAL  (TH) 

+ 1 . SSSSS9SSE-  1 

00  76  5 

21 ,2005 

CC307  0 

SGALFFAC 

2CEC* 

+7.P7959872E+ 

2E-16*  eiTPERF 

+7.S7S5S87SE-  2 

C0765 

31,20C^6 

17  5 2,6  0 

CC75 

PFF  1 

32 ,20O0 

SETLCC 

F20PS*32 

00  76 

32, 2000 

BANK 

iDf 

0077 

»EF  1 

CCUNT=> 

$$/F2DPS 

0078 

32,2000 

00066  1 

CFSTFRSF 

CEC 

36 
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0083 

RPF 

1 

25, 2CCC 

SET  1 CC 

R ADAFLPT 

0084 

2 5, 2.' 20 

BANK 

0085 

OFF 

1 

CCUNT* 

$J/RRUPT 

0086 

25,2000 

4 7 7 7 7 

C 

L V^LBIAS 

CRC 

-12288 

LANCING  RACap  BIAS  FOR  153.6  KC. 

or  87 

25,2001 

000  31 

0 

RCPT  E IAS 

2rEC 

17C00 

BIAS  r.CLNT  FCR  RR  RANGE  RATE. 

0087 

25 , 2CC? 

C 1 lEC 

1 

0088 

PFF 

1 

32, 2000 

SETICC 

LPS22 

00  89 

32,2001 

BANK 

0090 

REF 

1 

CCLNT* 

$$/LRS22 

0091 

32 , 2 'll 

70123 

0 

RGOTCCN V 

2DEC 

- .0019135344 

B7  CCNVPPTS  RR  PCCT  READING  TC  P/CS  AT  2(7) 

0091 

32,2002 

40702 

0 

0092  32,2C03  13331  1 PANGCCNV  2CFC  2.859C24  E-3  CCPVFFTS  PR  FAPC-E  PLACING  TC  . AT  2(-2F 

CC92  32,2)04  10776  0 

CC98  REF  2 LAST  3F  33,2000 SETLCC  SERVICES 


0099 

0100 

33, 2202 

RFF  2 LAST  39  TC  39; 

2 

2* 

BANK 

CCUNT=5  $I/SERV 

om 

33,2002 

61  CCG 

0 

HBEAPANT 

2DPC 

- .46870  18U4  1 

RANGE 

EFAN  IN  LR  ANTENNA  COORDINATES. 

Ol'l 

33,2003 

71210 

1 

0 1 ' 2 

33 ,2CC4 

00000 

1 

2DFC 

0 

■|  102 

33,2005 

OCCQO 

1 

0103 

33,2006 

72333 

1 

2DEG 

-.  174  12242  7 1 

"1C3 

33 , 2007 

45  546 

1 

01  '4 

33, 2010 

6 5 363 

1 

'HSCAL 

2DEC 

-.3288792 

SCALPS 

1.079  FT/BIT  TC 

2 (22  )P  . 

0104 

33,2C11 

6445  1 

0 

R31  i5 

tee  SEQUENCE  OF  ThE  FGLLCKING  i 

SGNSTAN'TS  PLST  BE 

FRESERV'^D  =!<=J‘****>|,* 

0106 

33, 20  12 

21241 

0 

VZSCAL 

2DEC 

+ . 541C829  1C5 

SCALE  S 

.6668  FT/SEC/BIT 

TC  2(18)  P/ CS. 

0106 

33 , 2C13 

03216 

1 

0107 

33, 2C  14 

30153 

0 

VVSCAL 

2DEC 

+ .7565672446 

SCALES 

1.212  FT/SEC/BIT 

TC  2(16)  P/CS. 

C1C7 

33,2015 

231  11 

0 

Q1C8 

33,2016 

631  05 

c 

VPSCAl 

2CFC 

- .402004377C 

SCALES 

-.644  FT/SEC/F>n 

TC  2(18)  P/CS. 

0138 

33,2017 

6 1733 

1 

P01':9 

Olio 

33 , 202C 

01507 

1 

KPIP 

EEC 

. '512 

SCALES 

CELV  TC  UNITS  CF 

2(5)  P/CS. 

0111 

33 , 2021 

00  321 

1 

KPIP  1 

2DEC 

.0126 

SCALF  S 

DFLV  TC  UNITS  CF 

2(7)  P/CS. 

0111 

33,2922 

26706 

1 

3 112 

3^,2023 

00  15C 

0 

KPI  P2 

2CEC 

. 0(3  64 

SCALFS 

CELV  TC  UMTS  CF 

2(8)  M/CS. 

0112 

33  ,2024 

33343 

0 

i 

i 
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CCNTRCLL'^D  CONSTANTS 

USER'S  PAGE  NO.  5 EC  S3 

1113 

33,2025 

02630 

0 

AITCCNV 

2DEC 

1.39SC76846  E-4 

CCNVEFTS  V*2(-24)  TC  BIT  UNITS  »2(-2E). 

0113 

33  ,2026 

2 5, no 

1 

J1 1-^ 

33  ,2F27 

2 4402 

1 

APCCNVl 

2CEC 

656.16797S  E-10 

CCNV.  ALTRATE  COMP.  TO  Ell  LNITSS 

ail  4 

33, 2030 

26003 

c 

0115 

R'=F  1 

21 ,2000 

SFTLCC 

R 10 

nu6 

21 , 2COO 

BANK 

1117 

REF  1 

CC'UNT=J 

$$/P  10 

)118 

21 ,2000 

24402 

1 

ARCCNV 

CCT 

24402 

656.1  67979SB- 10  CCNV  ALTRATE  TC  BIT  UNIT 

311'? 

21,2001 

0155  1 

1 

ARTOA 

CEC 

.1066098  B-1 

.25/2.345  e-1  4X/SEC  CYCLE  RATE. 

0120 

21 ,2)12 

21357 

c 

ART0A2 

CFC 

.0021322  BE 

{.  5) / ( 2.  24  5 ) ( ICC) 

0121 

21,20U3 

22316 

G 

VFLCCNV 

CCT 

22316 

588. °14  E-IC  CONV  VEL  . TO  BIT  UMTS. 

0122 

21 ,2004 

01507 

1 

KP IP  1 ( 5 ) 

DEC. 

.C512 

SCALES  CELV  TC  w/CS=i=2  (-5 ) . 

0123 

21  ,2005 

0C547 

1 

MAXVPITS 

CCT 

00  547 

MAX.  CISPLAYEC  VELOCITY  1C9.99ES  FT/SEC. 

0124 

REF  1 

20,200<1 

SETLCC 

D APS3 

0125 

20 ,2000 

BANK 

0126 

RFF  1 

CCLNT* 

$$/DAPAO 

012  7 

20,2000 

Cl  150 

1 

TORKJETl 

DEC 

.P3757 

550  / .2  SCALED  AT  (+16)  64  / 180 

ft 
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L ''ONTR.GLLFC  COMSTAMS  ' LSER'S  PAGE  NO.  6 EC  S3 


PT12  8 

parameters  relating 

TO  mass, 

inertia, 

, AND  VEHICLE 

DIMEN 

STICNS 

012P 

R'=F 

1 

C5,2G00 

SETLCG 

F PANCRES 

0 1 30 

05, 

BANK 

0131 

REF 

1 

CGUNT* 

$$/START 

013? 

05,2CCC 

02357 

1 

FLLLAFS 

CFG 

5050  B-16 

NGMINAL  FULL  ASCENT  MASS  — 2(16)  KG. 

0133 

REF 

1 

01 , 200C 

SETLCG 

LCADCAPI 

013A 

Jl  ,2  000 

BANK 

0135 

rff 

1 

GCLNT* 

$ J/R03 

P1136 

1 , 2000 

76466 

1 

M INLMC 

DEC 

-2850  B-16 

MN. 

CESGENT  stage  MASS  --  2(16)  KG. 

0137 

Cl  ,2001 

76731 

0 

M INM  INLN 

EEC 

-2200  B-16 

MIN 

ASCFNT  STAGE  MASS  --  2(16)  KG. 

0138 

REF 

1 

474  1 

M I NC  S N 

= 

BITll 

MN 

GSM  MASS  (CK  FOP  1/ACCS)  = SC5C  LBS 

013  5 

RFF 

2 LAST  42 

20,2000 

SETLCC 

GAPS3 

0140 

20,2001 

F>ANK 

0141 

REF 

2 LAST  42  TG 

43  : 

1 

I« 

COLM>!' 

S $/nAPAG 

0142 

20,2001 

01046 

1 

LGASCENT 

CFG 

2200  B-16 

MIN 

ASCFNT  LEM  MASS  — 2(  16)  KG. 

3143 

20, 2002 

07361 

1 

HIDESCNT 

CFG 

153'K)  B-16 

MAX 

CFSGENT  LEM  MASS  — 2(16)  KG. 

0144 

20, 2003 

006  66 

1 

LCDESCNT 

DEC 

175C  E-16 

MIN 

DFSCFNT  STAGE  (ALCNE)  --  2(16)  KG. 

GAP: 

ASSr-NBLF  RP\/ISI0N  116 

CF  ACC  FRCGFA'^  LUA'INARY  EY  NASA  202 

11  12-0  71 

19:09 

AUG.  11, 

1969 

( PAIN  ) 

FACE 

66 

1, 

CGNTPCLLFD  CONSTAMS 

USER'S 

PAGE 

NO.  7 

EO  S3 

P0145 

FHVSTrAL  CONSTAMS  ( 

TIRE  - I^VARIAN7  1 

0 1 66 
0167 
C 168 

P‘=F  1 

RTF  1 

37,2000 
37, 2000 

SFTLCC 

BANK 

COUNT 

I PU2 
1 3/PC7 

016<3 

0169 

37.2000 

27.2001 

C7623  1 CPEG/RS 
26552  1 

2PFC 

.24339U68 

G150 

0151 

0152 

REF  1 

RFF  1 

22 , 2000 
22, 2C0C 

SFTLCC 
EAF  K 
COUNT* 

R30L0C 

$$/R30 

P0153 

♦ THE  CRDFR  CF  IFF 

FOLl  C'aING 

TFC  CCNSTANTS  KJST 

BE  FPFSEFVEC  ********* 

1156 
0156 
015  5 

22, 2000 
22 ,2001 
22 ,2C02 

27522  1 1/RTYLM 
07571  0 

25006  1 1/RTPLF 

2DEC* 

2CEC* 

.65162595 

.50087529 

E-6 

E-5 

E16* 
El  7* 

ni55  22,2003  06702  1 


0157 

Rt^F 

2 

LAST 

3E 

27,2000 

SETLCC 

P60S1 

0158 

?7,2C22 

BANK 

0 159 

REE 

1 

CCUNT* 

$ I/S60.9 

0160 

27,2022 

55360 

0 

EARTHRU 

2CFC* 

-3.086032  ElO  B-36*  R(3I/CS(2) 

C16C 

27,2023 

61710 

C 

0165 

RFF 

2 

LAST 

3E 

27 , 2000 

SETLCC 

ASENTl 

0166 

27,2026 

BANK 

0167 

REF 

1 

COUNT  * 

$}/P  12 

0168 

27, 25'26 

0CC72 

1 

ML’R(-37) 

2CEC* 

6.9027780  E8  E-37* 

0168 

27,2025 

1 6206 

1 

016  9 

27,2026 

OC366 

1 

RCCNRAT  E 

2CEC* 

. 266  16996B9CC6299  1 E- 7 B*19*  RAD/CS. 

0169 

27, 2027 

2^32  1 

C 

C17C 

RFF 

3 

LAST 

61 

33 , 2 ))0 

SETLCC 

SERVICES 

0171 

33  , 2031 

EANK 

0172 

RFF 

3 

LAST 

61  TO 

62: 

23 

2 5* 

COUNT* 

$$/SERV 

R0173 

*** 

THF 

CROER 

OF  THE 

FOLl CW  T^G 

TWr  CCNSTANTS  RUST 

BE  PPESEPVEC  ********* 

0176 

33,2331 

61377 

C 

-PLOT 

20EC* 

-7.9720665  E+12  B-66* 

0176 

33,2032 

55756 

1 

0175 

33,2033 

77666 

1 

-RLOTl 

2CEC* 

-9.8055560  E+10  B-66* 

0175 

33,2036 

^^556 

1 

ROl  76 

0177 

33.2035 

66653 

1 

-RLDIRLN 

2PEC* 

-9.8055560  E+10  B-38* 

0177 

33,2-336 

5567C 

c 

0178 

33 , 2037 

00  10  2 

0 

R ESQ 

2DEC  * 

60.6809913  E12  B-5E* 

0178 

33,2060 

11777 

r 
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L CCMPCLLEC  CONST'MTS 


LSER'S  PAGE  NC.  8 EO  S3 


C179 

33 , 2041 

01023 

1 

20J 

2GEC 

3.2469201C  E-2 

0179 

33,2042 

37  155 

1 

018C 

33, 2'^43 

100  6 5 

1 

2J 

2DPC 

3.24692C1C  E-3 

018G 

33 ,2C44 

06244 

:) 

)18  1 

PEF 

1 

14 , 2G0G 

SETLCC 

P50S1 

C182 

14,20-00 

BANK 

0183 

REF 

1 

COUNT* 

$1/1 GSAR 

0184 

14,2000 

26722 

r 

RSLBEP 

2DEC 

384402000  8-29 

<1184 

14,2C01 

00450 

0 

0185 

14, 2002 

0006  5 

1 

R S L B R 

2DEC 

1738090  B-29 

0185 

14,2003 

01265 

1 

0186 

14,2004 

0C302 

0 

PSUBE 

2GFC 

6378166  B-29 

0186 

14,2005 

24  532 

1 

0187 

14,2006 

00052 

0 

ROE 

2DEC 

.CC257125 

0187 

14 , 2007 

04'-47 

c 

0188 

REF 

1 

04, 2l  or 

SETLCC 

C C M C S 1 

0189 

04 , 2‘  >00 

BANK 

0190 

RFF 

1 

CCLNT* 

$$/LT-L  G 

Ol<5  1 

04,2030 

0130  2 

0 

ERAD 

2DEC 

6273338  B-29  PAC  RAOILS 

0191 

C4,2fi01 

1 7 755 

0 

0192 

G4, 2002 

OC065 

1 

5C4RR 

2CEC 

1738090  E-29  RETRRS  E-29  (ECUATCRIAL  MCCN  RACILS) 

0192 

04 ,20  » 3 

01265 

1 

0193 

REF 

2 

LAST  45 

C4 ,2000 

SETLCC 

CCN ICSl 

0194 

04,2  2 )4 

BANK 

C195 

PEF 

1 

COUNT* 

tl/CCNIC 

R0196 

4 S|*  5^ 

THE 

ORDER  GF  THE 

FOl LOWING 

CCNSTANT 

S RLST  BE 

ERESERVEC  ************* 

0197 

04, 2T J4 

22437 

1 

MUTABLE 

20EC  * 

3.986032  EIC  B-36*  MUE 

0197 

04  ,2C05 

16C67 

1 

0198 

04, 2006 

1 5 62  5 

1 

2DFC* 

.250876C6  E-IO  P + 34*  1 / MJ  E 

C198 

04,2007 

21042 

1 

C19'9 

04 , 2 j 1C 

3 .)  2 7 6 

1 

2DEC* 

1.99650495  E5  B-18*  SCRT(MUF) 

0199 

04,2011 

04772 

0 

C2^C 

04,2  112 

25i))4 

1 

2CEC* 

.50087529  E-5  B+17*  1/SQR7(MLE) 

02n;i 

0,4,2013 

06702 

1 

0201 

0201 

04,2  114 
C4,2015 

16471 

11352 

1 

1 

20EC* 

4.902778  EE  B-3C* 

RLR 

0 20  2 

04,2016 

2 14  12 

0 

2DFC* 

.203966  E-8  8+28* 

1/*UN 

C2G2 

■14 ,2-117 

20  500 

0 

0203 

C4 , 202C 

254  77 

1 

2CFC* 

2.21422176  E4  B-15* 

SQRT  (MUM ) 

0213 

14, 2021 

02  267 

c 

02C4 

04,2  '22 

27533 

1 

2CEC* 

.45162595  E-4  B+14* 

1/S0RT( MLR) 

0 20  4 

04,2023 

07  571 

c 

R0209 
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L CCNTRCLLFC  C^NST/^^TS  ' ISER’S  PAGE  NO.  S EO  S2 


0206 

R8F 

1 

13, 2000 

SETLCC 

I NTI  MT 

0207 

13,2000 

BANK 

020P 

REF 

1 

rcuM* 

fJ/INTIN 

0 209 

13,2000 

07  112 

1 

CREGNCCN 

20EC* 

2.66169947  E-8  B+23* 

C2CS 

13,2  1)1 

C6620 

(1 

0210 

REF 

1 

13, 2000 

SETLCC 

C FBITAL2 

0211 

13,2002 

BANK 

0212 

REF 

1 

COUNT* 

tJ/np.eiT 

P.  0 213 

IFF 

ORDER  OF  THE  FOLLQ'rtING 

CC^  SIAM  S 

RLSl  NC1 

BE  CHANGED  * 4 =t ^ # 

0214 

13,  ?■■)  '2 

27446 

1 

20FC* 

1.32715445  E16  B-54* 

S 

0214 

13, 2 '^03 

14620 

0 

0215 

13, 20  )4 

1647  1 

1 

2PEC* 

4.9027730  E8  B-30* 

0215 

13,2005 

01352 

1 

02  U 

13 ,2006 

22437 

1 

RUE.fiKTF 

2CEC* 

3 .986v)32  FlC  B-36* 

021  6 

13, 20  )7 

16067 

1 

C21  7 

13  ,?  '10 

00100 

1 

2DEC 

0 

0217 

13,2011 

ocooc 

1 

02111 

13,2012 

C2302 

1 

J4RFQ/ J2 

2DF;C* 

.4991607391  E7  E-26* 

0218 

13,2013 

24  735 

0 

0219 

1 3 , 2 C 1 4 

7765  1 

0 

20EC 

-176236.02  E-25 

021S 

13,2015 

76237 

0 

0220 

13,2016 

77776 

1 

2J3RE/J2 

2 DEC* 

-.1355426363  E5  B-27* 

0220 

13,2017 

5 3 0 3 2 

c 

0221 

13 ,2020 

104. )7 

0 

2DFC* 

.3067492316  F16  B-6C* 

0221 

13,2021 

C 5344 

1 

0222 

13,2022 

13710 

0 

J2REQSG 

20EC* 

1 . 7 55CU39  F21  B-72* 

0222 

13,2023 

3 5 320 

n 

0223 

13,2024 

12  16G 

0 

3J22R2RI 

2DEC* 

9.20479C46  E16  E-58* 

0223 

13  ,2725 

12124 

0 

R02P4 

0225 

PEF 

1 

27, 2i.'00 

SETLCC 

1 

U. 

LL 

U_ 

L-> 

0226 

27,2030 

BANK 

0 227 

RFF 

1 

CCLNT* 

$$/TFF 

0228 

27,2030 

24775 

1 

1/RTMU 

20EC* 

.50C575C271  E-5  B 1 7* 

MODIFIED  E.ARTH 

NU 

0228 

27,2031 

20424 

c 

0229 

PFF 

1 

42,2O0f 

SETLCC 

SBAND 

0230 

42 ,2000 

BANK 

0231 

RFF 

1 

CCLNT* 

$$/R05 

0232 

42,2  7'.0 

26723 

0 

R EMC  1ST 

2 DEC 

3844020C0  B-29  MEAN 

CIST4NCF  BETKEEN 

EARTH  ANC  RCCN. 

023? 

42, 2on  1 

OC45C 

c 

G^^p; 

ASSEP8LE  REVISION  116  CF  t-GC  FRCGRAN  LU^T^^FY 

ev  N4S6  2021112-C71 

19:09 

AUG.  11 

, 1969 

(MAIN) 

page  47 

L 

CGNTRCLLC-C  CONSTANTS 

USER* 

S PAGE 

NO. 

10 

EO  S4 

P0233 

PH'iSKAL  CCNSTANTS  ITINF  - VAFIAM) 

0234 

Rcp  1 14,2000 

SETLCC 

START  68 

0235 

14, 20in 

BANK 

0236 

REF  1 

COUNTS 

$$/STARS 

023? 

14, 2010 

15262  0 

20EC 

+.8342971408 

e-1 

star 

37 

X 

023? 

14, 2'Ul 

21773  1 

023fl 

14, 7 ^'12 

74130  0 

2TFC 

-.2392481515 

e-i 

star 

37 

V 

0238 

14, 2013 

42420  1 

0235 

14 , 2014 

70133  0 

2DEC 

- .496697697  5 

B- 1 

STAR 

37 

z 

0239 

14,2'nS 

41533  1 

0240 

14,  zf^ie 

15014  C 

2DEC 

+.8139832631 

B-l 

star 

36 

X 

C240 

14,2017 

04651  0 

0241 

14, 2? 20 

67C67  1 

2DEC 

-.5557243189 

p-i 

star 

36 

Y 

0241 

14,2021 

60  15  1 0 

02  42 

14,2022 

02551  1 

2CEC 

+ . 1691204557 

R-l 

STAR 

26 

Z 

0242 

14, 2023 

15723  C 

0243 

14,2024 

07210  C 

2DEC 

+ .454  10  8 627  C 

B-  1 

STAR 

35 

> 

0243 

14, 2025 

C1664  1 

0244 

14,2026 

67276  0 

2DEC 

-.5392368197 

B-l 

- STAR 

35 

Y 

0244 

14 , 2027 

62232  0 

0245 

14, 203C 

13262  0 

20EC 

+.7092312789 

e-1 

STAR 

35 

Z 

0245 

14, 2031 

0G563  1 

0246 

14,2032 

C5Q76  0 

2CEC 

+ .3201817378 

e-1 

STAR 

3 4 

X 

0 246 

14,2033 

35561  f 

024  7 

14,2034 

70716  0 

2PEC 

-.4436021946 

B-  1 

STAR 

34 

7 

0247 

14 , 7035 

49260  1 

024  8 

14, 2036 

62466  1 

2DEC 

-.  83  7':7  86  9 86 

e-1 

star 

34 

Z 

0248 

14,2  137 

64656  0 

0249 

14, 2 140 

10652  1 

2DEC 

+.5520184464 

e-1 

STAR 

33 

X 

0249 

14,2041 

04246  0 

0 2 50 

14,2042 

63235  0 

2CEC 

- .79331874CC 

B-l 

STAR 

*3  3 

Y 

0 2 50 

14,2043 

44200  0 

0251 

14,2044 

73710  0 

2DFC 

- .2  56  75C  6745 

0-1 

STAR 

•3  -a 

Z 

0251 

14, 2045 

66230  C 

. 0252 

14,  2"' 4 6 

07204  C 

2DEC 

+.45371 969G8 

e-1 

STAR 

32 

X 

0252 

14,2)4? 

33712  Q 

0253 

14,2050 

61747  1 

2DEC 

-.  877950880  1 

E-1 

STAR 

32 

Y 

0253 

14,2051 

72343  0 

0254 

14,2052 

02343  1 

2DEC 

+.1527766153 

B-l 

STAR 

32 

Z 

0254 

14  , 2053 

2 1 2 6 2 <! 

0255 

14,2')54 

03237  1 

2DFC 

+ .2069525789 

B-  1 

STAR 

3 1 

X 

0255 

14,2055 

133C1  1 

0256 

14, 2056 

62C20  0 

2DEC 

-.8719885748 

B-l 

STAR 

31 

Y 

C256 

14,2057 

65  332  -1 

025? 

14, 2060 

79715  C 

2DEC 

-.4436288486 

e-1 

STAR 

3 1 

Z 

025? 

14,2061 

71267  1 

0258 

14,206? 

01745  0 

2CEC 

+ . 121  7293692 

e-1 

STAR 

30 

X 

0258 

14, 2063 

06477  0 

'^259 

14 , 2'i64 

63531  0 

2DEC 

- .7702732847 

8-1 

STAR 

3 C 

V 

0259 

14, 2065 

75365  C 

G^P 


&GS6NBLF  REVISICN  116  CP  /^GC  PRCGPA^  LUMNflRY  PY  NASA  202  11  12-C71 


1S:C<;  fiUG.  11  , 1969 


( PAIN  ) 


P&GF 


L CCNTRGILFC  roNSTflMS  LSFF*S  F4GE  NO.  11  EO 


026C 

14,2)66 

12010 

0 

2DEC 

+ .625568C51C 

B-  1 

STAR 

3C 

Z 

0260 

14, 2067 

C3CC5 

1 

•12  61 

15,2-  70 

76  156 

r 

2060 

-.1125305772 

e-1 

STAR 

29 

X 

026  1 

14,2071 

77014 

1 

0262 

15,2072 

6C371 

1 

2DEC 

-.9695935200 

F-l 

STAR 

29 

Y 

0262 

14,2073 

75073 

1 

0263 

14,2074 

0337U 

0 

2rEC 

+.21781 16072 

E-  1 

STAR 

29 

Z 

0263 

15,2075 

12002 

1 

n?6^t 

14,2  176 

76125 

0 

2CEC 

-.1156227856 

B-  1 

STA  P 

28 

X 

026^ 

14,2C77 

5CC37 

1 

0265 

14, 2100 

72  526 

c 

2DEC 

-.2399692557 

E-1 

STAR 

28 

Y 

0265 

14,2101 

7 7^)6  2 

0 

0266 

14,2102 

6 1C51 

c 

2DFC 

-.9335250333 

8-1 

STAR 

28 

Z 

0266 

14,2103 

55  165 

f) 

0267 

14,2105 

72277 

0 

2CEC 

-.35164996C9 

e-1 

STAR 

27 

X 

0267 

14, 2 105 

5 1 5 5 

n 

0266 

14,2  106 

62651 

0 

2rEC 

- .824C7527C2 

B-  1 

STAR 

27 

Y 

0266 

14, 2 107 

5557  1 

1 

a26<5 

14, 2 1 10 

70711 

1 

2DEC 

-.5451196390 

P-  1 

STAR 

27 

Z 

0265 

14,2111 

7C556 

1 

0270 

15,2112 

67365 

1 

2DEC 

-.532687693C 

e-1 

STAR 

26 

X 

0270 

14,2113 

57C73 

0 

0271 

14,2115 

64425 

0 

2TEC 

-.7160655555 

e-1 

STAR 

26 

Y 

0271 

15,2115 

7 7 7 7 7 

c 

0272 

14,2116 

07157 

0 

2DEC 

+.5511057752 

B-  1 

STAR 

26 

Z 

0272 

15,2117 

1 6 222 

c 

0273 

14,2120 

62  227 

1 

2DEC 

-.7861763936 

B-l 

STAR 

25 

X 

C273 

15,2121 

64446 

0 

0 27  A 

15,2122 

67  51  5 

1 

2DEC 

-.5217996305 

e-1 

star 

25 

Y 

02  74 

14,2123 

55266 

0 

0275 

14,2124 

05230 

0 

2PEC 

+.3311371675 

e-1 

STAR 

25 

Z 

0275 

14, 2125 

2 5 5 7 6 

c 

02  76 

14,2126 

65755 

2DEr 

- .6898393232 

B-  1 

STAR 

25 

X 

0276 

15,2127 

7 2 6 C 5 

c 

0277 

15, 2 130 

71235 

0 

2DEC 

- .51  823  3C65C 

e-1 

STAR 

25 

Y 

0277 

15,2131 

72553 

1 

0278 

14,2132 

66527 

c 

2DEC 

-.5909338475 

e-1 

STAR 

25 

Z 

0778 

14,2133 

52171 

0 

0279 

14,2134 

66  546 

0 

2TEC 

-.5812035376 

e-1 

STAR 

23 

X 

027« 

14,2135 

7C765 

1 

0280 

14,2136 

73260 

1 

2DEC 

- .290917  1295 

B-  1 

STAR 

23 

V 

Q28C 

15,2137 

716  4 2 

0 . 

02  81 

14,  214'7 

15  12  1 

0 

2DEC 

+ . 7599800568 

e-1 

STAR 

23 

z 

0281 

14,2141 

30153 

0 

0 28  2 

15,2152 

61257 

1 

20EO 

-.9170097662 

e-1 

star 

22 

X 

0282 

14, 2143 

733  10 

1 

0263 

14,2145 

72  31  3 

0 

2CEC 

-.3502156628 

e-i 

STAR 

22 

Y 

0283 

14 , 2 155 

51257 

0 

0264 

16,2156 

75755 

0 

2DEC 

- .19C8999  176 

e- 1 

STAR 

22 

Z 

0284 

14, 2 157 

55  566 

1 
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L 

CrNTpcLLEr  COMSTAMS 

LSFR’ 

S RAGE 

NO.  12 

EO  S4 

0265 

14,2150 

7C606 

0 

2DFC 

- .452344C2G3 

B-  1 

star 

21 

> 

0285 

14, 2151 

54  5 64 

1 

0286 

14, 2152 

77153 

0 

2DEC 

-.0493710146 

B-1 

STAR 

21 

Y 

0286 

14,2153 

61536 

c, 

)287 

14,2154 

616C1 

1 

2DEC 

- .8904759346 

8-1 

STAR 

21 

1 

0287 

14,2155 

4 704  6 

0 

0288 

14,2156 

60604 

0 

2CEC 

-.9525211695 

8-1 

STAR 

2C 

> 

0288 

14,2157 

7 6 2 2 4 

1 

0289 

14,2160 

7703  1 

0 

2DEC 

- .C593434796 

8-  1 

STAR 

2C 

Y 

02«9 

14,2161 

73354 

1 

0290 

14, 2162 

73  16  1 

0 

2DEC 

-.2986331746 

8-1 

STAR 

20 

2 

C29P 

14,2163 

63C65 

1 

02°l 

14,2164 

6C431 

1 

20EC 

-.9656605484 

e-1 

STAR 

19 

X 

0291 

14,2165 

5 1702 

0 

0292 

14,2166 

00656 

1 

2CE5 

+.0525933156 

8-1 

star 

19 

Y 

029  2 

14,2167 

3 30  1 3 

c 

0253 

14,2170 

04044 

0 

2DEC 

+ .25442  fC6C9 

8-  1 

STAR 

19 

Z 

0293 

14,2171 

15  6 2 7 

0 

' 0294 

14, 2172 

62164 

0 

2DEC 

- .86C82C5219 

8-1 

STAR 

18 

X 

0294 

14,2173 

459^0 

1 

0295 

14,2174 

C7325 

1 

2DEC 

+ .4636213989 

8-1 

ST  AR 

18 

Y 

0295 

14,2175 

3744  3 

0 

0296 

14,2176 

03267 

1 

2rEC 

+ .2098647835 

8-1 

STAR 

18 

1 

0296 

14,2171 

C6626 

c 

0297 

14,2200 

63471 

0 

2DEC 

-.7742591356 

e- 1 

STAR 

1 7 

X 

0297 

14,2201 

5C47  1 

0 

0298 

14, 2232 

116  6 3 

1 

20EC 

+.61525C4197 

3-1 

STAR 

17 

Y 

0298 

14,2203 

0415  1 

0 

)2ng 

14, 2204 

75501 

1 

2DEC 

-.1482892839 

8-1 

STAR 

17 

Z 

0299 

14,2205 

46664 

1 

0 3 )0 

14,2206 

70430 

1 

2CFC 

- .465794794  1 

8-1 

STAR 

16 

X 

0309 

14, 2207 

4 6 5 4 0 

1 

0301 

14 , 2210 

07537 

1 

2DEC 

+.^774785C33 

8-  1 

STAR 

1 6 

Y 

C3''l 

1. 4 , 2 2 1 1 

20  1)0 

1 

0302 

14,2212 

1 3 7 27 

1 

2DEC 

+ .745016435  1 

8-1 

STAR 

16 

Z 

0302 

14 ,2213 

05455 

0 

03)3 

14,2214 

7216C 

c 

2DEC 

-.3612508532 

8-1 

STAR 

15 

X 

03  3 3 

14,2215 

64202 

n 

0304 

14,2216 

11144 

0 

2CEC 

+.574727C84C 

8-1 

STAR 

15 

Y 

0 3 ■■'4 

14,2217 

C 5 20  3 

r 

0305 

14,2220 

64200 

1 

2DFC 

- .734293265  5 

B-  1 

STAR 

15 

Z 

0305 

14,2221 

6533  1 

c 

0306 

14, 2222 

71322 

1 

2DEC 

-.4118589524 

B-1 

STAR 

14 

X 

03C6 

14,2923 

4151  9 

1 

03  )7 

14,2224 

164C2 

c. 

20EC 

+.906548536C 

8-1 

star 

14 

Y 

03  ■’7 

14, 2225 

16205 

1 

0308 

14,2226 

01365 

0 

2DFC 

+ .0924226  97  5 

8-  1 

STAR 

14 

Z 

0308 

14, 2227 

040  34 

1 

0309 

14,2230 

75054 

1 

2DEC 

- .182C  751  7 83 

B-  1 

STAR 

13 

> 

C309 

14,2231 

560  52 

c 
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1. 

CCNTRCLLEC  COMSTflMS 

LSEF' 

'S  RAGE 

NC.  13  EC  S4 

0310 

14,2232 

17030 

1 

2rFC 

+ .9404899869 

B-  1 

STAR 

13 

V 

0310 

14,  2233 

1 763  5 

1 

031 1 

14, 2234 

7332  1 

0 

2DEC 

-.2869271926 

8-1 

STAR 

13 

Z 

0311 

14 , 2235 

57603 

0 

T312 

14,223f 

77610 

0 

2DEC 

-.0614937230 

e-1 

STAR 

12 

X 

3 312 

14,2237 

47623 

0 

0313 

14,2240 

11515 

J 

2CEC 

+ .6031563286 

e-i 

STAR, 

12 

V 

0313 

14, 2241 

Cl  640 

1 

0314 

14,2242 

6 3 2 15 

1 

2DEC 

- .7952469957 

0- 1 

STAR 

12 

z 

0314 

14,2243 

52  176 

c 

031  5 

14, 2244 

02143 

20EC 

+.1371725575 

e-i 

STAR 

1 1 

X 

031  3 

14,2245 

2b755 

1 

J316 

14. 2246 

12715 

1 

2DEC 

+.6813721061 

e-i 

STAR 

1 1 

Y 

0316 

14,2247 

3147.) 

0 

0317 

14,2250 

13401 

0 

2DEC 

+.7189685267 

e-i 

STAR 

1 1 

7 

3317 

14,2251 

31222 

1 

031  6 

14,2252 

03157 

1 

2DEC 

+.2011399589 

8-  1 

STAR 

10 

X 

one 

14, 2253 

27  504 

c 

0319 

14, 2254 

17402 

1 

2DEC 

+.969G33794 1 

e-i 

STAR 

10 

Y 

0319 

14,2255 

12312 

1 

0323 

14,2256 

75552 

1 

2DEC 

-.1432348512 

p-i 

star 

10 

Z 

0320 

14,2257 

63657 

0 

0321 

14 ,2260 

05471 

0 

2CEC 

+.35C7315C38 

E-l 

STAR 

9 

X 

032  1 

14,2261 

<•6122 

r 

0322 

14,2262 

16220 

0 

2DEC 

+.89263333C7 

8-  1 

STAR 

C 

Y 

0322 

14 ,226.3 

16  362 

1 

0323 

14,2264 

0 4 4 17 

1 

20EO 

+.2831839492 

8-1 

star 

9 

Z 

0323 

14,2265 

32762 

0 

3324 

14,2266 

0 6 4 4 3 

1 

2DEC 

+.410563602C 

6-1 

STAR 

8 

X 

0324 

14,2267 

12622 

1 

3325 

14,2270 

07766 

1 

2PEC 

+ .49881  loot  1 

8-1 

STAR 

8 

Y 

3325 

14, 227  1 

Hl?37 

Q 

0326 

14,2272 

14  154 

1 

2DEC 

+.7632988371 

B-  1 

STAR 

8 

Z 

0326 

14,2273 

36  154 

1 

0327 

14, 2274 

13200 

1 

2DEC 

+. 7032235469 

B-1 

STAR 

7 

X 

0327 

14,2275 

31653 

0 

3328 

14, 2276 

13244 

1 

2DEC 

+.7075846047 

6-1 

STAR 

7 

Y 

0328 

14,2277 

21036 

1 

0329 

14,2300 

01C67 

1 

2PEC 

+.0692868665 

E-l 

STAR 

7 

Z 

0329 

14,2301 

23  106 

1 

0330 

14, 23>I2 

10  560 

n 

2DEr. 

+.545C1G74C4 

R-  1 

STAR 

6 

> 

0 3 30 

14,2303 

27227 

c 

0331 

14, 2304 

10402 

0 

2npc 

+.5314955466 

e-l 

STAR 

6 

Y 

0331 

14,2305 

00275 

1 

0332 

14,2306 

6 5 4 7 7 

0 

2DEC 

-.6484410356 

e-l 

STAR 

6 

Z 

0332 

14,2307 

77044 

1 

033^ 

14,2310 

0C153 

0 

2CE0 

+ .0  13096884C 

E-l 

STAR 

e. 

X 

0333 

14, 231  1 

112  12 

0 

0334 

14,2312 

00077 

1 

2DEC 

+ .0078062795 

a- 1 

STAR 

c 

V 

0334 

14,2313 

3627  5 

1 
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L CrNTRCLLEC  fOMSTANTS  LSER'S  PAGE  NC.  lA  EO  SA 


0335 

14,2314 

17777  0 

2CEC 

+ .99988376CC 

B-  1 

STAR 

c 

Z 

0335 

14,2315 

r 1 4 1 7 1 

0336 

14, 2316 

07674  C 

2DEC 

+.4917678276 

e-1 

STAR 

4 

X 

0336 

14,2317 

21771  f 

0337 

14, 232C 

C3416  1 

2DEC 

+.2204887125 

e-i 

ST  AR 

4 

Y 

0337 

14,2321 

07626  1 

0338 

14,2322 

62413  0 

2CEC 

-.8423473935 

e-i 

STAR 

4 

7 

0338 

14,2323 

57536  C 

0339 

14,2324 

07510  1 

2DEC 

+ .477563945C 

8-  1 

STAR 

3 

> 

0339 

14,2325 

C6414  C 

03  Af) 

14, 2326 

01673  1 

2DEC 

+ . 116600434C 

e-i 

STAR 

3 

Y 

C3AC 

14,2327 

06065  1 

03A1 

14, 2330 

15735  1 

2 DEO 

+.8708254303 

E-l 

ST.AP 

3 

7 

0341. 

14,2331 

31531  1 

03A2 

14 , 2332 

16745  0 

2CEC 

+ .93426404CC 

B-l 

STAR 

2 

X 

03A2 

14, 2333 

17555  1 

03A3 

14,2334 

02615  1 

2DEr 

+.1735073142 

B-1 

STAR 

2 

Y 

0343 

14,2335 

13716  C 

0344 

14, 2336 

73C1C  1 

2DEC 

-.31  15219339 

e- 1 

STAR 

2 

2 

0344 

14,2337 

4031  1 r 

0345 

14, 234C 

15776  ( 

2DEC 

+ .8748658918 

B-l 

STAR 

1 

X 

0345 

14,2341 

34660  0 

0346 

14,2342 

00325  0 

2DEf 

+.0260879174 

e-l 

star 

1 

Y 

0 346 

14, 2343 

26625  1 

0347 

14,2344 

07572  U 

2DEC 

+.483662167C 

R-l 

STAR 

1 

Z 

0347 

14,2345 

0 5 10  5 r 

0348 

14,2346 

15472  1 CATLOG 

EEC 

6970 

R0349 

0350  RCR  1 

05, 2000 

SETLCC 

EFHERl 

0351 

05,2001 

BANK 

0352  REF  1 

CC1JNT« 

J 5/EPEER 

035? 

05, 2C0  1 

20000 

0 KCKMAT 

20EC 

1.0  B-l 

C3  53 

05,2002 

00000 

1 

0354 

C5 , 2CG3 

000  JO 

1 

2rFC 

0 

* 

0354 

05,2P:T4 

OCOOO 

1 

C355 

05,2005 

omoo 

1 

2nec 

0 

0355 

05, 2'"P6 

ccocc 

1 

0356 

05,2007 

00000 

1 

2DEC 

0 

* 

0356 

C5,2C10 

00000 

1 

0357 

05,2011 

16  533 

€ 

2DEC 

.91745  E-l 

K1 

CCS(CEL)  * 

0357 

05,2012 

30007 

0 

0358 

C5 ,2012 

77333 

1 

2CEC 

-.03571  e-l 

K2 

SIN  (CEL  ) SI  N ( I M)  * 

0358 

05,2014 

56654 

r 

0359 

05,201 5 

00000 

1 

2DEC 

0 

0359 

05,2C16 

OCCCG 

1 

0360 

05,2017 

C6273 

1 

2DEC 

.39784  8-1 

K3 

S I N ( C B L ) * 

036C 

05,2020 

03275 

1 
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0361 

05,2021 

01242 

1 

2DEC 

.C82354  8- 

1 

K4  COS(CEL)SIN(IP) 

* 

0361 

05,2022 

24467 

1 

036? 

05. 2E23 

CCC20 

0 

CSTODAY 

20EC 

8640000  8- 

33 

NOTE 

0362 

05,2024 

17260 

0 

0363 

C5  , 2C25 

0000  2 

0 

RCP-13 

CCT 

00002 

TABLES  contain 

0364 

15, 2026 

oonoo 

1 

CCT 

00000 

* 

CCNSTANTS  FOR 

* 

0365 

C5  , 2027 

22572 

1 

R AT  E S P 

2E.EC 

.0366C098 

e+4 

LOMR 

* 

1969  - 1970 

0365 

05, 2C3C 

27214 

0 

0366 

C5, 2C31 

01315 

1 

2DEC 

.CC273779 

e+4 

LOSR 

0366 

r 5, 2032 

26177 

1 

0367 

05, 2C33 

7773  1 

1 

2DEC 

-.C0C147I9 

E+4 

LCNP 

0367 

05 ,2034 

55  2 17 

0 

0368 

05 , 2035 

32055 

c 

2EEC 

.815282336 

LCMC 

0368 

05, 2'>36 

22576 

c 

0369 

05,2037 

10624 

0 

2DEC 

.27467491C 

Lcsn 

0360 

C5 , 2040 

10605 

0 

0370 

05,2041 

37436 

1 

2DEC 

. 986209499 

LONG 

0370 

05,2042 

01635 

0 

0371 

C5 , 2C43 

01-365 

0 

VAL67 

2DEC* 

.C1726666666  E+1*  APCC 

0371 

05 ,2'I44 

31323 

1 

037? 

C5,2C45 

20  77  J 

c 

2DFC 

.530784445 

AA  PC 

0372 

05, 2046 

1 3 7 2 5 

r 

0373 

05,2047 

02245 

0 

2CEC 

.036291712 

E + 1 

1/27 

0373 

f 5,2C5C 

06475 

1 

03  74 

05,2051 

0016  2 

1 

2DEC 

. C035C5277 

E+1 

BKCC 

0374 

C5,2052 

33431 

1 

0378 

C5,2053 

22  566 

1 

2DEC 

. 585365625 

EAPC 

0375 

05,2054 

24  130 

0 

0376 

05, 2C55 

0200  ) 

0 

2CEC 

.03125  8+1 

1/32 

03  76 

05, 2056 

00000 

1 

0377 

05,2057 

03256 

0 

2CEC 

.005325277 

E+  1 

CMon 

0377 

05,2060 

1 7752 

1 

0378 

05,2061 

775  12 

1 

2DEC 

-.01  1C6341C36 

CARG 

0378 

05,2062 

67453 

1 

0379 

05, 2063 

00  131 

1 

2nEC 

. CC2737925 

E+1 

1/365 

0379 

■15,2064 

26733 

1 

0381  REF  1 ?6,2r,)C  SETLCC  PLAN7TN2 

0382  26,2700  EANK 

0383  REF  1 CCLNT*  $$/LUFCT 


0384  26,2000  177  15  1 COSI  20EC«  <3.996417320  E-1  B-l>i=  COS  (5521.5  SEC.) 

0384  26,2001  02052  1 

0 38  5 26,  2"  12  0C  333  1 SIM  2DEC*  2.67657S05C  E-2  E-1*  " S I N ( 5521.5  SEC.) 

0385  26,2003  10374  0 

0386  26,2004  77665  1 NCEGCT  2CEC*  -1.703706190  E- 1 1 E28*  PFV/CSEC 

26,2035  42175  1 

26,2JE'i6  2221  1 0 FCOT  2CEC*  4.2532634  73  E-9  627*  P^V/CSEC 

26,2007  0C636  I 


0386 
03  8 7 

0387 
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0368 

26,2010 

77777 

0 

ECCT 

2CEC^ 

- 1.1A  55293  6 E 

E-16  628^ 

REV/C  SEC 

0 38  0 

26,2011 

7 7 7 6 7 

1 

0389 

26,2012 

37A36 

1 

NOG  10 

20rr  => 

9. 862C9A363 

E-1* 

REV 

0389 

26,2013 

0 1 6 1 A 

0 

0390 

26, 2C  lA 

32A  17 

1 

FSLBC 

20Er* 

8.290901511 

E-1* 

REV 

C39C 

26,2019 

32011 

0 

0391 

26,2016 

020  52 

1 

eSUBC 

2CEC 

6.512013939 

E-2 

REVS 

0391 

26, 2017 

3 5 5 5 2 

c 

0392 

26,2020 

37116 

0 

W EARTH 

2CEC  * 

1 .160  576  17  1 

P-7  B23^ 

RE  V/C  SEC 

26,2021 


0392 


32631  1 
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1 

INPUT/CUTPUf  CHANNEL 

BTT  CESCPIFTTCNS  LSER'S  PAGE  NO.  1 EC  S4 

AOOOOC 1 
ROOOOC2 

CHANNEL 

CFSCRIPTICNSf  WCRCS  APE  ALLGCATEC  IN  ERASABLE  ASSIGNMENTS 

Rn000C5 

Aonoi 

CHANNEL 

1 

IPEMICAL  TC  CCNPLTER  REGISTER  L (0001) 

R0002 

A00r>3 

CHANNE  L 

2 

IDENTICAL  TP  CCNFUTER  REGISTER  Q (0002) 

R00n4 

R0006 

CHANNEL 

3 

HTSCALAR;  INPUT  CHANNEL;  NCST  SIGNIFICANT  1^  PITS  FRCM  33  STAGE  BINARY  CCLNTER.  SCALE 
FACTOR  IS  B23  IN  CSEC,  SC  RAX  VALUE  ABOUT  23.3  HOURS  ANC  LEAST  SIGNIFICANT  BIT  5.12  SECS. 

A000  8 

R0CC9 

CHANNEL 

4 

LCSCALAR;  input  CHANNEL;  NEXT  MCST  SIGNIFICANT  \A  BITS  FRCA  THE  33  STAGE  EINARV  CCLNTER 

ROOl  1 
R0013 
AOCl  5 

ASSOCIATED  UITH  CHANNEL  3.  SCALE  FACTOR  IS  B9  IN  CSEC.  SC  MAX  VAL  IS  5.12  SEC  AND  LEAST 
SIGNIFICANT  BIT  IS  1/32C0  SEC.  SCALE  FACTCR  CF  C.F.  NCPC  NITH  CHANNEL  3 IS  E23  CSEC. 

ROD  16 
AOOIR 

CHANNEL 

C 

PVJFTS;  OLTPLT  CHANNEL;  PITCH  RCS  JEt  CCNTRCL.  (REACJICN  CCNTROL  SYSTEM)  USES  BITS  ]-£. 

R0019 

A0021 

CHANNEL 

6 

RCLLJETS;  CLTPUT  CHANNEL;  PCLL  PCS  JET  CONTROL.  (PFACIICN  CCNTRCL  SYSTEM)  USES  BIT  1-E. 

R0022 

R002A 

CHANNEL 

7 

SUPFRBNK;  CUTPUT  CHANNEL;  NCT  RESET  BY  RESTART;  FIXED  EXTENSICN  BITS  LSEC  TC  SELECT  THE 

APFPCPPTATE  FIXED  memoqv  RANK  IF  FBANK  IS  30  CCTAL  CR  MCPE.  USES  BITS  5-7. 

A0026 

R0027 

CHANNE  1. 

10 

cure;  CUTPUT  CHANNEL;  REGISTER  USED  TP  TRANSMIT  LATCHING-RELAY  DRIVING  INFCPMATICN  FCP 

Ran29 

R0031 

AOC3^ 

THE  DISPLAY  SYSTEM.  BITS  15-12  ARE  SFT  TC  THE  ROW  NUMBER  (1-14  OCTAL)  OF  THE  RELAY  TC  BE 
CHANGFC  AN'C  PITS  11-1  CCNTAIN  THE  REQUIPEC  SETTINGS  FOP  THE  RELAYS  IN  THE  PCW. 

R003A 

PQ036 

channel 

11 

DRALMCLT;  OLTPUT  CHANNEL;  REGISTER  WHOSE  BITS  ARE  LSED  FCP  ENGINE  CN-CFF  CONTROL  ANC  TO 
DRIV'"  INCIVIDJAL  INCICATCPS  OF  THE  DISPLAY  SYSTEM.  BITS  1-1  ARE  A RELAYS. 

.A00  3P 
R0039 
AQOAH 

B TT  1 

TSS  WARNING 

R0041 

A0042 

ROOA3 

BIT  2 
BIT  3 

LIGHT  CCMPLTER  ACTIVITY  LAMP 
LIGHT  LFLINK  ACTIVITY  LA^F 

A0044 

R0045 

A9046 

PIT  4 

LIGHT  TEMP  CAUTICN  LAMP 

R0ri47 

ACC4B 

R0049 

BITE 
BI'^  6 

LIGHT  KEYBOARD  RELEASE  LAMP 
FLASH  VERB  AND  NCLN  LAMPS 

A0060 

RC051 

BIT  7 

LIGHT  CFERATCR  EPRCP  LAMP 

GAP:  <^iSSE^'BLE  RFVISI^^  116  CF  Arr  fPCGR4v  LIJviNySBY  6V  hdSt  20211  12-071 
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L INPUT/nUTPUT  CHAMNEL  BIT  DFSCRIPTICNS 


USER'S  page  no.  2 EO  S4 


AO052 

R0C53 

A0054 

PIT  g 

SPARE 

R0055 

AO056 

B IT  9 
BIT  10 

TE'T  fCNNECTCR  CUT6IT 
CAUTION  RESET 

ACC58 
8 0059 
A006'^ 

RIT  11 

SPARE 

R006  1 
A0062 
RTC53 

BIT  12 
BIT  13 

S P A R E 
ENGINE  CN 

A006A 
P.0  06  5 
A0066 

BIT  lA 

ENGINE  CPP 

R0O67 

AOn68 

BIT  15 

SPARE 

' P.0069 

A0071 
R0072 

CHANNEL  12 
BIT  1 

CHAM2;  CUTPLT  CHANNEL;  BITS  USEC  TC  DRIVE  NAVIGATION  ANC  SPAECRAFT  HAPDNARF 
ZFRC  RR  ecu;  enU'S  GIVE  RPACAR  INFORMATION  FOR  LM 

A0073 

R0074 

ACC75 

Br  2 

ENABLE  enu  RADAR  ERROR  COLNTERS 

R0076 

AfK177 

R0O78 

BIT  3 
BIT  4 

NGT  USEC 

CC.ARSE  ALIGN  ENABLE  CF  IMU 

AT079 

R0C80 

A0C81 

BIT  5 

ZERC  ]NU  ecu  'S 

R0082 

A0083 

P008A 

PIT  6 
BIT  7 

ENABLE  i^u  ERRCR  COLNTFR,  COL  ERRCR  CCLMER. 

SPARE 

A0085 

P0C86 

A0087 

BIT  e 

niSPLAY  INERTIAL  CATA 

RnC88 

A0089 

R0090 

PIT  9 
B IT  10 

-PITCH  GIMPAL  TRIM  (BELL  MCTIONI  CESCEMT  ENGINE 
+PITCH  GIMBAL  TRIM  (BELL  MCTICN)  DFSCENl  ENGINE 

ACC91 
R.J09  2 
A")093 

BIT  11 

-POLL  GIMPAL  TRIM  (BELL  NCTICN)  CESCENT  ENGINE 

R009A 

A0095 

ROC96 

BIT  12 
BIT  13 

4-RCLL  GIMBAt  TPIM  (BELL  NCTICN)  CESCENT  ENGINE 
LP  PCS  IT  ICN  2 CCNMANC 

A0P97 

P0098 

AT099 

BIT  1 A 

ENABLE  RENDESVOLS  RACAR  LCCK-CN;ALTC  ANGLE  TPACK'G 

R019O 
AO  101 

B IT  15 

ISS  TLPN  ON  CELAV  CCNPLETE 

GAP: 
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1. 

INFLT/GLTPUT  CHANNEL 

an  D^SCFIPTIOMS 

LSFR' 

S PAGE 

NO.  3 

EO  S4 

ROIO? 
AOl  P3 
RC104 

CEANN.'FL  13 
PIT  1 

CHAN13;  CLTPLT  CHANNEL 

PACAR  C PRCFER  SETTING  CF  TEF  A,B,C  MATRIX 

RO  10  5 
RG1C16 
A0107 

BIT  2 
PIT  3 

RADAR  8 SELECTS  CERTAIN  RADAR 

RACAR  A PARAMETERS  TO  EE  READ. 

POIOR 

ACIOG 

ROllO 

RTT  4 
BIT  5 

RADAR  ACTIVITY 

NOT  LSED  (CONNECTS  AN  ALTERNATE  INPLT  TC  UPLINK) 

AOin 
R011  2 
AO  113 

BIT  6 

SPARE 

Roll  A 
A0115 
R0116 

PIT  7 
PIT  8 

OnwNLINK  TELEMETRY  WORE  ORDER  CCDF  PIT 

RHC  COLNTER  ENABLE  (READ  HAND  CCNTRCLLFR  ANGLES) 

Ani7 
Ron  8 
A J119 

BIT  G 

START  RHC  READ  INTC  CCLNTERS  IF  E n 8 SET 

R0120 
A012  1 
R0122 

BIT  10 
PIT  11 

TFST  alarms,  TEST  OSKY  LIGHTS 
ENABLE  STANDBY 

A0123 

R0124  BIT  12  RFrSET  TRAP  21-A  ALWAYS  AFPFAR  TC  BE  SET  TC  0 

A0125 


RP126  PIT  13  RESET  TRAP  31-B  ALWAYS  APPEAR  TE  PE  SET  TC  C 

A0127 

R 1 2 8 PIT  14 RFSFT  T P P 32 ALWAYS  APPEAR  TO  PE  SET  TC  C 


A012G 

R7130 

AQ131 

BIT  15 

ENARLF  T6  RLPT 

RO  132 
A0134 

rpANNFL  14 

CHAN14;  OUTPUT  CHANNEL;  USED  TC  CCNTPOL  CCMFUTEP 

CruNTER  CELLS  ( CDU , GY RC  , SP AC ECR AFT  FUNG. 

R0135 
AO  136 
P0137 

BIT  1 

pn  2 

CLTLINK  ACTIVITY  (NFT  USEC) 
altitude  RATE  OP  ALTITICE  SELECTCR 

A0138 
R0139 
AO  140 

PIT  3 

Al T ITLOE  METER  ACTIVITY 

RO  14  1 
AO  142 
R0143 

BIT  4 
PIT  5 

THRLST  CPIVE  activity  FCR  DESCENT  ENGINE 
SPARE 

A0144 

P0145 

A0146 

BIT  6 

GYRO  enable  POWER  FOR  PLLSES 

R-11A7  81'^  7 GYRO  SELECT  8 PAIR  CP  PITS  IDENTIFIES  AXIS  CF  - 

R01A8  PIT  R gYPO  SELFCT  A GYRO  SYSTEM  TO  PF  TORQLEC. 

AOIAE 


ROlPO 

A0151 


BIT  G 


GYRO  TPRQLING  COMMAND  IN  NEGATIVE  CIPFCTICN 


1 
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L 

INPUT/0L7PUT  CHANAEL 

BIT  DESCPIPTIGNS  USEP' 

S PAGE  NO. 

A 

EC  SA 

R 1 1 5 2 
AH  1<=3 

BIT  IP 
BIT  11 

GYPG  ACIIYIIY 
DRIVE  CCL  S 

ATISS 

PC156 

A<^157 

PIT  12 

DPIVE  ecu  T 

RG158 

A0159 

P0160 

BIT  13 
PIT  lA 

DRIVE  ecu  Z 
DPTVP  CCL  Y 

AT  161 
R0162 
AT163 

BIT  15 

DRIVE  CCL  X 

R0164 
8 1166 

CHANNEL  15 

MHKEYIN;  INPUT  fHANNEL;KEY  CCCE  INPUT  FROM  KEYBOARD  OF  DSKY, 
PREGRAM  INTERRLPT  A!5  is  RECEIVED.  USES  FITS  5-1 

SENSED  BY 

PPCGRAN 

WHEN 

A0167 

R 0 1 6 8 

CH6MNEL  16 

NAVKEYU;  INPUT  CHANNEL;  CPTICS  MARK  INFORMATICN  AND  MAVIGA 

IGN  PANEL 

DSKY 

(CM  ) 

CP  THPLST 

R1170 
AO  172 
R017? 

BIT  1 

CONTROL  (LM)  SENSED  BY  PRCGRAM  WHEN  PRCGRAM  INTEP-RUPT  «6  IS 
NET  ASSIGNED  "'.i- 

RECE  IVED. 

USES 

PITS  3-7  CNLY. 

A0174 

RC175 

A0176 

BIT  2 

NCT  ASSIGNEE 

- 

R0177 
AC  178 
Rni79 

BIT  3 
BIT  A 

OPTICS  >-AXTS  MARK  SIGNAL  FCR  ALIGN  CPTICAL  TSCCPE 
OPTICS  Y-AXIS  mark  SIGNAL  FCP  AC1 

A 3130 
RCl  31 
AO  182 

BIT  5 

CPTICS  NARK  REJECT  S IGNAL 

R0183 
AO  ISA 
R0185 

BIT  6 
BIT  7 

CESCENT4  ; CREW  DESIRED  SLOWING  RATE  OF  DESCENT 
DESCENT-  ; CREW  DESIRED  SPEEDING  LP  PAIE  CF  C'CENT 

A0186 

P0187 

NOTE:  ALL  BITS  IN  CHANNELS  3C-33  ARE  INVERTEC  AS  SENSEC  BY  THE  FPCGPAI«, 

SC  THAT  A 

VALUE 

OF 

ZERO  MEANS 

R0189 
AC  190 

THAT  THE  IATICATEO  SIGNAL  IS  PRESENT. 

P0191 

AG192 

R0193 

CHANNEL  3C 
BIT  1 

INPLT  CHANNEL 

ABCRT  WITH  DESCENT  STAGE 

A019A 

PQ195 

A0196 

BIT  2 

UNUSFC 

R3197 

AC198 

RC190 

P IT  3 

BIT  A 

ENGINE  ARMEC  SIGNAL 

ABORT  WITH  ASCENT  ENGINE  STAGE 

A'32'^0 

R0201 

BI'T  5 

ALTC  THRCTTLE;  CCNPUTEP  CCNTPCL  CF  DESCENT  fNCINE 

GAP; 
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L 

I'vlPUT/QUTPUT  CHANNEL 

BIT  DESCRIPTIONS  USER'S  PAGE  NO.  5 

ED  S4 

A02">2 
R02n3 
AO  204 

BIT  6 

PI  SPLAY  INEPT  lAL.  DATA 

R )2C  5 
A0206 
R:)2'7 

BIT  7 
P IT  8 

RP  CPU  FAIL 
SPARE 

A020P 

Rn?,)9 

A0210 

PIT  9 

iNL  operate  nith  no  nalflncticn 

RQ211 
A0212 
R 121  3 

BIT  in 
BIT  11 

LM  CCNPLTFR  (NCT  AGS)  HAS  CCNTPCL  CF  LM 

IPU  CAGE  CCMRANP  TO  CRIVE  I^U  GIMBAL  ANGLES  TC  C. 

A 1214 
R021  5 
A0216 

BIT  12 

INU  ecu  FAIL  (MALFUNCTICN  CF  IK  COL.S) 

R0217 

A0218 

R021P 

BIT  13 
PIT  14 

IMit  fail  (MALFUNCTION  CF  IK  S I A B T I,  I Z AT  i c N ICCPS) 
ISS  TLRN  ON  RECUESTEC 

AO  2 2.0 
R0221 
A0222 

BIT  15 

TEMPERATURE  CF  STABLE  MEMBER  WITFIN  DESIGN  LIMITS 

P0223 

R0225 

CHANNEL  21 

INPUT  thANNEL;  bits  ASSOCIATED  UTH  THE  ATTTTLOE  CCNTRCLLER,  T P AN  S L AT  I C N AL 
ANC  SPACECRAFT  ATTITUDE  CCNTROL*.  USEC  BY  RC  S CAP 

CCNTRCLLER  . 

A0226 

R'1227 

Rn22P 

BIT  1 

ROTATION  (BY  RFC)  COMMANDFD  IN  POSITIVE  PITCH  DIRECTION;  MLST  BE  IN  MINIMUM 
ALSO  POSITIVE  ELEVATION  CFANGE  FCR  I.ANDTNG  POINT  CFSIGNATGR 

IMPULSE  MCCE. 

AO  231 
R0232 
A023  3 

BIT  2 

AS  BIT  1 EXCEPT  NEGATIVE  PITCF  ANC  ELEVATION 

R 1234 
A0236 
R0237 

PIT  3 
PIT  4 

ROTATION  (BY  RFC)  COMMANDED  IN  FCSITIVE  YAF  CIPECTICN;  MUST  BE  IN  MINUMUM  IMPULSE  MCCE. 
AS  BIT  2 EXCEPT  NEGATIVE  YAF 

A0238 

RC23C 

P.0241 

BIT  5 

RCTATICN  (BY  RFC)  CCMMANCIC  IN  FCSITIVE  ROLL  CIRECTICN;  MLST  BE  IN  MINIMUM  IMPULSE  MCCE. 
ALSO  POSITIVE  azimuth  CHANGE  FCP  LANDING  FCINT  CESIGNATOR 

A0243 

RG244 

A0245 

PIT  6 

AS  BIT  5 EXCEPT  NEGATIVE  PCLL  ANC  AZIMUTH 

R0246 

A0247 

R0248 

e IT  7 
BIT  8 

TFANSLATTCN  in  +x  oirecticn  commanded  by  THC 

TRANSLATION  IN  -X  CIPECTICN  CCMMANDEC  EY  IHC 

AC24C 

R0250 

A0251 

BIT  5 

TF■A^SLA^IC^  IN  +Y  CIPECTICN  CCMMANDEC  EY  THC 

R0252 

A0253 

R02S4 

BIT  10 
BIT  1 1 

TPANSLATIGN  IN  -Y  CIRECTICN  CCMMANDEC  BY  THC 
TRANSLATION  IN  +Z  CIRECTICN  COMMANDED  BY  THC 

A0255 

R0256 

BIT  12 

TPANSLATIGN  IN  -Z  OIRECTICN  CCMMANDEC  BY  IHC 

GAP: 

ASSERBLF  REVISION!  1 16 

CF  AGC  PRCGRAV  LLNINARV 

BV  AASA 

20211  12-071 

19:09  AUG.  11,1969 

(MAIN) 

PAGE 

5 c 

L 

INfUT/OUTPUT  CHANWEL 

PIT  CESCR  IPT IONS 

USER' S PAGE 

NG.  6 

EO  S4 

A0257 
R02  5 8 
A02E9 

BIT  13 

atiitloe  held  MCDE  cn 

SCS  HCDE 

ccntfcl  switch 

R0260  BIT  Mir  SI/ieILIZflTlC^  CF  MTITLCE  C^  SCS  MCCE  SWITCH 

An  261 

R0262 BIT  15 ATTITUCE  CCFTFCL  CUT  OF  EETEM  (PHC  KQT  IN  NELTRAL 


A0263 

R0264 

CHANiiEL  32 

INPUT  CHANNEL. 

A0265 

R0266 

AC267 

B IT 

1 

THRUSTERS  2 S 4 CISABLEC  BV  CPFW 

R0268 

B IT 

2 

THRUSTERS  £ C 6 CISABLEC  PV  CFFW 

A0269 

R0270 

BIT 

3 

THRUSTERS  1 £ 3 CISABLEC  BY  CREW 

AI27  1 
R0272 
A0273 

PIT 

4 

thrusters  6 £ 7 CISABLED  BY  CREW 

R0274 

BIT 

5 

THRUSTERS  14  C 16  OISABLEC  BV  CREW 

A0275 

R0276 

BIT 

6 

THRUSTERS  13  C 15  CISABLEC  BY  CREW 

A0277 

R027B 

A0279 

BIT 

7 

THRUSTERS  9 £ 12  CISABLEC  BY  CREW 

~ 

P02  8(' 
A028  1 

PIT 

8 

THRUSTPRS  n £ 11  DISABLED  BV  CREW 

R0282 

BIT 

c 

DESCENT  ENGINE  GIMBALS  CISABLEC  BY  CREW 

AC284 

R0285 

A0286 

BIT 

10 

APPARENT  DESCENT  ENGINE  G I N E A L FAILURE 

R0287 

A0288 

BIT 

14 

INDICATES  PnCCEEC  KEY  IS  CEFRRSSEC 

R0289 

CHANNEL  33 

CHAN33;  INPUT  CHANNEL;  FCR  HARDWARE  STATUS  ANC 

command  infcrmaticn.  bits 

15-11  ARE  FLIP- 

R0291 

A0293 

FLCF  BITS  RESET  BY  A CHANNEL  "WPITF"  CCMMANC  T 

hat  are  reset  BY  A RESTART 

£ BY  T4RLPI  LCCP. 

R0294 

8 IT 

1 

SPARE 

A0295 

R')296 

BIT 

2 

RP  AUTG-POWER  ON 

AC297' 

R0298 

A0299 

BIT 

3 

RR  RANGE  LOW  SCALE 

R0300 

BIT 

4 ■ 

RP  data  GCCC 

AJ3''-! 
R0  3C2 

BIT 

5 

LR  RANGE  DATA  GCCC 

A0303 

80304 

A03C5 

BIT 

6 

LP  PCSl 

R0306 

A03«7 

e IT 

7 

LP  PCS2 

19;QQ  iUC«  11  ,1969 
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L 

INPL7/CLTPUT  CHANNEL 

BIT  DESCFIPTIONS 

LSER ' S PAGE  NO.  7 EO  SA 

RJ308 

A030° 

RC310 

BIT  8 
PIT  9 

LR  V"L  DATA  GOOC 
t.R  RANGE  LCV«  SCALE 

A031  1 
R0  312 
A0313 

BIT  10 

BLCCK  UPLINK  INPUT 

R031A 
AC31  5 
R0316 

BIT  11 
BIT  12 

UPLINK  TOO  FAST 
OCNNLINK  TCP  FAST 

A03L7 
R03  1 e 
A0319 

BIT  13 

PIPA  FAIL 

R032T 

A0322 

R0323 

BIT  lA 
BIT  15 

WARNING  OF  REPEATED  ALAPRS:  RE S T A RT  , COUNTER 
LGC  nSCILLATCP  STOPPED 

FAIL,  VCLTAGE  FAIL, AND  SCALAR  CCUBLE. 

A032A 

R0325 

CHANNEL  3A 

DNT  Rl;  CLTPLT  CHANNEL;  CCWNLINK  1 FIRST  OF 

TWO  WCPCS  SERIALIZATION. 

R0328 

CHANNEL  35 

ONT  M2;  OUTPUT  CHANNEL  CCHNLINK  2 SCCOND  CF 

tiaC  wcrcs  serialization. 

AC33^ 
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L 

PLAGVvCRC 

ASS  IGNNEKTS 

CSFR'S  FACE  NO.  1 EO  SA 

ACCCl 

P000  2 

FLAGWORDS  0- 

11  ARE 

nCkNLINK 

90 

AND 

CAN  BE 

SET  ANC  CLEAPEC  EY  UF-FLAG  ANC  CCWN-FLAG  INSTRUCTICNS  IN  THE 

R0004 

Interpreter . 

THESE 

WERE  PREVIOUSLY  LISTED  LNDER  '' I NTE  P PR  ET  I VF  SWITCH  BIT  ASSIGNRENTS"  IN 

R0006 

the 

ERASABLE 

LCG  SECTION. 

FLAGWCRCS  12  £ 13  W E R E PR E V I C US L Y RACMQDES  ANC  CAPBCOLS  ANC 

P0008 

AR9 

STILL  DOWNLINKED  LNCEP 

THCSE  NAMES. 

A0CC9 

ROCIO 

ALPHABET  ICAL 

LI  ST 

CF  FLAGWCRCS 

ROOH>5 

q 

25 

A 1 

61  COLIJNN  NC. 

RGOl  1 

FLAGUCRD 

CBC. 

MJNPER 

E IT 

ANC  FLAG 

FIT  NAME 

RlOl? 

ACCOK  FLG 

2C7 

BIT 

0 

FLAG 

1 3 

ACC  SCK AY 

ROO  1 3 

ACCA-2FL 

1 99 

8 IT 

1 1 

FLAG 

13 

ACCAOR  2X 

ROniA 

ACPOOFLG 

032 

BIT 

L 3 

FLAG 

2 

ACMCCEIT 

R0015 

ALTSCALE 

1 86 

(BIT 

9 

FLAG 

12 

ALTSCBIT 

ROO  16 

AMENFLG 

1 83 

E IT 

12 

FLAG 

12 

ANTENEIT 

ROO  17 

aorbsflg 

G F5 

BIT 

5 

FLAG 

5 

ACRBSYST 

ROO  18 

ACPPTFI g 

200 

8 IT 

1C 

FLAG 

13 

ACRBTPAN 

RC019 

APSESk> 

120 

FIT 

5 

FLAG 

8 

AFSFSEIT 

ROO  20 

A PS  FI.  AG 

152 

BIT 

13 

FLAG 

K 

AFSFLBIT 

R3021 

ASTNFLAG 

108 

e IT 

12 

FLAG 

7 

ASTMB  IT 

P0022 

ATI  FI.  AG 

lOA 

BIT 

1 

FLAG 

6 

ATTFL  P IT 

P0O23 

AUTCMCCE 

193 

BIT 

2 

FLAG 

12 

ALTCiMBI  T 

R Q02A 

ALIRI FLG 

209 

BIT 

1 

FLAG 

1 3 

AUTRATE 1 

RO025 

AUTP  2FLG 

2C8 

BIT, 

2 

FLAG 

13 

ALTPATEZ 

R0026 

ALXFLAG 

1C  3 

BIT 

2 

FLAG 

6 

ALXFLBTT 

R0027 

a\,EGFLAG 

115 

BIT 

5 

FLAG 

7 

AVEGFFIT 

R0028 

AVEM  TCSi^ 

1^9 

BIT 

1 

FLAG 

c 

AVEPCFJT 

ROO  29 

AVFLAG 

OAO 

B IT 

C 

FLAG 

2 

AVFLB  IT 

P0030 

C ALC MAN  2 

GA3 

PIT 

2 

FLAG 

2 

CALC2  FIT 

ROoTi 

CAL  CMAN3 

0 A2 

BIT 

3 

FLAG 

2 

CALC38I  T 

P0032 

C0E5PLAG 

180 

F IT 

15 

FLAG 

12 

CCESe  IT 

RQ033 

CMCQNFLC- 

123 

PIT 

12 

flag 

6 

OCCN  BIT 

ROOOA 

C C G A F L A G 

131 

BIT 

A 

FLAG 

8 ■ 

CCGAFBI T 

R0C37 

CSPDKFLG 

197 

FIT 

13 

FLAG 

13 

CS^'CCCKD 

ROO  3 8 

cultflag 

C53 

BIT 

1 

FLAG 

5 

C,  L L T B I T 

ROOAO 

CAPBrCLS 

FLGWRC  13 

POOAl 

CRS'^LFLC 

2C6 

BIT 

A 

flag 

13 

CESELECT 

ROOAl 1 

CBSL2FLG 

2>'-5 

BIT 

C 

FLAG 

13 

DBSLECT2 

R0CA2 

CFSIGFLG 

185 

BIT 

lU 

FL  AG 

1 2 

CES  IGBTT 

ROO  A 3 

CICPLAG 

016 

BIT 

1 A 

FLAG 

DICFLEIT 

POOAA 

C iw  JFLAG 

0 59 

BIT 

1 

FLAG 

S3 

DIPCBIT 

RQ0A5 

CMENF  LG 

081 

BIT 

9 

FLAG 

5 

CMENFEIT 

R00A6 

LR  IFTCFL 

292 

BIT 

8 

FLAG 

13 

DPI9TPI T 

r,AP:  AS^EN'RLF  REVISIPM  116  CF  AGC  FPrGRfll*^  LUMINARY  BY  ^aSA  2021L12-b71 
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PAGF 


L FLAGkCPC  ASSIGNNEMS 


LSFP'  S PAGE  NC.  2 EO  SA 


P0047 
RO'148 
R00  4 9 

CP  IFTFLG 
CSKYFLAG 
C6CR9PLG 

0 3G 
075 

n?8 

8 IT 
BIT 
B IT 

15 

1 5 

2 

FLAG 

FLAG 

FLAG 

2 

C 

3 
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(0  15-029  ) 

A02  81 
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0283 

0284 

RFF 

2 
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4735 

NJFTSFLG  = 
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BIT  15  FLAG  1 

015D 

BI  T 15 
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BIT  14  FLAG  1 

( L ) 

0237 

0288 
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PFF 
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LAST 
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00  20 
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CICFLAG  = 
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BIT14 
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INITIALIZATION  FLNCS 
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BIT12 
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0026 
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(S) 
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LINE  CF  SIGHT  NCT 
BEING  COMPUTED 

G358 

A0339 
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0362 

0042 
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SUFFICIENT  THRUST 
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PITH 
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B IT  9 
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CUTCFF  TIME  YET 
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039A 
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4747 
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AVFLBIT  = 
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LEM  IS  ACTIVE 
VFHIG  LE 

eSM  IS  ACTIVE 
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A0396 

0397 
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pfpatflg  = 

BIT  4 
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PREFERRED  ATTITUDE 

PREFERRED  ATTITUDE 

0398 

A0399 
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CGMPUT  EC 
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00  53 
4752 

CALCPAP2  = 
CALr2BIT  = 

BIT  2 FLAG  2 

043C 

BIT2 

( S ) 

PFRFOPP  PANEUVER 
STAPTING  PRGCFOURF 

BYPASS  STARTING 
PRGCECURE 

A04f  7 

A0408 

BIT  1 FLAG  2 

(S  ) 

0409 

0410 
A0411 

RFF 

2 

LAST 

66 

0054 

4753 

NODOFLAG  = 
pccreiT  = 

0440 
e iTi 

V37  NCT  FFRMTTED 

V37  PERPITTEC 

0412 

RFF 

4 

LAST 

68 

0077 

FLAGWRC3  = 

STATE  +3 

(045-G5F ) 

A 0 4 1 3 

(SET  ) 

(RESET ) 

A0414 

BIT  15  FLAG  3 

0415 

0416 
A0416S 

RFF 

4 

LAST 

68 

CG55 
4 73  5 

PCCFFLAG  = 

pcohp.it  = 

0 4 50 
6IT15 

INHIBIT  BACKWAROS 
INTEGRA!  ICN 

ALICW  BACKWARCS 
INTEGP  AT  ION 

A0417 

0418 

00  56 

GLCKFATL  = 

PIT  14  FLAG  3 
0460 

( S 1 

GINBAL  LCCK  HAS 

NOT  IN  GIPEAL  LCCK 

3419 

A0470 

RFC 

4 

LAST 

68 

4736 

GLCKF8IT  = 

R IT14 

CrCLPREO 

A0421 

042? 

0423 

RFF 

r 

LAST 

6£ 

0 05  7 
4737 

REFSMFLG  = 
RFFSNSn  = 

BIT  n FLAG  3 

04  70 

BIT13 

FPCTFCTFC  FRCP 
REFSMPAT  GCOn 

FRESF  START 
REFSPPAT  NC  GGCC 

A0424 

A0425 

BIT  12  FLAG  3 

(S  ) 

0426 

0427 
AC428 

RFF 

4 

LAST 

69 

C060 
4 740 

LUN'AFLAG  = 
LUNAEIT  = 

0480 
B IT12 

lunar  lat-lcng 

EAPTF  LAT-LCNG 

A0429 

0430 

0061 

NCR29FLG  = 

BIT  11  flag  3 
0490 

( L ) 

R29  NOT  ALLOWFO 

R29  ALGWEO  (RR  CES- 

0431 

A0432 

RFF 

4 

LAST 

■69 

474  1 

NP29FBIT  = 

6IT11 

IGNATE,  POWERED  FLT ) 

A0433 

0434 

0435 

RFF 

3 

LAST 

67 

0 06  2 
4742 

VFLAG 

VFLAGBIT  = 

BIT  1C  FLAG  3 

0 5CD 

BITIO 

(S  ) 

LESS  than  TWO  STARS 
IN  FIELD  CF  VIEW 

TWIG  STARS  IN  FIELD 
OF  VIEW 

A04‘>6 

A0437 

BIT  9 FLAG  3 

(S  ) 

043f 

A0439 

)0  63 

R04FLAG  = 

0 510 

Al  ARM  521 
SUPPRESSEC 

ALAFM  521  ALLCWEC 

G^P:  ASSF^QLE  REVISION  116.  CF  AGC  PPCGPAi“  LLMN/>FY  8Y  NaS/>  20211  12-071 


19:0°  AUC. 


(MAIN) 


PAGE 


71 


L FLAGWCRC  ASSTGNPiFMS 


USER'S  PAGE  NO.  11  EO  SA 


CAAG 
AO  A A 1 
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3 

L ART 

69 

A7A3 

ROAFLEIT  = 

B IT9 

A0AA2 

BIT  9 

FLAG 

2 

( L) 

0AA3 

R'=F 

1 

■i063 

rfacpflc  = 

POAFL AG 

READING  PR  DATA 

NCT  READING  RR  CATA 

1AAA 

RFF 

A 

LAST 

7 1 

A7A3 

RFAORBIT  = 

BI  T9 

pursuant  TG  R29 

pursuant  to  R29 

ACAA5 

A0AA6 

BIT  8 

FLAG 

■3 

(S  ) 

0AA7 

r>''6  A 

PRECIFLG  = 

0520 

NCRRAl  INTEGRATICN 

ENCAGES  4-TIME  STEP 

A0AA8 

IN  ROC 

(PCC)  LOGIC  IN  INTE- 

0AA9 

REF 

A 

LAST 

69 

A 7AA 

PRECien  = 

BIT8 

GR  AT  ION 

A0A50 

A0A51 

BIT  7 

FLAG 

•3 

( S ) 

0A9  2 

r'065 

CLLTFLAG  = 

053C 

STAR  CCCLLTED 

STAR  NCT  OCCULTEC 

QA53 

A0A5A 

ref 

A 

LAST 

69 

A7A9 

CULT  PIT  = 

BIT7 

AOAIS 

BIT  6 

FLAG 

•3 

(S) 

0A56 

0066 

0 pew  FLAG  = 

0 SAD 

W MATRIX  VALIO  FOR 

W MATRI X I NVALIC  FCR 

OA57 

A0A58 

RFF 

A 

LAST 

69 

A7A6 

OReuFBIT  = 

E IT6 

CREITAL  NAVIGATION 

ORBITAL  NAVIGATION 

A 0 A 5 9 

BIT  S 

FLAG 

■3 

( S ) 

OAAO 

006  7 

STATERLG  = 

0550 

FERFANENT  state 

PERMANENT  STATE 

0A61 

REF 

A 

LAST 

6 9 

A7A7 

STATE8IT  = 

BITS 

VECTOR  LPDATEC 

VECTOR  NCT  LPCATEC 

A0A62 

A0A63 

BIT  A 

FLAG 

3 

(S  ) 

046^ 

Cl  )7  0 

INTYPFLG  = 

0 56  0 

CONIC  INTEGRATION 

ENCKF  INTEGRATICN 

0A65 

A0A66 

Rf^F 

3 

LAST 

69 

A75C 

’ TNTYPBIT  = 

bita 

A0A67 

BIT  3 

FLAG 

( S ) 

0A68  , 
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VTKTFLAG  = 

0570 

eSN  STATE  VECTOR 

LEM  STATE  VECTOR 

3A69 

A0A70 

REF 

A 

LAST 

70 

A751 

VINTFEIT  = 

6 TT3 

BEING  INTEGRATED 

BEING  INTEGCATEC 

A0A71 

BIT  2 

FLAG 

3 

(S  ) 

0A72 

i 1 -1 7 2 

C6GR9FLG  ' = 

0 5 80 

DIMENSION  OF  W IS  9 

DIMENSION  CF  W IS  6 

OA73 

REF 

A 

LA  ST 

7C 

A 752 

D6CR9BIT  = 

fl  IT2 

FCR  INTEGRATION 

FDR  INTEGRATION 

ACIA7A 

A0A75 

0 IT  I 

FLAG 

2 

( S ) 

JA76 

0073 

OIMOFLAG  = 

0590 

W MATRIX  IS  TC  BE 

W MATRIX  IS  NCT  TO 

GA7  7 
A0A78 

REF 

3 

LAST 

7C 

A753 

CIMOFIT  = 
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5 
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7C 
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A048C 

(SET  ) 

(RESET  ) 

A0481 

BIf  15 

f=LAG  4 

(S) 

OA82 

TA83 

AIA84 

PEF 

C 

LAST 

7C 

0074 

4735 

WRK  TCFLG 
A'RKICeiT 

= 

0600 

BI715 

MARK  CISPLAV  IN 
ENCIOLE 

NO  MARK  DISPLAY  IN 
ENC  IDLE 

AOA85 

0486 

C 175 

PRIOCFLG 

BIT  14 
0610 

FI.  AG  4 

( S ) 

PPICPITY  CISPLAY  IN 

NO  PRIORITY  CISPLAY 

0487 
A04  = e 

RTF 

5 

LAST 

70 

4736 

PR  inc  B IT 

B 17  14 

ENCIOLE 

IN  ENCICLE 

A'1489 

C49C 

0491 

rff 

6 

LA  ST 

7C 

0 0 76 
4737 

NRMICFLG 
NPWIOfil 7 

= 

BIT  13 
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e IT13 

FLAG  4 

( S ) 

NORMAL  0ISPLA7  IR 
ENCIOLE 

NC  NCFMAL  CISPLAY 
IN  ENCIOLE 

A0492 

A0493 

BIT  12 

FLAG  4 

( S ) 

049  4 
A 04  9 6 
0496 

REF 

C. 

LAST 

7C 

CC77 

4740 

POSPFLAG 

PCSFFBIT 

063  0 
BIT12 

P20  SETS  SC  AS  tc 
7LPN  A normal  DIS- 
PLAY INTC  A priority 

LEAVE  AS  NQRMIAL  CISP 

A0497 

AC498 

DISPLAY  tn  R60 

A0499 

0900 

A0501 

nioo 

MWA ITFLG 

= 

BIT  11 
0640 

FLAG  4 

(S  ) 

FIGHER  PPICRI7Y 
CISPLAY  CPEPA7ING 

NC  FIGFER  PPICPITY 
DISPLAY  operating 

0 50  2 
A0503 

RFF 

c 

LAST 

7C 

474  1 

RIaAI  TRI  7 

01711 

i«hEN  mark  cisflay 

INI TI ATEC 

WFEN  MARK  CISFLAY 
IM7I  ATEC 

A0E04 
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A05C6 
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NWAI7FLG 
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DISPLAY  operating 
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REF 

4 

LAST 

7C 

4 74  2 

M»AI7EI7 

R ITIO 

WFEN  NCRMAL 
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A0509 

0510 
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NRKNVFLG 
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0660 

FLAG  4 

(S  ) 

ASTRONAUT  USING 
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astronaut  nct  using 

KEYECARC  KEEN  MARK 

0512 

A0513 
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c 
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7 1 

4743 

RPKNVE  17 

0 IT9 

CISPLAY  INITIATEC 

DISPLAY  INITIATED 

A0514 

0515 

A0516 
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NPRN9FLG 

R IT  8 
0670 

FLAG  ^ 

(S  ) 

ASTRONAUT  USING 
keyboard  ViHEN 

ASTRONAUT  NOT  USING 
KEYECARC  WFEN 
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7 1 
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PINBPFLG 
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EXISTING  DISPLAY 
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EXISTING  DISPLAY 

AC525 

0530 

0106 
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PARK  CISFLAY 
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RFF 
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LAST 
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= 

B IT5 
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PRICRITY  CISFLAY 
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0535 
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NFLPTFLG 

B IT  4 
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( S ) 

NCRNAL  CISPLAY 

NORMAL  CISPLAY  NOT 
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RFF 

4 

LAST 

71 

4 750 
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CISPLAY 

IXTFPPUPTEC  EY 
PRICRITY  CF  NARK 
DISPLAY 

A0539 

0540 

0110 

YKCVFLAG 

BIT  2 
0720 

FLAG  ^ 

( S ) 

MARK  CISPLAY  EVER 

NC  NARK  DISPLAY  CVER 

H541 

AG542 

REF 

c 

LAST 

71 

475  1 

wKCVBI T 

BIT3 

NORMAL 

NCRYAL 

A054? 

A0544 

= 

BIT  2 
0730 

FLAG  4 

A0545 

A0546 

BIT  1 

FLAG  4 

(S  ) 

054  7 
0548 
A0549 

RFF 

4 

LAST 

71 

112 

4753 

XDSPFLAG 
XCSPB  IT 

= 

U74D 
B IT  1 

NARK  CISFLAY  ACT 
TO  BE  INTERRUPTED 

NC  SPECIAL  NARK 
INFCRNATICA 

055C 

A0551 

REF 

6 

LAST 

71 

0101 

FLAGWRC5 

= 

STATE 

♦ 5 

(075-CE9 ) 
(SET  ) 

(RESET ) 

A0552 

0553 

1 1 1 3 

CSKYFLAG 

BIT  15 
0750 

flag  5 

(S) 

displays  SENT  TO 

NC  CISPLAYS  tc  CSKY 

0554 

A0555 

Ri^F 

6 

LAST 

72 

4735 

DSKYFBI T 

3IT15 

CSKY 

A0556 
A'15  57 
A0558 

= 

BIT  14 

0760 

BIT16 

FLAG  5 

5 5^ 
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RFVISIPN 
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A FC  FR  CGR  6 

lumnary  py  rasa 

2021112-371  1 

19:C9  AUG.  11.1969 

(RAIN)  PAGE  74 

L 

FLAGWCPO 

ASSTGNWFNTS 

LSFF'S  PAGE  RC 

. 14  EC  S4 

A056C 

0561 

At)5G2 

C115 

SMFFFP 

= 

BIT  13 
0770 

FLAG  5 

( S , L ) 

U.V  JETS  CISABLEC 
OUPING  CFS 

U,V  JETS  ENABLED 
DURING  CFS 

0563 

A0564 

RFF 

7 

LAST 

72 

4737 

SNIUFFEIT 

B IT13 

BLRNS  (V65) 

BLRNS  (V75) 

A'’565 

0666 

0567 

9EF 

6 

LAST 

17 

0116 

474C 

NCTHPCT  L 
NCTHRBIT 

= 

BIT  12 
0 78D 
RIT12 

flag  5 

( £ ) 

INHIBIT  FULL 
TFRCTTLF 

PFRRIT  FULL  THRCTTLE 

AC568 

A0569 

BIT  11 

FLAG  5 

(S.L  ) 

0570 

A0571 

A0572 

r 1 17 

R77FLAG 

0790 

F77  IS  CL, 

SUPPRESS  ALL  RAOAR 
ALAPYS  ARC  TRACKEP 

R77  IS  NCT  CN. 

0573 

A0574 

RFF 

6 

1 AST 

12 

4 74  1 

R77FLBI T 

BITll 

FAILS 

A0575 

0576 

AC577 

0120 

RMGSCFLG 

= 

BIT  10 
0800 

FLAG  5 

(S  ) 

SCALE  CHANGE  HAS 
CCCURRFD  CURING 

NO  SCALE  CHANGE  HAS 
OCCURRED  DURING 

0578 

A0579 

RFF 

5 

LAST 

72 

4742 

RNGSCB IT 

BITIO 

RR  PEACILG 

RR  READING 

A058n 

0581 

0582 

RFF 

6 

1 AST 

72 

121 

4743 

DMENFLG 
n R E N'  F e I T 

= 

BIT  9 
081D 
B IT9 

FLAG  5 

(S  ) 

CI^'ENSICN  CF  U IS  9 
FOP  INCCRpnRATICN 

01 NENS  ICN  CF  W IS  6 
FOR  I NCCRFCRATICN 

A0583 

AC584 

B IT  8 

FLAG  5 

( S) 

0585 

0586 
AC587 

RFF 

6 

LAST 

72 

0122 
4 7 44 

ZCCRFLAG 
- ZOOMBIT 

= 

'1820 

BITS 

TFfiOTTLE-UP  HAS 
CCCURREC  IN  P63. 

THPCTTLE-LP  HAS  NCT 
yet  OCCURREC  in  P63. 

AO  58  8 
0589 

012  3 

ENGONFLG 

BIT  7 
0830 

FLAG  5 

(S  ) 

ENGINE  TURNED  CN 

ENGINE  TURNED  CFF 

0590, 
A0591 ' 

fff 

6 

LAST 

73 

4745 

FRGGAB  IT 

B IT7 

AC592 

0593 

A0594 

012  4 

3AXI SFLG 

= 

BIT  6 
0840 

FLAG  f 

( S ) 

HANEUVEP  SPECIFIED 
BY  THREE  AXES 

maneuver  SPECIFIED 
BY  CNF  AXIS;  R6C 

C595 

A0596 

RFF 

6 

LAST 

73 

4746 

3ZXIS8  IT 

B IT6 

CALLS  VECFCINT. 

A0597 
0598 
0 599 

RFF 

6 

LAST 

73 

012  5 
4747 

ACPBS  FL  G 
AORBSYSl 

= 

BIT  5 

085C 

BITS 

FLAG  5 

PREFER  DAXIS  JET 
FAIRS  7,15  ANC  8,16 

PREFER  FAXIS  JE 1 
PAIRS  4,  12  ANC  3,11 

AC5?c5 
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L FLAGWCRD  ASSIGNMENTS 
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A060n 

06C1 

06C2 

REF 

C 

LAST 

73 

0126 

4750 

NCRRMGN 
NCRR  MB  T T 

= 

BIT  4 

066D 

BU4 

FLAG 

C 

(S) 

BYPASS  RR  GINEAL 
MCMTCR 

PERFCRM 

RR  GIMBAL  MONITOR 

A0603 

AC6CA 

B IT  3 

FLAG 

c 

( S ) 

0605 

P127 

SCLNSW 

= 

087D 

LAMBERT  COFS  NOT 

LAMBERT  CONVERGES  CR 

A0606 

CCNVERGF,CR  T I ME-R ACT  I N E- R A C lUS  NGN 

0607 

off 

6 

LAST 

73 

4 751 

SCLNSPIT 

= 

e IT3 

NEARLY  CIRCULAR 

CIRCULAR 

A0608 

A0609 

BIT  2 

FLAG 

c 

( S ) 

06  10 

C 130 

^'GIVFIAG 

- 

088C 

LCCAL  VERTICAL 

MICCLE  GIMBAL  ANGLE 

A061  1 

CCCRDINATES 

CGMPUTEC 

C61? 

REF 

5 

LAST 

71 

4752 

MGLV  FE  IT 

= 

B IT2 

compuyeo 

A0613 

A0614 

BIT  1 

FLAG 

c 

( S ) 

0615 

0131 

RENEW FLG 

= 

089D 

W MATRIX  VALID 

W MATRIX  INVALID 

A0616 

FCP  PENEEZVCUS 

FOR  PENCEZVCUS 

061  7 

REF 

5 

L.MT 

73 

4753 

RENEW  FIT 

= 

B ITl 

NAVIGATICN  - 

NAVIGATICN 

A0618 

061  9 

PE  F 

7 

LAST 

72 

0 102 

FLAGWRD6 

= 

STATE 

+ 6 

(090-  104 ) 

A0620 

(SET) 

(RESET) 

A3621 

BIT  15 

FLAG 

6 

(S  ) 

0622 

0 13  2 

S32.  IF  1 

= 

09flD 

DELTA  V AT  CSI  TUE 

CVTl  LESS  THEN  MAX 

0623 

PEF 

7 

LAST 

73 

4735 

S32BIT1 

= 

B ITl  5 

ONE  FXCEEOS  MAX 

A062A 

AQ625 

3 IT  14 

FLAG 

6 

( S ) 

0626 

0133 

S32. 1 F2 

= 

091  C 

FIRST  PASS  CF 

REITERATION  OF 

0627 

REF 

6 

LAST 

72 

4736 

S22B  IT2 

= 

B IT  14 

NEWTCN  ITERATICN 

NEWTCN 

A062P 

A0629 

- 

BIT  13 

flag 

6 

(S  ) 

0630 

0134 

S3  2.  1F2A 

= 

0920 

BIT  13  AND  BIT  12  FUNCTICN  AS  AN  CPCFPEE 

0631 

REF 

8 

LAST 

74  . 

4737 

S320IT3A 

= 

B IT  13 

PAIR  (13,12)  indicating  THE  PCSSTBLE  CC- 

A0632 

CURPANCF  CF  2NEWTCN 

ITERATICNS  FOR  S32.1 

AQ633 

IN  THE  PROGRAM  IN  THE  FCILCWING  CFCEP: 

A063A 

BIT  12 

FLAG 

6 

(0,1)  (I.E.8TT  13  RESET, BIT  12  SET) 

0635 

iU3  5 

S32.  1F3B 

= 

0 930 

= FIRST  NEWTCN 

ITERATICN  BEING  CONE 

0636 

REF 

7 

1 AST 

74 

4 740 

S32B  IT3B 

= 

B IT  12 

(0,C)=  FIRST  PASS  OF 

SECCND  NEWT.ITEPAT. 

A0637  ( 1 , 1)=  5P  FT/SEC  STAGE  OF  SEC.  NEWT. ITER 


t AJ638  (1,0=  PEMAINCER  CF  SECCNC  NRWTCN  ITEFA. 

A0639 


(S  ) 


A06A0 


BIT  11  flag  6 
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A06A3 

A06AA 

BIT  10 

flag 

6 

(S  ) 

0645 

■.U3  7 

GNRCRVSW  = 

095D 

TRIMGIMB  CVER 

TRINGIME  NET  CVER 

0646 

A0647 

REF 

6 

LAST 

74 

4742 

G^'BCFEIT  = 

B ITIO 

AC64S 

B IT  9 

FLAG 

6 

A0649 

= 

0960 

A0650 
A06  5 1 

BIT9 

AG654 

BIT  8 

FLAG 

6 

(S  ) 

0655 

0 141 

MUNFLAG  = 

0970 

SER\yIGEP  CALLS 

SERVICER  CALLS 

0656 

REF 

7 

LAST 

74 

4 74  4 

MUNFLBIT  = 

BITS 

MUNPVG 

CALCRVG 

A0657 

AC658 

B IT  7 

FLAG 

6 

(L  ) 

0659 

C142 

= 

0980 

0660 

A0661 

REF 

7 

LAST 

74 

4745 

= 

BIT7 

A0662 

BIT  6 

FLAG 

6 

( L ) 

0663 

0143 

recflag  = 

099D 

LANDING  SITE 

LANCING  SITE 

A0664 

REDES  IGNATTCN 

REDES  IGNAT  ION  NOT 

0665 
A 0666 

REF 

7 

LAST 

74 

4746 

redflbit  = 

BIT6 

FERMTTFC 

PERMITTED 

A0667 

BIT  5 

FLAG 

6 

A0668 

= 

ICOD 

A n 6 6 9 

A0670 

BIT  4 

FLAG 

6 

AC671 

= 

10  ID 

A0672 

BIT  3 

FLAG 

6 

(S  ) 

0673 

. 0146 

NTAPGFLG  = 

1020 

ASTRGNAUT  CIO 

ASTRCNALT  DID  NCT 

A0674 

V 

OVERWRITE  DELTA 

OVERWRITF  DELTA 

0675 

REF 

7 

LART 

75 

475  1 

NTARGBIT  = 

B IT3 

VELCC  ITY  AT  TF  I 

VELOCITY 

A0676 

CP  TPM  (P34,35) 

A0677 

BIT  2 

FLAG 

6 

0678 

0147 

ALXFLAG  = 

ir.3D 

FPCVICING  ICLEFLAG 

SERVICER  WILL  SKIP 

0679 

RFF 

6 

1 AST 

75 

4752 

AUXFLRIT  = 

B IT2 

IS  NOT  SET,  SERV- 

DVMCN  CN  ITS  NEXT 

A06e0 

IGFP  WILL  EXERCISE 

PASS  EVEN  IF  TEE 

A0681 

OVMCN  GN  ITS  NEXT 

ICLEFIAG  IS  NCT  SET. 

A0682 

PASS. 

IT  WILL  THEN  SET 

A0683 

AUXFLAG. 

BIT  1 EL  AG  ^ { L) 


A068^ 


GAP: 

ASSF^BLE 

REV  IS  ION 

116  OF 

AGC  program 

LU^*INARY  BY  NASA 

20211  12-071 

19 

;G9  AUG.  11,1969 

(MAIN)  PACE  77 

L 

FLAGV>r.PD 

ASSIGKNEMS 

LSEP'S  PAGE  NO. 

m 

o 

0685 

0150 

ATTFL AG 

= 

M40 

LFP  ATTTTUGF  EXISTS 

NO  LEM  attitude 

A0686 

IN  ^'OCN-FIXFD 

AVAILABLE  IN  MCCN- 

0687 

REF 

6 

LAST 

75 

4753 

ATTFLBIT 

= 

BITl 

COORC  TNATES 

FI  >80  COORCINATES 

A0688 

0685 

RFF 

8 

LAST 

75 

0 M3 

flagv«r:7 

= 

STATE 

+ 7 

(105-119) 

A069O 

(SET  ) 

(RESET  ) 

AQ691 

BIT  15 

FLAG 

7 

(S) 

0692 

G151 

If SW  ICF 

1050 

P34  ;TP  I T IPE  TO  BE 

TPI  HAS  BEEN 

0693 

PEF 

8 

LAST 

75 

4 73  5 

1 TS^^BIT 

= 

BIT15 

CCNPUT  EC 

COMPUTEC 

A069A 

AC695 

BIT  14 

FLAG 

7 

( S ) 

0696 

0152 

MAM'FLAG 

= 

1 C6D 

ATTITUCE  MANEUVER 

NC  ATTITUCE  MANEUVER 

AC697 

GOING  OURING  PR 

DURING  RP  SEARCH 

0698 

REF 

7 

LAST 

75 

4 736 

N AMI  F FIT 

- 

B IT14 

SEARC  F 

A0699 

AC7CC 

B IT  13 

FLAG 

7 

( S ) 

0701 

i ■ 1 5 3 

ignflag 

= 

107  0 

TIG  HAS  ARRIVEC 

TIG  HAS  NOT  ARRIVED 

0702 

REF 

9 

LAST 

75 

4 73  7 

IGNFLBIT 

= 

BIT13 

A07C3 

AO  704 

BIT  12 

FLAG 

7 

(S  ) 

0705 

0 154 

ASTNFLAG 

1C80 

ASTRCNALT  HAS 

ASTRONAUT  HAS  NOT 

0706 

REF 

8 

LAST 

75 

4740 

AFTNR  IT 

= 

B IT12 

CKAYEC  IGNTTICN 

OKAYEC  igmttgn 

AC)707 

A07C8 

B IT  11 

FLAG 

7 

( L 1 

0709 

Cl  55 

S^ANCISP 

= 

1090 

LANCING  ANALOG 

1 ANCING  ANALOG 

07  lU 

REF 

7 

LAST 

7 4 

4741 

SU-ANCBIT 

= 

BITl  1 

CTSPLAYS  ENABLED 

DISPLAYS  SUFPRESSEC 

A071  I 

A0712 

PIT  in 

FLAG 

7 

(S  ) 

0713 

0156 

NCRMSW 

1 lOD 

LNIT  NCPNAL  INPUT 

lameert  ogmfltes  its 

0714 

REF 

7 

LAST 

76 

4742 

N C P V S E T T 

= 

B ITIO 

TC  LAMBERT 

OWN  UNIT  NORMAL 

A0715 

A 0 716 

B IT  9 

FLAG 

7 

( S ) 

071  7 

0157 

R VSW 

= 

1 1 ID 

CG  NOT  GCMOUTE 

COMPUTE  FINAL  STATE 

A0718 

FINAl  state  VFCTCR 

VECTOR  IN  T IMF-THETA 

0719 

RFF 

7 

1 A ST 

74 

4743 

RVSWBIT 

= 

B IT9 

IN  TIME-THETA 

AO720 

A0721 

B IT  8 

FLAG 

7 

( S) 

0722 

C 160 

V67FLAG 

= 

1120 

ASTRONAUT  OVERWRITE 

ASTRCNALT  DOES  NCT 

A0723 

W-MATRIX  INITIAL 

OVERWRITE  W-MATRIX 

0724 

PEF 

8 

LAST 

76 

4 744 

V67FI  8 TT 

= 

B IT8 

VALUE  S 

initial  values 

i 
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(PAIN)  FACE  78 

L 

FL  AGl^ORO 

ASS  IGN'RERTS 

USEF ' S PAGE  NO. 

18  EC  S4 

AQ725 

AC726 

BIT  7 

FLAG  7 

(S  ) 

0727 

072B 

AQ729 

REF  8 

LAST 

76 

0161 

4745 

IDLFFLAG  = 
ICLRFBIT  = 

1130 

BIT7 

NO  CV  PCMTOR 

CONNECT  OV  POMTOR 

A077O 

0731 

0162 

V27FLAG  = 

PIT  6 
1 140 

flag  7 

(S  ) 

AVERAGEG  (SFRVICPR) 

AVERAGEG  (SERVICER) 

073? 

A0733 

Rt^F  8 

LAST 

76 

4 74  6 

V37FLF1T  = 

B IT6 

RUNNING 

OFF 

AC73^ 
0 73  3 
0736 

FEF  7 

LAST 

74 

0163 

4747 

AVCGFLAG  = 
AVFGFBIT  = 

B IT  5 
1 15D 
B IT5 

FLAG  7 

( S) 

AVFPAGFG  (SERVICER) 
CESIREC 

AVERAGEG  (SERVICER) 
NCT  CESIRFC 

A07^7 

A07  3 8 

PIT  4 

FLAG  7 

(S  1 

0733 

0740 

A0741 

REF  6 

LAS'f 

75 

0 164 
4750 

UPLOCKFL  = 
UPLCCEIT  = 

1160 
B IT4 

K-KBAR-K  FAIL 

NC  K-KPAF-K  FAIl 

A 0 74  2 
0743 

C 165 

VFRIFLAG  = 

B IT  2 
1 170 

FLAG  7 

I S ) 

CFANGEC  WHEN  V33E  OCCURS  AT  ENC  OF  F27 

0744 

A0743 

RFF  8 

LAST 

76 

475  1 

VFRIFBIT  = 

BTT3 

A0746 

0747 

0748 

RFF  7 

LAST 

76 

0166 

4752 

V82EPFLG  = 
\,82EPPIT  = 

B IT  2 
1180 
e IT2 

FLAG  7 

( L ,C  ) 

PCON  VICINITY 

EARTH  VICINITY 

4074  9 

AC75C 

B IT  1 

FLAG  7 

( S ) 

073] 
0752 
A073  ’ 

RFF  7 

1 AST 

77 

C 167 
4733 

T F F S liv 

TFFSIaBIT  = 

1 190 
B I T1 

CALCULATF  TPEPIGEF 

CALCULATE  TEE 

0734 

RFF  9 

LAST 

77 

0 10  4 

FLAGViRDF  = 

state 

+ 8C 

(120-134  ) 

A C 7 3 3 

( SET) 

(RESET ) 

AC756 

BIT  15 

FLAG  8 

(S  ) 

0737 

AC758 

0759 

RRF  9 

LAST 

77 

Cl  70 
4 73  5 

RPQFLAG  = 

RPCFLPIT  = 

1 2CD 
B IT15 

RFC  NCT  CCPFUTEC 
(RPQ  = VECTOR  BE- 
TV^EEN  SECCNCARY  BCDY 

RPC  CCMFUTEC 

40760 

A0761 

ANC  PRIPARV  RCCY 

A )762 
A0763 

= 

PIT  14 
1210 

FLAG  8 

gap; 

AS9'1^81  E REVISION 

116  CF 

AGC  FRCC-RAP 

LUN'INARV  BT  NASA 

202I112-C71  1 
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(MAIN)  FACE  79 

L 

F LAGWCPO 

ASSIGNP 

'ENTS 

LSFR'S  PAGE  NO 

. 19  EC  56 

a'1764 

= 

e TT16 

A0765 

A0766 

BIT  13  FLAG  8 

(S  ) 

i)767 

'172 

NEWIFLG 

= 

1220 

FIRST  PASS  thpqLGF 

SUCCEECING  ITERATICN 

0768 

RPF 

10 

LAST 

77 

A737 

NFW  IE  IT 

= 

B IT13 

integration 

CF  INTEGRATION 

A0769 

A0770 

BIT  12  FLAG  6 

***  PRCTFGTEC  FRCP 

FRESH  start  *>7* 

0771 

0173 

CNCCNFLG 

= 

1230 

PERMANENT  CSN  STATE 

PERMANENT  CS*^  STATE 

0772 

RTF 

9 

LAST 

77 

A7AC 

CPCONBIT 

= 

BIT12 

IN  LUNAR  SFFERE 

IN  EARTH  SPHERE 

AC770 

AC77A 

BIT  11  FLAG  8 

PRCTECTEG  FROM 

FRESH  start  A'Jj; 

0775 

0176 

LMnONFLG 

- 

1260 

PERMANENT  LN  STATE 

permanent  LM  STATE 

0776 

PEF 

8 

LAST 

77 

6761 

LPCONE  IT 

= 

8 IT  11 

IN  LUNAR  SPHERE 

IN  EARTH  SPHERE 

A0777 

A0778 

BIT  1C  FLAG  8 

( 1 ) 

0779 

Cl  75 

FLUNCIS  F 

= 

12  5C 

CURRENT  GUICANCE 

CURRENT  GUICANCE 

0780 

RFF 

8 

LAST 

77 

6762 

FLUN'Cei  T 

= 

BITIO 

CISFLAYS  INFIBITEC 

CISPLAYS  PEPMIITTEC 

A078  1 

A0782 

BIT  9 flag  8 

(L  ) 

A0788 

= 

1260 

AC78A 

= 

B IT9 

A0785 

A0736 

BIT  8 FLAG  8 

PRCTECTEO  fpcm 

FRESH  START 

0787 

0177 

SUPFFLAG 

= 

127  0 

LM  ON  LUNAR  SURFACE 

LM  NCI  CN  LUNAR 

0 78  8 

REF 

9 

LAST 

77 

6766 

SLRFF8 IT 

= 

BITS 

SURFACE 

A0789 

• 

A079C 

BIT  7 FLAG  8 

(S  ) 

0791 

0200 

INF  INFLG 

= 

1280 

NC  CGMC  SCLUTICN 

CCNIC  SOLUTION 

A0792 

(GLOSURF  through 

EXISTS 

0793' 

RFF 

9 

LAST 

78 

6 76  5 

INFINBIT 

r 

6 IT7 

INFINITY  REGUIREC) 

A079A 

A0795 

BIT  6 FLAG  8 

( S ) 

0796 

0 20  1 

GPDERSVi 

= 

1290 

ITERATOR  USES  2NC 

ITERATCP  USES  1ST 

0797 

pt^F 

9 

LAST 

78 

6766 

CRCFPE  IT 

= 

B IT6 

opoep  minimum  mcoe 

CRCEP  SIANCARC  MCCE 

A0798 

A0799 

BIT  5 FLAG  8 

(S) 

C8C0 

02  >2 

APSESW 

= 

1 300 

ROFSIRFD  OUTSIDE 

PDESIPEC  INSICE 

AORO  1 

FFR  IC ENT FR-A PO C ENT EP PERIC ENTER -A PCC ENTER 

0802 

REF 

8 

LAST 

78 

6767 

APSESBIT 

= 

BITS 

RANGE  IN  TIME-RAOI 

RANGE  IN  TIME-RACIUS 

i 
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0304 

L'SEQRFLG 

BIT  14  FLAG 
= I960 

13 

GIMBAL  UNUSABLE. 

trim  GIMBAL  MAY  BE 

1089 

AlCPr 

RFF  11 

LAST 

85 

4 736 

L'SPQR  JT  S 

= BIT14 

USE  JETS  ONLY. 

USFC. 

AIC91 

1092 

1C93 

REF  14 

LAST 

85 

0305 

4737 

CSMOKFLG 

CSMCOCKC 

BIT  13  FLAG 
= 1 970 

= BIT13 

13 

CSM  CCCKED.  USE 
BACKUP  DAP 

CSM  NCT  CCCKEC  TO  LM 

A1094 

A1095 

BIT  12  FLAG 

13 

1096 

1097 
A 1098 

RFF  13 

LAST 

85 

C3C6 
4 740 

CLPRCFLG 
CLRRCBI T 

= 1980 

= 8IT12 

CURRENT  CAP  PASS 
IS  RATE  CCMNANC 

CURRENT  DAP  PASS  IS 
NCT  RATE  CCMMANE 

A1C99 
11  10 

0307 

ACC4-2FL 

BIT  11  flag 
= 1990 

13 

4 JET  X-AXIS  TRANS- 

2 JET  X-AX  IS  TRANS- 

1101 
A 1 102 

»FF  12 

LAST 

85 

4741 

ACC4CR2X 

= BITll 

LATIQN  RFQUesTED 

LATICM  RFCLESTFC 

All  13 
1 104 
110  8 

REF  12 

L AST 

85 

C3in 

4742 

ACRBTFLG 

ACRBTRAN 

BIT  10  FLAG 
= 2000 

= BITIO 

13 

e SYSTEM  FOR  X- 
TRANS  LAT  ICN 

A SYSTEM  FTP  X- 
TRANSLATICN  PREFER'C 

A11C6 

A11Q7 

BIT  9 FLAG 

13 

1108 
1109 
All  10 

REF  11 

LAST 

86 

' 3 1 1 
474  3 

Xnvi NFLG 
Xrv  INF  IP 

= 2 C 1 D 

= BIT9 

X-AXIS  CVERRICE 
LCCKED  OUT 

X-AXIS  CVERRICE  OKAY 

A 1 1 1 1 
1112 

0312 

CR IFTCFL 

BIT  8 FLAG 
= 2020 

13 

ASSUME  c Offset 

USE  offset  accelepa- 

1113 
A 1 1 1 4 

R8F  13 

L AST 

86 

4744 

DRIF  TBI T 

= BITS 

CRIFTING  FLIGFT. 

TICK  ESTIMATE 

AU15 

1116 


'•)31^ 


RHCSCFLC 


BIT  7 FLAG  13 
203D 


NCP^AL  FFC  scaling  FINE  RFC  SCALING 
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1 1 17 
ai  1 18 

REF 

1 8 

LAST 

86 

4 74  5 

RHCSCALE  = 

P ITT 

RFCUESTEC 

RECLESTEC 

A1119 
11  2^1 
1121 

REF 

13 

LAST 

8 6 

C314 
4 74  6 

LLLAGFLG  = 
ULLAGER  = 

B IT  6 
2 04D 
BIT6 

FLAG 

13 

ULLAGE  REQUEST  BY 
MSSICN  FRCGRAY 

NO  INTERNAL  ULLAGE 
REQUEST 

A 1 122 

A1123 

BIT  5 

FLAG 

13 

1124 

1128 

A11251 

RRF 

12 

LAST 

86 

■1315 

4747 

CESL2FLG  = 
C8SLECT2  = 

2Q5D 
6 IT5 

5 DEG  DFADBAAD 
SELECTED  BY  CREIai 

1 CR  .3  CEG  CEACEAN: 
SELECTED  BY  CREW 
(SEE  EIT4  CAPPCOLS) 

A 1 126 

A1127 

BIT  4 

FLAG 

13 

1128 

1129 

A1130 

REF 

1C 

LAST 

86 

)316 
4 75  3 

DBSELFLG  = 
CPSELECT  = 

206D 

BIT4 

1 CEG  DEADBAND 
SELECTED  BY  CREW 

MIN  08  SELECTEE  8Y 
CREW  (0.3  CEG) 

A1  131 
1132 

'1317 

ACC0KFL6  = 

B IT  3 
2 07C 

FLAG 

13 

GCNTRCL  AUTFCRITY 

RESTART  OR  FRESr  ST. 

1133 
A 1134 
A1  135 

REF 

1 2 

LAST 

86 

475  1 

ACCSCKAY  = 

BIT3 

VALUES  FFCR  1 /ACCS 
LSABLE 

SINCE  LAST  1/ACCS; 
CL1PLTS  SLSFECT. 

A1136 

1137 

0320 

ALTR2FLG  = 

BIT  2 
2080 

FLAG 

13 

TFESE  FLAGS  ARE  USED  TCGETHER  Tc  INCICAT 

1138 
A1  139 
A 1 140 

RFF 

12 

LAST 

86 

4752 

ALTRATE2  = 

R TT2 

ASTRCNALIT-CHCSEN  KALCRANU  MANEUVER  RATES 
(C  ,0) =( P IT2  ,BIT1 ) = C.2  CFG/SEC 
(0,1)=  Q.  5 OEG/SEC 

A1141 

1142 

1143 

RFF 

12 

LAST 

86 

032  1 
4 7 5^ 

AUTRIFLG  = 
AlTRATEl  = 

BIT  1 
209D 
B TTi 

FLAG 

13 

(1,01=  2.C  DFG/SEC 

(l,n=  IC.O  CEG/SFC 

A1 144 
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L SLBROLTINE  CALLS 

USER'S  PAGE  NO.  1 EC  SA 

0001 

cccc 

SLBPC 

LLPEFASE 

128 

nr\o?_ 

0000 

SUBRC 

LEMPNAIO 

CSS 

0003 

ccoo 

SUBRC 

LEMP20S 

lAO 

OOOA 

QGOC 

SLBRf 

LERP3CS 

1C5 

0005 

) ) )0 

SUBRC 

K ISS  ING 

053 

0006  * 

CCCC 

SLBRC 

F LY 

1 A6 

0007 

0000 

SL8RC 

LEMP5CS 

116 

ccce 

coon 

SUBRC 

SKIPPER 

CS7 

0000 

rooo 

SLBPC 

LNCAF 

023 
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L 

ERfRAELF  ASSIGNPFMS 

USER' S PAGE  NO.  1 EO  SA 

RCOCl 

CCNVEATICNS  AAO  NClATICNS  UTRIZEC  FG  P EPASAELE  A SS  1 GN  ENTS  . 

POOP  2 

equals  is  USED  IN  TWC  VvAYS.  IT  IS  CFTEN  USED  TC  GHAIN  A GFCLF 

ROOM  3 
PorcA 

CF  ASSIGNMENTS  SC  Tf-AT  TFF  GRCUP  MAY  EE  MOVED  WITH  THE 
CHANGING  CF  CNLY  CNE  CARC.  EXANFLE. 

A00M5 
AOOOA 
A 0007 

X EQUALS  START 

Y equals  X +S1ZE.X 

Z EQUALS  Y +SIZE.Y 

R0008 

R0009 

(X,  Y,  AND  Z ARE  CONSECUTIVE  ANC  BEGIN  AT  START.  ) 

(SIZF.X  AND  SIZF.Y  APE  THF  RFSFECTIVE  SIZES  CF  X ANC  Y, 

ROOlO 

USUALLY  NUMERIC,  R.  1,  2,  6,  lED  ETC.  ) 

ROOl  1 
R0012 

EQUALS  CFTEN  IMPLIES  THE  SHARING  OF  REGISTERS  (DIFFERENT  NAMES 
AND  DIFFERENT  DATA).  EXAMPLE. 

A0013 

X fqlaLS  Y 

POOL  A 
P0015 

= MEANS  THAT  MULTIPLE  NA^ES  HAVE  EEEN  GIVEN  TC  T|-g  SAME  DATA. 
(THIS  IS  LOGICAL  EQUIVALENCF,  NCT  SHAPING)  EXAMPLE. 

ACOl  A 

X = V 

R0P17 

ROOIR 

the  SIZE  AND  LTILIZATICN  CF  AN  FRASAELE  ARE  CFTEN  INCLL'CFC  IN 
THF  COMMENTS  IN  THE  FOLLOWING  FORM.  M(SIZE)N. 

RCC19 

R0020 

R0021 

M REFERS  TC  the  MCBILITY  CF  THE  ASSIGNMENT. 

B MC'NS  THAT  THE  SYMBOL  IS  REFERENCED  EY  EASIC 

INSTRUCTIONS  ANC  THUS  IS  E-BANK  SENSITIVE. 

R0022 

R0023 

P002A 

I M-^ANS  THAT  THF  SYMBOL  IS  FEFERFNCFC  CNLY  EY 

INTERPRFTIVS  I N S TR UC T I C N S , AND  IS  thlS  E-EANK 
I NSE  NS  IT  lV*r  ANC  may  APPEAR  IN  ANY  E-BANK, 

R0O2  5 

SIZE  IS  THF  NIMB'^P  CF  PEGTSTEPS  INCLLCEC  BY  THE  SYMPCL. 

R0C26 

R0027 

R0028 

N INCICAT>:S  THE  NATLRE  OR  PERMANENCE  CF  THE  CCNTENTS. 

FL  means  THAT  THE  CCNTENTS  ARE  PAC  LCADEO. 

DSP  mpans  that  the  register  IS  LSFD  FCR  A CISPIAY. 

R0020 

R003O 

R0031 

PPM  means  that  the  register  is  permanent,  if.  it 
IS  Lsec  CURING  THE  ENiIPF  MISSICN  FCR  ONE 
PURPOSE  AND  CANNCT  BE  SHAPED. 

RCC32 

P0033 

P0034 

TMF  MEANS  THAT  THF  REGISTER  IS  LSFD  TEMPORARILY  OR 
IS  A SCRATCH  REGISTER  FCP  THE  ROUTINE  TC  WEIGH 
IT  IS  ASSIGNED.  THAT  IS,  IT  NEED  NCT  EE  SET 

R0035 

R0036 

PRICF  TC  invocation  OF  TEE  ROUTINE  NCR  DOES  IT 
contain  LSEFLL  CUTPLT  TC  ANCTHER  PCUTINE.  THUS 
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ASSEl^BLE 
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ER'ASABl 

F ASSTGNFFMS 

USER'S  PAGE 

NO.  2 

EO  SA 

R0C37 

R0038 

R0039 

IT  '-AY  EE  SFAFEC  WITF  AFY  CTFEP  ROUTINE  WHICH 
IS  NOT  ACTIVE  IN  PARALLEL. 

IN  MEANS  IN°UT  TO  TFE  ROUTINE  AND  IT  IS  PR06AFLY 

ROOAO 

ROOAl 

R0C42 

TFMPCRARY  FCR  « FIGFFP-LEVEl  P CUT  IN F/ P RC G P Am  . 
OUT  MEANS  OUTPUT  FROM  THE  RCLTTNE,  PROBAELY 

TEAFCRAFY  FCF  A HIGHER-LEVEL  ROU T INE /PRCGR A M . 

GAP: 

ASSfwOLP  REVISION  116  CF 

AGC  PPCGRAN 

LUMNAFV  EV  NASA  20211  12-C71 
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PAGE  S2 

L 

FRASAPLF  ASSIGNMENTS 

LEER'S  RAGE  NC.  3 

EO  S4 

P0C43 

SPECIAL  FFGTSTFRS. 

0^44 

00  no 

A 

ECLALS 

0 

0045 

OOOl 

L 

EQUALS 

1 

L AND  C ARE  BCTH  CHANNELS  ANC 

REGISTERS. 

0C4f 

CC02 

C 

EQUALS 

2 

0047 

C-0O3 

EBANK 

fqlal  S 

3 

CC48 

0004 

FEANK 

EQUALS 

4 

0049 

CC05 

Z 

FCLALS 

5 

ACJACENT  TO  FBANK  ANC  EBANK  FOR  DXCE  Z 

0050 

0006 

BBAMK 

EQUALS 

6 

ICTCB)  AND  CXCh  FBANK  (CTCF). 

A 00  51 

REGISTER  7 IS  A ZERO-SCLPCF, 

USEC  BY  ZL. 

0052 

OHIO 

ARLPT 

ECLALS 

1C 

INTERRUPT  STCFAGE. 

CC53 

00  1 1 

LPUPT 

EQUALS 

1 1 

0C54 

COl  2 

CRLPl 

ECLALS 

12 

0085 

CO  1 3 

SAMPl TME 

EQUALS 

13 

SARPLEC  tine  1 G 2. 

0056, 

0015 

ZPUPT 

EQUALS 

15 

( 13  ANC  14  APE  SPARES.  ) 

0057 

C016 

BANKRLFT 

EQUALS 

16 

USUALLY  EQLCS  FBANK  DR  EBANK. 

0058 

0017 

BPUPT 

EQUALS 

1 7 

RESUME  ACDRESS  AS  VvELL. 

0C59 

C020 

CYP 

E CU  A L S 

20 

0060 

0021 

SR 

EQUALS 

21 

0061 

0022 

CYL 

FGUAL  S 

22 

■00  6 2 

0023 

Ercp 

FCUALS 

23 

ECITS  INTERPRETIVE  OPFRATIDN 

CCCE  PAIRS. 

0063 

CC64 

CO  2 4 
002  5 

T IME2 
T INEl 

EQUALS 

EQUALS 

24 

25 

0065 

0066 
0067 

0026 
002  7 
CC30 

TIRE3 
T 1MP4 
T IME5 

FCUALS 
EQUALS 
EQUAL  S 

26 

27 

30 

0068 

00  31 

TIME6 

EQUALS 

31 

0C6S 

0032 

ccux 

EQUALS 

32 

0070 

0033 

' CCLY 

ECLALS 

33 

0071 

G034 

CDLZ 

EQUALS 

34 

0072 

0035 

CCUT 

equals 

35 

RENC  RACAR  IRLNNICN  COL 

0073 

0036 

CDLS 

EQUALS 

3 6 

RENC  RACAR  SHAFT  CCU 

■00  74 

0037 

P IPAX 

equals 

3 7 

0C75 

C040 

P IPAY 

FCLALS 

40 

0U76 

C04  1 

PIPAZ 

EQUAL 

4) 

CC77 

004  2 

Q-PFCCTR 

EQUALS 

42 

PHC  CCLNTER  REGISTERS 

0078 

0043 

P-RHCCTP 

FCUALS 

43 

0C7° 

0044 

R-RHCCTR 

EQUALS 

44 

GC80 

C045 

INLINK 

F CU  A L S 

45 

0081 

004  6 

RNRAO 

FCLALS 

46 

0082 

0047 

GYROf PC 

EQUAL  S 

47 

0083 

f050 

CCUXCNO 

ECLALS 

5 0 

0084 

005  1 

CCUYCPD 

FQLAL  S 

51 

CC85 

0052 

CCUZCMC 

EQUALS 

52 

008  6 

0053 

CDUTCPD 

EQUALS 

53 

FACAP  TRUNNION  CCMMANC 

0087 

C.0  54 

rcuscMD 

equals 

54 

RACAR  SEAFI  CCNPAND 

w 
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ERASAPLF  ASSIGNRFMS 

LS'^R'S  PAGE 

NO.  4 

EO  S4 

0088 

0055 

THRLST 

ECLALS 

55 

0089 

0056 

LEMON M 

EQUALS 

56 

0090 

0057 

OUTLINK 

equals 

57 

0091 

C06C 

ALTM 

ECLALS 

60 

R0C92 

IMEPFPET  !VE 

REGISTERS  ACCRESSEC  RELATIVE  TO  VAC  AREA. 

0093 

0042 

LVSQtAR 

E EQUALS 

34D 

SQUARE  CF  VECTOR 

INPUT  TO  APVAL  AND 

UNIT 

0094 

0044 

L V 

EQUALS 

3 60 

LENGTF  CF  VECTCfi 

INPUT  fc  UNIT 

• 

0095 

004  6 

XI 

EQUALS 

38C 

INTERPRETIVE  SPECIAL  REGISTERS 

RELATIVE 

0096 

0047 

X2 

FCUAl S 

3 90 

TC  THE  WCPK  AREA 

. 

0097 

0050 

S 1 

EQUALS 

400 

0098 

0051 

S? 

E CU  A 1 S 

410 

0099 

0052 

CPRET 

EQUALS 

420 

ROICO  TNPL1/CLTPUT  CH/^^^EL£ 


AOlOl 

0102 

REF  1 01  U 

=!=**  CHANNEL  2ERC  IS  TC 
LCHAN  EQUALS  L 

EE  USEE  IN  AN  INCEXEF  CPERATIGN  CNLY. 

CK3 

RFF  1 0012 

QGFAN 

EQUALS 

C 

•)104 

000  3 

HI  SCALAR 

ECLALS 

3 

010  5 

O’)  14 

LCSCALAR 

EQUALS 

4 

0106 

C005 

CHAN5 

E CU  A L S 

5 

0107 

00  16 

CHAN6 

EQUALS 

6 

0K8 

on  0 7 

SUPERENK 

EQUALS 

7 

SUPER-BANK. 

0109 

CCIO 

OUTO 

fcuals 

10 

0110 

0011 

CSALMOUT 

FQUAl S 

1 1 

0111 

0012 

CEAN12 

EQUALS 

12 

nil? 

■'  XC13 

CHANI3 

EQUALS 

13 

0113 

T 114 

CHAN  14 

equals 

14 

0114 

COl  5 

MNKEY  IN 

F CU  A L S 

15 

0115 

0016  ' 

NA VKE YT  N 

EQUALS 

1 6 

0116 

0030 

CFAN30 

equals 

30 

0117 

CC31 

CHAN31 

ECLALS 

31 

0118 

00  3 2 

CHAN32 

EQUALS 

32 

C 1 1 9 

C033 

CFAN33 

EQUALS 

33 

0120 

0C34 

ONTMl 

EQUALS 

34 

0121 

0 13  5 

DNTM2 

EQUALS 

35 

R0122 

ENC  OF  CHANNEL  ASSIGNMENTS 
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PQ12T  IMERFREUVE  SV>ITCH  BIT  ASSIGNMENTS 
A012A 


RO  1 2 5 


FLAGlvCPDS  ANE  BITS  NOW  ASSIGNED  AND  DEFINED  IN  THEIR  OWN  LOG  SECIIFN 
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0128 

(7061 

SETLCC 

61 

R0129 

INTERRUPT  TENPCPARY  STCRAGE 

PCOL  . 

( 1 1C  ) 

R0121 

(I7Cf/Fl  THRCLGH  RLFTRFC-4) 

RT132 

ANY  OF  TFFSF  MAY  ISEQ  AS 

TEMPCRARIES 

CLPING 

IN'^ERRUPT  CR  l^TTF  INTERRUPT  INHIPITEC.  THE  ITEWP  SERIES 

R013A 

I 9 

LSFC 

nURING  FALLS  TC  ^ff  EXECUTIVE 

ANC  W A ITL  1ST  - TfF 

RUPTREGS  ARE  NOT. 

0136 

0061  CC61 

ITEPFl 

ERASE 

3137 

REF 

1 

006  1 

VvA  ITEX  IT 

FQLALS 

I IFMP  1 

0138 

REF 

2 

LAST  95  0061 

EXFCTEMl 

equals 

T TEMP  1 

0139 

CC62  0C62 

ITFMF2 

ERASE 

UlAR* 

RFF 

1 

0062 

waitbank 

EQUALS 

I TEMP2 

01  A ) 

REF 

2 

LAST  95  G062 

EXECT  EP2 

EQUALS 

ITEMP2 

01A2 

0063  0C63 

I TFRF3 

ERASE 

01A3 

REF 

1 

006  3 

RUPTSTCR 

EQUALS 

ITEMP3 

OlAA 

RFF 

2 

LAST  95  C063 

LiAITAFR 

EQUALS 

ITEMP3 

0145 

R F F 

3 

LAST  95  0063 

NEWPR  10 

EQUALS 

ITEMP3 

0146 

0064  0064 

ITEMP4 

FRASE 

0147 

RFF 

1 

C064 

LCCCTP 

FQLALS 

ITEPF4 

0148 

RFF 

2 

LAST  95  C064 

WAITTFMP 

EQUALS 

I Tr|MP5 

0149 

(;065  0065 

ITFMF5 

FRASF 

0150 

REF 

1 

C065 

NEWLCC 

eclal  S 

I TFMF5 

0151 

0066  0066 

ITEMP6 

FRASE 

A0152 

NEWLCC+1 

equals 

ITE'^P6  CF  ACCRESS. 

0153 

0067 

SETLCC 

67 

0154 

0067  0067 

NFWJCE 

ERASE 

MUST  BE  AT  LOG  67  DUE  IC  WRING. 

015  5 

C97C  0070 

RLPTREGl 

ERASE 

0156 

CC71  CQ71 

RLPTREG2 

ERASE 

0157 

0072  0072 

RUPTP  EG3 

ERASE 

015  8 

0073  0073 

RLPTRFG4 

FRASE 

0159 

REF 

1 

0073 

KFYTENFl 

EQUAL  S 

PUPTPEG4 

0160 

RFF 

2 

LAST  95  C073 

OSRUFTEP 

equals 

RUPTPEG4 

R0161 

FLAGWCRC  R'=SrRV  AT  IONS. 

(160 

0163 

0074  01 L3 

STAT  F 

ERASE 

+15C  FLAGWCRD  REGISTERS. 

A0164 

P0165  P25  RACAR  STCPAC^.  (PAY  BE  L'KSFAREC  IN  E7)  (TEMP  OVERLAY)  (20  CVFRLAYS  FLGV^FC  lA  6 15 
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L 

FRASABIF 

assignmfms 

LSEP'S  PAGE  NO 

. 7 EO  SA 

1167 

0168 

A0169 

PFF  15 
RFF  1 

LAST  87 

0 112 
0 1 1 3 

LASTVCIVD 

LASTXCMO 

ECLALS 

EQUALS 

STATE 

LASTYCMO 

+ 1AD 
+ 1 

EdIFEM  THESE  ARE 
B< 1 ) PRN  THEY  NLST 

CALLEC  BY  TARUPT 
BE  CONTIGUOUS, Y FIRST 

R017O 

EXEC 

TFRFCRARirS  tvFICF 

w a Y BE 

USED  BETWEEN  CCS 

NFWJCBS.  ( 

32D)  (INTBlft  THRCLGH  FUPTNXTR) 

0172 

'ni  4 

0114 

INTB15+ 

ERASE 

REFLECTS  IfTH  BIT  OF  INCFXAELF  ACCRESSES 

C173 

RFF 

1 

0114 

CSEX  IT 

= 

INTfil 5+ 

RETURN  FCR  CSFIN 

0174 

REF 

2 

LAST 

96 

0114 

FX  ITEM 

= 

INTP15+ 

RETURN  FCR  SCALE  FACTCR  PCUTINE  SELECT 

0175 

RFF 

3 

LAST 

96 

0114 

BLANKRET 

= 

I NT  B 1 5 + 

RETURN  FOR  2BLANK 

0176 

CUE 

Cl  15 

I NTBI  T1  5 

ERASE 

SIMLAR  TC  AECVE. 

0177 

REF 

1 

'll  L 5 

WRDRFT 

= 

INTB  n 1 5 

RETURN  FCR  5EL4NK 

0178 

REF 

2 

LAST 

96 

Cl  15 

WCRET 

= 

INTBIT15 

RETURN  FCR  DSPWD 

0179 

REF 

3 

LAST 

96 

0 1 If 

OECRET 

= 

INTBIT15 

RETURN  FCR  FUTCCRICEC  LCAC) 

0180 

REF 

4 

LAST 

96 

0115 

21/22REG 

= 

INTBIT15 

TERR  FCR  CHAPIN 

R0181 

THE  REGISTERS 

RFTLiEEN 

ACCRIaO 

AND  FRICRITY  RLST 

STAY  IN  THE 

FCLLCWING  CREEP  FCR  INTERPRFTIVE  TRACE. 

0183 

0116 

0116 

ADDRWO 

ERASE 

12  BIT  INTERPRETIVE  OPERANC  SUE-ACCFESS. 

0184 

Oil  7 

0117 

PCLISF 

EPaSE 

FCLCS  CACR  WADE  FRCN  PCLISH  ACCRESS. 

0185 

REF 

1 

- 1 17 

lpoatret 

= 

PCLISF 

RETURN  FCR  UFEATNN,  UFEATVE 

9186 

RFF 

2 

LAST 

96 

■ 11 1 7 

CHAR 

= 

POLISH 

TERR  FCR  CHAPIN 

0187 

REF 

2 

LAST 

96 

0 117 

EPCNT 

- 

PCLISF 

COUNTER  FCR  ERROR  LIGHT  RESET 

01  88 

REF 

4 

LAST 

96 

C117 

PECOLN'T 

= 

PCLI SH 

rCUNTEP  FCR  scaling  ANC  DISPLAY  (DEC) 

Cl  E9 

6 12  0 

0120 

F IXLCC 

Efi  ASE 

WORK  AREA  ADDRESS. 

0190 

0121 

0121 

rVF I NC 

EPASE 

SET  N’CN-ZERC  ON  OVFRFLGW. 

0191 

n 122 

1127 

VPUF 

ERASE 

+ 5 

TERPORARY  STCRAGE  USED  FCR  VECTCRS. 

0192 

REF 

1 

0122 

SGNCN 

= 

V EU  F 

TE^P  FOR  +,-  CN 

0193 

RFF 

2 

LAST 

96 

0 122 

N rUNTEM 

V6UF 

CCLNTEP  FCR  MXNCUN  FETCH 

0194 

REF 

3 

LAST 

96 

0 122 

C ISTE*' 

= 

veuF 

CCLNTFR  fOR  CCTAL  DISPLAY  VERBS 

0 195 

RFF 

4 

LAST 

96 

<■  122 

CECTF  N 

= 

veuF 

rCUNTEP  FOF  FETCH  ( CFC  DISPLAY  YEPBS) 

0196 

REF 

5 

EAST 

9 6 

M23 

SGNOFF 

VBUF  +1 

TERF  FCF  +,-  CN 

0197 

REF 

( 

LAST 

96 

0123 

NVTFR  F 

= 

VEUF  +1 

TERP  FDR  NVSLB 

0198 

RFF 

7 

LAST 

96 

-^123 

SFT^RFl 

= 

VBUF  +1 

STCRAGE  FCR  SF  CCNST  HI  P ART  ( = S FT  ERi  F 2- 1 ) 

0 199 

REF 

8 

LAST 

96 

0 12  3 

F ITEM  IN 

= 

VBUF  +1 

TERP  FCR  LCAD  CF  HRS,  MN,  SEC 

A020C 

MUST  = LPTEMIN-l. 

0201 

RFF 

9 

LAST 

96 

0 124 

CODE 

= 

VBLF  +2 

FCR  DSPIN 

0202 

RFF 

10 

LAST 

96 

0124 

S FTFH/F2 

=, 

VBUF  +2 

STCRAGE  for  SF  CONST  LC  P A R T ( = S FTF R F 1 + 1 ) 

0203 

REF 

1 1 

LAST 

96 

0124 

LCTFR  IN 

= 

VBUF  +2 

TERF  FCR  LCAC  OF  HRS,  R IN , SEC 

A02C4 

RUST  = HITERINU  . 

C2C5 

RFF 

12 

LAST 

96 

0 12  5 

^'IXTE^F 

VBUF  +3 

FOP  M IXNCUN  DATA 

>1206 

REF 

13 

LAST 

96 

■'  12E 

s ignirft 

= 

VEUF  +3 

RFTUPN  FCR  +,-  CN 

R02O7 

ALSO 

R tXTFRP  + 1 

= VeUF+4 

, MIXTERF+2  = VBUF+5. 

0208 

Cl  30 

C132 

ELF 

ERASE 

+ 2 

terforary  scalar  storage. 
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LSEF'S  PAGE  NO.  8 EO  S4 

0209 

0133 

0 134 

BUF2 

ERASE 

+ 1 

0210 

R5F 

1 

0 130 

I acexlcc 

FCIALS 

euF 

contains  accress  of  specified  index. 

0211 

P FF 

2 

LAST 

97 

• 130 

SWWORD 

equals 

8LF 

ADDRESS  CF  SKITCH  P/ORD. 

0212 

RFF 

3 

LAST 

97 

13  1 

SVvF  IT 

EQUALS 

RUE  +1 

SPITCF  PIT  PITHIN  SUTCH  PCPC. 

1213 

■■>135 

■013  5 

A'PTERF 

ERASE 

TEMPOPARY  USEE.  IN  MULTIPLY  AND  SHIFT. 

0214 

RFF 

1 

013  5 

dypntemp 

= 

MPTEMP 

DMFSUe  TEMFGPARY 

0215 

0 136 

0136 

DCTINO 

ERAS  E 

COMPONENT  increment  FCR  DCT  SLBRGILTINE. 

0216 

REF 

1 

0 136 

OVSIGN 

EGLAL  S 

dctinc 

DETERMINES  SIGN  OF  CCV  RESULT. 

0217 

PEF 

2 

LAST 

97 

013  6 

ESCAPE 

EQUALS 

DOTING 

LSED  IN  ARCSIN/ARCCCS. 

0218 

RFF 

O 

LAST 

97 

0 136 

EATRET 

= 

DCTI NG 

EXIT  FPCM  enter 

021  9 

0 13  7 

'■137 

Cn'^RET 

ERASE 

RETURN  FPCM  CCT  SLERGUTINiF. 

0220 

RFF 

1 

0137 

CVNORRCT 

ECUAIS 

CCTR'^'T 

DIVIDEND  normal  IZ ATICN  CCLNT  IN  DCV. 

1221 

REF 

2 

LAST 

97 

0137 

ESCAPE2 

FQUAIS 

DCTRET 

ALTERNATE  ARCS  IN  / ARCCOS  StvITCH. 

0222 

RFF 

3 

LAST 

97 

0137 

WCCNT 

= 

DCTRET 

CHAP  CGLNTEP  FCR  CSFlsC 

0223 

REF 

4 

LAST 

97 

i 137 

I NR  EL 

= 

CCTRET 

INPUT  BUFFER  SELECTOR  ( X,Y,Z,  REG  ) 

0224 

; 14^' 

C140 

MATING 

ERASE 

VECTCF  INCFEMENT  IN  MXV  ANC  VXM. 

0225 

PEF 

1 

0140 

MAXCVSW 

EQUALS 

MATING 

-^Q  10  OP  QLOTTENT  IS  NEAR  CNE  - ELSE  -1. 

0226 

REF 

2 

LAST 

97 

€140 

PTLYCNT 

eclals 

MATING 

FCLYNCMIAL  LCCP  COUNTER 

0227 

ref 

3 

LAST 

9 7 

f!l40 

DSPMMT'^N 

= 

MATING 

CSFCCLM  SAVE  FCR  nSF!''N 

0228 

REF 

4 

LAST 

9 7 

0 140 

M IX8R 

MATING 

INCICATCR  FCR  MIXED  CR  NCPMAL  NCLN 

0229 

0141 

0 141 

TFP  1 

ERASE 

EXEC  TEM  F 

023  f 

REF 

1 

0141 

PCLYRET 

= 

TEMl 

0231 

REF 

2 

LAST 

97 

0141 

CSPEL 

TFM!1 

PEL  ACDRESS  FGR  DSPIN 

0232 

0142 

0142 

TEM2 

ERASE 

EXEO  TPMF 

0233 

REF 

1 

0142 

CSMAG 

= 

TEM2 

MAGNTTLDE  STORE  FCR  DSFIN 

0234 

REF 

2 

LA  ST 

97 

''142 

I DAODTE  N 

= 

TEM2 

MIXNCLN  INDIRECT  ADDRESS  STCRAGE 

0235 

■'■14  3 

0143 

TEM3 

ERASE 

EXEC  TEMF 

0 236 

REF 

1 

0143 

CCUNT 

= 

T EM3 

FGR  DSPIN 

0237 

■:  144 

0144 

TFM4 

ERASE 

EXEC  TEMF 

0238 

RFF 

1 

3 144 

L STPTR 

=r 

TFM4 

LIST  FCINTER  FCR  GRABLSY 

0239 

PEF 

2 

LAST 

97 

C 1 4 4 

RELRET 

= 

TEM4 

RETURN  FCR  RELCSP 

0240 

' REF 

3 

LAST 

97 

0!  144 

FPEERET 

= 

TEM4 

RETURN  RCR  FPEECSP 

0 241 

RFF 

4 

1 AST 

97 

0144 

CSPWCRET 

TEM4 

return  FCR  DSPSIGN 

)242 

REF 

C 

LAST 

97 

1144 

SFPSCRET 

= 

TEM4 

RETURN  FCR  SEFSEC 

0 24  3 

RFF 

6 

LAST 

9 7- 

'1  144 

sfpmnret 

TEM4 

RETURN  FCR  SFPMIN 

0244 

0145 

0145 

TEM5 

ERASE 

EXEC  TEMiP 

0245 

ref 

1 

0 14  5 

NCUNADD 

TEM5 

TEMP  STCPAGE  FCR  NCUN  ACCRESS 

0246 

Jl46 

•T  146 

NNACT  EM 

ERASE 

TEMP  FOR  NCLN  ADDRESS  TABLE  ENTRY 

0247 

(■  1 4 7 

C147 

NNTYFTEM 

ERASE 

TEMF  FCR  NCUN  TYPE  TABLE  ENTRV 

1243 

:■  150 

1 5P 

ICADITEM 

ERASE 

TEMF  FCP  INDIR  ACRESS  TABLE  ENTRY(MIXNN) 

AC249 

MUST  = IDA02TEM-1,  = IDAD3TEM-2. 

02  50 

C151 

C151 

I DA02  TEN 

ERASE 

TEMF  FCP  INDIR  ACRESS  TABLE  ENTR  Y ( M!  I XNN  ) 
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A 0251 

MLST  = ICA01TE»'-H,  = ICAD21EN-1. 

0252 

0152 

C152 

IDA031EP 

ERASE 

TFMF  FCR 

INEIR  ACRESS  TABLE  ENTRY(MIXNN) 

A0253 

MLST  = ICADlTEM+2,  = ICAD2TEM+1. 

025A 

0153 

0153 

RLTPXTEP 

ERASE 

TEMP  FOR 

SF  RCUT  TABLE  ENTPY(MIXNN  CNLY) 

R0255 

AX>>SR 

STORAGE. 

(60 

)257 

REF 

3 

LAST 

97 

' 14? 

CFXCEX 

EQUALS 

TEN2 

8(  l|T^/p 

0258 

RFF 

2 

LAST 

97 

; 14  2 

DEXl 

eclals 

TFN>3 

Ell  )TMF 

1259 

pep 

7 

LAST 

97 

0144 

DEX2 

EQUALS 

TER4 

E(  DTMP 

026C 

REF 

2 

LAST 

97 

1145 

PTNSAYEP 

EQUALS 

T EF5 

E ( 1 )TMP 

0 261 

REF 

1 

0157 

TFPMITPF 

EQUAL  £ 

M FAC 

+ 3 

ei2)TNF 

0262 

RFF 

1 

>143 

CFX  I 

= 

DEXl 

R0263 

THE  FOLLClMlNG 

10  REGISTERS  ARE 

LSEC  FCP 

TEPFCPARY  STCPAGE  CF 

TEE  DERIVATIVE  COEFFICIENT  TABLE  CF 

R0265 

RUERnUTlNE  ROnTPSRS. 

THEY  mlST 

R FMA  IN 

W ITHOLT 

INiTERFFRENCF 

U TH 

I IS 

SLPRCLTINE 

S FFICF  ARE  FCNRSERS  (FCLY), 

R0267 

rvF  S 

LB, 

D^'P^  SUB  , 

SHCRT^F,  rrv/erev,  AES 

, ANC  USFFCACR. 

■1268 

REF 

2 

LAST 

98 

0 142 

OERCCF-6 

NFAC 

-12 

PCCTPSRS 

CEP  CCF  N-4  FI  CREEP 

0269 

RFF 

3 

LAST 

98 

0143 

DERCGF-7 

= 

MPAC 

-11 

RCCTPSPS 

OER  CCF  N-4  LC  CPOEP 

0270 

RFF 

4 

LAST 

96 

0144 

CERCCF-6 

= 

l«  FAC 

- 10 

RCCTPSRS 

DEP  COF  N-3  FI  CRCER 

)27l 

RFF 

5 

L AST 

98 

0145 

CFRCQF-5 

= 

I'PAC 

-7 

PCCTPSRS 

CER  CCF  N-3  LC  CRCFR 

0272 

RFF 

6 

EAST 

98 

0146 

CEPCCF-4 

- 

11PAC 

-6 

ROOTP  SRS 

DER  COF  N-2  HI  CPDER 

0 27  3 

PEF 

7 

1 AST 

98 

0147 

OEPCCF-3 

= 

PFAC 

-5 

PCCTPSRS 

CER  CCF  N-2  LG  ORDER 

0274 

RFF 

8 

LAST 

98 

1150 

OERrrF-2 

- 

N'FAC 

-4 

ROCTPSRS 

OER  CCF  N-1  HI  CREEP 

0275 

RFF 

9 

LAST 

96 

C15  1 

CFRCCF-1 

= 

MFAC 

_ o 

ROOTP  SRS 

DER  CCF  N-1  LC  CPDFR 

1276 

REF 

1^ 

LAST 

98 

0 152 

ofrccfn 

MPAC 

-2 

PCCTPSRS 

CEP  CCF  N FI  CREEP 

0277 

PEF 

11 

LAST 

98 

0153 

CEPCCF+1 

MPAC 

- 1 

ROCTPSRS 

DEP  CCF  N LC  CPEFR 

'^278 

RFF 

e 

LAST 

96 

0 117 

FkPFTF 

_ 

P r I.  I S F 

PCCTPSRS 

PCWER  TABLE  PC1NT6R 

0279 

RFF 

14 

LAST 

96 

■124 

nxCR  IT 

= 

VBUF 

+ 2 

RCCTPSPS 

CRITERICN  FOR  ENCING  ITEPS  FI 

02fiC 

RFF 

15 

LAST 

98 

f’12  5 

CXCR  1T+  1 

= 

VEUF 

+ 2 

ROCTPSRS 

CRITERION  FOR  ENCING  ITERS  LC 

0 281 

PEF 

16 

LAST 

98 

0 126 

RFCTP  S 

= 

VEUF 

+ 4 

FCCTPSPS 

ROOT  FI  ORDER 

02  82 

RFp 

17 

LAST 

96 

>127 

' 

ROOTPS-H 

= 

VBLF 

+ 5 

RCCTPSRS 

RCCT  LC  CROEP 

0283 

RFF 

4 

LAST 

97 

1132 

RETRCCT 

= 

PUF 

-^2 

ROOTPSPS 

RETURN  ADDRESS  CF  USER 

0284 

RFF 

C 

LAST 

97 

0 140 

PWRCNT 

= 

MATING 

PCCTPSRS 

CEP  table  1 CCF  CCUNTEP 

0265 

REF 

3 

LAST 

97 

>14] 

CERPTR 

= 

TEMl 

PCCTPSRS 

DER  table  FCINTER 

A0?,P6 
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P02f  7 

OYNAPIC All Y 

A L 1 C C A T E r 

CCFE  SETS  FOR  JOES 

( £4D  ) 

■)299 

■0154 

C162 

PFAC 

ERASE  +6 

RLLTI-PUPPCSE  ACCURULATCR. 

9290 

0163 

0163 

MCOE 

ERASE 

+ 1 FOP  TF,  •^0  FCR  DP,  GR  -1  FCP  VECTCR. 

029  1 

0164 

0164 

LCC 

FRAS  E 

LOGATION  ASSOCIATED  WITH  JOB. 

•1292 

0165 

0165 

BANKSET 

ERASE 

USUALLY  CCNTAINS  EBANK  SETTING. 

0299 

0 166 

0166 

PUSHLCC 

ERASE 

WCRD  CF  FACKEC  INTERPRETIVE  FARARETEPS. 

0294 

0167 

C167 

PRICPITY 

ERASE 

FPICRITY  OF  PRESENT  JOB  AND  WORK  AREA. 

0295 

1 17r 

’3  13 

ERASE  +83D 

EIGHT  SETS  CF  12  REGISTERS  EACH 

A0296 

P0297 

TNCORP 

STORAGE:  R22 

(K29)  (SHARES  WITH  FGLLCWIAG  SECTICN) 

(4C  ) 

0299 

REF 

1 

-0314 

R22DISP 

EQUALS  TIME2SAV 

1(4)  N49  DISPLAY  CF  DELIA  R ANC  DELTA  V 

AO  300 

R03  )1 

STANE  EY 

VFRE  ERASAELFS.  pedogtr  effore 

TFFTACS  . 

( 14C) 

0303 

0314 

0315 

T IHE2SAV 

ERASE  +1 

J30A 

0316 

0317 

SCALSA\/E 

ERASE  +1 

0305 

0320 

0 3 20 

RFOnCTR 

ERASE 

CCNTAINS  NLRBER  CF  RESTARTS 

0306 

0321 

•13  2 3 

THETA  C 

ERASE  +2 

0 30  7 

REF 

1 

032  1 

CFHI 

= thetac 

C CESIREC  GIRBAL  ANGLES 

0308 

REF 

2 

LAST  99 

'■’322 

CTFETA 

= thetad  +1 

I FCR 

0309 

R9F 

•2 

LAST  99 

0323 

CFSI 

= TFFTAC  *2 

R RANEUVER. 

)310 

0324 

C331 

HFLV 

ERASE  +5 

031  1 

RFF 

1 

0324 

CFLVX 

= OELV 

0312 

REF 

2 

LAST  99 

0326 

DELVV 

= DFLV  +2 

0313 

REF 

3 

LAST  99 

0 330 

OELVZ 

= OELV 

A0314 

00315 

WAITLIST  REPEAT  FLAG 

( 1C  ) 

031  7 

0 33  2 

03  3 2 

RUPTAGN 

ERASE 

0318 

REF 

1 

03  32 

KFYTFNF2 

= plptagn 

TERF  FCR  KEYRLPT,  UPRLPT 

A0319 

RG320 

DCWNLINK  STCFAGE. 

( 27C) 

1322 

REF 

1 

r 3 3 3 

DMST  ADR 

equals  dalstgce 

1323 

'333 

1333 

ONLSTCCD 

''PASE 

B(1)PRR  COWNLIINK  LIST  CCCE 

0324 

C334 

0365 

LCATALST 

ERASE  +25C 

(260 

0325 

REF 

1 

0335 

DMEGCTC 

EGLALS  LCATALST  *\ 

B ( 1 ) 

0326 

REF 

1 

0336 

TMINEEX 

EQUALS  CN'TMGCTO  +1 

B(  1 ) 

0 32  7 

REF 

1 

0336 

CUPFLCC 

EQUALS  TminicFX 

CCNTAINS  ECACR  OF  AGC  CP  WORD  BEING  DLRP 

A0328 

* 

ED  ANC  CCUNT  CF  CCRFLETE  CURFS  ALREADY  S 

AC329 

■=NT. 

0330 

REF 

2 

LAST  99 

0337 

DNO 

EGLALS  T^IKCEX  +1 

P ( 1) 

> 
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EO  : 

0331 

REF  1 

0340 

CKTPEUfF  ECU4LS  CNC 

+ 1 

B(22)PRN'  OCWNLINK  SNAF'HCI 

ELFFER 

R033? 

0334 

UNSWITCHFC  FCR  DISPLAY 
0366 

INTERFACE  ROLIINES. 
1366  RESTREG  ERASE 

( IOC  ) FIVE  MORE  IN  EBAAK  2 
BIDPRN  FCR  DISPLAY  RESTARTS 

0335 

0367 

C367 

NVWCRC 

ERAS  E 

0336 

0370 

C37U 

WARKNV 

ERASE 

03^7 

0371 

0371 

NVSAV  E 

ERASE 

P.033  a 

(RETAIN  THF  CFDFR  CF 

CACRFLSF  TC 

PA  ILREG 

+ 2 FCR 

DOIftALIAK  PUPPCSES) 

0340 

0272 

0 372 

CACRFLSF 

ERA  SF 

0341 

037  3 

■J3  73 

CACRRARK 

ERASE 

0342 

0374 

0374 

TFNPF  L SH 

ERASE 

0343 

0 3 7 *5 

0377 

FAILREG 

ERASE 

+2  B(3)PRN  3 alarm  CCDE  REGISTERS 

P0344 

VAC  AREAS.  -BF  CARFFLL 

CF  FLACEYFNT- 

( 2 20D  ) 

J346 

04  10 

0400 

VAC  USE 

ERASE 

C347 

■14  11 

0452 

VACl 

ERASE 

+ 42D 

0 34  8 

0454 

0454 

VAC2USE 

ERASE 

034  9 

,-455 

0527 

VAC2 

ERA  SE 

+ 42D 

0350 

C53C 

0530 

VAC3USE 

FRASE 

0 351 

■‘■5  31 

0603 

VAC3 

ERASE 

+ 42D 

0352 

06  04 

0604 

VAC4USE 

ERASE 

0353 

• ' 0605 

0657 

VAC4 

ERASE 

+ 42C 

0354 

0660 

0660 

VAC5LSE 

ERASE 

0355 

•,i661 

0733 

VAC5 

ERASE 

+ 420 

P0356 

STARALIGN 

ERASABLES. 

(130 

0358 

0 73  4 

0734 

STARCOOE 

ERASE 

( 1) 

0359 

PFF 

1 

0734 

ACTCCCE 

= 

STARCCCE 

0360 

C735 

0 7 50 

staralgn 

ERASE 

+ 11  D 

0361 

PEF 

1 

0735 

STNCCU 

- 

STARALGN 

0362 

REF 

2 

LAST 

IOC 

C74  3 

CCSCCL 

= 

STARALGN 

+ 6 

0363 

REF 

1 

'■74  1 

S INCPLX 

SINCDL 

+ 4 

1)364 

RFF 

2 

LAST 

100 

0 7 35 

SINCCLY 

= 

S INCCU 

• 365 

REF 

3 

LAST 

100 

■ C737 

sincclz 

= 

SINCDL 

+ 2 

- 0366 

REF 

1 

0747 

COSCDUX 

- 

COSCDL 

+ 4 

0367 

RFF 

2 

LAST 

IOC 

C743 

CCSCCUY 

= 

CCSCCL 

0368 

RFF 

3 

LAST 

J or 

C74  5 

CCSCOLZ 

CCSCCL 

+ 2 

R0369 

PhASF 

TAELF  AND  RESTART 

CCUNT  ERS  . 

(120) 

'^371 

C751 

0 7 5 1 

-PHASEl 

ERASE 

0372 

0752 

C752 

PFASF  1 

ERASE 

C373 

C753 

0753 

-PFASE2 

ERASE 
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USER' S RAGE  NO.  18 

EO  SA 

C61  S 

1320 

132') 

2IXB 

ERASE 

E(  n 

P3620 

AGS  DUPPY  ID  WORD. 

(lO 

D62? 

1321 

132  1 

AGSWOPC 

ERASE 

RDA23 

SOPF  PI  SCFLL.ANFCLS 

LNSWI  TCHEC. 

(60 

J62  5 
0626 
0627 

1322 

1323 
1326 

1322 

1325 

1326 

RATEINDK 
CELAYLOC 
L'^PP  A S S 

ERASE 

ERASE 

ERASE 

{ 1) 

<■2 

KEEP 

LSED  EY  KALCPAAL 
CONTIGUOUS  W.  CSPPASS 

{ 1 )E  ACh 

062  8 
R062S 

1327 

LESS  IS  MORE. 

1327 

CSMMASS 

ERA  SE 

RFNCFZVOUS  AND  LANDING  RAC/SP  DOWNLINK  STCRAGE.  (70 


RD632 (NCRNALLY  USPr  CURING  F20,.  BUT  MAY  ALSO) 

RD633  ( ’’F  PECLlRcD  FOR  THE  V62  SPLPICLS  TFST.) 

R063<i  (PLEASE  KEEP  IN  THIS  CROFR) 


3635 

1330  1336 

DNRRANGE 

ERASE 

+ 6 

B(l)  TMP 

0636 

REF 

1 

133  1 

DNRRCCT 

ECUAL  S 

onppange 

+ 1 

B(  1 )T  PR 

0637 

pnp 

1 

1332 

CN  INDEX 

EQUALS 

CNRRDCT 

+ 1 

B(  IITPP 

0638 

REF 

1 

1333 

CM.RVELX 

EGLALS 

CN  INDEX 

+ 1 

8 ( 1 )TPP 

063  8 

PFF 

1 

1334 

CNLR\iELV 

eqlal  S 

DA  LRVELX 

+ 1 

E ( 1 )T  NR 

0640 

RRF 

1 

1335 

DNLRVBL  Z 

EQUALS 

DNLRVELY 

+ 1 

B ( 1 )TPP 

')641 

REE 

1 

1336 

n N L R A L T 

EGLALS 

CALPVEL  2 

+ 1 

Ed)  TPF 

R 0642 

INCCRPCRATICN  UMSWITCFED. 

(2D) 

0644 

REF 

1 

1256 

W.INC 

E GOALS 

FIRAGE 

B(  1 1 

■' ) 6 4 5 

REF 

1 

1257 

U • I N C 1 

EGLALS 

W.INC 

+ 1 

1(1) 

RQ646 

SL8PnUTTNE  BALLANGS  CE 

R6'i  , 

( ID  ) 

0648 

1337 

133  7 

BALLEX  IT 

ERASE 

E ( 1 )S  AVE 

LCCATIGN  FOR  BALLINGS  SUBR  EXIT 

R 0649 

SCPE  LEP  CAP  STORAGE. 

(40 

0651 

1 340 

1340 

DAPDATFI 

ERASE 

B(  1 )CSP 

DAF  CONFIG. 

0652 

134  1 

1342 

TF VENT 

ERASE 

+ 1 E ( 2 ) C S F 

0 6 53 
AQ654 

1343 

1343 

DB 

EP  ASE 

B(  1)  TPP 

dead  panc. 

R36SS 


NDUN  87 


(20 
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0657  179A  13A5  A7  ERASE  +1C  Ed)  AZ  ANC  EL  MLST  BE  CCN1IGUCUS 

•1658  R'-F  1 1345  EL  FQLALS  AZ  ^ ID  B(l) 

A0659 

R066O  063,  P64,  P65,  P66,  AND  P67.  (1C) 

066? 1346 1346  wr|-P^ASE  ERASE B(  1) 

AC66  3 

R0664 FACLOADS  FQR  R?  LUNAR  POTENTIAL  NOOEI. (20 


0666  1347  1347  E3J22R2N  ERASE  1(1) 

0667  135C  135C  F32C31PN  ERASE 1(1) 

A 066  8 

R0669 PACLOACS  FOR  R12  CCPFLER  CC^FENSATICN (30 


■)671  135  1 1352  PADSKAL  ERASE  +1  IR  ALT  CCPFLER  BIAS  : 2T/LAMBCA  SCALED 

A0672 AT  l/(2(7)  v/CS) 

067?,  1353  1 353  SKAlSKAL  ERASE  LR  ALT  SCALE  FACTOR  RATIO  : .2  NCR 

A0674 . 


RC675  ERASABIES  FCR  TRUNMCN  ANC  SHAFT  CCRRANCS 


( 20 


0677 

0678 
A0679 

1354 

1355 

1354 

1355 

TPLNNCMC 

SFAFTC.mD 

ERASE 

ERASE 

THESE  TUn  ERASAPLES  *** 
MLST  BF  IN  CRDER 

P06792 

ERASABLE  FOR  REGISTER  3 

CF  NCLN 

49 

(lO 

C6796 

1356 

1356 

WFCFREAC 

ERASE 

B(  1 )TNF  NEASLREMENT  BEING 

PRCCESSED. 

A0679E 

0680 

1377 

END-LE 

EGLAL  S 

1377 

RC6R1 

S'^LF-CHECK  ASSIGNMENTS. 

(170 

R.)603 

(DC  NCT 

MOVE  , S-C 

IS  ACCRESS  SENSITIVE) 

0684 

1357 

1377 

SEE  FERAS 

ERASE 

1357  - 1377 

NLST  NCT  BE  NCVEC  =»** 

0685 

R'=F 

1 

135  7 

SFAIL 

equals 

S ELFEPAS 

0(  1) 

0686 

REF 

1 

1360 

ERESTCRE 

ECLAL  S 

SFAIL 

+ 1 

B ( 1 ) 

0687 

pep 

1 

1361 

S EL  fret 

EQUALS 

FRESTORE 

+ 1 

6(1)  RETLRN 

0688 

REF 

1 

136  2 

SNCDE 

ECLALS 

SEl  FRET 

41 

fid) 

0689 

REF 

1 

1363 

ALMCADR 

equals 

SNCDE 

4 1 

6(2)  ALARM-AECPT  LS>=F'S 

2CACR 

C69C 

REF 

1 

136  5 

ERCOUNT 

EQUALS 

ALNCADR 

4 2 

R ( 1 ) 

0691 

RFF 

1 

1366 

SCPLNT 

ECLAL  S 

EFCCLNT 

41 

E (3  ) 

069? 

REF 

1 

1371 

SKEPPl 

EQUALS 

SCOUNT 

+ 3 

6(1) 

0693 

RFF 

1 

13  72 

SKEEF2 

ecuals 

SKFEPl 

4l 

B(  1 ) 

0694 

REF 

1 

1373 

SKE'^F3 

FQLALS 

SKEFP2 

41 

e ( 1 ) 

G^P: 

ASSFr'^LP  REVISION  116  CF 

AGC  PROGRAM 

LLMINARV  67 
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LLMFRASE  .128 
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L 

ERASABLE  ASSIGNMENTS 

LSER'S  PAGE 

NC.  20 

eO  S6 

H695 

FEF  1 

1376 

SKFEP6 

FCUALS 

SKFEF3 

+ 1 

6(1) 

0696 

REF  1 

1 375 

SKEF  F 5 

FCLALS 

SKFEF6 

+ 1 

E ( 1 ) 

0697 

REF  1 

1376 

SKEEP6 

EQUALS 

SKEEP5 

+ 1 

B(  1) 

0698 

REF  1 

1377 

SKEFF7 

ECLAL  S 

SKEEP6 

+ 1 

6(1) 
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P06°9  Eea,NK-3  ASSIGNMENTS 


C7Cf 

E3 ,1400 

SETLCC 

1400 

R0701 

V.AITLTST  TASK  IT  STS. 

(2an 

0703 

070A 

F3,  ia:jo 
E3,1A10 

E3,  1407 
E3,1431 

LSTl 

LST2 

ERASE 

EPaSE 

+ 7 

+ 170 

e ( ec) PRM 
B(  leC  )PRM 

CELTA  T S. 

TASK  EOADR  ACCRESSES. 

PO705 

RESTART  STHPAGE. 

(20  ) 

0707 

P3,1432  E3,1433 

RSFEQ  ERASE 

+ 1 

E(  2)  PF»^ 

SAVE  EE  ANC  C FOR  RESTARTS. 

po7''e 

MORE  LGNGCALL  STORAGE.  ( ^LST  BE 

IN  LSTl  S bank. 

(20  ) 

07lf> 

03,1434  E3,1435 

LGNGEXIT  ERASE 

+ 1 

E(2)TMP 

MAV  BE  SELDOM  CVEFLAYEC. 

P0711 

phase-change  lists 

FART  II. 

( 120  ) 

071  3 

P3  , 1436 

EI“,  1436 

PHSNAM=  1 

ERASE 

E ( 1 ) PRM 

0714 

E3 ,1437 

E3,  1437 

PHSEEl 

ERASE 

B ( 1)  PRM 

071  5 

E3.1440 

=3,1440 

PFSNAME2 

ERASE 

F(1)PFM 

0716 

F3,  1441 

E3,  1441 

PHSB32 

ERASE 

B(  11 PRM 

0717 

E3,1442 

F3 , 1442 

FFSNAME3 

ERASE 

E(1)PRM 

071B 

E3,  1443 

E3,  1443 

PHSRB3 

ERASE 

E ( 1 ) PRM 

0719 

E3 , 1444 

F3  , 1444 

PHSNAME4 

ERASE 

E(  n PRM 

0720 

E3 ,1445 

E 3,  144  5 

PHS  EE4 

ERASE 

B(  1 IPRM 

0 721 

F3  , 1446 

= 3,  1446 

PH SN AMES 

ERASE 

E ( 1 1 PRM 

0722 

E3  ,1447 

E3,  1447 

PFS  EE5 

ERASE 

B(  1 ) PRM 

0723 

E3,  1450 

E3,  1450 

PFSN!A»'E6 

ERASE 

B ( 1 1 PRY 

0724 

E3,  1451 

E3,  1451 

PFSBE6 

ERASE 

B ( 1 1 P R M 

R0J2  5 

IMU  CCMPENSATIEN  PARAPETFFS. 

( 22D  ) 

0 7 27 

F3,  1452 

=3,1452 

FBI  ASX 

EF  ASE 

E(l)  PTPA  BIAS,  PIPA  SCALE  FACTR  TERMS 

0728 

PEE 

1 ^ R3,1452 

P IPAE  IAS 

= 

PS  lASX 

I NTFRMI  XFC. 

0729 

E3 ,1453 

E3,  1453 

PIPasCFx 

ERASE 

0730 

REF 

1 R3,  1453 

p ipaScf 

= 

PIPASCFX 

073  1 

F3 , 1454 

E3 ,1454 

p E lASY 

ERASE 

0732 

F3,  1455 

E3 , 1455 

PI  PA  SCFY 

ERASE 

0733 

E3 ,1456 

F3,  1456 

PPIASZ 

ERASE 

0734 

=3,1457 

F3 ,1457 

PI PASCFZ 

EFAS  E 

0735 

F 3, 1460 

E3,  1460 

N'BDX 

ERA  SE 

GYRC  BIAS  CRIFTS 

0736 

F3, 1461 

E3,  1461 

N EFY 

ERASE 

0737 

E3, 1462 

E3  , 1462 

NBCZ 

ERASE 
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ER4S/>BLE  ASSIGNMENTS 


USEE'S  PAGE  NO.  Z2 


EO  SA 


073P 

"739 

0740 

= 3 , 1463 
F3, 1464 
E 3 , 1 4 6 5 

E3, 1463 
E3 ,1464 
E3,  1465 

ACI  AX 
ACIA  Y 
ACIAZ 

ERASE 
ERASE 
FRA  SE 

accelepaticn  sensitive 

INPUT  AXIS 

CP  IFT 

ALCNG 

THE 

C741 

S3 , 1 466 

^3 , 1466 

A ESRAX 

ERASE 

acceleraticn  sensitive 

CP  I FT 

A LCNG 

THE 

0742 

■^3,  1467 

E3 , 1467 

ADSRAY 

E^ASE 

SPIN  REFERENCE  AXIS 

0743 

E3, 1470 

E3,  1470 

AESRA  Z 

ERASE 

0744 

E3 , 1471 

E3 , 1476 

GCCMF 

ERASE 

+ 5 

CONTAINS  CCMPENSATING 

TORQUE 

5 

0745 

REF 

1 

F3,  1471 

COMMAND 

EQUALS 

GCCMF 

0 74  6 

REE 

2 

LAST  111 

E3  , 1474 

C ELI  INC 

EQUALS 

GCG^^P 

+ 3 

0747 

= 3 , 1 4 7 7 

E3,  1477 

GCCMPSR 

ERASE 

A0748 

R0  74  9 

STATF  VECTORS  FCR  CRBIT  I NTEGR AT ICN, 

( 440  ) 

R0  751 

(DIFECCNT  THRU  XKEP  ^'LST 

BE  IN  SAME 

P0752 

E E A N K 

AS  RPECTCSM,  RRFCTLEM  ETC 

P0753 

BECAUSE  THE  CCFV-CVCLFS  (ATCFCSM, 

P0  754 

PTQACSM  ETC)  ARE  EXECLTED  IN  BASIC. 

R0755 

ALL 

OTHER  P EFEPENCES 

. TC  THIS 

GRCUD 

R0755 

ARE  BV  INTERPRETIVE  I NS TPU CT I CN S . ) 

0757 

F3 ,1500 

E3  , 1553 

DIFECCNT 

ERASE 

+ 430 

B(  1 ) 

P0758 

(LPSVFLAG...XKEF 

MUST  EE 

KEPT  IN 

GREER  ) 

J759 

REF 

1 

E3,  1501 

UPSVFLAG 

EQUALS 

OIFEGCNT 

+ 1 

B(  1 ) 

0760 

RTF 

1 

E3 , 1502 

RPECT 

EQUALS 

UPSVFl AG 

+ 1 

B(  6) 

0761 

REF 

I 

F3,  151" 

VPECT 

EQUALS 

RPECT 

+ 6 

B (6  ) 

0762 

RFF 

1 

E3,  15  16 

TFT 

EQUALS 

VRECT 

+ 6 

B(  2) 

0763 

RFF 

1 

E3 ,1520 

TEELTAV 

EQUALS 

T ET 

+ 2 

R(6) 

0764 

REF 

1 

F3,  1526 

TN  UV 

equals 

TCELTAV 

+ 6 

BI6) 

0765 

RFF 

1 

E3, 1534 

R CV 

EQUALS 

TNLV 

+ 6 

B(  6) 

0766 

REF 

1 

F3 , 1542 

vrv 

EQUALS 

PCV 

+ 6 

B (6  ) 

0767 

REF 

1 

E3,  15  50 

TC 

EQUAL  S 

VC  V 

+ 6 

6(2) 

C768 

»EF 

1 

F3  , 155  2 

XKEP 

EQUALS 

TC 

+ 2 

B(  2) 

R0769 

PERMANENT 

STATE  VECTCRS  ANO  TIMES. 

(q9C  ) 

R0771 

(CC  NCT  CVERLAY  WITH 

ANYTH  ING 

AFTER  BOOST) 

P0772 

(RPECTr  EN 

...XKEPCSM 

MUST  EE  KEPT  IN  THIS  CPCEF  ) 

0773 

E3,  1554 

<^3,  156  1 

RPECTCSM 

ERASE 

+ S 

e (6) PPM  GSM  VAR  I ABL  FS  . 

C774 

RPP 

1 

E3 ,1554 

RPECTCTH 

= 

RPECTPSM 

0775 

E3,  1 562 

E3  , 1567 

VRFCTCSM 

ERASE 

+ 5 

B (6  )PPM 
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L EPASAPLE  ASSIGNMENTS 


USEP'S  PAGE  NO.  23  EG  S^ 


C776 

F3, 1570 

E3 ,1571 

TETCSV 

ERASE 

+ 1 

B1  21PPM 

0777 

Rpr 

1 

F3,  157F 

TETOTEF.P 

= 

TETCSR 

0778 

F3, 1572 

F3. 1577 

^ELTACS^' 

ERASE 

+ 5 

B(  6 ) PR'" 

0779 

F3,! 6CC 

F3 ,1605 

NlJVCSN 

FPAS  E 

+ 5 

e ( 6 IPR'" 

0780 

E3,  1606 

E3,  16  13 

RC  VC  S'" 

FRA  SE- 

+ 5 

B (6  ) FRN 

0781 

F3 ,1614 

E3 , 162  1 

VCVCSM 

ERASE 

+ 5 

B( 6 ) PRN 

0782 

E3  , 1622 

F3  , 1623 

Tecs'" 

ERASE 

+ 1 

P( 2 1 PRY 

0783 

E3,  1629 

F3,  1625 

XKFPCSM 

FRA  SF 

+ 1 

B (2) FRY 

R07PA 

(RREfTLEN  ...XKEFLEW 

MOST  EE 

KEPT  IN  T ns  PRCER  ) 

078  5 

F3,  1626 

E3,1633 

PPECTLEP 

FPASE 

+ 5 

E(6)PPR  LEM  VARIABLES 

0786 

pr  p 

1 

E3 , 1626 

RR'^CTEIS 

= 

RRECTLEM 

07P7 

E3 , 1639 

E3  , 1691 

VPFCTIEN 

ERASE 

+ 5 

B ( 6 )PRM 

0788 

''3,  1692 

F3,  1693 

TETLEM 

ERASE 

+ 1 

B(2) PRN 

076P 

REF 

1 

E3 ,164? 

TETTF  IS 

= 

TETIF" 

0790 

E3 , 1699 

P3,1651 

DPLTALEI" 

ERASE 

+ 5 

E ( 6 ) PPM 

0791 

E3,  1652 

F3,  1657 

NLVLEM 

ERA  SE 

+ 5 

e (6) PPN 

079? 

P3, 1660 

E3 ,1665 

RCVL  EN 

ERASE 

+ 5 

B ( 6 )PRV 

0793 

F2,1666 

93,1673 

VC  VL'='" 

ERASE 

+ 5 

E 16  ) PPI" 

0794 

F3,  1679 

E3,  1675 

TCLEM 

ERASE 

+ 1 

8(2) PPV 

0795 

F3, 1676 

F3  , 1677 

XKEPLFI" 

ERASE 

+ 1 

P ( 2 )PR^' 

0796 

F3,  1700 

'=3,  1705 

X789 

ERASE 

+ 5 

'’797 

F3 , 1706 

F3,  1710 

TFPEEV 

FRASE 

+ 2 

0798 

F 3 , 1 7 1 1 

E3.1712 

AZe 

ERASE 

+ 1 

0799 

E3, 1713 

E3,  1719 

-AYO 

ERASE 

+ 1 

C80C 
A08  ) 1 

E3  , 1 71  5 

F3 , 1 716 

AXO 

FPASE 

t 1 

RC802 

state  VECTCPS  FCP  CCUNLINK. 

( 12D) 

0 809 
0805 

F3,1717  F3,1729 

<=3,  1725  '=3,1732 

R-CTHEF 

V-OTHFR 

FPAS  F 
FPASE 

+ 5 
+ 5 

B( 6)PRM  PQS 
B(6)PPN  VEL 

VECT 

VECT 

( other 

(OTHER 

VECH) 

VECM 

FCP.  DNLINK 
FOR  CNLINK 

0FC6 

RFF 

2 LAST  112  F.3,1570 

T-OTP  ER 

TETCSM 

TIME 

(OTHER 

VECH) 

FOR  CNLINK 

R08  07 

refswmat. 

(180 

08C9 

E3,1733  F3,1759 

R FFSMVAT 

ERASE 

+ 170 

I ( 18D) PRN 

P081C 

ACTIVE  VEHICLE  CENTANG.  NLST 

BE  CISPLAVEC  ANYTIME  (ALMOST.) 

(2C  ) 

0812 

ACei3 

E3, 1755  53,  17  56 

ACTC<=NT 

FRA  SE 

+ 1 

1(2)  S-S  CENTRAL 
VEHICLE  AT  TPI 

ANCLE 
TIG  ANC 

BETWEEN 

TARGET 

ACT  IVE 
VECTCR. 

R0819 

USED  IN  CCNICSFX  (PLAN  INFR7 

CPIFM  ) 
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C815 

A0816 

REF  1 

'^3 , 1 706 

T IRSUBC 

ECU  ALS 

T EPHEM 

CS  EC 

8-42  (TRIPLE  PREG.ISICM 

R0817 

LPS 20.1  STCRAGL 

all  are  PRM 

( on ) 

0819 

F 3 , 1 757 

E3  , 1757 

LS21X 

EP  AS  E 

1(1) 

08  20 

E 3, 1760 

E3,  1765 

LCSVPL 

ERASE 

+ 5 

1(6) 

CE21 

A0R2? 

•^3,1766 

E3  , 1767 

ML  CSV 

ERASE 

+ 1 

1(2) 

RAGMTLCE  CF  LCS,  meters  E-29 

R0823 

P22  (CVERLAYS  LPS  2C. 

1 STORAGE) 

(60 

082  8 

REF  1 

E3,  1760 

VSUBC 

EQUALS 

LOSVEL 

I ( 6)  S 

-S  CSM  VELOCITY  VECTCR 

A0826 

R0827 

FACICACEE  EEASAELFE 

FOR  P20/P22 

( 6C  ) 

0829 

E3 ,1770 

E3  ,1771 

RANGEVAR 

ERASE 

+ 1 

1(2) 

RR  RANGE  Error  VARIANCE 

0 8 3n 

E3,  1772 

E3  , 1773 

RATE  VAR 

ERASE 

+ 1 

1(2) 

FP  RANGE-RATE  ERRCR  VARIANCE 

08  31 

E3 ,1774 

F3, 177A 

RVARM  IM 

ERASE 

1(1) 

MMMLN  RANGE  ERRCR  VARIANCE 

A Q Q p 

A0833 

E3,1775 

F3 ,1775 

WARM  IN 

ERASE 

n 1 ) 

MMMUR  RANGF-PATE  FRROR  VARIANCE 

RCE3A 

F32-P33  STCRAGE 

( 20 

0836 

A0837 

P3,1776 

E3  , 1 777 

TCDH 

ERASE 

<■1 

1(2) 

T2  CO-  time  in  CS.  (ALSC  DCWNLINKEC 

oa?8 


E3,1777 


ENC-E3 


ECUALS  1777 


LAST  LGCATICN  LSED  U E3 
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L 

CPASAELE  ASSIGNPi^NTS 

LSEP*  S PAGE  NC.  25  EO  S4 

PC839 

E BANK -4  ASSIGN^'EMS 

OS'^O 

E4, 140C 

SFTLCC  2 CLIO 

RQ8'!|] 

F4  IS,  FOR  THF  PC^T  F*RT  RrSEPVFD  FCR 

FAC  LOACFC 

AMC  LNShAFABLF 

FRASE. 

C84  2 

F4, 140C 

APE YCPY 

FCLALS 

R0BA3 

F2'>  STCRAGE.  -FAC  LGACEC- 

(60 

nS'tB 

OB46 

ceA7 

F4,1400  E4,1400 

E4,1401  54, 1401 

E4,l4f>2  F4,1402 

HRENCFCS 

ViRFNCVEl 

WSFAFT 

ERASF 

FCASE 

ERASE 

R(  1 )PL 
e ( 1 ) F 1 
B(  DPL 

KN*2 (-7) 
KN(-  1/2  )*2(  11  ) 
KN*2 (-7  ) 

0848 
08'+P 
0 85  0 

E4,1403  E4,14C3 

!^4,14v)4  F4,1404 

F4.1405  54,1405 

WT  RUN 

RNAX 

VPAX 

FRASF 

ERASF 

PRASE 

B(  DPL 
B ( 1) FL 
B(  DPL 

KRX<2(-7) 
METEFSX2 (- 19 ) 
N/CScC*2(-7) 

R0851 

LUNAR  SURFACE  NAVIGA7ICN 

(2C  ) 

0853 

085^ 

E4,140  6 F 4, 140  6 
E4,1407  E4,1407 

WSURFPGS 

NSURFVEL 

PRASE 

ERASE 

B(  1 1 PL 
B(  DPL 

A0855 

P085O 

F22  STORAGE.  -FAC  LCACEC- 

( 2C  ) 

08‘=;8 
0 85  9 

E4,i410  F4,1410 

F4,  1411  54,  1411 

SFAFTVAP 
TPUN VAR 

ERASE 

ERASE 

E (1  ) PL 
B(l) FL 

RAC  SG*2(  1 2 ) 
FAC  SC42(10) 

R C86f 

r.CMSEX  STFPAGF.-FAC  LCACEC- 

( 6C  ) 

0862 

AC86^ 

E4,1412  F4,1417 

5C4LP 

ERASE 

+ 5 

1 (6 INCCN 

L T ER  AT  ICN  VECTCP 

R 0 6 6 4 

V47(P47)  AGS  INIIiaLIZATICN 

STCPAG".  -FAC  LCACEC- 

(20 

0866 

F4, 1420  F4, 1421 

AGSK 

ERASE 

+ 1 

RCP67 

LUNAR  IANCING  STCRAGE.  -PAC 

LCACFC- 

( 6C  ) 

0869 

F4.1422  '=4,1427 

RLS 

ERASE 

+ 5 

1(6)  LANCING  SITE  VECTCP  -NCCN  PEF 

A0870 

P067  1 

INTEGRATICN  STCRAGE. 

( 1C2C  ) 

0873 

E4,14  3i  5 4,  15  75 

PBCDY 

ERASE 

+ KID 

1(1) 

GAP;  /iSSF^BLE  RFVISTPN  116  CF  AGC  PRCGSAN  LU^I.^/5Ry  2'^21I12-C7I 
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L 

FRASABL8 

ASSIGNHFMS 

LSFR'S  RAGE  NO.  26  EO  S4 

0874 

PEF 

1 

F4 ,1431 

ALPHA  V 

FCLAL  F 

FBCOY 

+ 1 

1(6) 

0875 

PFF 

1 

F4, 1437 

BETAV 

EOLALS 

ALPHAV 

+ 6 

1(6) 

0876 

REF 

1 

F4.1445 

PFIV 

FGUALS 

BET.AV 

+ 6 

1(6) 

0877 

RFF 

1 

E4,  1453 

PSI  V 

ECLALS 

PHI  V 

+ 6 

1(6) 

0878 

PEF 

1 

E4 , 1461 

FV 

EQUALS 

P S IV 

+ 6 

1(6)  FEPTUPEING  ACCELERATIONS 

0879 

RFF 

1 

F4 ,1467 

ALPHAN 

EQUALS 

FV 

+ 6 

1(2) 

0880 

R F F 

1 

E4, 1471 

BFTAA' 

FGLAL  5 

ALFHAW 

+ 2 

T (2  ) 

0881 

RFF 

1 

E4 ,1473 

T AU. 

EQUALS 

BETAM 

+ 2 

1(2) 

0882 

RFF 

1 

F4,  1475 

C7/2 

ECLALS 

TAL. 

+ 2 

1(2) 

0883 

RFF 

1 

F4,  1477 

H 

EQUALS 

OT/2 

+ 2 

1(2) 

0884 

REF 

1 

F4, 150  1 

GPGDE 

EQUALS 

H 

+ 2 

1(11 

0885 

REF 

1 

E4,  H 12 

I RETLRN 

ECLALS 

GNGDE 

+ 1 

1(1) 

0886 

ref 

1 

F4 , 150  3 

NGPMG  AM 

EQUALS 

IRETURN 

+ 1 

1(1) 

0 887 

RFF 

1 

E4 , 1 5M4 

PPOV 

FQUA  LS 

NGPMGAM 

+ 1 

0888 

PEF 

1 

^4,1512 

OPIGFX 

EQLALS 

RPCV 

+ 6 

1(1) 

0889 

REF 

1 

E4, 1512 

KEPRTN 

equals 

OR  IGEX 

1(1) 

0890 

PEF 

2 

LAST  HE 

F4  , 1 513 

RCVV 

ECLALS 

CP  IGEX 

+ 1 

1(6) 

0891 

REF 

1 

E4,  1521 

RPSV 

EQLALS 

RCVV 

+ 6 

1(6) 

C89? 

RFF 

1 

E4, 1527 

XKEPNEW 

ECUALS 

RFSV 

6 

1(2) 

0893 

R'^F 

1 

E4,  1531 

VECTAfi 

EQUALS 

XKEPNEVi 

+ 2 

I (36D  ) 

0894 

REF 

1 

F4, 1574 

VFCTAENC 

EQUALS 

VECTAB 

+ 3 ED 

END  MARK 

AC895 


R0896 

these 

PROBABLY  CAN  SHARP 

VIC-CGUPSE  VAPIARLES. 

(60 

ces8 

RFF 

2 

LAST 

115  E4,1537 

VACX 

EQUALS 

VECTAB 

+ 6 

1(2) 

C899 

REF 

1 

F4,  1541 

VACY 

ECLALS 

VACX 

+ 2 

1(2) 

0900 

RFF 

1 

F4,  1543 

VACZ 

EOLALS 

VAC  Y 

+ 2 

1(2) 

R0901 

SERVICER  STCRAGt  (LSEC 

BY  ALL  P'CWERED 

FLIGHT 

FRCGS  . ) 

( ISO  ) 

090  3 

RFF 

3 

LAST 

HE  E4,1545 

XNBPIF 

ECLALS 

VECTAB 

+ 12C 

1(6) 

0SC4 

RFF 

1 

‘=4 ,1553 

YN  EP  IP 

EQUALS 

XNBPIF 

+ 6 

1(61 

0905 

AC9P6 

REF 

1 

E4  , 156 1 

ZNPP  I F 

ECUALS 

YNBPIF 

+ 6 

1(6) 

R09C7 

SOME 

VERB  82  STCPAGE 

( 40 

0909 

PEF 

2 

LAST 

HE  F4 , 1 517 

HAPOX 

ECLALS 

P CVV 

+ 4 

1(2) 

0910 

A0911 

RFF 

1 

E4,  1521 

HPER  X 

EQUALS 

HAPOX 

+ 2 

T ( 2 ) 

R09  12 

V82  storage 

(60 

0914 
AOq  1 5 

REF 

4 

LAST 

115  E4,1567 

VCNE  • 

EQUALS 

VECTAB 

+ 3CD 

i(6)TNp  ncrnal  velocity  vcne  /sgpt.  ml 

PQ916 


R3KV83)  STTPAGP.  -SHARES  1 7 H INTEGRA7ICN  S7CRAC-E- 


(280 


G^P: 

flSSENBLF 
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L 

FPASAELf 

t S9  IG^^F  FTS 

LSER*  S PAGE  NO.  27  EC  S4 

C'518 

Anqiq 

RFF 

2 

last 

115 

F4, 1 50^, 

BASEThV 

EQUALS 

RFCV 

1(6) 

BASE  VEL  VECTCR  THIS  VEH 

C920 

REF 

3 

LAST 

115 

F4,IS13 

EASETIME 

FOLIA  LS 

RCVV 

1(2) 

TIME  ASSCC  ViITH  BASE  VECS 

oq2i 

R cF 

4 

LA  FT 

116 

84,151“^ 

ORTG 

ECLALS 

R QVV 

+ 2 

1(1) 

=0  FOR  EARTh  =2  FOR  MCCN 

0922 

PFF 

5 

LAST 

116 

F4, 1516 

STATFXIT 

EQUALS 

RCVV 

+ 3 

1(1) 

STQ  ADDRESS  FCR  STATEXTP 

0923 

40924 

RFF 

6 

LAST 

116 

F4 ,1517 

BASFFTV 

EQUALS 

RCVV 

+ A 

1(6) 

BASE  VEL  VECTCR  CTHER  VEH 

0925 

40926 

PFF 

5 

LAST 

115 

E4 ,1537 

BASEOTP 

EQUALS 

VECTAB 

+ 6 

1(6) 

BASF  PCS  VECTCF  CTPEF  VEF 

0927 

A0928 

PPF 

6 

t AST 

1 1 6 

F4,  1567 

3ASETHP 

EGLALS 

VFCTAB 

+ 3cn 

1(6) 

EASE  PCS  VECTCR  THIS  VEE 

R -)929 

KfrlFR  STHRAGF.  (KFPLER  is  called  bv  precisica 

INTEGRATTCN  ANE 

(2C  ) 

R 1031 

CCMCS  ) 

0932 
A09  3 3 

E4,1576 

F4,1577  EPSTLCNT 

ERASE 

+ 1 

1(2) 

R0934 

VFRB 

83  STCRAGF. 

( IFO) 

0936 

E4, 160C 

E4,1621  RANGE 

ERASE 

+ 17D 

I (2)CSP 

NCUN  54  nSTANCE  TO  OPTICAL  SLBj 

0937 

RFF 

1 

F4, 1602 

RRATE 

EQUALS 

RANGE 

+ 2 

I (2)DSF 

NCLN  54  RATE  CF  AFFPCACF. 

093? 

REF 

1 

F4,1604 

RTFFTA 

EQUALS 

PRATE 

+ 2 

I( 2 )OSP 

NOLN  54. 

0939 

RFF 

1 

F4 , 1 6 J6 

PCNE 

EGLALS 

rthet  a 

+ 2 

I(6)TNP 

VECTOR  STORAGE.  (SCRATCH) 

0940 

REF 

1 

E4, 1614 

VONF 

EQUALS 

RCNF 

+ 6 

I ( 6)TPP 

VECTCR  STCRAGE.  (SCPATCH) 

R0941 

VERB 

67  STCRAGE 

0 942 

REF 

2 

LAST 

1 1 6 

E4, 1600 

Wl^POS 

= 

RANGE 

NCLN  99 

(V67  ) 

0943 

.REF 

2 

LAST 

116 

F4 , 1602 

WWV  EL 

= 

RRATE 

NOUN  99 

(V67) 

0944 

PFF 

2 

LAST 

116 

F4,  1604 

W N B I A S 

= 

RTHFTA 

NCUN  99 

(V67  ) 

R 3945 

V8  2 : 

STCRAGF 

. IfANNCT 

overlay  ponf  or  VCNE  ) 

(IID)  TNC  SEPARATE  LCQATICNS 

0947 

REF 

7 

LAST 

116 

E4 , 1 537 

V82FLAGS 

EQUALS 

VFCTAB 

+ 6 

(1)  FCR 

V82  BITS. 

0948 

REF 

1 

F4, 1 540 

TFF 

ECLALS 

V82FL  AGS 

+ 1 

1(2) 

0949 

A0950 

RFF 

1 

E4, 1542 

-TPER 

EQUALS 

TFF 

+ 2 

1(2) 

0951 

REF 

3 

LAST 

1 16 

'■4,  1600 

HPFPM  IN 

EGLALS 

RANGE 

1(2)  SET 

TC  300KFT  CR  35KFT  FTP  SR30.1 

0952 

RFF 

1 

E4 , 1602 

fractem 

EQUALS 

HPERM  IN 

+ 2 

!(2)  PAD 

OR  LANDING  RAOILS  FCR  SP30.1 

0953 

PFF 

1 

F4,  16P4 

T START82 

EQUALS 

RFADTEN 

+ 2 

1(2)  TENF  TIPE  STCRAGE  FCR  V82. 

A0954 

R0955 

VARIOUS  DISPLAY  RFGI 

STEPS 

(6C  ) 

NCUN  84;  P76 
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PRASA3LE 

ASS  IPNMEMS 

USER'S  PAGE  NQ. 

28 

EO  SA 

09  5 7 
A095e 

F4.1622  EA,1627 

OFJ.VOV 

ERASE 

+ 5D 

(6) 

R0959 

ALIGNMENT  PL ANFT ARY- INFRT TAL 

TRANSFCRMATION  STCRAGE. 

(180 

PC961 

UNSHARED  WHILE  IN  CN 

LUNAR  SURFACE. 

09f  2 

F4,163C  FA, 1651 

G SAV 

ERASE 

+ 17C 

I (6) 

0963 

REF  1 

FA,  1636 

YNBSA Y 

equals  GSAV 

+ 6 

1(6) 

C96A 

A0965 

REF  1 

EA,16AA 

ZNBS  AV 

ECUALS  YNESAV 

+ 6 

1(6) 

R0966 

KALCA'ANU 

STCRAGE.  CAN  OVERLAY 

GSAV. 

( 18D) 

096  8 

REF 

2 

LAST 

117 

FA  , 1630 

MFS 

ECUALS 

GSAV 

1(18) 

0969 

REF 

1 

FA,  1630 

MF  I 

EQUALS 

M F S 

I 

097P 

REF 

2 

LAST 

117 

FA  ,1630 

K FL 

EQUALS 

MFS 

1(18) 

0971 

REF 

•a 

LAST 

1 1 7 

FA,  163C 

EOl 

ECUALS 

wpS 

1(6) 

0972 

RFF 

1 

FA, 1636 

EC  2 

EQUALS 

ECl 

+ 6 

1(6) 

R0973 

LR  VFL  BEAM 

VECTORS. 

( 260  ) 

A0975 

P0  9 76 

CAN  overlay 

GSAV  WITH  CARE, 

USEC  CURING 

PnWEREC  CESCENT 

ONLY. 

0977 

REF 

O 

LAST  117 

FA,  16  30 

VZBEANNR 

ECUALS  GSAV 

1(6)  LR  VELOCITY  BEAMS  IN  NB  COORDS. 

0978 

REF 

1 

■^A,  1636 

VYF!EAMNB 

EQUALS  VZBFAMNB 

+ 6 

1(6) 

0979 

R^F 

1 

FA  , 1 6AA 

vxbeamnb 

EQUALS  VYBEAmNB 

+ 6 

1(6)  PRESERVE  Z,Y,X  ORDER. 

0980 

REF 

1 

FA, 1 652 

LPVTIMF  = 

VXPEANNB 

+ 6 

E (2  ) 

LR 

0981' 

RFF 

1 

FA,  165A 

LPXCDU 

LRVTIME 

+ 2 

8(1) 

LR 

0982 

RFF 

1 

FA  ,1655 

LRYCCU 

LPXCDU 

+ 1 

8(1) 

LR 

098^ 

REF 

1 

''A,  1656 

LPZCDL 

LRYCDL 

+ 1 

e ( 1 1 

LR 

098A 

A0985 

REF 

1 

T4,i657 

PIPT.EM  . = 

LRZCDL 

+ 1 

B(  2 ) 

LR 

R0996  P32-P35,  P72-P79  STORAGE.  (ACC) 


0988 

1989 

099C 

FA, 1652 
F A , 1 6 5 A 
FA, 1656 

cA,1653 
F A , 1 6 5 5 
FA,  1657 

T1T0T2 
T2T0T  2 
ELFV 

ERASE 

ERASE 

ERASE 

+ 1 
+ 1 
+ 1 

( 2) 
(2  ) 
( 2 ) 

T IMF  FRCM  C SI  TO 

COH 

0991 

EA , 1660 

EA  ,1665 

UFl 

ER  AS  E 

+ 5 

( 6 ) 

T992 

FA,  1666 

EA,  1672 

DELVEETl 

ERASE 

+ 5 

1(6) 

DV  OSI  IN  REF 

0993 

EA  , 167A 

PA,  1701 

DELVE  ET2 

ERASE 

+ 5 

1(6) 

DV  CSH  IN  RFF 

C99A 

FA,  17  12 

■^A  , 17C7 

R AOTl 

ERASE 

+ 5 

(6  ) 

PCS  VFC  OF  ACTIVE 

AT 

CSI 

TIME 

0995 

EA,1710 

EA,  17  15 

R ACT2 

ERA  SE 

+ 5 

(6) 

PCS  VEC  OF  ACTIVE 

AT 

CCH 

T IME 

GAP; 
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L 

erasaple  assignments 

LSER'  S 

PAGE 

NC. 

29 

EO  S4 

0996 

0997 
R0998 

F4,  1716 
E4, 1720 

F4 , 1717 
E4,  172  1 

RTSRl/^'l  ERASE 
RTMU  ERASE 

+ 1 
+ 1 

(2 ) SC 

(2)  ML 

RCOT  1/MU 
SICRAQE 

STORAGE 

R099q (THF  FOLLCUING  ER/iSABLES  CVRRL<iY  FCRTICN'S  OF  THE  PRFVICIS  SECTICN) 


1001  9FP  1 F4.1652  +MGii  FQUflLS  T1T0T2  (2)  £-S  I C GIR  AN'Gl  fC  CEL\,EET3 

A1002 


1093  PEF  I F4,166C  LNRM  EQUftlS  UFl  1(6)  S-S 

A 1004 


1005  REF  1 c/^,l702  DVLOS  ECUALS  RACTl  1(6)  S-S  CELTA  VELOCITY, LCS  CCCRC-CISPLA 

1CC6  REF  1 F4,171> ULGS PQUALS  RAC~^2 1(6)  S-S  UMT  LINE  CF  STGh-T  \/EClCR 


A 100  7 
lOf  8 

REF 

1 

F4,  1716 

NGMTPI  EQLAIS  PTSRl/ML 

(2)  S-S  NCMINAL  TFI  time  FCR  RECYCLE 

R 1009 

SCA'F  P30  STCPAGE, 

( 4C  ) 

1011 

PEF 

2 

LAST  118  P4,1716 

HARD  ECLAIS  RTSPl/ML 

1(2) 

1 >12 

REF 

1 

E4 ,1720 

HPER  EQUALS  FAPO  +2 

1(2) 

A 1013 

RIO  14 

TFE  FOLLCNING  ARE  ERASA3LE 

LCADS  DURING  A PERFCRMANCE  TEST. 

1015 

REF 

1 

'"4, 14  >0 

TRANSMl  = WRENDPOS 

E4,  1400 

10)6 

OFF 

1 

P4 , 1422 

AlFCK  = TRANSMl  tl8C 

PlOl  7 

sje 

THE  FCLLCWING  SECTICNS  OVERLAY  V83  AND  DISPLAY  STCPAGE  =>** **=!'* 

R1018 

V47(R47)AGS  INITIALIZATICN 

FRCGRAM  STCRAGE.  (CVERLAYS  V83) 

( 14D) 

1020 

pPF 

4 

LAST  116  E4,1600 

AGSBLFF  FQLAIS  RANGE 

8 ( 14C  ) 

102) 

P ^ F 

1 

F4 ,1615 

AGSeUFFE  EQUALS  AGSBUFF  +12D 

ENDMARK 

R 1022 

R36  nUT-CF-PLANE  RENDEZVCL 

S DISPLAY  STCRAGE.  (CVERLAYS  V33) 

(12CI 

1024 

REF 

2 

LAST  116  F4,16>)6 

RPASS36  EQUALS  RCNE 

1(6)  S-S 

1025 

PEF 

1 

E4 ,1614 

UNP36  equals  RFASS36  +6 

1(6)  S-S 

R1I26 

S-EANC  ANTFNNA  GIMPAL  ANGLES.  DISPLAYED  6Y  R C 5 ( V64  ) . ( C VE P L A Y S 

V83)  (IOC) 

R 1C28 

(cferates  curing  FOO 

CNLY  ) 

» 
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EC  S4 

1029 

REF 

5 

LAST  118  E4,160C 

ALPHASB 

EQLAIS 

RANGE 

E (2) 

ESP  NOUN  51.  PITCH  ANGLE. 

1 T3‘’ 

REF 

1 

E4, 16C2 

BETASR 

equals 

ALPHASB 

+ 2 

E ( 2) 

CSP  NOUN  51.  YAN  ANGLE. 

19  31 

R = F 

1 

F4, 1694 

RLA* 

EQUALS 

betasb 

+ 2 

I (6  ) 

S S/C  POSITION  vector. 

R1032 

USEE  IN  S-EANC  ANlT^NNA 

FOR  lM 

1933 

P.r-f 

2 

LAST  119  F 4, 16  02 

YANiANG 

EQUALS 

rftase 

1034 

FFF 

2 

LAST  119  F4,1600 

P I TCHAMG 

EQUALS 

ALPHASB 

R1033 

N'CLN 

56 

DATA  - CONPUTEO  AND  CISFLAYEC 

EY  VERB  85. 

(4) 

1 :i37 

REF 

1 

F4 , 160C 

RR-A7 

EQUALS 

pitchang 

1(2) 

ANGLE  BETWEEN  LOS  ANC  X-Z 

PLANE . 

1038 

REF 

1 

F4 ,1602 

PP-ELEV 

EQUALS 

RR-AZ 

+ 2 

1(2) 

ANGLE  BETWEEN  LOS  ANC  Y-Z 

PLANE. 

R 1 939 

R04(V6?)  RADAR  TEST  STORAGE. 

( 8C  ) 

R 1 ) 4 1 

R04  IS  restricted  TO  POO. 

1042 

A1'143 

REF 

6 

LAST  119 

PST ACK 

EQUALS 

RANGE 

B(  e ) 

BLFFEP  for  RC4  NCLNS. 

R1044 

imtvfl 

STCPAGF 

. ALSO  USED  BY  P31.P34, 

P2  5,  F74,  P75,  P in  ,P  1 ] ,NIFG  IN  , S4C  . 1 AND  S40.9.  (180 

R 1046 

(POSSIBLY  PINIT  S VIMT  CAN  CVEPlAY  CELVFETl  £ 2 ABOVE) 

1047 

E4, 

1722 

E4  , 1727 

RIM  T 

ERASE  +5 

1(6) 

ACTIVE  VEHICLE  POSITION 

104F 

F4  , 

1730 

E4,  1735 

V INI  it 

ERASE  +5 

1(6) 

ACTIVE  VEHICLE  VELCCITY 

1049 

F4, 

1736 

F4 ,1743 

VI  PR  I NE 

ERASE  +5 

1(6) 

NEW  VFL  REQUIRED  AT  INITIAL  RACKS. 

R1  750 

VARIOUS 

C IS  FI  AY 

registers.  BALLANGS 

(30 

1''52 

E4, 

1 744 

E4 , 1 744 

FCAIX 

ERASE 

1(1) 

1 '53 

F4, 

174  5 

£4,1745 

FDA  I Y 

ERASE 

1(1) 

1754 

•=4, 

1 746 

E4,  1746 

FDAI2 

ERASE 

1(1) 

A 1055 

R1056  ' 

P34-P35 

STOPAGF 

. DOWNLINKED. 

(20 

10  5 6 

F4, 

174  7 

E4,  1757 

CFl  VTPF 

ERASE  +1 

1(2) 

DELTA  V FCR  TPF 

A1C59 

R1C60 

LPS2'> . 1 

STCPAGF 

. CALLEF  EY  R65. 

(120 

1062 

F4, 

1 751 

E4 , 1 756 

LNPOS 

ERASE  +5 

1(6) 

TEMP.  STORAGE  FOR  LN  PCS.  VFCTCP. 

r>6  3 

F4, 

1 7 57 

F4  , 1764 

L^'VEL 

ERASE  +5 

1(6) 

TENF.  STCPAGF  FOR  LN  VEL.  VFCTCR. 

Al'64 

R 1065 

INITVEL  STORAGE. 

ALSC  LSFO  BY  P 3 1 , 34  , 3 5 , 74 , 7 5 , S40 . 1 ANC  CCWNLINKEC. 

(60 

17  67 

E4, 

1765 

F4,  1772 

del VEET3 

FRASe  +5 

I (6) 

DELTA  V IN  INERTIAL  CCCPCINATES. 

A106P 
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P1C69  SC^E  P^'A  { V62  )-R77  STCRAG^.  (60 


1071  RA.1773  EA,  1773  RTSTCEX  ERASE B(  1) 


1C72 

-T  > L t i ^ 

FA  , ! 77A 

FA  , 177A 

R T S T ^ i X 

ERASE 

Ed) 

1 )73 

FA,  1775 

E A , 1 7 7 5 

RTSTBASE 

ERASE 

8(1) 

1^7A 

FA  ,1 776 

FA , 1 776 

PTSTLQC 

ERASE 

E(  1 ) 

075 

FA,  1777 

E A , 1 7 7 7 

P SAl^FCT 

ERASE 

Ed) 

10  7A- 
A 1077 

REF 

2 

LAST  115 

FA, 1575 

RFAILCNT 

EQUALS 

PBnn  V 

+ 1C1C 

8(1) 

1078 

F5,  lA  '0 

END-EA 

EQUALS 

FIRST 

UMSEC 

LCCATION  in  EA 

R1C79 

SECQME  CFS 

Ginr.ANCF 

(UJNAP  LANCING)  (CVERLAV 

P32-35  , INIIT\,EL  ) 

( lAD) 

1081 

RFF 

1 

FA  , 1662 

VFCRI Z 

ECLALS 

P IPTEN 

+ 3 

1(2) 

C ISFL  ay 

1C8? 

REE 

1 

FA , 166A 

ANGTFRM 

FQLAL  S 

VHGR  I Z 

+ 2 

1(6) 

guieancf 

1C83 

A108A 

PFF 

1 

■■A  , 1672 

FEEANNE 

equals 

ANGTERM 

+ 6 

1(6) 

LANCING 

RADAR 

Pl'8  5 

P12  PCWNLINK  GUAMTTT IPS 

( 5E) 

1C87 

REF 

1 

EA  , 1 73A 

LRXCCUCL 

EQUALS 

/LAND/ 

+ 2 

6(1) 

LANCING 

RADAR 

DOWNLINK 

1088 

PFF 

1 

FA,  1735 

LRYCOLDL 

EQUALS 

LRXCDLDL 

+ 1 

Ed) 

L A N C I N G 

R ACAR 

CGWNL  INK 

1C89 

REF 

1 

FA  ,1736 

LPZGCUCL 

EQUALS 

LRYCOLDL 

+ 1 

R(  1) 

LANCING 

RADAR 

DOWNLINK 

1090 

RFF 

1 

FA  , 1737 

LRVTINCL 

ECLALS 

LRZCCLCL 

+ 1 

E (2  ) 

LANCING 

RACAP 

COv,NL  INK 

A 091 

R 1092 

ASCENT  GUICANGF  FOR 

llnar  lancing 

( 5AD  ) 

1094 

pff 

2 

LAST  12" 

E 4 , 1 6 6 2 

AT 

EQUAL  S 

PIPTEN 

+ 3 

T (2)TNF 

ENGINE  data  --  THRUST  ACf*2(9) 

1C95 

RFF 

I 

F4, 1664 

VF 

EQUALS 

AT 

+ 2 

I ( 2)TNF 

E/HALS7  VELGCdY  « 2(7)N/CS. 

1096 

PFF 

1 

F 4 , 1 6 6 6 

7TC 

EQUALS 

V F 

+ 2 

I (2)TNF 

TAIIGEF  TIME  < 2(17)GS. 

1 '197 

PFF 

1 

F4,  1670 

TBUP 

EQUAL  S 

TTC 

+ 2 

I(2)TNF 

( N/MCCT ) * 2 ( 17  ) CS. 

lose 

PFF 

1 

54,1672 

RCOTC 

EQUALS 

TBUP 

+ 2 

I ( 2 )TMP 

TARGET  VELCCI7Y  CCNFCNEMS 

099 

RFF 

1 

F4, 1674 

YDGTD 

ECLALS 

RDCTC 

+ 2 

I ( 2 ) T N F 

SCAL  ING  IS  2( 7)M/CS. 

Too 

RFF 

1 

E4.1676 

ZCQTC 

FQUALS 

YDOTD 

+ 2 

I ( 2)-FNP 

1 10  1 

Prp 

1 

F4 ,1700 

/R/PAG 

EQUALS 

Z CCTC 

+ 2 

I ( 2 )TMP 

1 02 

CPF 

1 

F4,  1702 

LA  XI  S 

FOLAL  S 

/R /MAG 

+ 2 

I (6  )T  NF 

1103 

RFF 

1 

F d 1725 

ZAXISl 

= 

UHZP 

1 104 

RFF 

1 

F 7,  1472 

PCCT 

= 

HCCTC IS  P 

11  '5 

QPF 

1 

F.4,  1716 

YCOT 

= 

LA  XI  S 

+ 6 

I (2)Tff 

VEL.  NCRMAL  TC  REE.  FLANE^2(-7) 

1 1'‘'6 

RFF 

1 

'=4,1712 

ZCCT 

EQUALS 

Y CCT 

+ 2 

I ( 2 )TMP 

nCWN  RANGE  VEL  a.  2 ( - 7 ) . 

1 1 '7 

R=F 

1 

F 4 , 1 7 1 A 

GEFF 

ECLALS 

ZCCT 

+ 2 

T (2  )TMP 

EFFECTIVE  GRAVITY 

Rll'tS 

THESE 

TWC  GRCUFS 

CF  ASCENT 

GUICANCE  ARF  SPLIT 

EY  TFE 

ASCENT-DESCENT 

SFRVI CEP 

SECTICN  FCLLGWING  THIS  SECIICN 

me 

REF 

2 

LAST  12G 

E4 , 173A 

Y 

EQUALS 

/ LAND/ 

+ 2 

I (2  )TMF 

CUT-GF-PLANF  cist  ’>2(2A)P 
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nil 

REF 

1 

E4 ,1736 

DPCOT 

equals 

Y 

+ 2 

I ( 2)TMP 

RGCTC  - RDCT 

1112 

'’FF 

1 

T4,  174P 

DVCCT 

ECLALS 

CFCOT 

+ 2 

I (2  )TMF 

YCOTC  - YCOT 

1113 

REF 

1 

FA,  1742 

DZDOT 

EQUALS 

OYDCT 

^2 

I (2)TMF 

ZCCTC  - zncT 

im 

REF 

1 

T-'-t  , 1 7A4 

PCCNS 

EQUALS 

CZCCT 

+ 2 

I ( ?)TMP 

CCNSTANT  IN  ATP  EQLATICN 

1115 

Rt'F 

1 

FA, 1746 

YCONS 

EQUALS 

PCCNS 

+ 2 

1(2  )TMP 

CCNSTANT  in  ATY  EQUATION 

1116 

REF 

1 

F4, 1 750 

PRATE 

EQUALS 

YCONS 

+ 2 

I ( 2 ) TMF 

RATE  CCEFF.  IN  ATP  EQLATICN 

1117 

RTF 

1 

E4,1752 

YPATF 

equals 

PRATE 

+ 2 

I ( 2 )TMP 

RATE  COEFF.  IN  ATY  EQLATICN 

11  IB 

RFF 

1 

E4,  175A 

ATY 

EQUALS 

YRATE 

+ 2 

1 (2  )TMF 

CUT-CF-PLANE  THRUST  CCMP.=t2(S) 

1119 

REF 

1 

E4,I756 

ATR 

equals 

ATY 

+ 2 

I ( 21TMP 

RACIAL  THRUST  CCMF.42(9) 

112^ 

RFF 

1 

E4 , 1760 

ATP 

FQUALS 

ATP 

+ 2 

1 ( 2 )T  MP 

CCWN-RANGF  THRUST  COMP 

1121 

RFF 

1 

E4, 1762 

YAN 

EQUALS 

ATP 

+ 2 

I (2)TMF 

112? 

RET 

1 

T4 ,1764 

PITCH 

EQUALS 

YAW 

+ 2 

I ( 21RMP 

A1 123 

R1124 

SERVICER 

FCR  LUNAR  ASCENT 

ANC  CESCENT 

( lAC  ) 

1126 

1 

E4,1716 

G (CSM  ) 

EQUALS 

GEFF 

+ 2 

1(6)  FCR 

UPDATE  OF  COMMAND  MODULE  STATE 

1127 

RRF 

1 

E 3 , 1 7 1 7 

R (CSM  > 

PQLALS 

R-CTHER 

VECTCRS  EY  LEM;  ANALCGS  CF  GCT/2, 

1128 

RTF 

1 

E3  , 1725 

V (CSM) 

EQUALS 

V-CTHER 

R, 

AND  V,  RESPECTIVELY  CF  THE  (SM 

il?9 

RTF 

1 

F4 ,1  724 

NR 

EQUALS 

G (CSM  ) 

+ 6 

1(6)  TMP 

- lunar  rotation  vector  (SM) 

1130 

REF 

1 

fa,  1732 

/LANC  t 

EQUALS 

WM 

+ 6 

E(2)  LUNAR  RACIUS  at  LANCING  SITE 

AU31 
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L PRASflELE  ASSIGNMENTS 
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P 1132 
11  33 

EBANK-5  ASSIGNMENTS 
P5,  140C 

SET  ICC 

2 400 

R1  134 

W-MATPIX.  ESSEMTTAI.LY  GNSFARABLF. 

(1620 

1136 

ES.IATC  E5,1641  W 

ERASE 

+ 161C 

1137 

REF 

1 P5.1642  ENOIn 

FCLAIS 

+ 162C 

A 11 3 8 

R ms 

^ # 

□VEPLAV  NLMBFR  1 IN  EBANK  5 

:^e 

R1  1 40 

w-matrtx 

FACLOACS 

( 124D  ) 

R 1 142 

PLE 

ASF 

RETAIN 

THE 

CPCEP  CF  TLANC  trru 

JAPFG 

1143 

REF 

2 

LAST 

122 

E5,  1410 

TLANC 

ECLALS 

W 

1(2) 

NCMNAL  TINE  CF  LANCING 

1144 

PEF 

1 

E5 ,1402 

RPPFG 

EQUALS 

TLANC 

+ 2 

1(6) 

BRAKI NG 

1145 

REF 

1 

E5 ,1410 

V EPFG 

ECLALS 

REPFG 

+ 6 

1(6) 

PHASE 

1146 

PEF 

1 

F5,  1416 

ABRFG 

EQLALS 

VBPFG 

+ 6 

1(6) 

TARGET 

1147 

REF 

1 

F5 ,1424 

V EP.FGX- 

EQUALS 

ABRFG 

+ 6 

1(2) 

PARAMETERS : 

1148 

PEF 

1 

E5,  1426 

ABRFG* 

ECLALS 

VEPFG* 

+ 2 

1(2) 

F IGF 

1149 

RPF 

1 

E5,  1430 

JBRFC* 

EQUALS 

ABRFG* 

+ 2 

1(2) 

GATE 

1 1 50 

REF 

1 

F5 ,1432 

GAINEFAK 

EQUALS 

JERFG* 

+ 2 

E(  2) 

1151 

REF 

1 

£5,1434 

TCGFPRAK 

ECLALS 

GAI NBPAK 

+ 2 

Ed) 

1 1=2 

REF 

1 

F5  ,1435 

TCGI ERAK 

EQLALS 

TCGFBRAK 

+ 1 

E(  1) 

1 1 53 

REF 

1 

E5  , 14  36 

RAPFG 

EQUALS 

TCGIPPAK 

+ 1 

1(6) 

APPPQ  ACH 

1154 

PEF 

1 

E5, 1444 

VAPFG 

EQLALS 

RAPFG 

+ 6 

1(6) 

PFASE 

1 1 55 

REF 

1 

F5 , 1452 

AAPFG 

EQUALS 

VAPFG 

+ 6 

1(6) 

TARGET 

1 1 56 

REF 

1 

F5,  146C 

VAPFG* 

EQUALS 

AAPFG 

+ 6 

1(2) 

PARAMETER  S : 

1157 

RFF 

1 

E5,  1462 

AAPFG* 

EQUALS 

VAPFG* 

+ 2 

T ( 2) 

1 CF 

1158 

PEF 

I 

F5 ,1464 

JAPFG* 

EQUALS 

AAPFG* 

+ 2 

1(2) 

GATE 

1 1 59 

PEF 

I 

5 » 14  6 6 

GATNAFFF 

equals 

JAPFG* 

+ 2 

E (2  ) 

116C 

OFF 

1 

F5  ,1470 

TCGFAFPP 

EQUALS 

GA  INAPPR 

+ 2 

B(  1) 

1161 

RPF 

1 

E5  , 147  1 

TCGI APPR 

FQLAl S 

TCGFAFPP 

+ 1 

B(  1 ) 

1 162 

Rf  F 

1 

P5,  1472 

VIGN 

EQLALS 

TCGI APPR 

+ 1 

1(2) 

CFSIPEC  SPEEC  FOR  ICMTICN 

116^ 

RPF 

1 

F5 , 1474 

R I GM  X 

EQUALS 

V TGN 

+ 2 

1(2) 

DESIRED  'ALTITUDE'  FCR  IGNITICN 

1164 

RFF 

1 

E5,  1476 

RIGNZ 

ECLALS 

R IGNX 

+ 2 

1(2) 

CESIREC  GROUND  RANGE  FCR  IGNITICN 

1165 

REF 

1 

E5,  1500 

K IGNX/B4 

EQUALS 

R IGNZ 

+ 2 

1(2) 

1 166 

R<=F 

1 

F5 , 1502 

KIGNY/B8 

FQUALS 

K IGNXZB4 

+ 2 

1(2) 

1167 

PER 

1 

E5, 15F4 

KIGNV/B4 

ECLAL  S 

KIGNY/BB 

+ 2 

1(2) 

1168 

RFF 

1 

F5  ,15  )6 

LCWGR  IT 

EQUALS 

K IGNV/B4 

+ 2 

6(1) 

(FIGHCRIT  MLST  FCLLCF  LCFCFIT) 

1169 

RFF 

1 

F5  , 150  7 

H IGHCR  I I 

ECLALS 

LCWCR  IT 

+ 1 

P(  1 ) 

117.1 

REF 

1 

F5,  1510 

V2FG 

EQUALS 

HIGHCRIl 

+ 1 

1(6) 

CEP  IREC  VELOCITY  FCF  P65. 

1171 

REF 

1 

F5 , 1516 

TALVERT 

EQUALS 

V2FG 

+ 6 

1(2) 

TIME  CONSTANT  FOR  P65  VEL.  NLLLING. 

1172 

PFF 

1 

F5,  1 520 

DELQFIX 

EQUALS 

TAUVE'^T 

+ 2 

I (2) 

LP  altitude  data  reasonable  papm. 

1173 

RFF 

1 

F5, 1522 

LRALPHA 

EQUALS 

DELQFIX 

+ 2 

B(  1 ) 

PCSl  X ROTATION  * MUST  * 

» 
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ERASABLE 

ASS  IGNRFMS 

LSEP' S PAGE  NO.  29  EO  S9 

117A 

^EF 

1 

"5,1522 

LPBET41 

ECL Al S 

lralffa 

+ 1 

£ ( 1 ) 

FCSl  Y ROTATION  =t  PE  # 

1 1.75 

REF 

1 

E5,  1529 

LRAL  FFA2 

■■■■quals 

LR8ETA1 

+ 1 

B(l) 

FCS2  X RCTATICK  9 1 K # 

1176 

REF 

1 

E5 ,1525 

LRBETA2 

FCUALS 

L F ALPFA2 

+ 1 

P(  1 ) 

PCS2  Y ROTATION  BORDER* 

1177 

RFF 

1 

F5 , 1 526 

LP VMfiX 

EQUALS 

LR3ETA2 

+ 1 

6(1) 

LP  VFL  WEIGHTING  FLKCTICKS 

1178 

REF 

1 

^5 ,1527 

LRV  F 

FOUALS 

LRVMAX 

+ 1 

B(  1) 

IR  VFL  rtEIGHTIKG  FLKCTICKS 

117<; 

P = F 

1 

F5,153C 

LF  V ? 

EQUALS 

LFVF 

+ 1 

Ed) 

LP  VEL  WEIGH  ING  FLNCTICKS 

1180 

RFF 

1 

E5 , 153  1 

LRVvVV 

equals 

LPWVZ 

+ 1 

6(1) 

LF  VEL  WEIGH  IKG  FUNCTIONS 

1 181 

REF 

1 

E 5 , 1 5 ’ 2 

LRVvV> 

ECL  A LS 

LRl^iVY 

+ 1 

6(1) 

LP  VEL  WEIGH  IKG  FUKCTICNS 

1 ) 82 

RFF 

1 

F5  , 1522 

LRWVFZ 

EQLALS 

L PWVX 

+ 1 

6(1) 

LF  VFL  WEIGH  IKG  FUKCTICNS 

1 183 

RFF 

1 

E5,  1529 

LPWVFV 

ECLALS 

LRlivVF  Z 

+ 1 

6(1) 

UP  VEL  WEIG  INC  FUKC  ICNS 

1 18A 

RFF 

1 

F5,  1535 

LPWVFX 

EQUALS 

L RWVF Y 

+ 1 

6(1) 

LP  VEL  WEIG  IKG  FUKC  IONS 

1185 

ocp 

1 

F5,  1536 

LRtvVFF 

FQLALS 

L PViVF  X 

+ 1 

6(1) 

LP  VEL  WEIG  IKG  FUNG  ICNS 

1186 

RFF 

C 

LAST 

98 

C 1 311 

ABVEL* 

EQUALS 

BLF 

6(1) 

LP  TENF 

1187 

RFF 

6 

LAST 

123 

-131 

VSEL  FCT=^ 

EQUALS 

BLF  +1 

B(  1) 

LP  7'IKF 

1 188 

REF 

1 

F5  , 1537 

RCCSCALF 

equals 

LRVvVFF 

+ 1 

1(1) 

CLICK  SCALE  FACTOR  FOR  ROC 

1 18q 

RFF 

1 

E5,  1590 

TAUROF 

EQLALS 

RCOSG  ALE 

+ 1 

1(2) 

TINE  CCKSTAKT  FCP  R.C.C. 

1150 

RPF 

1 

E5 ,1592. 

L AG/TAU 

EQUALS 

TAUROD 

+ 2 

1(2) 

LAG  tine  divided  BY  lALPCC  (P66) 

1 19  1 

pep 

1 

F5,  1599 

PTNFCRCE 

ECLALS 

L AG/TAU 

+ 2 

1(2) 

MKIMUM  FORCE  P66  WILL  CCNNAND. 

1192 

REF 

1 

':5  , 1596 

MAXFCRCF 

EQUALS 

MINFCRCE 

+ 2 

1(2) 

NAXINUN  FCFCE  F66  WILL  CCNNAKC. 

1 193 

REF 

1 

F5 , 1550 

J 1 P A P w 

ECU  ALS 

NAXFCRCE 

+ 2 

1(2) 

PARANFTFR  SET  H l: 

IIQA 

REF 

1 

■^5,  1552 

K IPARN 

equals 

J1 FAPN 

+ 2 

1(2) 

ABCPT  orbit  SENI-NAJCF  AXIS  CCNP 

1195 

RFF 

1 

F5  ,1559 

J2PARM 

EQUALS 

K IPARM 

+ 2 

1(2) 

PARAMETER  SET  # 2: 

1196 

RFF 

1 

-5,1556 

K2°A  P !“ 

FQLALS 

J2PARK 

+ 2 

1(2) 

ABORT  OPBIT  SENI-MAJOR  AXIS  CCNP 

1197 

RFF 

1 

■■5,1560 

TFETCRIT 

FQUALS 

K2  PARK 

+ 2 

1(2) 

central  A.xGLE  switching  CRITERICK. 

1198 

REF 

1 

F5, 1562 

PAN  IK 

FCUALS 

tfetcrit 

+ 2 

1(2) 

MM.MLN  allowable  APCLUKE. 

1199 

RFF 

1 

F 5 , 1 569 

YLI  M 

ECLALS 

R A M K 

+ 2 

1(2) 

NAXINUN  CRCSS-RANGE  CIST.  IK  ABORTS 

1 200 

REF 

1 

E5,  1566 

A8TRDCT 

EQUALS 

YLI  M 

+ 2 

1(2) 

desired  racial  VFL.  FCP  A6CRTS. 

1201 

REF 

1 

■^5 ,1570 

CGSTFFTl 

E CU  A L S 

abtrcct 

+ 2 

1(2) 

COS  OF  CCKE  1 ANGLE  FCP  ABORTS 

120? 

RFF 

1 

^5,  1572 

CCSTHET2 

ECLALS 

cfstfeti 

+ 2 

I (2  ) 

CCS  CF  CCKE  2 ANGLE  FCP  AECRTS. 

A 120  3 

R 1 21  '■ 

sni^F 

V6RTA8LFS  FTP  SfCCNC 

FFS  GLICAACE 

(380 

1212 

RFF 

1 

E5, 1579 

CG 

EQLALS 

CCSTHET2 

+ 2 

1(130)  GUICAMCE 

1213 

4CRFF 

1 

F5  ,1616 

R ANGE  ESP 

EQUALS 

CG 

+ lEC 

6(2) 

C ISPLAY 

121A 

F F 

1 

F5,  1616 

CUTOFF  LA 

ECLALS 

R AKGECS  F 

CUTCFPLK  can  OVERLAY  FANGEQSP 

1215 

REF 

1 

F5 , 1620 

R 60V  SAVE 

EQUALS 

OUTOFPLN 

+ 2 

I(6)TNF  SAVES  VALUE  CF  FCIMVSN  TFPU  P51 

12  16 

RFF 

1 

F5 ,1626 

RC-U 

EQUALS 

P60VSAVE 

+ 6 

1(6) 

UNSHARED  FOR  DCWKLINK 

12162 

RFF 

1 

E5,  1639 

DLANC 

EQLALS 

RGL 

+ 6 

1(6) 

LANCING  SITE  CCRPECTION  SN  FRANE 

121  6A 

REF 

1 

= 5 ,1639 

clancx 

FOUALS 

OLAND 

12166 

RFF 

2 

LAST 

123 

F5,  1636 

CLAA  CY 

ECLALS 

CLAKC 

+ 2 

12168 

RFF 

3 

LAST 

122 

F5,  169! 

CLANCZ 

FQLALS 

DLA  NO 

+ 9 

1217 

RFF 

2 

LAST 

122 

■^5,1620 

Vei  AS 

FQUA  1 S 

R6UVS4VE 

1(6) 

PIPA  BIAS  EGUIV.  VELCCITY  VECTCP. 

12172 

REF 

3 

LAST 

122 

F 5,  1621 

J P A Q w 

EQUALS 

R60 VS  AVE 

1(2) 

JPAPN  WILL  EQUAL  JIPARM  OR  J2PARM. 

1217A 

REF 

1 

F5 , 162? 

KPARM 

FQUALS 

JPARN 

+ 2 

1(2) 

KPAPN  WIIL  EGUAL  KIPAPN  CF  K2FARN 

12176 

PEF 

1 

F5,1629 

PP 

EQUALS 

KPAPP 

+ 2 

1(2) 

PRECICTED  BURNOUT  R A C I U S-N* 2 ( - 2 9 ) 

1218 

RFF 

7 

LAST 

122 

0 136 

L*KCR*T 

= 

BLF 

1219 

PEF 

8 

LAST 

123 

0131 

f*ghcr*t 

= 

BLF  + 1 
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L 

FRASAPLE 

ASSIGNMENTS 

USER'S  PAGE  NO. 

•3  C 

EC  SA 

A1220 

R1221 

alignwfnt/systfct/calcsmsc 

CCMMCN 

STCRAGE. 

( 36D) 

1223 

RPF 

1 

E5,16A2 

X SM 

ECUALS 

ENDW 

E (6  ) 

122A 

pff 

1 

F5,  16  5C' 

YSM 

EQUALS 

XSM 

+ 6 

E(  6) 

1225 

REF 

1 

E5 ,1656 

25;  V 

ECUALS 

YSM 

+ 6 

6(6) 

I22ft 

REF 

1 

E5,  166A 

xoc 

EQUALS 

Z SM 

+ 6 

E(6) 

1227 

REF 

1 

E5 ,1672 

YFC 

ECUALS 

XQC 

+ 6 

R(  6) 

12?« 

REF 

1 

F5, 17CC 

zee 

EQUALS 

YCC 

+ 6 

E (6  ) 

1229 

RFF 

2 

1 AST  12A 

F5, 166A 

XNB 

= 

xnc 

123f 

RFF 

2 

LAST  12  A 

E5 , 1672 

YNE 

YDC 

1231 

RFF 

1 

E5,  1700 

ZNB 

= 

zee 

R1232 

evERLAYS 

Vs  ITF  IN 

ALTGNMENT/SYSTEST/C ALCSMSC  CeMMON  STORAGE. 

( 6e ) 

12T4 

1235 

REF 

PEE 

2 LAST  126 
1 

F5  , 
F5, 

1666  -eCSB  ECUALS  XSM  +2 

1666  SINB  EQUALS  -CCSB  +2 

(2)TNF 

(2)TNF 

R1236 

MORE 

GVEFLAYS  TT  ALIGN»^ENT  /SYSTEST  (TFESE  ARE 

F52  ) 

(6C  ) 

1238 

RFF 

1 

F5,  1706 

LANDLAT 

ECUALS 

S T A R A C 

(2)  LATITUCE,  LCNGITUCE 

123° 

REF 

1 

E5,1710 

LANDLCNG 

EQUALS 

LANCLAT 

+ 2 

( 2 ) 

AND 

ALTITUDE 

12  60 
A1261 

RFF 

1 

F5,1712 

L ANCALT 

equal  S 

LANCLCNG 

+ 2 

(2  ) 

CF 

LANDING  SITE 

P 1262 

ALIGNMENT/SYSTEST  CCNMEN 

STC  F AGE. 

( 2 ID) 

1266 

REF 

2 

LAST 

126  F5,1706 

5TARAC 

ECUALS 

zee 

+ 6 

I ( IRE  )TMF 

1265 

RFF 

2 

LAST 

126  F5,173C 

star 

EQUALS 

STARAD 

+ lED 

1(6) 

1266 

PFF 

1 

F 5 , 1 7 3 6 

GGTP 

ECUALS 

STAR 

+ 6 

e ( 1 ) 

1267 

RFF 

1 

E5,1737 

OGC 

EQUALS 

GCTR 

+ 1 

1(2) 

126F 

.RFF 

1 

F5  , 1 76  1 

IGf 

equals 

OGC 

+ 2 

1(2) 

1269 

RFF 

1 

E5 ,1  763 

MGC 

EQUALS 

IGG 

+ 2 

1(2) 

R12  5° 

P57 

ALIGNMEN'F  (TVER  LAY  CF 

alignment /SYS 

TFST  CCMMFN  STCRAGE) 

( 12C  ) 

1252 

REF 

3 

LAST 

126  E5,1706 

GACC 

- 

STARAD 

(6)  SS 

1253 

A1256 

PFF 

6 

LAST 

12  6 F 5 , 1 7 1 6 

GOLT 

STAPAe 

+ 6 

(6  ) SS 

R 1255 

eVFRLAYS  VvITFIN  A L I G N M E N T / SY  S T FST  GEMMCN  STCRAGE 

( 26D  ) 

1257 

REF 

5 

LAST 

126  E5,17'6 

VEARTh 

EQUALS 

STARAC 

(6)TNF 

1258 

PEF 

1 

E5 , 1716 

VSUN 

EQUALS 

VEARTF 

+ 6 

( 6)TMF 

1259 

RFF 

1 

E5,  1722 

VMCCN 

ECUALS 

VSL'N 

+ 6 

(6  )TMP 
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1269 

REF 

1 

F5 ,1730 

SAX 

equals 

VMOGN 

+ 6 

( 6 )Twp 

R 1261 

P5iT  S ,R  5C  ' S 

Q STGRFS. 

(20 

1263 

RFF 

1 

E5, 1745 

QMIM 

EQUALS 

MGC 

^■2 

B(  1 ) TRP 

126A 

P1265 

pep 

1 

F 5, 1746 

ORA  J 

EQUALS 

QRIN 

+ 1 

B(  1 )TRP 

R1266 

1267 

1260 

RFF 

RFF 

****  USEC  IN 
6 LAST  12A 
1 

F50S  =»**=!' 
E5 , 17C6 
F5,  1714 

(SCATTEREC  OVERLAYS) 

X5CI  equals 

YSCI  EQUALS 

STAPAC 
xsn  +6 

126  S 
1270 
A1271 

RFF 

RFF 

1 

2 LAST  12A 

F5  , 1714 
F5,  1706 

ZSCI 
CLLTR I X 

EQUALS 

FGLALS 

YSC  I 
VFARTH 

VEARTP,  VSUN,  VMCQM 

R 127? 

alignment  storage. 

(230 

1274 

RFF 

1 F5,1747 

qgct 

EQUALS 

QRAJ 

+ 1 

1(6) 

1275 

REF 

1 E5,1755 

EESTI 

EQUALS 

OGCT 

+ 6 

1(1) 

1276 

1277 
R 1278 

REF 

REF 

1 F5,1756 

1 E 5 , 1 7 5 7 

RETAIN  THE  CFDFP  CF  STARSAVl 

PESTJ  equals  BESTI  +1 

STARING  EQUALS  BESTJ  +1 
TC  STAPSAV2  +5  FCR  CCWNLINK  PURPOSES. 

1279 

RFF 

1 E5.176C 

STAR  S AVI 

EQUALS 

STARING. 

+ 1 

1(6) 

1280 

PEE 

1 E5,1766 

STARSAV2 

RQUAL  S 

STARSAV 1 

+ 6 

1(6) 

1281 

REF 

1 E5,1774 

TALI GN 

EQUALS 

STARSAV2 

+ 6 

B(  2 ) 

TIME  CF  IMU  ALIGNMENT 

(DGPNLINKED ) 

A1282 

R 1203 

P32-35  + SERVICER 

( 2C  ) 

1285 

RFF 

1 E5.1776 

RTXl 

equals 

TALIGN 

+ 2 

1(1) 

XI  -2  EARTE,  -10  MOON 

1286 

REF 

1 F5.1777 

RTX2 

EQUALS 

RTXl 

+ 1 

1(1) 

>2  0 EARTH,  2 MCCN 

A 1287 

128  8' 

0026 

ZPRI NE 

= 

22D 

1289 

0U26 

PCA 

= 

22D 

1290 

C020 

CCSTF 

= 

16D 

1291 

0022 

SINTH 

= 

1 8G 

1292 

0024 

TPETA 

= 

2CD 

1293 

C040 

STARN 

32C 
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37 

EC  SA 

P129^ 

rVERLAY  MJEBFR  2 IN  EEANK  5 

P1295 
1.2  97 

REF 

2 

CON  ICS 
LAST 

ROLTINE  STORAGE. 
12A  E5,16A2 

CELX 

EQUALS 

FNirW 

(850 
1 ( 21TNP 

1298 

R<=F 

1 

F5.16AA 

celt 

EQUALS 

CELX 

+ 2 

I(2)TfcF 

129<3 

rff 

1 

E5 , 1 6A6 

L'RR  FC  T 

FQLALS 

DELT 

+ 2 

J (61TNF 

130C 

0042 

RCNOPY 

EQUALS 

3 AC 

I ( 2 ) TRP 

130  1 

RFF 

1 

F3  , 1 552 

XPPEV 

FQLALS 

X KEP 

I(2)TRP 

130? 

R = F 

1 

E5 , 165A 

R IV  EC 

EQUALS 

URPEC  T 

+ 6 

1(6)  TRP 

130  3 

RFF 

1 

E5  , 1662 

R2VEC 

fcuals 

PIVEC 

+ 6 

I ( 6 ITRP 

1 3-'A 

REF 

1 

F5,  167'’ 

tdesirec 

EGLALS 

R2VEC 

+ 6 

I (2  ITNF 

1309 

REF 

1 

E5 , 1672 

GFOMSGN 

equals 

TCES  IREO 

+ 2 

I ( 1 ITNF 

13C6 

REF 

1 

F5,  1673 

UN 

FQLALS 

GECRSGN 

+ 1 

I (6  )TRF 

1307 

REF 

1 

F 5,  1701 

VTARG7AG 

EQUALS 

UN 

+ 6 

I ( IITNF 

1308 

PFF 

1 

F5,17"2 

VTARGET 

EQUALS 

VTA  RGT AG 

+ 1 

I ( 6 ITRP 

1309 

RFF 

1 

F5,  171C 

RTN'L  ARB 

FQUAL  S 

VTARGET 

+ 6 

I ( 1 ITRP 

1310 

REF 

1 

F5  , 1 71  1 

U2 

EQUALS 

RTNLAMR 

+ 1 

I (6)TRF 

1311 

pep 

1 

E5  , 1717 

RAGVEC2 

E QU  A L S 

U2 

+ 6 

I(  2 ITVP 

1312 

RFF 

1 

F5,  1721 

URl 

EQUALS 

MAGVEC2 

+ 2 

I (6)TNP 

1313 

REF 

1 

E5  ,1727 

SNTP 

EQUALS 

URl 

+ 6 

I( 2)TNF 

13  1 A 

RFF 

1 

F5  , 1731 

CSTH 

EQUALS 

SNTH 

+ 2 

I ( 2 IT  RF 

1315 

REF 

1 

F5,  1733 

1-CSTH 

FQLALS 

C£th 

^■2 

I ( 2 ITRF 

13)  6 

R -F 

1 

E5 ,1735 

CSTH-RFO 

EQUALS 

1-CSTH 

+ 2 

I(  2 ITRP 

1317 

REF 

1 

E9, 1737 

P 

EQUALS 

CSTH-RHG 

+ 2 

1 <2  ITRF 

1318 

FEF 

1 

F5, 17A1 

R lA 

EQUALS 

P 

+ 2 

I ( 21TRP 

1319 

RFF 

2 

LAST 

126 

E5 , 165A 

PVEC 

EQUALS 

PlVEC 

I(6)TRIP 

1320 

REF 

1 

E5 , 17A3 

VVEC 

FQLALS 

RIA 

+ 2 

I ( 6 IT  RF 

1321 

PFF 

2 

LAST 

126 

E5  ,1710 

RTNTT 

EQUALS 

PTN'LARB 

I ( 1 ITRP 

1322 

RTF 

1 

E5,  1751 

ETC 

EQUALS 

VVEC 

+ 6 

I (2  ITRF 

132  3 

RFF 

3 

LAST 

126 

E9,  1710 

R7NTR 

FQLALS 

R TN'LARB 

I ( IITRF 

132A 

REF 

A 

LAST 

126 

E5,1710 

RTNAPSE 

EQUALS 

PTNLARB 

1 ( 1 ITRP 

1325 

RFF 

2 

LAST 

126 

E5  , 1 717 

R2 

EQUALS 

RAGVFC2 

I ( 2 ITRP 

1329 

REF 

1 

F5 , 1753 

RTNPRM 

EQUALS 

ECC 

+ 2 

I ( IITRF 

1327 

RFF 

1 

E5,175A 

SGNRCCT 

EQUALS 

PTNPPR 

+ 1 

I(  1 ITRP 

1328 

REF 

1 

F5, 1755 

PDFSIREC 

FQUALS 

SGNRCCT 

+ 1 

I (21TRF 

13'2  9 

REF 

1 

E9 ,1757 

CELCEF 

EQUALS 

RCES  IRED 

+ 2 

I ( 2 ITRP 

1330 

rff 

1 

F5,  1761 

CEPREV 

EGLALS 

CFLCFF 

+ 2 

I (21TRP 

1331 

PFF 

2 

LAST 

1 26 

E5,  1757 

tfrrlarp 

EQUALS 

DELOEP 

I(2)TRF 

1 332 

RFF 

1 

E5 ,1761 

TPREV, 

equals 

dffrfv 

I ( 2 ITRP 

1333 

REF 

2 

LAST 

126 

F5 , 1763 

EPSI LCNL 

EQUALS 

DEPPE V 

+ 2 

I (2  ITRP 

133A 

RFF 

1 

F5, 1765 

COG  A 

FQUALS 

F PSIl CMC 

+ 2 

1(2)  CCTAN  CF  INITIAL  FLIGFT  PATE  ANGLE. 

1^35 

OFF 

1 

F5,1765 

I NCEF 

FCUALS 

CCGA 

USED  BY  SUBROUTINE 'nERATGR*. 

GAPt 
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L 

ERASfEL 

E ASSIGNMENTS 

USER'S  PAGE 

NC.  38 

EO  S4 

P1336 

a}c  3{{ ^ 

r\;FRLAY  NUMBER  3 IN  EBANK 

5 

P.133  7 

INCOPP  STCRAGE. 

(180 

1339 

RFF 

3 

LAST  126 

F5, 1642 

Z I 

equals 

ENCW 

I ( 18 ) TMF 

P 13AP 

INC0RP/LSP22.3  STERAGF. 

( 2 ID  ) 

13A? 

REF 

1 

F5, 1664 

DELTAX 

EQUALS 

Z I 

+ 18D 

1(18) 

13A3 

REF 

1 

F5  , 1 7iJ6 

VARIANCE 

EQUALS 

DEL  TAX 

+ lED 

1(3) 

R 1344 

MEASURFMPNT 

INFCRPGRATI CN 

-R22-  STORAGE 

• 

(49C  ) 

1346 

REF 

1 

E5,  1711 

GPP2SVC 

EQUALS 

VARIANCE 

+ 2 

KDTMP  CSAVE  FCP 

RESTARTS 

1347 

REF 

1 

£5,1712 

CM  EG  AM 

EQUALS 

GRF2SVQ 

+ 1 

1(6) 

1348 

REF 

1 

F5,  1720 

CMEGAM2 

equals 

CMEGAMl 

♦ 6 

1(6) 

1349 

ref 

1 

F5 , 1 726 

0MEGAM3 

EQUALS 

0MEGAM2 

+ 6 

1(6) 

13  50 

P£F 

1 

F5 , 1734 

HCLCW 

EQUALS 

CMEGAM3 

+ 6 

1(18) 

1351 

REF 

1 

■=5,  1756 

TCPOS 

EQUALS 

HCLON 

+ lec 

1(6) 

1352 

REF 

1 

E5 ,1764 

TCVFL 

EQUALS 

TCPOS 

+ 6 

1(6) 

A1353 

1354 

REF 

2 

LAST  127 

F5,  1664 

TRIP  A 

EQUALS 

DELTA  X 

I ( 3)TMP 

1355 

REF 

1 

E5  , 1667 

T F M P V A R 

EQUALS 

TPIPA 

+ 2 

I ( 3 )TMP 

A1356 

PI  357 

inccppcraticn/integraticn 

C STCRAGE. 

( IC) 

1359 

A1360 

RFF 

1 F5,1772 

EGRESS 

EQUALS  TCVFL 

+ 6 

1(1) 

R 1361 

F3R/P31  STCPAGF. 

(1C)  ANC 

ONE  OVERLAY 

1363 

A1364 

REF 

1 E5,1772 

P30EXIT 

EQUALS 

egress  +1 

E ( 1 )TMF 

1365 

REF 

1 F5,1773 

ORIGIN 

equals 

P30EX IT 

I(  1 )TMP 

INDEX  DURING  INITVEL 

A1366 
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P1367  SYSTEM  TEST  FRA  SABLES.  CAN  fVERLAY  V.  NATPIX.  (1270) 

R1369  CVEPLAY  NUNBER  . IN  FBAMK  ? 


1370 

REF 

3 

LA  ST 

122 

F5 ,1400 

AZIMUTH 

EQUALS 

w 

2 

1371 

REF 

1 

E5, 14C2 

latitude 

ECLALS 

AZIVLTH  +2 

2 

1372 

REF 

1 

E5 ,1404 

ERVFCTOP 

EQUALS 

latitude  +2 

6 

1373 

RPP 

1 

-5, 1412 

LENGTHCT 

F CU  A L S 

ERVFCTCR  +6 

1 

1374 

f’FF 

1 

E5, 14  13 

LOSVEC 

FOLAL  S 

LENGTHCT  +1 

6 

1375 

REF 

1 

E5 , 1414 

NICXCTR 

EQUALS 

LCSVEC  +1 

1 

1376 

P''F 

1 

E5, 1415 

PIPINCEX 

ECLAIS 

NCXCTF  +1 

1 

1377 

REF 

1 

E5, 1416 

PnSI TON 

EQUALS 

PIPINOEX  +1 

1 

1378 

REF 

1 

F5,1417 

GPLACE 

EGUA  IS 

FCSITFN  +1 

1 

1379 

REF 

1 

F5,  1420 

CPLACES 

EQUALS 

CFLACE  +1 

1 

13Rn 

PFF 

1 

E5,1421 

SnUTHOR 

equals 

QPLACFS  +1 

7 

1381 

RFF 

1 

F5,1430 

TFMPT I VC 

ECU  als 

SCUTHCR  +7 

2 

1382 

RFF 

1 

E5,  1432 

TMARK 

EQUALS 

TEVPTIME  +2 

2 

13E3 

PEP 

1 

E5 , 1434 

GFNPL 

EQUALS 

TVARK  +2 

1384 

REF 

1 

F 5 , 1 A34 

COLTIVEI 

- 

GENPL 

1385 

REF 

2 

LAST 

128 

F5, 1436 

coltimef 

= 

GENPL  +2 

13E6 

RPF 

3 

LAST 

12F 

F5, 1440 

CCUCANG 

= 

GENPL  +4 

1387 

PFF 

4 

LAST 

126 

E5,  144  1 

cclreaof 

= 

GFNPL  +5 

1388 

RFF 

5 

LAST 

128 

E5, 1442 

ccupeadi 

= 

GENPL  +6 

1389 

Rrfr 

6 

LAST 

126 

F5,1443 

CrULI  V IT 

= 

GENPL  +7 

1399 

REF 

7 

LAST 

128 

E5, 1440 

TFMP ACO 

GENPL  +4 

13  91 

REF 

8 

LAST 

128 

E5 ,1441 

T 6MP 

= 

GENPL  +5 

1392 

RFF 

9 

LAST 

128 

F5  , 1442 

Ncen  s 

= 

GFNPL  +6 

1393 

PEF 

10 

1 AST 

128 

E5, 1443 

CHAN 

= 

GENPL  +7 

1394 

r':f 

1 1 

(AST 

126 

E5 ,1444 

LCS  1 

_ 

GFNPL  +80 

1395 

PEF 

12 

L AST 

128 

E 5,  14  52 

LCS2 

= 

GENPL  +140 

1396  . 

RFF 

1 3 

LAST 

128 

E5 , 1460 

CALCC  IP 

EQUALS 

GFNPL  +200 

1397 

REF 

1 4 

LAST 

128 

E 5,  1461 

CrUFLAG 

EQUALS 

GENPL  +210 

1398 

RFF 

1 5 

LAST 

128 

95,1462 

GYTnBETC 

EQUALS 

GENPL  +220 

1399 

RFF 

16 

LAST 

128 

6.5 ,1463 

CPTNIR  EG 

equals 

GENPL  +230 

1430 

REF 

17 

LAST 

128 

F5, 1464 

SAVE 

ECLALS 

GENPL  +240 

THREE 

CNSEC  LCC 

1491 

PEF 

18 

LAST 

128 

F5,  1467 

SFCONST  1 

EQUALS 

GENPL  +270 

1402 

REF 

19 

LAST 

128 

E5 ,1470 

TI  VFR 

EQUALS 

GENPL  +280 

1403 

REF 

20 

LAST 

128 

F5,  1472 

DATAFL 

ECLALS 

GENPL  +300 

1404 

RFF 

21 

t AST 

128 

E5  , 1434 

RCSP 

EQUALS 

GENPL 

FIX  LA 

FR  FCSSIBLY  KEEPl 

1405 

REF 

22 

LAST 

126 

95,1534 

VASKREG 

ECLALS 

GFNPL  +640 

1406 

RFF 

23 

LAST 

128 

E5,  1536 

Cr.LNGX 

EQUALS 

GENPL  +660 

14C7 

RFF 

24 

LAST 

128 

E5.1537 

RESULTCT 

EQUALS 

GENPL  +670 

14  18 

RFF 

25 

LAST 

128 

E5,  1542 

CrLNT  FL 

ECLAIS 

GENPL  +700 

1409 


RTF  26  LAST  128 


ES, 1943 


CCUANG  EQUALS  GEN'PL  +710 
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lAlO 

lAll 

REF 

REF 

11 

1 

LAST 

128 

.95,1434 
E5 ,1434 

AINLA 

WANGO 

EQUALS 

G E N P L 
A TNILA 

110  CE 
VERT  £ 

FR  156  CCT  LOCATICNS 
ATE 

IA12 

P PF 

2 

LAST 

129 

E5  , 1436 

VvANGI 

ECUALS 

AINLA 

+ 2C 

FfPI ZC 

TAL  ERATE 

1 A13 

REF 

3 

LAST 

129 

F5,  1440 

NANGT 

EQLALS 

AINLA 

+ 4D 

T 

lAlA 

REF 

1 

E5, 1440 

TCRQNCX 

= 

WANGT 

lAl  5 

REF 

4 

LAST 

129 

F 5,  144  2 

OPIETT 

equals 

AINLA 

+ 6C 

IA1  6 

REF 

5 

LAST 

129 

E5 , 1444 

ALXIS 

EQUAL  S 

AINLA 

+ 80 

1417 

REF 

6 

1 AST 

129 

F5 ,1445 

CNPX  1 

EQUALS 

AINLA 

+ 9C 

IMC 

1418 

RFF 

7 

LAST 

129 

E5,  1446 

ALK 

EQUALS 

AINLA 

+ 100 

GAINS 

1419 

RFF 

8 

LAST 

129 

'=5,1462 

VL AUNS 

EQUALS 

A I NIL  A 

+ 220 

1420 

REF 

9 

LAST 

129 

E5  , 1464 

UFLATC 

ECUALS 

AINLA 

+ 24C 

1421 

RFF 

n 

LAST 

129 

E5  , 14  70 

TNTY 

EQUALS 

AINLA 

+ 280 

SOUTH 

IF  INTE 

1422 

REF 

11 

LAST 

129 

E5 ,1472 

ANGZ 

equals 

A INLA 

+ 300 

EAST  A 

IS 

1423 

^EF 

12 

LAST 

129 

E 5 , 1 4 7 4 

I N.TZ 

EQLALS 

AINLA 

+ 32  C 

EAST  P 

P I 

1424 

RFF 

13 

LAS-P 

129 

E5 , 1476 

ANGY 

EQUALS 

AINLA 

+ 340 

SOUTH 

1429 

pcir 

14 

LAST 

129 

E5 ,1500 

ANGX 

ECUALS 

AINLA 

+ 36C 

VE 

1426 

REF 

19 

LAST 

129 

E5,  1592 

DPIFTC 

EQUALS 

AINLA 

+ 38C 

VERT 

1427 

REF 

16 

LAST 

1 29 

F5  ,15'.)4 

CPIFT  I 

equals 

A INLA 

+ 400 

SCL 

1428 

RPF 

17 

LAST 

129 

E 5 , 1 5 1 C 

V 1 A 1 N 

EQLALS 

AINLA 

+ 44C 

I4?c 

REF 

18 

LAST 

129 

F5,  1512 

ACCWC 

EQUALS 

AINLA 

+ 460 

1430 

REF 

19 

LAST 

129 

E5, 1520 

FCSNV 

EQUALS 

A INLA 

+ 520 

1431 

RFF 

20 

LAST 

1 29 

E5,  1522 

DPIPAY 

ECUALS 

AINLA 

+ 540 

SnUTF 

1432 

REF 

21 

LAS'P 

129 

F5,  1526 

DPIPAZ 

EQUALS 

AINLA 

+ 5 80 

north 

TP  INCPENENT 

1433 

RFF 

2 2 

LAST 

129 

F5,1530  . 

ALTI  N 

F CU  A L S 

AINLA 

+ 60C 

14  34 

PEF 

23 

LAST 

129 

F5,  153  1 

ALTTNS 

EQLALS 

AINLA 

+ 610 

INDEX 

1439 

RFF 

24 

LAST 

129 

F5 ,1532 

ALFK 

EQUALS 

AINLA 

+ 620 

TIRE 

CNSTAN 

1436 

RFF 

25 

LAST 

129 

F5, 155C 

CELN 

EQUALS 

A INLA 

+ 76C 

1437 

PEP 

26 

LAST 

1 29 

F5,  1560 

^PLAT  I 

EQLALS 

AINLA 

+ 840 

1438 

PEF 

27 

LAST 

129 

E5 ,1562 

GEQCCMPS 

EQUALS 

A INLA 

+ 860 

1439 

ref 

28 

LAST 

129 

F5,  1563 

ERGGNF 

EQLALS 

AINLA 

+87C 

1440 

RFF 

29 

LAST 

129 

£5,1571 

zfrgncx 

EQUALS 

AINLA 

+ 930 

14  41 
144? 

RFF 

REF 

1 

1 

E5  , 1452 
E5,  1460 

THETAN 
F ILDELV 

EQUAL  S 

ALK  +4 
THETAN 

+ 6 

AGS 

ALIGNNENT  STORAGE 

1443 

RF<^ 

1 

E5  , 1462 

INTVEC 

EQUALS 

F ILDELV 

+ 2 

1444 

.REF 

30 

LAST 

129 

F5,  1572 

1 SHOT 

= 

AINLA  +940 

1 445 

pee 

31 

LAST 

129 

E5,  1 573 

ASECXT 

= 

AINLA  +950 

1446 

REF 

32 

t AST 

129 

F5 , 1574 

PERFCLAY 

ECUALS 

A INLA 

+ 960 

8(2) 

CELAY  TIRE  BEE.  STAR! 

CPIFT  REASUPE 

1447 

QCF 

33 

LAST 

129  ■ 

^5, 1576 

OVELCUCK 

EQUALS 

A INLA 

+ 98C 

{ 1 1 

SET  NEANS  OVERFLOW  IN 

IMU  PEPF  TEST 

A1448 

AND  CAUSES  TERRINATICA 

A IAA9 


R^F  7 I AST  125  r-5>  1779  EN;0-E5  EQUALS  STARSAV2  +6  «*=>  FIRST  FFEE  LCCATICN  IN 


1A50 
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L 9RASA6LF  AS  S I G\N' E ^ S 


LSER'S  page  ^0.  91  EO  S9 


P1951 

1952 

FBANK-6  ASSTGNNEMS. 

F6,  190r 

SETLCC 

3CC0 

R 1953 

DAP  PAC- 

LCADFC  CATA. 

( ICD) 

R1955 

ALL 

CF 

THE  FOLLOWING  F XCS-PT 

PI TTIMF 

AND  P.OLLTINE  APE 

IMITIALIZEE  IN 

FRESH  STAPT  TC  FERPIT  IPPECIATE  LSE 

GF  DAP 

1957 

E6,  19  >0 

F6, 1900 

HIASCFMT 

ERASE 

(1)  PASS  AFTER  STAGING,  SCALE  AT 

B16  KG. 

1955 

F6 , 19:il 

F6 ,19-.U 

RCLLTINE 

ERAS  F 

(1)  TIPE  TC  TRIP  Z GIPfiAl  IN  RC2, 

dsec. 

1959 

F6,  19'12 

E6  , 19G2 

PI TTI PE 

ERASE 

(1)  TIPE  TC  TRIP  Y GIPEAL  IN'  PC3, 

CSEC. 

I960 

F6 , 1 9'  1 3 

F6, 1903 

CKTRAP 

ERASE 

(1)  DAP  STATE  (PCSSIELE  77001 

1961 

F6, 1909 

F6 , 19C9 

ckcnegan 

ERASE 

(1)  ESTIPATCR  PARA-  (\/ALLE 

S CCC  12 

1962 

F6, 19T5 

F 6 , 1 9 1 5 

DKKAOSN 

ERASE 

(1)  METEFS  FCP  THE 

00079 

1963 

F6 , ) 9 16 

F6, 19T6 

lptraf 

ERASE 

( 1 ) ICCKED  AND 

7700  1 

1969 

F6,  1907 

E6  , 1907 

LPCPEGAN 

ERASE 

( 1 ) LEP-ALONE  CASES 

CCCIC 

1965 

E6.1910 

66,  1910 

LMKAOSN 

ERASE 

(1)  RESPECTIVELY 

0C079 

1966 

E6,1911 

E6 , 1911 

CKCE 

ERASE 

(1)  WIDTH  OF  DEADBAND  FCR  DECKED 

RC  S 

A1967 

AUTCFILCT  (DE=1.9CEG  IN  FRESH 

START  ) 

A196  f 

DEADEAND  = FI/DKDS  FAC. 

P 1969 

PACLOAHS 

FOR  TMITIALIZATIFN  CF  DAP  PIAS  A CC  E L ER  A T I CN  (AT  P12  IGMTICN) 

(2D 

197] 

E6,  1912 

E6,  19  12 

I CM An  SO 

ERASE 

EdIFL 

1972 

66,1913 

66,1913 

ICNACSF 

ERASE 

P ( 1 )PL 

A1973 

PI  979 

AXIS 

TRA^$FCP^'AT  ICN 

N A T F I X - 

G 1 e A L T C 

PILOT  AXES: 

( 5D  1 

1976 

Fb,1919 

E6,1919 

Pll 

ERASE 

SCALED  AT  1 

1977 

F6, 1915 

P 6 , 1 9 1 5 

P21 

ERASE 

SCALFC  AT  1 

197S 

66 , 1916 

E6 , 19  16 

6*31 

ERASE 

1979 

66,1917 

66,1917 

N22 

ERASE 

SCALED  AT  1. 

198f1 

F6,  1920 

66,  1920 

M 32 

ERASE 

SCALED  AT  1. 

R1981 

ANGLE 

NFASUREMENJTS. 

( 3 ID  ) 

1983 

P6, 1921 

E 6 , 1925 

CPEGAF 

ERASE 

+ 9 

eCDY-AXIS  RCT.  RATES  SCALED  AT  PI/9  AND 

19  BA 

RFF 

1 

F6,  1922 

CPEGAG 

EQUALS 

n PE  GAP  4 1 

bc;dy-axi£  accelepaticns  scaled  at 

F 1/8 

19P5 

REF 

2 

LAST  130 

F5 , 1923 

CPFGAF 

equals 

CPFGAP  42 

R19B6 

RETAIN 

1 TFF  CRIER 

CF  ALFHAC 

ANI  ALPHAR  60R  CCNNLINK  PLRPOSES. 

1967 

PFF 

3 

LAST  130 

E6 , 1929 

ALPHAC' 

EQUALS 

OPFGAP  43 

1966 

'’FF 

9 

LAS-F  13C 

E6,  1925 

ALPHAR 

fclals 

CPFGAF  44 

1989 

E6,  1926 

E6,  1927 

OMEGAL 

ERASE 

4 1 

1990 

RFF 

1 

F6 , 1927 

cpegav 

= 

CPFGAU  41 

- 

199! 

F6, 193C. 

E6  , 1935 

TRAPECP 

ERASE 

4 

1992 

REF 

1 

F6, 1931 

TRAPFDO 

= 

TRAPEDP  +1 

1993 

FEF 

2 

LAST  13C 

F6  , I 932 

TRAPECR 

= 

TFAPECP  42 

1999 

REF 

3 

LAST  131 

F6, 1 933 

N'FTRA  FS 

TRAPECP  +3 
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L 

ERAS ''ELF  ASSIGNMENTS 

LSFR'S  PAGE  KQ.  42  EO  S4 

1A95 

REP 

4 LAST  13C 

E6 ,1434 

nctrafs 

= 

TRAPECP  +4 

1 A96 

REF 

5 LAST  131 

F6,  1435 

NRTPAPS 

= 

TPAPEDF  +5 

1 A97 

REF 

1 

P6 , 1427 

ECDTP 

= 

EDHT 

1A9P 

E6 , 1436 

E 6 , 1 4 3 7 

EECTC 

ERASE 

+ 1 

14Q9 

REF 

1 

E6,  1437 

EDOTR 

= 

EDOTQ  +1 

MANY  SFARIKG  NAMES 

15Cr 

ref 

2 LAST  131 

F6, 1436 

QPAT  E C 1 F 

FCUALS 

ECETG 

ALTERNATIVE  NAMES: 

1501 

REF 

1 

E6 , 1437 

RPATFCI F 

EQUALS 

EDOTR 

delete  week  NC.  CF  REFERFNCeS  = 0 

1502 

REF 

2 lAST  13C 

F6j  ,1426 

URATECIF 

EQUALS 

OMFGAL 

1 503 

REF 

1 

F6 ,1427 

VP  AT  E C I F 

EQUALS 

OMEGA  V 

15, -.4 

'"6, 1440 

E 6 , 14  4 2 

OLOXFCRP 

ERASE 

+ 2 

STCPEC  GEU  REACINGS  FCR  STATE 

1 505 

REF 

1 

F6 , 1441 

□ LEY  FCR  P 

EQUALS 

nLrxFCRP  +1 

OERIVATICNS:  SCALEO  AT  FI  RADIANS  (2'S) 

15'’ 6 

REF 

2 LAST  131 

F6, 144? 

CIDZFCRC 

ECLAl  S 

CLCXFCRF  +2 

R1507 

PATE 

-CCMMANC  ANC  MMMUF  IMPULSE  MOCES 

15G8 

F6 , 1 443 

F6 , 144  3 

CF31TEPF 

ERASE 

1509 

E6,  1444 

E6  , 1444 

STIKSEN  s 

ERASE 

1 510 

F6 , 1445 

F6 , 1445 

TCP 

ERASE 

1511 

F 6 , 1 44  6> 

E6 , 1453 

DXERRCP 

ERASE 

+ 5 

1512 

PFF 

1 

F6,  14  50 

OYEPRCR 

EQUALS 

nxERRER  +2 

1513 

REF 

2 LAST  131 

E6 ,1452 

L ?FpRCR 

equals 

DXERRCR  +4 

151  A 

F6, 1454 

E6  , 1454 

PLAST 

ERASE 

151  5 

E6, 1455 

E6,  1455 

QLAST 

ERASE 

1516 

F6 ,1456 

E6 , 1456 

PLAST 

ERASE 

1517 

F6,  1457 

E6,1457 

TCCR 

ERASE 

R151  F 

CTFER  VAPTABI.ES. 

( 5D) 

1520 

F6 ,1460 

E6 , 146C 

CLCPMN 

ERASE 

TFESE  THREp  used  IN  MIN  IMPLLSE  MODE. 

1521 

E6,  1461 

E6,  146  1 

OLOQRM  IK 

ERASE 

1 522 

REF 

1 

F6  ,1737 

T EMP3  1 

EQUALS 

CAPTEMP 1 

1523 

F.  6,  146  2 

E6  ,1463 

savehanc 

ERASE 

+ 1 

1524 

F6 , 1 464 

E6 , 1464 

PERROR 

ERASE 

1525 

RPF 

1 

F6 ,1450 

CEPRCP 

EQU  ALS 

CYFRPCR 

1526 

PFF 

1 

P6 , 1 452 

RFRRCR 

EGLALS 

DZFPRCR 

R1577 

JET 

STATE  CHANGE  VARTAELES-  ' 

FINE  (TCF JTCHG  ) , J FT 

BITS  RRITTEN  NUH 

( ICO) 

R1529 

{ J 

TSOMNnp),  AND  JE 

T BT  TS  IftPITTEN  AT 

T6  PUPT  (JTSATCFG) 

• 

1530 

E6,  1465 

E6,  1465 

N XT6ACR ' 

ERASE 

1531 

E6,1466 

E6 , 1467 

T6NEXT 

ERASE 

+ 1 

1532 

F 6,1 470 

E 6 , 1 4 7 1 

T6FURTHA 

ERASE 

+ 1 

1 533 

F6, 1472 

E6,  1474 

NFXTP 

ERASE 

+ 2 

1534 

RFF 

1 

E6 , 1473 

NFXTU 

= 

NEXTP  +l 

1535 

REF 

2 LAST  131 

F6 , 147A 

KEXTV 

= 

KEXTF  +2 

153  6 

F6,1475 

E6, 1476 

-2JFTL  IM 

ERASE 

+ 1 

RATE  CCMMANO  4-JET  RATE  DIFFERENCF  LIMIT 

1537 

REF 

1 

F6,  1476 

-RATECe 

FQUALS 

-2JETLIN  +1 

ANC  R7TE  CEAEGANr  FOP  ASCENT  OR  DESCENT 

1538 

PFF 

1 

F6,  1476 

TARGETOB 

EQUALS 

-RATEDB 

MAN.  CCNTCCL  TARGET  DE  CGMFLEMENT. 

( 2 ) 


P152  9 


C,R  AXIS  FRASAfUES 
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L 

ERASABLE 

ASS  IGNMFMS 

USER'S  PAGE  NO.  43  FQ  S4 

15A1 

REF 

n 

LAST 

87 

4742 

RBIT 

EQUALS 

BITIC 

1 5A2 

REP  ■ 

13 

1 AST 

87 

4741 

GRP  IT 

EQUALS 

pnii 

15A3 

PPF 

1 

F6,  1751 

LFRRFR 

ECLALS 

CAPTPFG5 

L',V-AXES  ATT  FRRCP  FOR  RCS  CCNTROL  LAWS 

1 5A4 

PPF 

1 

F6 ,1752 

VEPRCP 

= 

UERROR  +1 

15A6 

E6 ,1477 

F6 , 1477 

PFT JA  [R 

ERASE 

1546 

RFF 

1 

'^6,  1742 

TFNIPNLM 

EOLALS 

DAPTERP4 

1 547 

rff 

1 

F6 ,1743 

NUMEFRT 

EQUALS 

0APTERP5 

154P 

RFF 

1 

F6, 1744 

RFTINCEX 

ECLALS 

CAPTERF6 

1 54C 

PPF 

2 

LAST 

131 

T6, 1737 

ROTc.MP  1 

PQUALS 

DAPTFRPl 

1550 

REF 

1 

E6 , 1740 

PCTFP  F2 

EQUALS 

CAFTERF2 

1551 

REF 

1 

F6, 1741 

POLYTERF 

ECLALS 

DAFTFNF3 

1552 

F6 ,1500 

E6,  1500 

SENSFTYP 

ERASE 

1553 

REF 

n 

LAST 

132 

F6,1737 

APST  J 

EQiJALS 

CAFTERPl 

AES  VALUE  OF  JET-FIRING  TIME 

1 554 

RFF 

4 

LAST 

132 

F6, 1737 

A8SED0TP 

EQUALS 

DAFTERPl 

1555 

RFF 

1 

E6 ,1750 

CPSBURN 

EQUALS 

0APTRFG4 

USED  WITF  SNUFFBIT.  VERY  7FRFCPARY. 

» 
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L 

ERASAPL  F 

ASS  IGNPFMS 

LSFP' S PAGE  NC.  44  EO  S4 

PI  556 

TRIN 

GI^BAL  CFMPCL 

LAW  frasAELES: 

( 1 in ) 

1558 

RFF 

C 

LAST 

132 

F 6 , 1 7 3 7 

GTSTENPS 

EGLALS 

CAFTEPPl 

GTS  IS  PART  CF  THE  JASK. 

1 555 

RPF 

1 

F6 , 174  1 

SH  FT  FLAG 

EQUAL  S 

GTSTFMPS 

+ 2 

CCLN'T  BITS  FCP  GTSQPT  SHIFTING. 

1560 

REF 

7 

LA5T 

133 

E6  , 1744 

IMNCEX 

EGLALS 

GTSTE'^PS 

+ 5 

INCFX  FTP  SHIFT  LCOP  IN  GTSCRT. 

1561 

PFF 

1 

=6, 1505 

SAVESR 

EQUALS 

A X 1 SC  TP 

CANNCT  PE  A CAPOEMP  - GTS  USES  THEM  ALL. 

1562 

REF 

3 

LAST 

133 

F6 , 1 746 

SCRATCH 

FCUALS 

GTSTFMPS 

+ 7 

POGTCVCL  ERASABLE 

1563 

RFF 

4 

LAST 

133 

E6,  1747 

HALF  ARG 

FCLAL  S 

GTSTEHPS 

+ 8C 

RCCTCYCL  EPaSAELE. 

1 56-^ 

REF 

5 

LAST 

133 

F6 , 1 737 

K 2THFTA 

equals 

GTSTERPS 

C.F.,  K*ERPCR,  NEGUSUN 

1565 

REF 

6 

LAST 

133 

E6  , i 741 

KFFNTRAL 

equals 

G.TSTFi^PS 

+ 2 

S.P.,  K FROM  KG  OR  KRCAP,  AT  PI/2(8) 

1566 

PFF 

7 

L AST 

133 

F6, 1 74? 

K2CNTRAI 

EQUALS 

GTSTE^PS 

+ 3 

C.F.,  GTS  SCRATCH  CELLS. 

1 567 

REF 

a 

LAST 

133 

E6,1743 

WCFNTR AL 

EQUALS 

GTSTFMPS 

♦ 4 

S.P.,  FMEGA,  AT  Pl/4  RAO/SEC 

1568 

PFF 

9 

LAST 

13  3 

E6, 1744 

ACEN'TRA  L 

EQUALS 

GTSTFNFS 

+ 5 

S.F.,  ALPHA,  AT  PI/4  PAC/SFC(2) 

1560 

PFF 

10 

LAST 

133 

F6,  1.74  5 

DEL 

EQUALS 

GTSTE^PS 

-^6 

S.F.,  SGN  FLNCTICN  VALUE. 

1570 

RFF 

1 1 

1 AST 

133 

E6 , 1 746 

A2CNTRAL 

E GU  A L S 

GTSTENPS 

■^7 

C.P.,  GTS  SCRATCH  CELLS. 

1571 

RFF 

12 

L AST 

133 

F6 , 1759 

QPCNTR 

EGLALS 

gtstfnps 

■f9C 

S.F.,INFEX  FCP  GTS  LCCF  THPOUGH  Q,R  AXES 

1572 

REF 

1 3 

LAST 

133 

F6 , 1751 

FUFCT ION 

EQUALS 

GTSTFMPS 

+ ICD 

D. P. , ARGLMENT  FCP  G P S G F I , S C P A T C H FCF  GTS 

157^ 

F6  , 1 591 

F6  ,15C3 

^FGUC 

ERASE 

+ 2 

NEGATIVE  OF  G-AXIS  GIMEAL  CPIVE 

A1  574 

NFGUG  +1 

CFFINFC  ANC  LSEC  ELSEWHERE 

15  75 

RFF 

1 

E6 , 15  13 

NEGUP 

EQUALS 

NEGUQ  +2 

NEGATIVE  OF  P.-AXIS  GIMBAL  CPIVE 

1576 

F6,  1504 

F6  , 15C6 

KC 

ERASE 

+ 2 

S.F.,JEPk  term  for  GTS,  AT  PI/2(S) 

1577 

RFF 

1 

F6, 1505 

AX  ISCTR 

EQUALS 

K C 

+ 1 

1578 

R‘=F 

2 

LAST 

132 

E6,1506 

KRC  A E 

EQUALS 

K C 

+ 2 

.3  ACCCOTP  SCALED  AT  PI/2(8) 

1579 

F6,  1 5.)  7 

E6,  1512 

ACCDOTQ 

ERASE 

♦ 3 

C-JEPK  SCALED  AT  Fl/2(7)  LNSIGNEC 

15PC 

REF 

1 

'-'6,1510 

QACCCOT 

EQUALS 

ACCDCTO 

+ 1 

C-JFRK  SCALFC  at  PI/2C7)  STGAEC 

1581 

PFF 

2 

LAST 

133 

F6,  1511 

AFCCCTR 

EQUALS 

ACCDCTQ 

♦2 

P-JEPK  SCALED  AT  PI/2(7)  LNSIGNEO 

1532 

REF 

3 

LAST 

133 

F6,  1512 

RACCDCT 

EQUALS 

ACCDCTQ 

+ 3 

P-JPPK  SCALED  AT  FI/2(7)  SIGNED 

1583 

REF 

1 

F6 , 145C 

CC  IFF 

EQUALS 

CEPRCP 

ATTITLDE  ERRORS: 

1584 

REF 

1 

F6 , 1452 

RDI  FF 

FCUALS 

RFPRCR 

SCALED  AT  PI  RADIANS 

PI  586 

TORQUE 

VECTOR 

RECCNSTPUC  TTCN 

VARIAELFS: 

( 18C  ) 

1588 

PFF 

1 

F6, 1745 

JETRATE 

EQLALS 

OAPTREGl 

1589 

RFF 

1 

F6 , 1 746 

J 'TRATFC 

equals 

JETRATE  +1 

•'HE  LAST  CCNTPCL  SAMPLE  PEPIFD  CF  ICO  MS 

1590 

RFF 

2 

LAST 

133 

F6,  1747 

JETP  ATEP 

equals 

JETPATE  +2 

SCALED  AT  PI/4  R AC  I AN S / S E CONO 

1591 

F6,  151 3 

F6,  1520 

dcwntqrk 

ERASE 

+ 5 

ACCLMLLATEC  JET  TCPCUE  CCNMANCEC  AECLT 

1592 

RFF 

1 

F6 , 151 3 

PCSTCPKP 

ECUAI S 

CCWNTCPK 

+,-P,  +,-U,  +,-V  RESPECTIVELY. 

1593 

RFF 

2 

LAST 

133 

F6,  1514 

NEGTOTKP 

FOU*.  LS 

DCWNTCPK  +1 

EMFICYEC  EXCLUSIVELY  FCF  CCWNLIST . 

1 594 

RFF 

3 

LAST 

133 

E6 , 1515 

PCSTOPKU 

EQUALS 

OCWNTCRK  +2 

NCT  INITIALIZED;  PERMTIED  TC  CVEPFLCW 

G&P;  RFVI5;iDN  116  CF  ACC  PRCC-Rftf>  INARY  BY  NASA  ;021112-C71 
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1 595 

REF 

4 

LAST 

133 

F6,  1516 

MEGTDRKL 

EQUALS 

OCWNTCRK 

+ 3 

SCALEC  AT  32  JET-SEC,  CP  AECUT 

2.0 

JET- 

1596 

REF 

5 

LAST 

134 

E6 , 15  17 

PCSTCPK V 

EQUALS 

DCWNTORK 

+ 4 

MSEC  PER  BIT. 

1597 

REF 

6 

LAST 

134 

F6,  152C 

NEGTCRKV 

ECUAIS 

DCWNTCRK 

+ 5 

1598 

E6,  1521 

E6,  1523 

N<".P  JETS 

ERASE 

+ 2 

1599 

PFF 

1 

<■6,1522 

NC.U JETS 

= 

NC.PJFTS 

+ 1 

1600 

PFF 

1 

C6,  1523 

NO. VJFTS 

= 

NC.UJFTS 

+ 1 

1601 

E6 ,1524 

E6 , 1526 

T JP 

ERASE 

+ 2 

160? 

PEF 

I 

r6,1525 

T JU 

= 

TJP  +1 

1603 

REF 

2 

LAST 

134 

F6,  1526 

T JV 

= 

TJF  +2 

16C4 

E6,  1527 

E6,  1527 

L,PVT-CG 

ERASE 

16A5 

T6, 1 530 

E6  , 1 534 

1 JACC 

ERASE 

+4 

ACCELERATTCNS  CUE  TO  1 JET  TCPQUING 

1606 

DPF 

1 

F6,  1531 

IJACCQ 

EQUALS 

IJACC  +1 

SCALEC  AT  FI/4  R A C I AN S / SE CCN C 

1607 

REF 

2 

LAST 

134 

F6, 1532 

1 JACCP 

EQUALS 

IJACC  +2 

1608 

PFF 

o 

LAST 

134 

F6, 1 533 

1 JACCL 

EQUALS 

IJACC  +3 

FCR  U,V-AXES  TEE  SCALE  FACTCR 

IS 

C IFF: 

1609 

REF 

4 

LAST 

134 

F6 ,1534 

1 J A C C V 

EQUALS 

IJACC  +4 

SCALED  AT  PI/2  R A C 1 AN S / S F C CN C 

(FCR 

ASC  ) 

P1610  A9CFMT  VARIABIES:  (IOC) 


A161? 


1613 

P6 , 1535 

F6 , 1536 

SK  IPU 

ERAS  E 

+ 1 

1614 

RFF 

1 

F6,  1536 

SKIP\/ 

= 

SKIPL  +1 

R1615 

TEE 

FELL  EWING 

LR  CAP 

ERASABLES  ARE 

ZEROED  IN  THE 

STARTDAP  SECTION  CF 

THE  CAPICLFR  PROGRAM  AND  THE 

CGASTASC 

R 161  7 

S'^CTICN 

OF  THE  ACSTASK.  THE 

CPCER 

RUST 

0F  preserved  FCP 

! THE  INCEX  INC 

METHCCS  WHICH  ARE  FNPLCVED 

TM  THESE 

R1619 

SECT  ICNS 

AMC 

ELSEWFERE. 

162  0 

E6 , 1 537 

E6,  1 

544 

ACSQ 

ERASE 

*■  5 

CFFStt  ACC.  estimates,  UFCATFC  in  C.F., 

1621 

REF 

1 

F6  , 1541 

ACSR 

EQUALS 

ACSQ  +2 

ANC  SCALED  AT  PI/2. 

1622 

PEF 

2 

LAST 

134 

F6 , 1 543 

AOSU 

EQUALS 

ACSQ  +4 

UV-AXES  GFFSET  ACC.  FRCMEC  EY  VECTOR 

1623 

RFF 

3 

LAST 

134 

E6 ,1544 

AOSV 

EQUALS 

ACSQ  +5 

ACCITICN  OF  Q,R.  AT  F T /2 

PAD/SEC(2). 

1624 

E6 , 1545 

E6  , 1 

546 

ACSQTFPR 

ERASE 

+ l 

(. 1-.05K  )ACS 

1625 

PFF 

1 

E6 , 1546 

AOSRTFRM 

EQUALS 

ACSOTERM  +1 

scaled  at  FI/4  padians/seccnc. 

R 1626 

FOR 

TJF  T 

LAW 

SUBROUT  INF  : 

(TEMPS  ONLY) 

A1628 

mumbert 

EQUALS 

DAPTFRP5 

CFFINEC  IN  QRAXIS. 

1629 

PFF 

6 

LAST 

133 

E6 ,1 73  7 

ECOTSQ 

EQUALS 

OAPTEMP 1 

1630 

RFF 

2 

LAST 

132 

E6,  1740 

RCTSENSE 

equals 

DAFTERF2 

1631 

REF 

2 

LAST 

132 

E 6,  1741 

F IREFCT 

EQUALS 

0APTERF3 

LOCKED  AT  BY  FAXIS. 

1632 

PEF 

2 

LAST 

132 

E6,1742 

TTCAX  IS 

EQUALS 

CART  EM P4 

1633 

REF 

2 

LAST 

1^2 

F 6 , 1744 

ACRSCIF2 

equals 

CAFTENF6 

1634 

P'^F 

2 

LAST 

133 

E6 ,1745 

HCLCQ 

EQUALS 

DAPTR6G1 

1635 

REF 

1 

F6,l 746 

ACRSCIFl 

EQUALS 

0APTPEG2 

1636 

PFF 

1 

E6,  1 747 

HH 

EQUALS 

DAPTREG3 

CCUELE  FRECISICN 

A 1637 

HH  +1 

EQUALS 

0APTREG4 

163F 

prc 

1 

F6,  1752 

E 

EQUALS 

0AFTREG6 

TIME  SHAPE  W ITH  V^RROR 

1639 

REF 

2 

LAST 

131 

■^6,  1427 

EDOT 

EQUALS 

ONEGA  V 
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1 

ERASABLE 

ASSIGNMENTS 

1 SF  R « S PAGE  NO.  46  EO  S4 

R164D 

INPUT 

TC 

TJET 

law  (PERMANENT 

ERASABLES ) 

o 

(480 

1642 

REF 

1 

F6,  1525 

TJETL 

T JU 

EQUATE  NAMES.  INDEXEC  EY  -1,  0,  +1. 

1648 

F6 ,1547 

F6 , 1626 

BLCCKTCF 

ERASE 

+470 

164  4 

1 

E6,  1567 

1 /ANSI  1 

= 

BLCCKTEF  +160 

THESF  8 FARANETERS  ARE  SET  UR  EV  1/ACCS 

1645 

PFF 

1 

F6, 1 570 

1/ANET2 

= 

IZANFTl  +1 

FOR  MINIMUM  JETS  ABOUT  THE  U-AXIS  WHEN 

1646 

REF 

2 

LAST 

135 

F6 , 1 573 

1 /ACCAST 

= 

1/ANETl  +4 

ECCT  IS  POSITIVE.  TJETLAW  INr'F>ES  EY 

164  7 

OFF 

3 

LAST 

135 

F6,  1575 

ACCFCTZ  1 

= 

i/ANFTl  +6 

ADRSDIFF  FROM  THESE  REGISTERS  TC  PICK  UP 

164F 

pep 

4 

LAST 

135 

E6,1576 

ACCFCTZ5 

= 

1/ANFTl  +7 

PARAMETERS  FOR  THE  PROPER  AXIS,  NUMEER 

1649 

REF 

c 

L AST 

13  5 

E6, 1601 

F IRECe 

= 

1/ANFTI  +1CC 

CF  JETS  ANC  SIGN  CF  EfCT.  THERE  ARE  4E 

1650 

REF 

6 

L AST 

135 

F6 , 1613 

COASTCB 

= 

1/ANETl  +12C 

REGISTERS  IN  ALL  IN  THIS  ELCCK. 

1651 

pc-F 

7 

LAST 

135 

E6 , 16'-!5 

AXISCIST 

= 

1/ANETl  +14E 

FOUR  NCT  referenced  (P-AXIS)  ARE  FILLED 

A1652 

IN  BY  THE  FCLLCWING: 

1658 

RF  5 

2 

LAST 

135 

F6 , 1 547 

ACC5WL 

= 

BLDCKTOP 

SET  BY  1/ACCS  TC  SHEW  WHETHER  MAXIMLM 

1654 

REF 

1 

F6,  1550 

Acr swv 

Aceswu  +1 

JETS  APE  REGUIREC  BECAUSE  OF  AOS. 

1655 

REF 

3 

LAST 

135 

F6,  1555 

FLAT 

= 

BLCCKICF  +6 

WICTH  CF  MINIMUM  IMPULSE  ZCNE. 

1656 

REF 

4 

LAST 

135 

F6, 1556 

ZCNE3LIN 

= 

BLCCKTOF  +7 

FEIGFT  CF  MINIMUM  IMPULSE  ZCNFIAT  4 SEO 

1657 

E6, 1627 

E 6,  16  30 

COFFFG 

ERASE 

+ 1 

CCEFFG  AND  CCEFFR  ARE  USED  IN  ROT-TGUV 

1658 

REF 

1 

F6, 1630 

CCFFFR  • 

EQUALS 

COFFFG  +1 

TC  PFSCLVF  G,P  CCMFCNENTS  INTO  U,V  CCMF. 

A 1659 

R 1660 

VAPIAFLES 

FOP 

GTS-GRAXIS  CONTROL  EXCHANGE. 

(4  ) 

1662 

REF 

2 

LAST 

133 

F6 ,1502 

ALLOW  GTS 

equals 

NEGUQ  +1 

INSERT  INTC  UNUSED  LOCATICN 

16  68 

F6 ,1631 

■=6 , 1631 

CCTPCLFR 

ERASE 

INDICATES  WFICF  CCNTROL  SYSTEM  TO  USE. 

1664 

E6,1632 

E6,  1634 

QGIMT  IMR 

EPASF 

+ 2 

C-GIMEAL  CPTVE  ITMER,  C F C 1 S EC C N C S . 

1 665 

R5F 

1 

F6 , 1 633 

INGTS 

EQUALS 

CGIMTIMR  +1 

INCICATCP  OF  CURRENT  GTS  CCNTPCL. 

1666 

REF 

2 

LAST 

13  5 

F6,  1634 

RGT  MTlivR 

EGLA  LS 

GGIRTif^p  +2 

P-GIMEAL  DRIVE  TIMER,  CECISECCNDS. 

R1667 

PLEASE 

RETAIN 

TFF  CRCFR  CF  CDUXC  THRU  CCUZD  FCR  OCWNLTNK  PURPOSES. 

P 1668 

KALCMANU  :EAP  INTERFACE. 

(9D  ) 

167  ’ 

E6,  16  35 

E6,  1637 

COLXC 

FPASF 

+ 2 

CDL  DFSIPEC  REGISTERS: 

16  71 

REF 

1 

F6 , 1 5 36 

CCUYC 

EQUALS 

CD'JXD  +1 

SCALED  AT  PI  RADIANS  (180  DEGREES) 

1672 

D r F 

2 

LAST 

1 35 

F6, 1637 

CDLZD 

EQUALS 

reuxe  +2 

(STCPF  IN  2S  CCmplEMENT) 

1673 

E6 , 1 64C 

E6,  1642 

CFLCCUX 

'cPASE 

+ 2 

NEGATIVE  CF  DESIRED  lOCMS  CDU  INCREMENT: 

1674 

pep 

1 

, 1641 

DELCCUY 

FQUALS 

CELCDUX  +1 

SCALED  AT  PI  RADIANS  (1£P  DEGREES) 

1675 

pop 

2 

LAST 

13  5 

"6,1642 

DELCCLZ 

EQUALS 

CELCCLX  +2 

(STCP':  IN  2S  CCMPLEMENT) 

R1676 

RETAIN 

: the 

CPCER 

CF  CNEGAFC  TC  CMEGARC  FOR  COWNL INK 

PURPOSES. 

1677 

F6, 1643 

F6  , 1645 

CNFGA  PC 

ERASE 

+ 2 

ATTITUDE-  MANEUVER  DESIRED  RATES: 

1678 

REF 

1 

F6, 1644 

OMEGAQO 

FQUALS 

OMFGAFD  + 1 

(NCT  explicitly  REFERENCED  IN  GTS  CNTPL) 

1679 

REF 

2 

LAST 

1 35 

F6  , 1645 

CMFGARC 

FQUALS 

OMEGAPD  +2 

SCALED  AT  PI/4  R A C I AN S / SEC CND 

R1680 

KALCMANU  STCRAGFo 

(240 

1682 


e6,1646  86,1675  MIS 


ERASE 


+ 22D 


I (18D) 
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LUPERASE  .128 

FACE  136 

L 

ERASABLE.  ASSIGNMFMS 

L SFR  ' S 

PAGE 

NO.  A 7 

EC  SA 

REF  1 

E6  , 167C 

CCF 

ECLALS 

N 1 S 

+ ler  1(6) 

R16EA 

KALCPANU  stgragf. 

(330 

1686 

F6.1676  36,1734 

BCOU 

ERASE 

+ 3nr 

8(3) 

1687 

REF 

1 

F 6,  1701 

K SPNCX 

EQUALS 

BCOU 

+ 3 

E ( 1 ) 

16R8 

P'^F 

1 

F6,17.J2 

KC  FNCX 

EQUALS 

KSPNCX 

+ 1 

B(  1 ) 

1689 

REF 

1 

-6,  1703 

TPl  S 

FQUAL  S 

KQFNCX 

+ 1 

1(18) 

RUST 

BE 

IN 

SAME 

E ANK 

AS 

RCS 

CAP 

16':'" 

pep 

1 

F6 ,1725 

CTFSKEW 

EQUALS 

IMS 

+ 180 

1(6) 

PLST 

BE 

IN 

SAME 

EANK 

A S 

FCS 

CAP 

1691 

REF 

1 

F6 , 1733 

CAF* 

EQUALS 

CCFSKEW 

+ 5 

1(2) 

RUST 

BE 

IN 

SAME 

BANK 

AS 

RCS 

DAP 

169? 

E6,173S  E6,1736 

AM 

ERASE 

+ 1 

1(2)  This  NAS  CNCE  IN  E5  CVERLAYING  CGC 

A1693 

P1694 

FIRST 

-CRCER  OVERLAYS 

IN  KALCMANL 

(250 

1696 

PFF 

2 

LAST 

136 

E6,  17  13 

KVl 

EQUALS 

TMI  S 

1(6) 

1697 

PFF 

■a 

LAST 

136 

F6,1703 

MFISYM 

EQUALS 

TMIS 

I 

1698 

RFF 

4 

LAST 

136 

F6,  1703 

TMFI 

EQUALS 

TM  S 

T 

1699 

PFF 

5 

LAST 

136 

''6 ,1703 

NCCU 

EQUALS 

TMIS 

B 

179C 

REF 

6 

LAST 

136 

F 6 , 1 7P  6 

N'FXTIME 

EQUALS 

TMS 

+ 3 

F 

17.71 

RFF 

7 

LAST 

136 

F6, 1707 

TTFMP 

EQUALS 

TM  S 

+ 4 

B 

1702 

RFC 

8 

LAST 

136 

E6 ,171  1 

KV2 

EQUALS 

TMIS 

+ 6 

1(6) 

17U3 

RFF 

9 

LAST 

1 3 6 

F6,  1711 

BIARTEMF 

ECLALS 

TMIS 

+ 6 

B 

1704 

REF 

10 

LAST 

136 

F6, 1 717 

KV3 

EQUALS 

TMI  S 

+ 120 

1(6) 

1 70  5 

Rcp 

11 

LAST 

136 

E6, 1717 

CGF 

EQUALS 

TMIS 

+ 12C 

I 

1706 

RFF 

2 

LAST 

136 

E6, 1 725 

SPATE 

FOLAL  S 

CCFSKEN 

B 

17C7 

RFF 

3 

1 AST 

136 

F6 , 1 725 

ig 

EQUALS 

CCFSKEN 

I 

1708 

pep 

1 

E6, 1733 

TM 

fqlals 

CAM 

e 

R1709 

SFCCNC- 

CRCER  OVERLAYS 

IN  KALQMANU 

(240 

171  1 

RFF 

1 

E6 ,1  7''13 

K1 

- 

KV  ] 

171? 

FEF 

1 

E6, 1711 

K2 

= 

KV2 

1713 

RFF 

1 

F6,1717 

K3 

= 

K V3 

1714 

REF 

2 

LAST 

136 

E6 ,1 703 

P21 

ECLALS 

KVl 

1(2) 

1715 

pep 

3 

LAST 

136 

E6,  17.J5 

021 

EQUALS 

KVl 

+ 2 

1(2) 

1 716 

RFP 

4 

LAST 

136 

E6 , 17'i7 

G21 

EQUALS 

KVl 

1(2) 

1717 

RFF 

2 

LAST 

136 

F6,  171) 

C2S0P 

ECLALS 

KV2 

I (?) 

1718 

REF 

3 

LAST 

136 

F6,  1713 

C2SQM 

EQUALS 

K V2 

+ 2 

1(2) 

1719 

RFF 

4 

LAST 

1 3 6 

F6 , 1 715 

C2PP 

EQUALS 

KV2 

+ 4 

1(2) 

1720 

REF 

2 

LAST 

136 

F6,  1717 

C 2MP 

equals 

K V3 

1(2) 

1721 

epF 

3 

LAST 

136 

■=6,1721 

C ) PP 

EQUALS 

K V3 

+ 2 

1(2) 

1722 

pep 

4 

LAST 

136 

F6  ,L  723 

CIMP 

EQUALS 

K V3 

+ 4 

1(2) 

» 
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L 

ERAS AELE 

ASS  IGNM  EMTS 

LSEF'S  FACE 

NC.  48 

FO  S4 

1 723 

PPF 

4 

LAST  136 

E6.1725 

VECOTEMF  = 

CGFSKEV 

1724 

REF 

Q 

LAST  135 

06,1635 

crcu 

CCLXC 

1725 

PEP 

3 

LAST  135 

E6, 164G 

OFLOCDU  = 

OELCDLX 

1726 

REF 

] 

E6, 1641 

CFLBCCUl  = 

CELGCUY 

1727 

RPF 

1 

P6,  1642 

DEL0CDL2  = 

CELCCLZ 

R1728 

* ^ 

* 

* >1=  5l<  >i<  >(■  4 

4 4 4 

4 4 4 4 

4 4 

4 4 4 

R 1729 

STCRAGF 

FOR  FINDCnUo 

PI  730 

OVERLAYING  KALTNANIU 

STCRAGF ; 

( 26R) 

1 73? 

RFF 

2 

LAST  13 f E 6, 1646 

ECCUW 

EQUALS 

NTS 

1733 

R = F 

1 

F 6 ? 1 6 A 6 

ECOUlftLSR 

EQUALS 

ECCUN 

eiDTNF 

1734 

FEF 

1 

F6 ,1647 

GCDUWUSR 

EQUALS 

ECDUNLSR 

+ 1 

I ( DTNP 

1735 

RFF 

1 

F6 ,1650 

NCXCCUW 

EQUALS 

CCCUWUSR 

+ 1 

B ( 1 )TNP 

1736 

REF 

1 

F6,  1651 

FLAGCCC!^ 

EQUALS 

NCXCCLU 

+ 1 

e ( 1)TNF 

1 73  7 

P*=F 

1 

■^6 , 1652 

FLPAUTNC 

EQUALS 

FLAGOC^\^ 

+ 1 

B(  DTNP 

1738 

REF 

1 

^6  , 1653 

UNFC 12 

FQUALS 

FLPAUTNC 

+ 1 

I ( 6 ) I N 

1739 

ccF 

1 

E6,  1661 

UNIaC  /2 

EQUALS 

UNFC  /2 

+ 6 

I (6)  IN 

1 740 

RPF 

1 

E6 , 1667 

UNFV/2 

EQUALS 

UNWC/2 

+ 6 

I ( 6) S-S 

1741 

REF 

1 

E6,  1667 

UNFVX /2 

- 

UNFV/2 

1742 

REF 

2 

LAST  137  E6.1671 

UNFVV/2 

= 

UNFV/2 

+ 2 

1743 

REF 

•a 

LAST  137  F6,1673 

UNFVZ/2 

= 

UNFV/2 

+ 4 

1744 

RPP 

4 

LAST  137  F6,1675 

-nELGNB 

FQLALS 

UNFV/2 

+ 6 

E(3)TNF 

R1745 

R 1746 

DEFINED  IN  THE  NCRK 

AREA  : 

(180 

1748 

UOOO 

UNX/2 

= 

a 

1 74  9 

0006 

UNY/2 

= 

6 

1750 

CC14 

UNZ/2 

= 

14 

R1751 

R 175? 

END 

CF 

FINOCDUW  EPASAELFS 

R1  753 

>!■  ^ 

* 

^ 

4 4 4 4 

^ ^ 

* 

R1754 

* 

'r  ^ 

4 4 4 4 

4 4 4 4 4 4 

4 4 4 

4 4 4 4 

4 4 

4 4 

R 1 755  STCRAGF  FflR  P?7 


PI  756 
175g 

PFF 

OVERLAYING  KALCNANII  AND 
3 LAST  137  F6,1646 

FINCCCLW  STORAGE: 

VECl  EQUALS 

M IS 

U2C) 

I ( 6 ) TNP 

1750 
PI  760 
R 1761 

ROF 

FND 

1 '^6,1654 

CF  P57  ERASABLES 

VFC2  EQUALS 

VFCl 

+ 6 

1(6  )TNP 

P1762 


>,•<  » >1<  # 
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L 

FRASAELE 

AES  IGNMEK'TS 

USER' 

'S  PAGE 

AC.  49 

EO  S4 

P 1763 

THE 

FOLLOF.ING 

ARE  THF 

DAP  PEPLACE'-ENTS 

FOR  the  ITEPFS  ANC  PUFTREGS ,NEECFC  BECAUSE 

DAP  IS 

NOW  A TOe 

, JASK  ,JAB  ,TCSK 

R1765 

• • e 

ANYWAY 

, the 

CAP  CAN  MOW  BE 

INTERRLPTEO. 

(180 

1 76  7 

E6 ,1737 

E6 ,1760 

CAPTEPFl 

FRASE 

+ 17D 

176R 

REF 

7 

LAST 

136 

E6  , 1 74C 

CAPTPPP2 

ECLAl S 

DA  FTEPFl 

+ 1 

1769 

REP 

8 

LAST 

138 

86,1741 

DAPTEHP3 

EQUALS 

DAPTFPP 1 

+ 2 

177' 

REP 

9 

LAST 

138 

P6 ,1742 

CAPTENF4 

E CU  A L S 

CAFTEPPl 

+ 3 

1771 

REF 

10 

LAST 

138 

P6, 174^ 

DAPTEPRE 

EQUALS 

DAFTE8P1 

+ 4 

1772 

PEP 

11 

LAST 

138 

F6 ,1744 

D APT  EVF6 

EQUALS 

CAPTERP 1 

+ £ 

1773 

REF 

12 

LA  S7 

1 3F 

E6  ,l 745 

CAPTREGl 

EQUALS 

CAPTFPPl 

+ 6 

1 774 

REF 

13 

LAST 

138 

E6,  1746 

DAPTRPG2 

EQUALS 

DAFTENPl 

+ 7 

17  75 

PEE 

16 

LAST 

138 

86,1747 

CAPTPEG3 

EQUALS 

DAPTEPiPl 

+ 8C 

1776 

REF 

15 

LAST 

1 

E6, 1750 

DAPTREG4 

fclals 

CAPTENPl 

+ 9E 

1777 

PEE 

16 

1 AST 

138 

E6, 1 751 

OAPTP  FGE 

EQUALS 

DAPTEPPl 

+ ICC 

1778 

REP 

17 

LAST 

138 

F6,]752 

CAFTPEG6 

EQUALS 

CAPTFPP 1 

+ 1 1C 

1779 

RFF 

1 8 

L AST 

138 

E6 , 1753 

DAPARLPT 

EQUAL  S 

CAOTEPPl 

+ 12C 

1780 

PEE 

1 

E6 ,1754 

C A PL  R U P T 

EOUAl S 

DAPARLPT 

+ 1 

1781 

REF 

2 

LAST 

138 

E6,1755 

CAPBCRFT 

EQUALS 

DAPAPUPT 

+ 2 

1 782 

P'^F 

3 

LAST 

138 

F6,  1757 

DAPZR  LP  T 

EQUALS 

DAPARLPT 

+ 4 

A 1783 
A1784 

( CAPZRLPT 

IS  ALSO 

JASK-IN- 

FPCGPESS  FLAG) 

R1785 

AEEOLER  ( ATTI'^HCF  ERROR  EIGHT  BALL  DISPLAY)  STORAGE. 

( 6C  ) 

1787 

1788 
1 789 

REF 

REF 

3 

4 

LAST 
L AST 

c 5 
95 

006  1 
0063 
E6 , 1 761 

E6 , 1763 

T5TEPF 

DINDX 

AK 

EQUALS 

EQUALS 

ERASE 

ITEMPl 
I TEHP3 
+ 2 

afedler 

ATTITUDE  INPUTS,  SCALED  AT 

180 

1790 

1791 

Rfrp 

prp 

1 

2 

LAST 

138 

?6, 1762 
F6, 1763 

, AKl 
' AK2 

FGUALS 

equals 

AK  +1 
AK  +2 

CEC-REES 

. P,C,R  AXES  IN  AK,AK1,AK2. 

1792 

1793 

1794 

REF 
V PEF 

1 

2 

LAST 

138 

P6 ,1 764 
E6, 1765 
F6,1766 

P6 ,1766 

ECR  I VEX 
EDPI VPY 
ECRIV  FZ 

ERASE 

EQUALS 

EQUALS 

+ 2 

ECRI  V'^X 
ECRIVEX 

+ 1 
+ 2 

NEECL  ER 
SC  that 

DISPLAY  REGS  AT  I8CC  DEGREE 
384  PITS  REPRESENT  42  3AI6 

s • 

CFG. 

P 1795 

CTCKFD 

JET. 

I AH  1 R I T I C A 

CCLATEPS 

(30 

1 797 
1798 

pr.f 

1 

E6,  1767 
86,1770 

E 6 , 17  7 1 

PJFTCTR 
I)  JETCTR 

ERA  SE 
EQUALS 

+ 2 

F JETCTR 

+ 1 

1790 

REF 

2 

1 AST 

138 

E6,  177  1 

V JETGTR 

equals 

PJFTCTR 

+ 2 

18QC 

REF 

1 

E6, 1T71 

end-e  e 

EQUALS 

V JETCTR 
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1.  ERASAPLE  ASSTG^^'F^TS 


USER'S  PAGE  NO.  5C  EC  SA 


P18H  1 

FBANK-7  ASSIGNMENTS 

1802 

F7 , 1400 

SETLCC 

3400 

R 180  3 

P35  CONSTANTS. 

-pad  leaded- 

(4C  1 

1808 

1806 

E7, 1400 
F 7, 1402 

F7,  1401 
E7,1403 

ATIGINC, 

P^IGINC 

ERASE 

ERASE 

+ 1 
+ 1 

B(2)PL  ^MtST  PE  AT  1400  FCR  SYSTENSTEST 
R(  2 IPL 

R18  >7 

AOTMARK  STORAGE. 

-PAC  LOADED- 

(120 

1 809 
18  Ul 

E7 , 1404 
F 7 , 1 4 1 2 

E7 , 141 1 
F 7, 14  17 

ACTAZ 

AGTFL 

ERASE 

ERASE 

+ 5 
+ 5 

E(  6 )PL 
E (6  IPL 

R1811 

LANDING  FACAR. 

-PAC  LCADFD- 

( 2C  ) 

1813 

1814 
A1815 

F7 ,142  0 
E7,  1421 

F7 , 142  ) 
'=7,1421 

LRHMAX 

LRWH 

ERASE 

ERASE 

8(1) 

8(1) 

R 18  1 6 

THROTTLF  STORAGE, 

-FAC  leaded- 

(1C) 

1818 

E7,  1422 

E7,  U22 

ZCOMT IME 

ERASE 

B(1)PL  tine  of  CPS  TFRCTTLE-UP  CCNMANC 

R 1819 

P63  AND  P64  CGNSTAMS.  -PAC 

lfadec- 

( 4C  ) 

1821 

E7  , 1423 

E7  , 1423 

tender AK 

ERASE 

E ( 1 ) 

LANCINC  PHASE  SWITCFINC  CRITERION 

1822 

1823 

A18:’4 

F7 ,1424 
F7,1425 

E7,  1424 
E7  , 1425 

TEMCAPPR 

OFITTFAF 

ERASE 

ERASE 

B(  I) 
8(1) 

LANDING  PHASE  SNITCHING  CRITERICN 
increment  added  to  TTF/6  RFEN 
SWITCHING  FROM  863  TC  P64 

1 625 
A1826 
A1  827 

F7 ,1426 

E7 , 1426 

L E act  IM  E 

FPASF 

B ( 1) 

TINE  INCREMENT  SPECIFYING  HCW  MUCH 
GUIDANCE  IS  PROJECTED  FORWARD. 

R182P 

LANDING  RADAR 

FAC  LCACFC 

- 

( 20 

18  30 
1831 
A1832 

.57,  1427 
F7 ,1433 

=7,1427 
E7,  1430 

RPCRTIME 

PPCRTGSV» 

ERASE 

ERASE 

B ( 1 ) 
B(  1) 

REFCSITICNING  CRITERION  (TINE) 
PEPCSITICMNG  CRIIEPICN  (ANGLE) 

R1833 

ASTEFR  -FAC  LCAOED- 

(20 

1835 

A1836 

E 7, 1431 

F7 , 1432 

TNEWA 

ERASE 

+ 1 

I(2)PL  LAMBFRT  cycle  PEPICD 

R1837 


P22  STCR^GE 


rvFPLAYS  LANCING  PACLCACS 


( 5C  ) 
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L ERASABLE  ASSTGNREMS  LSEP'S  PAGE  NO.  51  EO  SA 


183° 

A1 

18A1 

ppr 

1 

1 

E7, 1423 
E7 , 1424 

PEPCSCNT 

RFPCSTN 

ECLAL  S 
ECU ALS 

T E N D 8 R A K 
REF°SCNT 

■H 

E ( 1 )TNF 
I<  2)fRP 

COUNTS  number  CF  PASSES  TFROUGF 
REFCSITICN  ROUTINE. 

PRESENT  TIME  PLUS  INCPEMENTS  CF 

A1RA2 
1 8A3 
A 18AA 

PEE 

1 

E7 , 1426 

DELTATM 

EQUALS 

REPnSTM 

+ 2 

I ( 2 ITNP 

TEN  SECCNDS. 

TINE  INTERVAL  FCP  FLNNINC 
CESIC-NATE  TASK. 

A],  BA 5 

R16A6 

RETAIN  THE 

ERCER 

CF  CELVSLV, 

TIG, 

PTAPG,  CELLT4  FOR 

UPDATE. 

R1847 

P32-35 

P72- 

■75  STORAGE. 

I6C  » 

1 84° 
1650 

PEE 

1 

E7,1433  E7, 

E7 ,1433 

1441 

CELVLVC 

CELVSLV 

ERASE 

CELVLVC 

+ 5 

1(6)  DELTA  VELCCITY  - LOCAL  VERTICAL  CCC 
(TEMP  STORAGE  CF  SAME  VECTOR)  -RCINATE 

A 1 R 5 1 


R1852 

F30-P40 

INTERFACE  UNSFAFFC. 

( 2C  ) 

1854 

E7,  1441 

°7  , 1442 

TIG 

ERASE 

■n 

B(2) 

A1  855 

R 1856 

IN'ITVEL 

STGRAGF.  ALSr  LSEO  BY 

F34  ,35,74 

,75,  1C, 

11  CTFERS 

(8C  ) 

1858 

C7,  1443 

E7,  1450 

RTARG 

ERASE 

+ 5 

1(6)  TARGET  VECTOR 

1859 

F7 ,1451 

E7,  1452 

CfLLT4 

ERASE 

+ 1 

1(2)  TINE 

C IFEERENCE 

Al86n 

R1861 

P30-P40 

INTERFACE  UNSHARED. 

(30 

186? 

E7, 1453 

E7, 1454 

TTCGG 

ERASE 

+ 1 

0(2) 

1 864 

REF  1 

F7,  1453 

TFI 

EGUALS 

TTCGC 

1865 
A 1 866 

67, 1455 

E7,  1455 

WHICH 

ERASE 

B(  1 ) 

R1867 

R21 

( 1C  ) 

1 869 

C7 ,1^56 

E7,  1456 

LCSCCUNT 

ERASE 

B(  1) 

A1870 

R1871 

LSR22 .3 

(RENDEZVOUS 

NAVTGATICN)  storage 

. 

(40 

R 1 87? 

RETAIN  the  CRDPR  CF  A I TO 

TRKNKCNT 

FOR  downlink  PURPOSES. 

18  74 

67,1457 

F 7 , 1 4 5 7 

AIG 

ERASE 

E ( 1 )CLT 

C- IN  GAL  ANGLES 

1875 

E7,  1460 

E7,  1460 

AMG 

FRASE 

B(  dolt 

(NLST  BE 

1876 

F7,1461 

E7,  1461 

ACG 

ERASE 

B ( 1 )OUT 

rONSECUTI VE ) 

1877 

F7, 1 462 

E 7,  1462 

TRKMKCNT 

FRASE 

e ( 1 )t  NP 

TENFCFARY  MARK 

STORAGE. 

1678 

REF  1 

E7 ,1462 

MARKCTR 

= 

TRKMKCNT 

» 
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L FRAS4BI.F  ASSIGNMFKTS 


USER'S  PAGE  NO.  52  ECS4 


P1879 

P32-P35,  P72-P75  STOPAC-F.  - 

PERMANENI- 

(6  ) 

IfiFL 

F7,1463 

E7, 1463 

NOPNEX 

ERASE 

E(  1) 

PRRI  SAVE  FCP  Q 

1882 

E 7 , 1 4 6 4 

F7,  1464 

QSAVFC 

ERASE 

P ( 1 ) 

PRM  SAVE  FOR  Q 

188? 

E7 , 1465 

E7,  1465 

RTRN 

ERASE 

6(1) 

FP!"  SAVE  FCP  C 

188^ 

F7 , 1466 

E7,1467 

NN 

EPAR  E 

+ 1 

6(2) 

1885 

E7, 1470 

97 , 1470 

SUBEXIT 

EPA  SE 

E(l) 

FPR  SAVE  C 

1886 

'=7,1471 

E70VERLA 

EQUALS 

START 

OF  El  OVERLAYS. 

1887 

REF 

1 F 7 , 1 4 7 1 

WFOCARFS 

ECUALS 

E7nVERLA 

CURRY 

FCP  EEANK  INSENSITIVE  2CA0PS 

?.l  888 

LUNAR  LANCING  CVERLAVS 

( 60 

1890 

REF 

1 E7,1463 

/AFC/ 

EQUALS 

NCPMEX 

B(2)TPP  throttle 

1891 

PFF 

1 F7,1465 

FCODD 

EQUALS 

/AFC  / 

+ 2 

E(2)TNF  THPCTTLE 

1 8S2 

1 F7,1467 

FP 

EQUALS 

FCODP 

+ 2 

B(2)TRP  THPCTTLE 

A189? 

P1804 

ERASAELFS  FCR  P64:  CVEPLAY  GF  R7ARG 

(40 

18  96 

REF 

1 F7,1443 

ZERL  INA 

ECUALS 

RTARG 

B(  1 ) 

P'6  4 

1897 

REF 

1 97,1444 

EL  LIRA 

ECUALS 

ZEPLINA 

+ 1 

Ed) 

F64 

1898 

REF 

1 F7,1445 

AZ  IMCR  1 

EQUALS 

ELVIRA 

+ 1 

8(1) 

F64 

1899 
A 1900 

1 E7,1446 

ELINCRl 

ECUALS 

A ZINCPl 

+ 1 

8(1) 

P64 
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L ERASABLF  ASSIGN'MEMS 


LSFR*  S PAGF  NO.  52  EC  SA 


P19'>1 

< 'K’J  ■(  >! 

OVERI 

AY  NL^^BFR  C IN 

EBANK  1 

A 190  2 

R 1 90’ 

R^NDEZVQU 

5 GLIDANCE 

STQFAGF  - 

F22. . . . P35 

(89D  ) 

190  9 

P^F 

1 

F7,  1611 

TSTRT 

equals 

OELDV 

MOCCLFS 

E START  TIME 

1906 

REF 

1 

F7, 1573 

TCEC2 

EQUALS 

DELVCSI 

TEMP  STORAGE  FCR  INTEGRATICN 

TIME  INPUT 

1907 

REF 

1 

E 7 , 1 5 7 5 

KT 

EQUALS 

DELVT  FI 

TENF  STCFAGE  FOR  MICCOURSE 

DELTA  TIME 

1908 

F7, 1471 

F7,  1476 

VACT  1 

FRASE 

+ 5D 

VFLCCITV 

VECTCR  OF  ACTIVE 

AT 

CSI  TIME 

1909 

F7,1477 

E7 , 1504 

PFASS  1 

ERASE 

+ 50 

POSIT  IGN 

VECTCR  CF  PASSIVE 

AT 

C S I T I M e 

191') 

E 7, 15  15 

E7,  15  12 

VPASS  1 

ERASE 

+ 5C 

VELOC  ITY 

VECTCP  CF  PASSIVE 

AT 

CSI  TIME 

191  1 

F7 , 1513 

E7, 1520 

V ACT2 

ERASE 

+ 50 

vflcc  T TY 

VECTCR  CF  ACTIVE 

AT 

CCH  T IMF 

1912 

F7, 1521 

£7,1526 

RFASS2 

ERASE 

+ 5F 

FCSIT  ICN 

VECTCR  OF  PASS  TVF 

AT 

CDF  TIME 

1913 

'=7,152  7 

E7,  1534 

VPASS2 

ERASE 

+ 50 

VEICC  ITY 

VECTOR  OF  PASSIVE 

AT 

CCF  TIME 

191A 

F7.1535 

E7,  1542 

RACT3 

ERASE 

+ 5C 

PCSI T ICN 

VECTOR  OF  ACTIVE 

AT 

TFI  TIMF 

1915 

E 7,  1 543 

F7,  1550 

VACT3 

EF  ASE 

+ 5D 

VELCC  ITY 

VECTCR  CF  ACTIVE 

AT 

TPI  time 

1916 

F7 , 1551 

27,1556 

RPASS3 

ERASE 

+ 50 

FGSITICN 

VECTCR  CF  PASSIVE 

AT 

TFI  TIME 

1917 

'=7,1557 

£7 , 1564 

VFASS2 

ERASE 

+ 5F 

VELOC  ITY 

VECTCR  CF  PASSIVE 

AT 

TPI  TIMF 

1918 

F7, 1 565 

■=7,1572 

VACT  4 

ERASE 

+ 51 

VELCC  ITY 

VECTCR  CF  ACTIVE 

AT 

INTERCEPT 

1919 

REF 

1 

F7 ,1543 

UNVFF 

EQUALS 

VACT3 

CDHYVR  LMT  VECTCR  tenF  STCPAGF. 

1920 

F 7, 15 73 

E 7 , 1 5 7 4 

OFLVCSI 

FRASE 

+ 1E 

THRUST  VALUE  AT  CSI 

1921 

E7, 1575 

E7,  1576 

DFLVTPI 

ERASE 

+ ID 

THPLST  VALLE  AT  TFI  OP  MO 

1922 

REF 

2 

LAST 

142 

F7,1575 

CFLVM IC 

equals 

OELVTFI 

192? 

E7  , 1 577 

E7, 16CC 

DIFFALT 

ERASE 

+ 10 

ALT  DIFFERENCE  AT  CCH 

1924 

F7, ISOl 

E7,  1602 

POSTC SI 

ERASE 

+ 1 

PFP.IGFF 

ALTITLDE  AFTER  CSI 

MANEUVER 

1925 

F7 ,1633 

■=7 , 1604 

FCSTCCH 

ERAS  F 

+ 1 

PER  IGEE 

ALTITUDE  AFTER  CDH 

MANEUVER 

1926 

F7 , 1605 

F 7 , 1 6 C 6 

PC STTFI 

E P A S F: 

+ 1 

PERIGEE 

ALTITUDE  AFTER  TPI 

MANEUVER 

1 927 

RFF 

1 

E7 ,1605 

LCCPCT 

EQUALS 

pcsttpi 

CSI  NEV>TCN  ITERATION  CCLNTER 

1928 

REF 

1 

97,1602 

HA FPAl 

ECLALS 

PCSTCCH 

HALF  FERIOO 

192° 

F7, 1607 

E7,  16  1C 

ga>^prev 

FRA  SE 

+ 1 

FPEVI  CIS 

gamma 

19?  ■) 

RRF 

3 

LAST 

142 

E7, 1575 

CVPREV 

EOU  ALS 

CELV-rFI 

PREVICLS 

DELVCSI 

1931 

E7, 1611 

F7 , 1612 

DELDV 

ERASE 

+ 10 

1932 

E7, 1613 

E7,  1614 

CS  I ALRM 

ERASE 

+ 1 

FIRST  SCLLTICN  ALARM 

1933 

'■7,1615 

E7 , 1615 

VERBNCUN 

ERASE 

1934 

REF 

1 

F7,  1613 

T T ter 

ECLALS 

CSI  ALPN 

ITEPATICN  CCUFTER 

1 935 

F7 ,1616 

F7 , 1617 

RCFTV 

ERASE 

+ 1 

1926 

9<=F 

1 

F7,  1505 

VAFPEC 

equals 

VFASSl 

1<6)  S-S 

PREC  VEC  FCR  NCM 

TPI 

T!ME(ACT  V 

1937 

pr  F 

1 

= 7,  1477 

R APRFC 

EQUALS 

P PASS  1 

1(6)  S-S 

PPEC  VEC  FCR  NCM 

TP  I 

T IME( ACT  V 

1 938 

REF 

1 

E7  , 1527 

VPPREC 

equals 

V FASS2 

1(6)  S-S 

PREC  VEC  FCR  NCM 

TFI 

T 1 ME  ( PASS 

19  39 

RFF 

1 

F7,  152  1 

RPPRFC 

FQL ALS 

RPASS2 

1(6)  S-S 

PREC  VEC  FOR  NCM 

TP  I 

T IME( PASS 

1940 

RFF 

4 

LAST 

142 

£7,  1575 

DELEL 

EQUALS 

DEL VTPI 

1(2)  S-S 

194  1 

PEF 

2 

LAST 

142 

E7 , 161  1 

C E L T E E 

FCUALS 

CELOV 

I ( 2 )S-S 

1942 

REF 

2 

LAST 

142 

F 7, 1573 

SFCMA  )( 

ECLALS 

DELVCSI 

1(2)  S-S 

MAX  STCF  SIZE  FCR 

ROUT  INF 

1943 

RFF 

2 

LAST 

142 

E7.16  )5 

fflTFEO 

EQUALS 

POSTTPI 

1(2)  S-S 

BACK  VALLES  CF  DELTA 

TIMF 

1944 

F 7, 1620 

E7 , 1621 

CCNTANG 

ERASE 

+ 1 

1(2)  S-S 

CFNTRAL  angle  CCVERED ( TP  I-TPF  ) 

A1945 
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EO 

S4 

R 1946 

■ SOf'E  P47  STCRAGE 

(6E  ) 

1 94  8 

E7,16?2  E7,1627 

CELV  IML 

ERASE  +5 

IieiDSF  NCUN  E3  FCR  F47  DELTA 

V 

( IML  ) 

A 1949 

R195n 

P3C-P40  CCMPCN  STOPAGF, 

( 3C  ) 

195? 

1953 

E7,1630  F7,1631 

97,1632  E7,1632 

TPASS4 

CTEPF 

ERASE  +1 
ERASE 

INTERCEPT  TIME 

KllTMP  GCMMPN  RETURN  SAVE  REGIS 

TER. 

A 1954 


R 1955 

P32,33,34  STCRAGE. 

( 6C  ) 

1957 

F7, 1633 

E7, 1634 

TCSI 

ERASE 

+ 1 

E (2  ) 

TMP 

CS  1 T IME 

IN  CENTISECONCS 

1 958 

E7,  1635 

E7,  1636 

TTP  I 

ERASE 

+ 1 

B(2) 

TMP 

TPI  TIME 

IN  CENTISECCNCS 

1959 

F7, 1637 

>"7,1640 

TTFIO 

ERAS  E 

+ 1 

8(2) 

TMP 

TTPI  STCRAGE  FCP  PECTCLE 

P1960 

P3G,P40  INTERFACE, 

(210 

1962 

F7,1641  57,1664 

PTIG 

ERASE 

+ 19D 

I ( 6 )TMP 

1963 

REF 

1 

E7,  1647 

VTIG 

FCLALS 

PTIG 

+ 6 

I (6  )TNF 

1964 

RFE 

1 

F7, 1655 

DELVS IN 

EQLALS 

VTIG 

+ 6 

I ( 6 ) TMF 

1965 

PFR 

1 

F7,1663 

CELVSAB 

F CLI  A 1 S 

GELVS  IN 

+ 6 

I ( 2 )tmP 

1966 

REF 

1 

F7,  1663 

VGDI SF 

= 

OELVSAB 

1 967 
1968 

REF 

1 

F7 ,1665  E7,  1665 

F7  , 1 665 

QTEMP  1 
RGFXIT 

ERASE 
EGUA  LS 

GTEMFl 

I ( DTMF  FCLCS  P5TLPN. 
SAVE  G 

1969 

pep 

2 

LAST  142  F7,1665 

SAVQR  52 

EQLALS 

CTEMPl 

R1  97C 
P 1972 

INITVEI.  STCPAC-F.  (IN  CVEFLAY 
( CALLS  LAMBERT  , CCNIC 

0 ANC  CVEPLAY  1. 
SLBRCUT  TNES  I 

(20 

1973 

1974 

1975 

RFF 

RFF 

1 

• 1 

E7,  1565 
E7 ,1616 

57,1666  E7,1667 

vtprime 

TTCTR 

C0ZY4 

EQUALS 

EQUALS 

ERASE 

VACT4 

RECTV 

+ 1 

TOTAL  VEICCITV  AT  DESIFEC  RADIUS 
ITERATION  CCUNTEP 

CCS  OF  ANGLE  WEEN  ROTATION  STARTS 

1976 

1977 
A1978 

REF 

RFF 

3 

1 

LAST  142  57,1611 

F7,  1607 

X 1 INPUT 
INTIME 

EQUALS 

FCLALS 

DELDV 

GAMPPEV 

XI  TEMP  STCRAGE 
TIME  CF  PIN  IT 

R 1 979 

PERIAFC  STCRAGE.  (?0 

(20 

1981 

E7,167C  57,1671 

XXXALT 

ERASE 

+ 1 

RADIUS  TC  LAUNCE  PAC  OR  LANDING  SIGET 

1982 

P5F 

1 

F7, 1672 

5ND-IN/M 

rOUALS 

XXXALT 

+ 2 

NEXT  AVAIL  ERASABLE  AFTER  I MTV  EL  AM  I D G IM 

Gi\P 
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R1983 

SAO.l  STFRAGE. 

( 12C  1 

19E5 

E7.1672 

E7,  17C5 

UT 

ERASE 

+ 1 ID 

1(6) 

THPLST  CIPECTICN 

19«6 

9 F P 

1 

F7,  1700 

VGTIG 

EGLALS 

UT 

+ 6 

I ( 6 )CUT 

1987 

9EF 

1 

E7,  17(’C 

VGPRE\i 

= 

VGOIG 

R 1 9 8 8 

ASTEER 

STFRAGE. 

( 220  ) 

1990 

E7, 1 7C6 

E7  , 1733 

VG 

ERASE 

+ 21C 

I (6) 

1991 

PEE 

1 

17,1716 

P.MAG 

EQUALS 

VG 

+ 6 

1(2) 

1992 

PEF 

1 

F7,1716 

^UASTEEP 

eCUALS 

PNAG 

+ 2 

1(2) 

1993 

PEE 

1 

F7,  1 720 

I'L/A 

ECLALS 

PLASTEER 

♦ 2 

1(2) 

199A 

PPE 

1 

F7  ,1722 

RTMAG 

EQUALS 

ML/A 

+ 2 

1(2) 

1995 

PEE 

1 

07,1 726 

PIC 

ECUALS 

RTMAG 

42 

1(6) 

1996 

PEE 

1 

E7,  1732 

s s 

EQLALS 

R 1C 

46 

1(21 

1997 

REF 

2 

LAST  163  E7,1655 

IC 

= 

DELVSIN 

1998 

PFF 

1 

<=7,  1762 

TIGSA VE 

= 

P21TINE 

1999 

REF 

1 

E7, 1766 

T IGSAVFP 

= 

SCAXI S 

2000 

RFF 

2 

LAST  166  F7,1766 

^'USCALF 

= 

SCAXIS 

42 

R2001 

R2C02 

F40  STORAGE. 

(60 

P 2C0A 

F,NDCT,AKD  TOFCAY  wlST  8E 

CFATIGLCL 

S FCP 

VLCAC. 

7 DOS 

E7,  1736 

F7,  176  1 

F 

ERASE 

45 

I (2)-oNF 

S60.1  GENERATES 

This 

FCR  S60.3 

2096 

REF 

1 

F7, 1 736 

MCOT 

EQUALS 

F 

4 2 

T ( 2)TMP 

MASS  CHNG  RATE  , KG/CS 

AT  26*3. 

2007 

REF 

1 

E 7, 1760 

TDECAY 

EQUALS 

MCGT 

42 

I ( 2 ) IN 

FELTA-T  TAILOFF, 

( 2’>*28  )CS. 

2003 

E7, 1762 

E7  , 1763 

VEX 

ERASE 

4 1 

T(2)  EXHALST  VELCCITY  FCP 

TGC 

CCMPUTAT  *N 

A2009 

P2010 

MTCT0AVK2)  STOFAGF, 

(CAL  ISC 

BY  F60,F61,P62) 

(1C) 

2012 
A20 1 3 ' 

E7 , 1 766 

E7,  1766 

IPETURNl  FPASE 

8(1) 

RETURN  FROM  MICTCAM  AND  2 
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P2T  1 9 
A 201  5 

^ ){t  )}(  a}t 

PVFPLAY  AUREER  1 IN 

EBANK  7 

R?'l6 

IMTVEL  (CALLFC  EY 

F39 , 35  , 38 

,39,  10,  11, 

S90.9, S9U.  1) 

( 60  ) 

2018 

A2019 

PEP 

1 

F7,1471 

RT ARGl 

ECUALS  VACTl 

I(6)S  TEVP  STCRAGE  OF  RTARG 

R 2020 

F35-P4C  INTEFFAfE. 

1 6C  ) 

202  2 

REF 

2 

LAST  192  E7,15C5 

VPASS4 

EQUALS  VFASSl 

T(6)TYP  VELOCITY  OF  PASSIVE  AT  INTERCEPT 

R2023 

LAT  - 

L C N f: 

TEMPORARIES. 

CAN  OVERLAY  WITH  S9C. 1 

(30 

2C25 

RFF 

2 LAST 

199 

E7 , 1672 

ERACN  equals 

UT 

1(2) 

2'>26 

REF 

1 

E7 , 1679 

INCORPEX  EQUALS 

ERADN 

+ 2 

1(1) 

R2C27 

LRS29.1  STORAGE.  (CAN  SPARE 

W ITF  P30  ’S  ) 

(9CD) 

2029 

REF 

1 

F7,  1675 

RLMSRCH 

EQUALS 

I NCCPEEX 

+ 1 

1(6) 

T'vp  LM  POSITION  VECTOR 

2 J30 

RFF 

1 

F7,  1703 

VXRCM 

EQUALS 

RLMSRCH 

+ 6 

1(6) 

CM  V X R VECTOR 

2n31 

REF 

1 

E7,171  1 

LCSCESRC 

EQUALS 

V X R C N 

+ 6 

1(6) 

CESIPFD  LOS  VECTOR 

20  3 2 

REF 

1 

F7,1717 

UXVECT 

EQUALS 

LCSDESRD 

+ 6 

I (6) 

X-AXIS  SRCF  PATTERN  COORCS 

2033 

REF 

1 

E7 , 1725 

UYVECT 

EQUALS 

UXVECT 

+ 6 

1(6) 

Y-AXIS  SPCH  PATTERN  OCCRCS 

2039 

REF 

1 

F7,  1733 

DATAGCCC 

FQUALS 

UYVECT 

+ 6 

EdirSP  FOP  R1  - ALL  1-S  NFEN  LCCKCN 

2035 

R£F 

1 

F7,  1739 

OMEGDI  SP 

EQUALS 

DATAGCCD 

+ 1 

6(2) 

ANGLE  ONEGA  CISFLAYEC  IN  R2 

2'‘36 

REF 

1 

F7,  1 739 

ONEGA  C 

= 

CNEGCISP 

PINBALL  DEFINI TICN. 

2037 

RFF 

2 

LAST  195  F7,1736 

NSRCHPNT 

ECUALS 

CNEGCTS  F 

+ 2 

B(1)TNP  SEARCF  PATTE-PN  PCINT  COUNTER, 

2 03  8 

PEP 

1 

F7, 1737 

savlemv 

EQUALS 

NSRCHPNT 

+ 1 

1(6) 

S-S  SAVES  LCSVFL 

GAP 
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P20Afl  ****>!<*#  CVERLAY  NLNBEP  ? 1 EEANK  7 

A?OA] 


P 2CA2 

TNGORP 

STORAGE  IN  F7. 

(470) 

2044 

REF 

2 

LAST 

141 

E7, 1471 

TX785 

EGLALS 

F7CVERLA 

1(6) 

2 045 

REF 

1 

E7,  1477 

GAMMA 

EQUALS 

TX789 

+ 6 

M3) 

2046 

RPF 

1 

E7,  1502 

CMEGA 

EQUALS 

GAMMA 

+ 3 

1(18) 

2047 

REF 

1 

'^7,1524 

BVECTCR 

EQUALS 

CNEGA 

+ 18C 

1(18) 

2048 

REF 

1 

E7, 1546 

dfltaq 

EQUALS 

BVECTCR 

+ lEO 

1(2) 

R2C49 

AOTMARK  STORAGE 

( 3C  ) 

2051 

REF 

1 

P 7, 1550 

MARKCNTR 

EQUALS 

OELTAC 

+ 2 

1(1) 

20  52 

REF 

1 

F7,1551 

XVMAR  K 

EQUALS 

MARKCNTR 

+ 1 

B(  1) 

20  53 
A2054 

REF 

1 

P 7, 1552 

MKDEX 

EGLALS 

XYI^ARK 

+ 1 

E(1)TNF  index  FCR  AOTMARK 

R 2055 

PLANET 

STCRAGc. 

( 80 

2057 

R.  EF 

1 

P7, 1 553 

PLANVEC 

equals 

MKCEX 

+ 1 

(6)  REFER  VECTOR  OF  PLANET 

2058 
A 2'’59 

REF 

1 

F7,  156  1 

TSIGET 

EQUALS 

PLANVEC 

+ 6 

(2)  TINE  OF  NARK  CR  P$T  TINE  CF  NARK 

R2060 

LRS22. 

3 STORAGT.  (CAN 

SEARS  WITH  P3Q'S 

AND  OVERLAY  LRS24 

. 1 

(30C). 

2062 

Rf^F 

2 

LAST 

1 45 

E7 , 1675 

LGR  ET 

EQUALS 

RLMSRCH 

I(  1)  7NP 

2063 

REF 

1 

E7, 1675 

RCRPT 

EGLALS 

LGRET 

B( 1)  TENP  return. 

2064 

RPF 

2 

LAST 

146 

E7,  1675 

I GRFT 

EQUALS 

LGRET 

8(1)  TFNF  RETURN. 

2^65 

'’EF 

1 

E7,1676 

NX 

EQUALS 

RCRET 

+ 1 

1(6) 

2066 

REF 

1 

E7, 1 7G4 

, NY 

EGLALS 

V X +6 

1(6) 

2 167 

REF 

1 

E7.1712 

NZ 

EQUALS 

MV  +6 

1(6) 

2068 

REF 

2 

LAST 

146 

E 7, 1676 

EO 

EQUALS 

MX 

1(2) 

2 0 69 

RPF 

3 

LAST 

146 

E7,  17  00 

E 1 

EOLALS 

NX  +2 

1(2) 

2C70 

REF 

4 

LAST 

146 

F7, 1702 

02 

EQUALS 

M X +4 

1(2) 

20  7.1 

REF 

1 

-^7,  17C4 

C T 

equals 

E2 

+ 2 

1(2) 

2072 

REF 

1 

E7, 1720 

SCALSHFT 

EQUALS 

MZ 

+ 6 

fid)  SCALE  SHIFT  FCR  EAPTF/NECW 

2';73 

RCF 

1 

E7,17?l 

RXZ 

EQUALS 

SGALSFFT 

+ 1 

1(2) 

207  4 

PFF 

1 

^^7,  1722 

ULC 

pQLAL  P 

RXZ 

+ 2 

1(6) 

2075 

Ri=F 

1 

E7,  1731 

S TNT  FETA 

FQUALS 

ULC 

+ 6 

1(2) 

R2076 

*=('*’!'=!■  IN  OVERLAP 

' CNE  «**** 

2077 

REF 

1 

E7,  1746 

N49FLAG 

EQUALS 

PDCTNSAV 

8(1)5  flag  indicating  V0649  RESFCNSE 

A2C78 

P2079 

LRS22. 

1 STORAGF  . (N'LST 

NCT  SHARE  Vvl  TH  F30'  S ) 

( 13P  ) 

R2081 


(OUTPUTS  ARE  TC  L RS22.B ) 
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20  8 2 

REF 

1 

E7,  1722 

RPTRLN 

ECLALS 

S INTHETA 

+ 2 

E (2 )CUT 

RR  TPUMCN  ANGLE 

20P1 

PPF 

1 

F7.1735 

RRSHA  FT 

EQUALS 

RRTRLN 

+ 2 

B(2)CLT 

RRSHAFT  ANGLF 

2P84 

PFF 

1 

F7,1737 

LPS22. 1 X 

ECLALS 

RRSHAFT 

+ 2 

E(  1 IT  RP 

2085 

REF 

1 

F7,  1740 

RRBORSIT 

EQLAL  S 

LRS22. IX 

+ 1 

1(6)  TRF 

R AC AF  EGRES  IGHT  VECTOR  . 

2C86 

A2087 

REP 

1 

E7 ,1746 

RCriTMSAV 

EQUALS 

RRBORSIT 

+ 6 

B(  2)  S 

RR  RANGE-RATE (FFS) 

P2088 

LRS22. 

1 

(SANF  as  PREVIOLS 

SECTIONI  ALSr 

DOWNLINK  FOR  RR 

(R29) ( ICD) 

CANNOT  shape  with  L.A. 

C. 

2090 

REF 

2 

1 AST 

146 

F7, 1750 

RCCTR 

EQUALS 

RCOTMSAV 

+ 2 

E(  2 )QUT 

RANGE-RATE  READING 

2001 

REF 

1 

F7,  1752 

T A N G N E 

ECLALS 

RCCTH 

+ 2 

E(2)TAF 

RR  CI^'EAI.  ANGLES 

R 2CC2 

RETAIN 

TFE  CRDFR  CF  AKTINE 

TC  RM  FOR  CCWN'L  INK 

PURPOSES 

2093 

RFF 

1 

r-7  , 1754 

WKTI VE 

EQUALS 

tangnb 

+ 2 

E(2)QUT 

TIME  OF  RR  READING 

2C94 

REF 

1 

F7, 1756 

RM 

EQUALS 

NKTI HE 

+ 2 

I ( 2)CLT 

RANGE  RFACING 

2095 

REF 

1 

E7, 1760 

R ANGRCOT 

EQUALS 

R H 

+ 2 

B<2)  COWNLINKEO  RAW  RANGE  ANC 

RRATE 

A2096 

R2097 

F61LFN 

- 

FFFFFPRFO  track  ING 

ATTITUDE  RCUTINE 

44IN  OVERLAY 

CN'E4 

R 2098 

(CALLFC  by  F20  ,R22LEN  ,LSP22 .3  ) 

( 1C  ) 

2100 

RPF 

2 

L AST 

147 

E7,  1745 

R65CNTR 

ECLALS 

RPBOPSIT 

+ 5 

e ( 1 )SS 

CCUNT  NUREEP  CF  T IRES 

PREFERRED 

A21C1 

TRACKING  PGLTINE  IS  TC 

CYCLE 

A2  102 

R2  104 

F21  STFRAGF 

(20 

21fif: 

A2107 

REF 

1 

E7,1762 

P21T  IME 

EQUALS 

RANGPDQT 

+ 2 

I ( 2)TRP 

R2KI8 

KALCMANU  , 

VECPCINT  STORAGE. 

CALLED  BY  R62,  R61,  R65. 

(120) 

2110 

qcp 

2 

1 AST 

149 

F7 , 1764 

SCAXIS 

EQUALS 

P21T  IRE 

+ 2 

1(6) 

2111 

A2112 

REF 

0 

LAST 

144 

F7,  1772 

PCTNTVSR 

ECLALS 

SCAXIS 

+ 6 

1(6) 
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USER'S  PAGE  NO.  59  EO  SA 


P7113 

A211A 

« 5* 

rVERl  AY  MiyeER  3 IN  E8ANK  7 :i=l****=> 

R?ll  5 

SERVICER  SThraCE 

(60 

2117 

REF 

3 

LAST  146  F7,1471 

AEVEL 

EQUALS 

E7CVERL  A 

B(  2 ) 

DISPLAY 

2118 

P EE 

1 

F7  , 1A72 

HCCTC ISF 

EQUALS 

A E VFL 

+ 2 

E(2) 

OSPLAY 

2119 

RPF 

2 

LAST  120  F7.1A75 

TTFDI  SP 

EQUAL  ' 

HCGTDISF 

+ 2 

e ( 2) 

C I SFL  AY 

A 2 1 2 C 

R2121 

BURN  PROG  STHRAGF. 

(20 

2123 

REF 

1 

E7,  1477 

SAVFT-3C 

EQUALS 

TTFDI SP 

+ 2 

B(2)TMP  TIG-30  RESTART 

A 2 12A 

R2125 

SPRVICER  STCRAGF. 

(690 

2127 

Rcp 

1 

E7 , 1501 

V G SO  C Y 

EQUALS 

SAVET-3C 

+ 2 

B(6)0LT  SFT.BV  S41.1  VG  LEM,  SC.CCORCS 

2128 

PEP 

1 

R 7,  1501 

CELVCTL 

= 

VGBPCY 

2129 

REF 

2 

LAST  148  E7,15.’7 

DVTOTAL 

EQUALS 

VCBCDT 

+ 6 

E(2) 

OS  FLAY  NCUN 

2130 

REF 

1 

E7,15ll 

GOBLT IMF 

EQUALS 

nVTOTAL 

+ 2 

B(  2) 

mcminal  tig  for  calc,  cf  GCBLATF. 

2131 

PEF 

1 

E7, 1513 

ABDVCCNV 

EQUALS 

GC8LT  INE 

+ 2 

1(2) 

2132 

R'"F 

1 

E7,  1515 

DVGNTR 

EQUALS 

ABDVGCN  V 

+ 2 

e ( 1 ) 

2133 

RPP 

1 

R7 ,151b 

TGC 

EQUALS 

CVCNTR 

+ 1 

E(  2 ) 

213A 

REF 

1 

E7,  1520 

R 

equals 

TGC 

+ 2 

I (6  ) 

2135 

RPP 

1 

C7, 1520 

UN  ITGCBL 

EQUALS 

R 

1(6) 

2136 

RFF 

2 

LAST  148  E 7, 152 6 

V 

EQUALS 

R 

+ 6 

2137 

RFF 

1 

F7, 1526 

OFL VREF 

EQUALS 

V 

1(6) 

2138 

PFF 

1 

F7 ,1534 

Hf  AL  C 

EQUALS 

DELVREF 

4 6 

B ( 2) 

LR 

2139 

PEF 

1 

F7,1536 

UM  T / R/ 

EQUALS 

HCALC 

+ 2 

1(6) 

R21  AH 

(THE  FOLLCWING  SERVICFP 

ERASAPLES 

CAN  BE 

; SHARED 

M TH 

SGCCNC  CPS  GUIEANCE  STCRACEI 

2 1A2 

REF 

1 

F7 , 1544 

PM 

EQUALS 

UMT/R/ 

46 

B ( 6 ) 

21A3- 

PEF 

1 

F7, 1552 

VN  1 

EQUAL  S 

PM 

+ 6 

1(6) 

( IN  CRCER  ) 

21AA 

RFF 

1 

F7 ,1560 

PIPTIMEI 

equals 

VNl 

+ 6 

P(  2) 

( FCR  ) 

21A5 

PEF 

1 

E7 , 1 562 

GCTl /2 

EQUALS 

P IPTI REl 

42 

1(6) 

( COPY  ) 

21A6 

PEF 

1 

R7,  1570 

MASS  1 

EQUALS 

GDTl  /? 

46 

1(2) 

( CYCLE  ) 

21A7 

REF 

1 

E7 ,1572 

RIS 

EQUALS 

MASS  1 

4 2 

1(6) 

21A8 

PFF 

1 

E7,  16CC 

VIS 

EQUALS 

RIS 

+ 6 

1(6) 

R21AO 

AL  IGNRENT/SAO.2 .3  CnYPCN  STORAGE. 

( leo 

2151 

REF 

1 

F7,16G6 

XSMC 

EQUALS 

VIS 

46 

1(6) 

2152 

PEF 

1 

R7,  1614 

YSMO 

EQUALS 

X SMO 

+ 6 

I (6) 

2157 

RPF 

1 

E7.1622 

ZSMC 

EQUALS 

YSMD 

46 

1(6) 

2154 

PFF 

2 

LAST  14F  E7,1606 

XSCREF 

= 

X SND 

2155 

R'^F 

O 

LAST  148  F7,1614 

YSCRSF 

= 

YSMO 
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EO  S4 

2156 

PEF 

1 

E7, 

1622 

ZSCREF 

ZSPO 

2157 

PEE 

2 

LAST  149 

E7, 

1630 

ENO-ALIG  EQUALS 

ZSMD 

+ 6 

NEXT  AVAIL  ERASABLE 

AFTER 

AL  IGN/S40.2,3 

R 2 1 5 8 

sfc  ^ 

P22  *3j«^3}CS^55< 

( 240  ) 

216'T 

REF 

1 

E7,  1630 

RSLBL 

EQUALS 

ENO-ALIG 

I (6)5-S 

LN  FCSITICN  VECTCP 

2161 

R<=F 

1 

E7 ,1636 

UCSM 

EQUALS 

RSUBL 

+ 6 

II 6 ) S-S 

VECTOR  L 

216? 

REF 

1 

F7,  1644 

NEWVFL 

EQUALS 

UCSN 

+ 6 

1(6 )S-S 

TEFNINAL  VELOCTTV  VECTOR 

2163 

REF 

1 

F 7 , 1 6 5 2 

NEUPOS 

EQUALS 

NEWVEL 

+ 6 

I ( 6 ) S-S 

TFD|viNAL  FCSITICN  VECTCR 

2164 

REF 

1 

F7 , 1660 

LNCFTP 

F CU  A L S 

NEW  PCS 

+ 6 

I( 2 )S-S 

EST.  LALNCH  TINE  FCR  LEV 

2165 

REF 

1 

E7 , 1662 

transtp 

EQUALS 

LNCHTN 

+ 2 

I (2  )S-S 

TRANSFER  TIN'S 

2166 

PEF 

1 

E7 ,1664 

NCSMV  FL 

EQUALS 

TRANSTM 

+ 2 

I ( 6 IS-S 

NEW  CSV  VELCCI TV 

A2  1 67 

R2168 

* « * 

P21 

(160 

21  7P 

REF 

1 

1162 

P210R  IG 

= 

n ISPDEX 

2171 

PEF 

3 

LAST 

146  57,1675 

P21BASER 

EQUALS 

RLNSPCH 

I (6  )TNF 

2172 

REF 

1 

E7, 1703 

P 2 IBASEV 

EQUALS 

P21BASER 

+ 6 

I ( 6 )TNP 

2173 

REF 

1 

E7, 171  1 

P21VEL 

EQUALS 

P21 BASEV 

+ 6 

I ( 2 )7pp 

4=14  NOUN  91  X-:)* 

2174 

R FF 

1 

F 7 , 1 7 1 3 

P2  IGAN 

EQUALS 

P21 VEL 

+ 2 

I ( 2 )T  NF 

NCUN  91 

2175 

REF 

1 

E7 ,1 715 

P21  ALT 

EQUALS 

P 21GA V 

+ 2 

I ( 2ITPP 

X=X:*  NCUN  91  X<«:f= 

A2176 
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P2177  overlay  MJVBER  4 IN  E8ANK  7 «>!.>!=*«*« 

A2178 


R2179 

VARIABLES  FTP 

SECCNC 

CPS  G'JICANCE 

(THE 

LUNAR  LANCING) 

( 6CD  ) 

R2101 

THESE 

EPASABLFS  MAY 

B'^  SHARED  1»1TH 

CARE 

2182 

REF 

2 LAST 

148 

67 , 1544 

nURTEMPS 

- 

RNl 

OVERLAY 

LAST  FART  CF  SERVICER 

2 1 P 7 

pff 

1 

R7 ,1544 

LANDT  ENP 

= 

CUPTFMPS 

8(6) 

GUIDANCE 

2184 

REF 

1 

E7,  1552 

TTF/ETMP 

= 

LAN'DTFNF 

+ 6 

6 (2) 

GU  lEANCE 

2185 

RPF 

1 

E7 , 1 554 

EL  INCP 

= 

TTF/8TMP 

+ 2 

8(2) 

GUIDANCE 

2166 

REF 

1 

F7, 1556 

AZINCF 

= 

ELINCP 

+ 2 

6(2) 

GU  ICANCE 

2187 

REF 

1 

F7, 1569 

KEEP-2 

= 

AZINCP 

+ 2 

R(2) 

TC  PREVENT  PIPTINEl  CVERLAY 

2166 

REF 

1 

F7.1562 

TAEl  TTF 

= 

KEEP-2 

+ 2 

8(2) 

GU  IDANCE 

2189 

RFF 

1 

F7, ) 573 

TPI PCLD 

TA6LTTF 

+ 9C 

8(2) 

GU  ICANCE 

2190 

RFF 

1 

67, 162  1 

E2CPS 

EQUALS 

OLRPFRMS 

R2191 

R2192 

THESE 

FRASABLFS  MLST 

NOT  Overlay 

gcbltire  cr  servicer 

2163 

REF 

3 LAS'f  148 

F7 ,1606 

PIFPSET  = 

XSMD 

B(  I) 

TLfRCTTLE 

2)94 

REF 

1 

E7,  1607 

RTNHCLC 

P I FPS  ET 

+ 1 

E ( 1 ) 

THROTTLE 

2195 

RFF 

1 

67,  16  10 

freight  = 

P TNHCLD 

+ I 

8(2) 

thfcttle 

2196 

R8F 

1 

E7,  1612 

PIF 

FWF  IGHT 

+ 2 

B ( 2 ) 

THROTTLE 

2197 

R6F 

1 

67,1614 

PSEUCC55  = 

PIF 

+ 2 

Ed) 

throttle  ccwnlink 

7198 

RFF 

1 

67,1615 

FC 

PSEUDC55 

+ 1 

B(2) 

throttle 

2199 

RFF 

1 

E7,1617 

TTHRCT 

FC 

+ 2 

P(  1 ) 

throttle 

22nn 

A22^1 

RFF 

1 

E7,  1620 

FCCLO 

TTHRCT 

+ 1 

8(1  ) 

THFCTTLE 

R2202 

THFSE  ERASARLES  SHOULD  NCT  PF 

SHARFC  CURING  F63, 

P64  , 

F65 , P66 , 

P67 

2203 

R6F  1 

F7,  1621 

nURPERMS 

= 

FCOLO 

+ 1 

NUSTN 

•T  CVERLAY  CLRTENPS  CF  SFFVICFF 

22C4 

REF  2 LAST  15C  F7,1621 

WCHPHCl.  C 

= 

CURPERMS 

8(1) 

GUIDANCE 

2205  , 

REF  1 

E7,  1622 

FILLER 

= 

UCHPHCLC 

+ 1 

2206 

RFF  1 

E7,  1623 

FI  PAS  SO 

F ILLER 

* 1 

fi(  1 ) 

GUIDANCE 

2207 

RFF  1 

F 7 , 162  4 

TRIP 

= 

FLPASSO 

+ 1 

8(2) 

2208 

REF  1 

F7, 1626 

VGU 

= 

TRIP 

+ 2 

B(6) 

GU  ICANCE 

2209 

R6F  1 

87 , 1634 

L and 

= 

VGU 

+ 6 

B(6) 

GUIDANCE 

CCNTIGLCLS 

22  1C 

REF  1 

F7,  1642 

TTF/e 

= 

LAND 

46 

8(2) 

GU  ICANCE 

CONTIGUOUS 

2211 

RFF  1 

6 7,  1644 

EL  IDLMMY 

= 

TTF/8 

+ 2 

( 1 ) 

CUNNY  FCR 

FL  INCFl 

2212 

REF  1 

E7, 1645 

AZICUNNY 

= 

ELIDUNMY 

4 1 

( 1) 

CLVMY  6CB 

AZINCRl 

22)3 

REF  1 

E7,  1646 

ZERDL^RV 

= 

AZinUNMY 

41 

( 1 ) 

CUNNY  FCF 

ZERL  INA 

2214 

RCF  1 

F7 , 1647 

El VDUMMY 

= 

ZERDLMMY 

4 1 

( 1 ) 

CUNNY  FCR 

ELVIRA 

2215 

REF  1 

E7,1650 

LRACRFT 

= 

ELVDUMMY 

41 

8(11 

LR 

221  6 

REF  1 

F7,  165 1 

VSELECT 

- 

LRADRET 

41 

8(1) 

LR 

2217 

RFF  1 

E7  , ] 652 

VMEAS 

= 

VSELECT 

4 1 

B(  2) 

LR 

2218 

RFF  1 

F7, 1654 

HMEAS 

r 

VNF  AS 

42 

8(2) 

LR 

2219 

R6F  1 

F7,  1656 

VN2 

■■ 

HNFAS 

42 

8(6) 

LR 
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222.' 

REF 

1 

F7, 1 656 

GNLR 

= 

VN2 

E (6  ) 

LR 

2221 

REF 

2 

LAST  151 

E7, 1656 

GNUV 

= 

VN2 

B(  6 ) 

LR 

2222 

R'=F 

3 

LAST  151 

E7,l 656 

LRADRET 1 

= 

VN2 

B(  1 ) 

LR 

2223 

KEF 

4 

LAST  151 

F7,  1664 

DELTAH 

= 

VN2 

+ 6 

E (2  ) 

C ISPLAY 

222^ 

R = F 

1 

E7 ,1666 

FUN'NYCSP 

= 

DELTAH 

+ 2 

B(  2 ) 

Cl SPLAy 

2225 

RPF 

1 

E7 ,1  67f 

ECURPEPN 

E CU  A L S 

FUNNYCSP 

+ 2 

NEXT 

AVAILABLE  ERASABLE  AFTER  OLRPERYS 

R2226 

R222  7 

(Erasarlfs  vhich  cverlay  the 

ABCVE  ELCCK) 

2228 

REF 

2 

LAST  15f 

E7,  1644 

VDGVERT 

ELICUNNY 

E ( 2 ) 

P65,P66 

222^ 

REF 

2 

LAST  150 

E7, 1646 

NIGNLOnP 

= 

ZERDLNHY 

Ed) 

IGNALG 

2230 

ppp 

2 

LAST  15C 

E 7 , 1647 

NGIICSUE 

= 

FLVCUNMY 

5(1) 

JGNALG 

2231 

RKF 

2 

LAST  151 

“7,  1647 

IftCHVERT 

= 

F LVOLNNY 

E(  1 ) 

F65,  P66, P67 

2232 

R = F 

2 

1 AST  151 

F7 , 1666 

FUELN5EC 

= 

FUN'NYCSP 

B(  1) 

C I S F L A Y 

2233 

RKF 

Q 

LAST  151 

E7  , 1666 

TPEDES 

FUNNYCSP 

B(  1) 

cisplay 

2234 

REP 

4 

LAST  151 

E7,  1667 

LOOK ANGL 

= 

FLNNYDSF 

+ 1 

6(1) 

E I S F L A Y 

A2235 

R2236 

frasaples  cenvenifntly  dpfinablf  in  the 

V,CRK  AKFA 

2237 

0022 

PROJ 

= 

1 ED 

1(2) 

GUICANCE 

2238 

0024 

UNLRP/2 

= 

2C:C 

1(6) 

GUIDANCE  (DUPING  P64  ONLY) 

2239 

0024 

UNLR/2 

= 

2CC 

I (6) 

GU  I CANGE 

R224''' 

R224  1 

THE 

Ei\r 

OF  THF  LLHAK 

LANDING 

frasables 

A2242 

R2243 

2245 

REF 

P12 

I 

(FCR  LUNAR  LANCING) 
P7  , 1670 

LPLCTR 

ECUALS 

ECURPERN 

{ 60 

e ( 1 ) LR  CATA  test 

2246 

REF 

1 

F7, 1671 

LRRCTR 

EQUALS 

LRLCTR 

+ 1 

B(  1 ) 

2247 

REF 

1 

F7  , 1672 

L PNCT  K 

EQUALS 

LFRCTP 

4 1 

p ( 1 ) 

2248 

REF 

1 

E7,  1673 

LRSCTP 

EQUALS 

lpmctr 

+ ) 

6(1) 

2249  ' 

RPF 

1 

57 , 1 674 

STIL  EACH 

equals 

LRSCTR 

+ 1 

B(  1) 

2250 

A2251 

REF 

■ 1 

E7,  1675 

ST! LBACV 

EQUALS 

STILBACH 

+ 1 

Ed) 

R2252 

LANDING  ANALGGS  CISPLAY 

STCRAGE. 

( 4CD) 

2254 

REF 

1 

E7,  1676 

LATVYETF 

equals 

STI LBADV 

+ 1 

E ( 1 ) PRY 

LATVEL 

YOMTOR 

YETEP  (AN  OKCER) 

2255 

RPF 

1 

E7, 1677 

fgrvmetr 

EQUALS 

L ATVNETR 

+ 1 

B(  DPRY 

FORVEL 

YCMTGR 

YETEP  (-FC  FAIR) 

2256 

REF 

1 

E7,1700 

LATVFL 

E CU  A L S 

fcrvhftr 

+ 1 

E(  1 )PRY 

LATERAL 

VELOCI  lY  (AN  CRDEP) 

2257 

PFF 

1 

57,  1701 

FGRVEL 

EQUALS 

LATVEL 

+ 1 

B ( 1 ) PRY 

FCFWAPC 

VELCC  ITY  (-EC  PA  IP ) 

225  P 

RPP 

1 

F7,1702 

TR  AKL  ATV 

EQUALS 

FORVEL 

+ 1 

B(  1) PRY 

NGMTCR 

FLG  4 LATVEL  (AN  CFCEF) 

2259 

REF 

1 

P7,17C3 

TPAKFHCV 

EQUALS 

TRAKL ATV 

4 1 

E ( 1 )PRY 

YON  IT  . 

FLAG  FOR 

FCRVFL  (EC  PAIR) 

2260 

REF 

1 

F7,  17'4 

VHY 

EOLAL  S 

TRAKFluOV 

4 1 

B ( 1 ) FFY 

VHY  = VY  F 

.UHYP 

(AN  CRCE  R ) 
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L 

FRA SA8LE 

ASS  IGNNFMS 

USE 

P'S  page  no.  63  EC  S6 

2261 

RFF 

1 

E7, 1705 

• VHZ 

EQUALS 

VHY 

+ 1 

E ( 1 )PRP 

VFZ  = VPP.UFZP  (-EC  PAIR  ) 

2262 

REF 

1 

F7, 17  16 

VVECT 

EQUALS 

VHZ 

+ 1 

B ( 3 ) PRB 

LPCATEC  S.P.  VELCCITY  VECTCF 

2263 

REF 

1 

E7.1711 

ALTRATE 

EQUALS 

VVECT 

+ 2 

B(  1 )PRR 

ALTITUDE  RATE  IN  BIT  UNITS 

226A 

RFF 

1 

E7,  1712 

ALTSA\iE 

F C U A L S 

ALTRATE 

+1 

e (2  )PR^ 

ALTITUCE  in  bit  UMTS 

2265 

RCF 

1 

^7 ,1716 

LACGSAVE 

EQUALS 

ALTSA VE 

+ 2 

B(  DPRE 

SAVF  C IN  LANCISP 

2266 

RFF 

1 

E7,l  715 

DT 

EQUALS 

LAFQSAVE 

+ 1 

B(  DPRN 

TIRE  1 MINUS  (PIP7IME  +1) 

2267 

RFF 

1 

E7,  1716 

OALTRATE 

EQUAL  S 

m 

+ 1 

B ( 1 ) PRN 

ALTITUCE  RATE  ERPCR  CORRECTICN 

226t 

RFF 

1 

P7 ,1717 

UFYP 

EQUALS 

OALTRATE 

+ 1 

6( 6) PRB 

SM  unit  VECTOR 

2269 

RFF 

1 

F7,  17  17 

CAkI  S 

= 

UFYP 

2276 

RFF 

2 

LAST  152 

F7,  1725 

LFZP 

FQUALS 

UHYP 

+ 6 

E ( 6) PRB 

SR  UNIT  VECTGP 

2271 

RFF 

2 

LAST  120 

F7 , 1 733 

CELVS 

equals 

UFZP 

+ 6 

E( 6 )PRN 

CELVS  = NRXR 

2272 

REF 

1 

F7, 1761 

ALTBITS 

ECLALS 

OELVS 

+ 6 

E (2  )PR^ 

ALTITUCE  IN  BIT  UNITS,  2.36FT/B7 

2273 

R = F 

1 

F7,1763 

RUN  I T 

equals 

ALTBITS 

+ 2 

E(3) PR^ 

SR  HALF-UNIT  R VEOCP 

227A 

RFF 

1 

E7,l 765 

LASTLACW 

equals 

RLMT 

+ 2 

GNLY  A TAG  Tn  SIGNIFY  LAST  L.A.D.  kCPO 

A2275 

R 2276 

P66  FRASABLES  (R.G.C.) 

no ) 

2278 

RFF 

2 

LAST  152 

E7, 1766 

rodcflm 

equals 

RLMT 

+ 3 

A2279 

R2280 

F66  ERASABLE 

S (R.r.C.) 

( 16C  ) 

228? 

REF 

2 

LAST  167 

F7, 1756 

RCOSCAL 1 

EQUALS 

R f 

E ( 1 ) 

7283 

REF 

1 

E7,1757 

LASTTFIP 

FQUALS 

RCCSCAL 1 

+ 1 

1(2) 

22P6 

RFF 

1 

E 7 , 1 7 6 1 

THISTFIF 

EQUAL  S 

LASTTPI  F 

+ 2 

E (2  ) 

2785 

RFF 

1 

E7, 1763 

ULDPIPA> 

EQUALS 

THI STPI P 

+ 2 

fid) 

228  6 

pr-F 

1 

F7 , 1766 

OLCP  IPAY 

FQUALS 

OLDP  IPAA 

+ 1 

B ( 1) 

2287 

REF 

1 

E7,  1 765 

OLDPI FA  Z 

EQUALS 

GLCPIPAY 

+ 1 

Ed) 

2288 

REF 

1 

E7, 1766 

DELVROO 

EQUALS 

GLDPl PAZ 

+ 1 

6(6) 

A 2289 

R2290 

NOUN  63  CCRPONENT 

(20 

229? 

REF 

1 

E7 , 1776 

.FCALCl 

EQUALS 

DELVRCO 

+ 6 

1(2) 

A229^ 
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A2295 


R2296 

ASCENT  GUICANCF  ERASABLES. 

(210) 

2298 

REF 

2 

LAST  149  F7,1630 

RCE 

ecuals 

FNE-AL  IG 

I ( 2 )THP 

target  RADIUS  AND  CUT-CF-PLANE 

2299 

REF 

1 

E7, 1632 

YCO 

EQUALS 

RCO 

+ 2 

I (2  )T  NF 

DISTANCE,  SCALED  AT  2(24). 

23CC 

Rcp 

1 

E7 , 1634 

1/EVl 

EQUALS 

YCO 

+ 2 

B( 2)TNF 

A T P A G 

2301 

pFF 

1 

F7,  1636 

1 /DV2 

EQUALS 

1 /CVl 

+ 2 

B(2  )TPF 

ATMAG 

2302 

RPF 

1 

E7,  1640 

1 /DV3 

EQUALS 

1/DV2 

+ 2 

E(2)TPP 

ATPAG 

2303 

REF 

1 

E7,  1642 

XPANGE 

EQUALS 

1/EV3 

+ 2 

B ( 2 )TPP 

2304 

REF 

1 

F7, 1 644 

ENGOFFCI 

ECUALS 

XRANGE 

+ 2 

E(1)TNF 

230  5 

REF 

1 

E7, 1645 

VGVECT 

EQUALS 

ENGOFFOT 

+ 1 

I ( 6)CLI 

YELCCITY-TC-EF-GAINEC 

2306 

R9F 

1 

E7.1653 

Txr 

F CU  A L S 

VGVECT 

+ 6 

I ( 2)TPF 

TIME  AT  WHICH  X-AXIS  OVERRIDE 

A2307 

IS  ALLCHEO. 

R23CB  ENC  THE  ASCENT  GUIEANCF  EPASAELES. 

R2309  ThF  FCLLOIaiING  GAPES  KEEP  THE  ASSEMBLER  HAPPY  LMIL  THE  SYRBOLS  ARE  EELETEC  FPCV  THF  PINBALL  NCLN  TABLES. 


2311 

PEF 

1 

E7,  1745 

END-E7.C 

EQUALS 

I RETLRM  1 

+ 1 

FIRST  LNLSPD  LCCATICN 

IN 

E7 

CVEPLAY 

0 

2312 

REF 

1 

F7  ,1  747 

END-E7.  1 

ECUALS 

N49FLAG 

+ 1 

FIRST  UNUSED  LCCATICN 

IN 

F7 

OVERLAY 

1 

2313 

PEF 

1 

400D 

FND-F7.2 

EQUALS 

PCINTVSP 

+ 6 

FIRST  UNUSED  LCCATICN 

IN 

E7 

OVERLAY 

2 

2314 

DTP 

3 (AST  153 

*"7 ,1530 

ENC-E7.3 

EQUALS 

END-AL  IG 

PIRST  UNLSED  LCCATICN 

IN 

F7 

CVEPLAY 

3 

2315 

E7,17?7 

ENC-E7.4 

EQUALS 

3777 

last  LCCATICN  LSEO 

IN 

E7 

overlay 

4 

2316 

REF 

1 

F7, 1655 

END- E 7. 5 

EQUALS 

TXC 

+ 2 

PIRST  LNUSEC  LCCATICN 

IN 

E7 

CVEPLAY 

C 

231  7 
A2318 

=7,1 777 

ENC-E7 

ECUA  LS 

3777 

**LAST  LCCATICN  USED 

I N 

F7 

** 

***  FNE  OP  LUPEPAS-.128 
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INT9PRUPT 

LEAD 

IMS 

USER'S  PAGE  NO.  1 EO  SA 

nool 

AOOO 

SETLCC 

ACOO 

00-^19 

PPF 

1 

CrUNT* 

$1/RUPTS 

FIX-FIX  LEAD  INS 

000? 

A 000 

C OOOA 

0 

IMHIM 

GC 

CCC3 

REF 

1 

AOO  1 

3 A05A 

1 

CAF 

GCBB 

COCA 

p:"F 

1 

A002 

5 6 00  6 

1 

XCf- 

B RANK 

Q0''5 

REP 

1 

AOO  3 

1 266  5 

1 

TCF 

GCPRCG 

0006 

PFF 

1 

AMlA 

52  Cll 

0 

CXCH 

ARUPT 

T6PUPT 

0007 

ACC5 

C CCC6 

1 

extead 

0008 

pff 

1 

A006 

3 AO  56 

c 

DC. A 

T6ADR 

0009 

A007 

52  006 

0 

CTC8 

JO  10 

REF 

2 

LAST 

15A 

AO  10 

52  Oil 

c 

CXCh 

ARLPT 

T5PLFT  - ALTCFILCT 

0011 

AOl  1 

0 0006 

1 

EXTEND 

0012 

prp 

1 

A012 

3 126A 

c 

CCA 

T5ACP 

0013 

AO  12 

52  ■'06 

c 

CTCB 

CCl  A 

REF 

3 

LAST 

15A 

AOIA 

52  Oil 

0 

CXCF 

ARUPT 

T3RLPT 

0015 

REF 

1 

A015 

3 AC57 

1 

CAF 

T3RPTEB 

0016 

PFF 

2 

LAST 

1 5A 

AOl  6 

56  006 

1 

XCH 

BBANK 

0017 

PPF 

1 

A017 

1 3A10 

Cl 

TCF 

T 3RUFT 

0018 

RFF 

A 

LAST 

15A 

A020 

52  0 1 1 

0 

C XCH 

ARLPT 

TAPUFT 

0C19 

PFF 

1 

AO  21 

3 A06A 

T 

CAF 

TARPTBB 

OC195 

REF 

3 

LAST 

1 5A 

A022 

5 6 00  6 

1 

XCF 

BEANK 

0020 

RFF 

1 

A023 

1 20CC 

1 

TCF 

TARLFT 

0023 

PFF 

t; 

LAPT 

15A 

A02A 

52  Gll 

0 

CXCF 

ARUPT 

KE YRLPT  1 

002A 

REF 

1 

A025 

3 AC60 

c 

CAF 

KEYRFTBB 

0025 

REF 

A 

LAST 

15A 

AL26 

56  006 

1 

X^H 

BPANK 

0026 

REF 

1 

4027 

1 3256 

1 

TCF 

KFYRUFT  1 

0027 

RFF 

6 

LAST 

15A 

A030 

52  Cll 

c 

CXCH 

APLPT 

KEYPUfT2 

0C?8 

PFF 

1 

A031 

3 A 36  1 

1 

CAF 

MKRUPTBB 

0029 

REF 

c 

LAST 

1 5A 

A032 

5 6 00  6 

1 

XCF 

BEANK 

0030 

RFF 

1 

Afl33 

1 2 2 3 2 

0 

IC.F 

MARKRLPT 

0031 

RFF 

7 

LAST 

15A 

A -.3  A 

52  Cll 

n 

CXCF 

ARUPT 

LPRLPT 

00  3 2 

REF 

1 

A035 

2 AC6C 

C 

CAF 

U P P PT  P B 

0033 
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3 7734 

« 

SYNCT^ 

CAF 

2CMRLPT 

C166 

pop 

3 

LAST 

16  1 

06,2155 

26  C27 

0 

ADS 

T IMF4 

0167 

RFF 

13 

LA  ST 

16  1 

C 6 , 2 1 5 6 

3 4 743 

r 

CAF 

e IT9 

0168 

rff 

7 

LAST 

161 

06,2157 

27*310 

0 

ADS 

DSPUPTSV* 

0165 

RFF 

8 

LAST 

161 

P6,216C 

11 *310 

0 

CCS 

DSPUPTSW 

0170 

REF 

2 

LAST 

16  1 

06,2161 

0 527C 

1 

TC 

R ESLME 

0171 

06,2162 

37737 

0 

OCT  3 7 73  7 

CCT 

37737 

0172 

REF 

1 

06 ,2163 

0 2154 

c 

TC 

SYNCT4 

0173 

PEF 

3 

LAST 

161 

06,2164 

0 5270 

1 

TC 

RESUME 

C17A 

06,2165 

0 0006 

1 

QUIKCFF 

EXTEND 

0175 

REF 

5 

LAST 

161 

06,2166 

01  ric 

1 

V>RI  TE 

CLTO 

0176 

REF 

16 

LAST 

161 

06,2167 

3 4736 

1 

CAF 

BIT14 

RESET  DSPUPTSW  TC  SEND  DISPLAY  NEXT  PASS 

0 177 

REF 

1 

06 ,217F 

1 2144 

0 

TCF 

CUIKRUPT 

0170 

''6,2  17  1 

2240Q 

c 

l-^.U  ,9 

CCT 

22400 
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L 

T4PUPT  program 

LSFR’  S PAGE 

NC.  7 

E6  S4 

P0300 

PROGRAM  NAMF: 

imlmcn 

P03'l 

FUNCTIONAL  CFSCRIPTICN:  THIS  PROGRAM  IS  FNTEP.EC  FVERT  48C  MS.  IT  CETECTS 

CHANGES  CF  THF 

IMU  STATUS 

BITS  IN 

R0303 

CHANNEL  30  AND  CALLS  TRF  APPRCPPIATE  SUBROUTINES.  THE  BITS  PROCESSED  AND 

THEIR  RELFVANT 

SUBRCLTI NES 

ARE  : 

R0305 

FUNC 

TION 

BIT  SUBPCLTINE  CALLED 

R0306 

R0307 

R0308 

fEMP 

ISS 

IN  LIMITS 
TUKN-CN  RCCUFST 

15  TLIM 

lA  ITLPNCN 

R0  309 
P0310 
P0  311 

T MU 
IML 
IMU 

RAIL 

CDU  FAIL 
CAGE 

13  IMUFAIL  (SETTSSW) 

12  ICCUFAIL  (SETISSW) 

11  IMUCAGE 

R0212 

1 ML 

cffpATP 

9 IMUCP 

R )313 

THF 

LAST  SAMPLED  STATE 

CF  these  PETS  IS  LEFT  IN  IMorES30.  ALSO, 

EACH  SLBRCUT  INF 

CALLED  FINDS  THE  NEW 

R031  F 

VALUE  CF  THE 

BIT  IN  A,  WITH  0 SFT  TO  THE  PROPER  RETURN  LOCATION,  NXTIFAIL. 

R021  7 

CALLING  SFCLEMCF:  TARUPT  EVERT 

480  MLLISFCCNCS. 

R0318 

JOBS  GR  tasks 

INITIATED:  none. 

PC319  SLBRCLUNFS  CALLFT:  TI.IN,  ITUPACA,  SFTISSW,  IPUCAGF,  IMUOP. 


PJ320  erasable  initial izattcn; 

R9321  FPCSH  START  HR  P’^STAPt  gRCUPS  ACTIVE:  C ( IPi0CES30)  = OCT  37A11. 

R0323  RESTART  UTH  ACTIVF  C-RCLCS:  C(IPCCES30)  = ( 6 ( IPCCES30  ) «NC  (CCT  00025))  PLUS  CCT  37ACO. 

P.0325 THIS  LEAVES  IWl  FAIL  PITS  INTACT. 


RC326  ALARNS:  NCNF. 


R0327 

cx  IT: 

TNONTo-ST 

• 

R032  8 

OUTPUT 

: 

UP  DAT  EC 

1MCCES30  with 

CHANG 

z S 

PROCESSED 

BY  appropriate 

SLBRCLTINF. 

0330 

RFF 

1 

06,2172 

3 1277 

1 

TMUMON 

CA 

I MCDESBO 

SEE  IF  THFPF  has  RFEN 

A CHANGE  IN  THE 

0 33'1 

06,2173 

C DCC6 

1 

EXTEND 

RELEVANT  PITS  OF  CHAN 

30. 

0332 

RCp 

1 

06,2174 

06  0 30 

1 

R XOP 

CHAN3C 

0333 

REF 

1 

06,2175 

7 2761 

1 

MASK 

30RDMSK 

0334 

06,2176 

C C0G6 

1 

EXTEND 

0335 

REF 

1 

06 , 2 L77 

1 2227 

0 

BZF 

TNONTEST 

NC  CHANGE  IN  STATLS. 

0336 

RFF 

3 

LAST 

16C 

06,2200 

54  070 

1 

TS 

RLFTPEGl 

SAVE  EITS  WHICH  HAVE 

CHANGED . 

033  7 

RFF 

2 

LAST 

162 

06,2231 

23*277 

1 

LXCH 

I MODE  S3  ) 

UPDATE  INCCES3C. 

0338 

06 , 220? 

C 0006 

1 

extend 

0339 

RFF 

2 

1 AST 

15 

9 

C6, 2203 

06  COl 

c 

PXCP 

LCHAN 

03411 

REF 

3 

LAST 

162 

06,22  14 

55*277 

0 

TS 

I MODES30 

0341 

RFF 

2 

LAST 

1 

F 

C6 ,2205 

4 4 75  3 

0 

CS 

CNF 

0 34  2 

RFF 

4 

L AST 

16 

2 

06,2206 

56  C70 

c 

XCH 

rlptrcgi 

0343 

06,?207 

0 000  6 

1 

EXTEND 

G^P;  /^'^SP^PLE  RFVISTO^  116  CP  AGC  PRCGP^M  LU>^IN<\RY  BV  N<\SA  2021112-CM 
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03A4 

PEF 

1 

06, 2210 

£ 2514 

f 

eZMF 

TLIM 

CFANGE  TN  INU  TEMP. 

C3Ab 

REF 

1 

06,2211 

1 2213 

1 

TC  F 

NXTIF31T 

BEGIN  BI T SCAN. 

03A6 

RPF 

3 

LAST 

162 

06,2212 

6 4753 

1 

-1 

AC 

CNE 

tPE-ENTERS  FERE  FROM  NXTIFAIL.) 

)347 

PPF 

5 

LAST 

162 

06, 2213 

24  070 

C 

NXTI  FBIT 

INCP 

RLPTRFG 1 

ACVANCE  FIT  FFSITICN  NLNBFR. 

0348 

C6,2214 

6 OOO  ) 

1 

+ 1 

CCU6LE 

0 349 

REF 

2 

LAST 

1 5S 

C6, 2215 

54  COO 

c 

TS 

A 

SKIP  IF  CVERFLCW. 

035'' 

REF 

2 

LAST 

163 

('6, 2216 

1 2213 

1 

TCF 

NXTIFPI  T 

LCCK  FCR  BIT. 

035  1 

REP 

1 

C6 ,2217 

56  071 

1 

XCF 

RUPTREG2 

SAVE  CVERFLOW-CORPECTED  DATA. 

0352 

REF 

6 

LAST 

163 

06, 2220 

50  C70 

0 

INOE  X 

RLPTREGl 

SELECT  N EV,  VALUE  CF  TMS  E IT  . 

0353 

REF 

17 

LAST 

161 

06,2221 

3 4736 

1 

CAF 

e IT14 

0354 

R FF 

4 

LAST 

162 

06, 2222 

7 12  7 7 

c 

NASK 

I MCDES30 

0355 

RFF 

7 

LAST 

163 

i'6, 2223 

50  C7C 

0 

INOE  X 

RLPTREG  1 

0356 

REF 

1 

06,2224 

0 2755 

1 

TC 

I FA  ILJMF 

0357 

PEF 

2 

LAST 

163 

06,2225 

1C  C71 

c 

NXIIFAIL 

CCS 

RLFTREG2 

PRCCESS  ANY  ACCITIGNAL  CFANGES. 

0 3 5 8 

OFF 

3 

LAST 

163 

06,2226 

1 2212 

0 

TCF 

NXTIFBIT  -1 
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PC359  FRCGP/IP  NAVE:  TNCMFST. 

R0360  FUNCTIPNAL  DESCP 1 PTI CN : THIS  PCCGRAN  HCNCPS  FECLESTS  FTP  ISS  I MT I AL I ZAT KN,  TSS  TURN-ON  (CHANNEL  3C  BIT  14) 

R'^36?  4NT  ISS  CP‘=RATE  (CFANNEL  3''  BIT  <;  ) REQUESTS  ARE  TRPATEO  AS  A PAIR  A^D  PRCCESSIFG  TAKES  PLACE  .480  SECCNCS 

R0364  AFTER  EITHEP  ONE  AFPEAPS.  This  IMT  I A L I 2 AT  I C N TAKES  CN  ONE  OF  THE  FOLLOWING  THREE  FORMS: 


P0366 

RiJ3(->6 

R0370 

1)  ISS  TURN-ON:  IN  THIS  SITUATION  THE  CCMPUTFR  IS  OPERATING  WHEN  THE  ISS  IS  TURNED  CN.  NOMINALLY, 
BOTH  ISS  TIJRN-ON  AND  ISS  OPERATE  APPEAR.  THE  PLATFORM  IS  CAGED  FOR  SC  SECONDS  AND  THE  ICDL'S  ZEFCEC 
SO  THAT  AT  THE  END  OF  THE  FRGCESS  THE  GIMBAL  LOCK  MCMTOR  WILL  FUNCTICN  PFCPERLY. 

P0372 

RC374 

2)  ICrU  INITIALIZATION:  IN  THIS  CASE  THF  COMPUTER  WAS  PRCBABLY  TUPNEO  ON  WITH  THE  ISS  IN  OPERATE  OR 

A FRESH  START  WAS  OCNE  WITH  THE  ISS  IN  OPERATE.  IN  THIS  CASE  ONLY  ISS  OPERATE  IS  ON.  THE  ICDL'S  ARE 

R')376 

R0378 

Zt^OrC  SO  THE  GIPPAL  LOOK  MCMTOR  WILL  FUNCTICN.  AN  EXCEPTION  IS  IF  tw[  jss  IS  IN  GIMEAL  LOCK  AFTER 
A RESTART,  THF  ICCU'S  WILL  NCT  BE  ZEROED. 

R T379 
RT381 

3)  RESTART  WITH  RESTARTASL'^  FRCGPAM  USING  THF  iMu:  IN  THIS  CASE,  NC  I M T I A L I Z A T I CN  TAKES  PLACE  SINCE 

IT  IS  ASSUMED  that  the  USING  PROGRAM  DID  THE  I N,  T T I A L I Z AT  I C N AND  THEREFOFE  T^pijPT  SHOULC  NCT  INTERFERE. 

R0383 

P0'’85 

R0387 

IMCcr '30 
ENTER EO, 

proof  EOS 

BIT  7 IS  SET  = 1 BY  THF  FIRST  EIT  (CHANNEL  30  BIT  14  OR  9)  WHICH  ARRIVES.  FOLLOWING  THIS.  TNCNTEST  IS 
FINDS  BIT  7 = I BUT  BIT  8 = C,  SC  IT  SETS  BIT  8=1  AND  EXITS.  THE  NEXT  TIME  IT  FINDS  BIT  8 = 1 AND 
, SETTING  BITS  8 Anjc  7 = C.  AT  PROCTNON,  IF  ISS  TURN-ON  RECUEST  IS  PRESENT,  THE  ISS  IS  CACEC  (ZERO  + 

R0389 

P0391 

pa393 

COARSE).  IF  ISS  CPFRATF  IS  NCT  PRESENT  PPrOPAF  ALARM  00213  IS  ISSLEC.  AT  THE  END  OF  A 9C  SECCND  CAGE,  BIT  2 
OF  lMrr,ES3'i  IS  tested.  if  it  is  = 1,  ISS  TURN-ON  UAS  NCT  PRESENT  FCP  THE  ENTIRE  90  SECCNCS.  IN  THAT  CASE,  IF 
THE  ISS  TURN-ON  RFCUFST  IS  PRESENT  THE  90  SECOND  WAIT  IS  REPEATED,  OTHERWISE  NO  ACTION  CTCLPS  UNLESS  A FPCGFAM 

R 0395 
R0397 
R0399 

WAS  WATTING  FOR  THE  INITIALIZATION  IN  WHICH  CASE  THE  PROGRAM  IS  GIVEN  AN!  IMUSTALL  ERROR  RETURN.  IF  THE  DELAV 
WENT  FROPFRLY,  the  ISS  DOLAY  CUTBn  IS  SENT  AND  THE  ICDL'S  ZEROED.  A TASK  IS  INITIATED  TO  REMOVE  THE  PIPA  FAIL 
INHIBIT  BIT  IN  10.24  SECCNCS.  IF  A MISSION  FROCPAM!  WAS  WAITING  IT  IS  INFORMED  VIA  ENDIML. 

R04  )l 
R04  13 

AT  PRCC^NON,  IF  ONLY  ISS  OPERATE  IS  PRESENT  (CFCNLY),  THE  CDU'S  ARE  ZEROED  UNLESS  THE  PLATFORM  IS  IN  CCARSR 
ALIGN  (=  GIMBAL  LOCK  HEPF.)  OR  A MISSION  PROGRAM!  IS  USING  THF  IML  (IMLSEFLG  = 1). 

R04O5 

CALLING 

SEQLENOr:  T4PUPT  EVERY  480  MLLISECCNCS  AFTER  IMUMON. 

R04Q6 

RQ4Ce 

R041C 

JOBS  OP 

TASKS  INITIATED:  1)  ENOTNON,  90  SECONDS  AFTER  CAGING  STARTED.  2)  ISSUE,  4 SECCNCS  AFTER  CAGING  CONE. 

3)  PFAILCK,  It. 24  SFOCNOS  AFTER  IN  IT  I Al  I Z AT  I CN  COMPLETED.  4)  UNZZ,  S2C  MILLISECCNDS  AFTER  ZEPCING 
STARTED. 

R0411 

.SUBRCLTINES  CALLEC:  CAGFSUB,  CAGESLB2,  ZFROIODL,  ENDIMU,  TMU0AC,  NCATTfFF,  SEUSSW,  VARQELAY. 

P04  1 3 

ERASABLE 

I NT  TJ  ALT  ZATI  CN  : S^E  IMU^'CN. 

R0414 

ALARMS: 

PROGRAM  ALARM  0:)213  IF  ISS  TURN-CN  RECLESTEC  WITHOUT  ISS  CFERATE. 

ROAl  6 
R041  8 

EXIT;  ENCTNCM  EXITS  TO  C33TEST.  "^ASKS  HAVING  TO  CO  WITH  IN  I T 1 AL  I Z AT  I C N EXIT  AS  FCLLCWS:  MISSION  FPCGFAM 

waiting  and  INITl ALI ZATT on  rcMFLETE,  EXIT  TO  ENDIMU,  MISSION  PROGRAM  WAITING  AND  INITIALIZATION  FAILED,  EXIT  TO 

P0420 

I M L B A C , 

IMU  NOT  IN  USE,  EXIT  TC  TASKOVER. 

R042  1 

OUTPUT ; 

I S'  I M TIAL  I ZFD. 

1422 

REF  5 

LAST  163  06,2221  4 1277  C TNCNTEST  OS  IMC0ES30  AFTER  FPCCESSING  ALL  CHANGES,  SEE  IF  IT 
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0A?3 

RPP 

14 

LAST 

88 

06,2230 

7 4745 

1 

<“ASK 

BIT7 

IS  TIME  TO  ACT  CN  A TL’RA-CN  SEGLENCE, 

0424 

REF 

3 

LAST 

163 

06,223 1 

10  000 

0 

rc  S 

A 

042E 

REE 

1 

06,2232 

1 2374 

1 

TCF 

C33TEST 

NC  - EXAMINE  CHANNEL  33. 

0426 

RPF 

14 

LAST 

87 

06,2223 

3 4 744 

1 

CAF 

BITS 

SEE  IF  FIRST  SAMPLE  OR  SECOND. 

0427 

REF 

6 

LAST 

16^ 

06, 2234 

7 1277 

0 

MASK 

I MODE  S3<3 

2428 

REF 

4 

LAST 

165 

06,2235 

1C  COO 

0 

CCS 

A 

0429 

REF 

1 

06,2236 

1 2242 

0 

TCF 

PPCCTNCN 

REACT  AFTER  SFCONC  SAMPLE. 

0430 

REF 

15 

LAST 

165 

06, 2237 

3 4744 

1 

f.AF 

BITS 

IF  FIRST  SAMPLE,  SET  BIT  TC  REACT  NEXT 

0431 

PO^F 

7 

LAST 

165 

<■6,2240 

27'277 

0 

ACS 

I A<CDES33 

T IME. 

0432 

REF 

2 

LAST 

165 

06,2241 

1 2 3 74 

1 

TCF 

C33TF  ST 

R0433 

PRGCE 

SS  I^U 

TURA-CA 

PEGUESTS 

after  waiting  1 SAMPLE  FOP  ALL 

SIGNALS  TC  ARRIVE. 

0435 

REF 

1 

06,2242 

4 2 7 77 

c 

PPCC7ACA 

CS 

BITS7S8 

043  6 

REF 

a 

LAST 

165 

06,2243 

7 127  7 

c 

MASK 

I MCDES3C 

C437 

REF 

9 

LAST 

165 

C6 ,2244 

55*277 

0 

TS 

IMCDES30 

3433 

REF 

18 

L AST 

163 

06, 2245 

7 4 736 

c 

MASK 

BIT14 

SEE  IF  TUPA-CA  reguest. 

0439 

REF 

5 

LAST 

165 

06  ,2246 

10  <800 

D 

CCS 

A 

0440 

REF 

1 

06,2247 

1 2347 

1 

ir  F 

C FFNLY 

CFERATE  CN  CNLY. 

1441 

REF 

10 

LAS'F 

165 

06, 2250 

4 1277 

c 

CS 

I MCDES30 

IF  TUFA-CA  FEGUEST,  WE  SFCULC  FAVE  IMU 

0442 

REF 

14 

LAST 

16  1 

06,2251 

7 4743 

1 

MASK 

B IT9 

OPERATE. 

0443 

REF 

6 

LAST 

165 

C6, 2252 

10  COC 

c 

CCS 

A 

1444 

06, 2253 

1 2256 

0 

TCF 

+ 3 

0445 

REF 

1 

06,2254 

0 5567 

TC 

alarm 

ALARM  IF  not. 

0446 

86, 2255 

00  2 13 

1 

CCT 

213 

0447 

REF 

1 

06,2256 

0 2735 

1 

+ 3 

TC 

CAGESLB 

0448 

REF 

1 

C6, 2257 

3 300  5 

1 

CAF 

90SFCS 

0449 

REF 

1 

06, 226C 

0 5203  ■ 

c 

TC 

WAI TLT  ST 

C45C 

R'=F 

3 

LAST 

156 

E6 , 1414 

FBANK= 

M 1 1 

1451 

REF 

1 

86,2261 

02266 

1 

2CACR 

EADTNCN 

0451 

REF 

1 

06,2262 

14106 

0 

0452 

R = F 

• Q 

1 AST 

165 

C6,2263 

1 2 3 74 

1 

TCF 

C33TFST 

0453 

REF 

2 

L AST 

165 

06,2264 

3 3 8 ''5 

1 

RFTAJCN 

CAF 

9CSEC  S 

0454 

RCp 

1 

■)6 , 2265 

0 5224 

0 

TC 

V AROELAY 

0455 

R'^F 

12 

LAST 

88 

C6, 2266 

4 4752 

1 

EACTACA 

CS 

BTT2 

RESET  TL'RN-CN  REGILFST  *^AIL  BIT. 

0456 

REF 

11 

LAST 

165 

06, 2267 

7 1277 

0 

MASK 

I MODE  SBC 

C457 

REF 

12 

1 AST 

16  5 

06,2270 

57*277 

1 

XCF 

I MCCES3C 

1458 

RFF 

14 

LAST 

165 

06, 2271 

7 4 752 

1 

MASK 

BIT2 

IF  IT  WAS  OFF,  SEAC  ISS  DELAY  COMPLETE. 

0459 

<36,2272 

n 0006 

1 

extend 

0460 

Rff 

1 

06,2273 

1 2306 

1 

ezF 

EACTACN2 

1461 

REF 

19 

LAST 

165 

06, 2274 

3 4736 

1 

CAF 

BIT14 

IF  IT  WAS  CN  AND  TURN-CN  REGL'EST  NOW 

Gap: 
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mbi: 

RFF 

12 

LA9T 

165 

06,2275 

7 

1277 

0 

PASK 

I'''CC£S30 

PRESENT,  re-enter  90  SEC  DELAY  IN  NL. 

04A3 

^6, 2276 

c 

CCC6 

1 

EXTEND 

0^64 

PEF 

1 

06 ,2711 

1 

2264 

1 

ezF 

RETNDN 

t465 

PEF 

1 

C6, 2300 

4 

CC74 

C 

GS 

FLAG NR  CO 

IF  IT  IS  NCT  CN  non,  see  IF  A PPCG  NAS 

1466 

PEF 

1 

•)6,  23  ) 1 

7 

4744 

C 

PASK 

I NLSFBI  T 

NAITI  NG. 

0467 

OPF 

7 

laST 

165 

06,2302 

IC 

COO 

0 

CCS 

A 

046  8 

PEF 

1 

C 6, 2303 

1 

5 26  1 

C 

7CF 

TASKC\/FP 

0469 

REF 

1 

36,2304 

0 

4635 

0 

ir 

PCSTJL'IP 

047C 

PEF 

1 

C6 , 23  35 

1 763  1 

C 

CACP 

IP'UBAC 

UNSUCCESSFUL  TURN-ON. 

0471 

R‘=^F 

13 

lasT 

87 

16, 2306 

3 

4735 

1 

ENOTNON? 

CAF 

BIT  15 

SEND  ISS  CELAT  CCNPLETE. 

C47? 

06,2307 

c 

0C06 

1 

EXTEND 

3473 

R = F 

1 

96,231': 

C5 

Cl? 

1 

NCR 

ChAM2 

0474 

REF 

1 

>6 ,2311 

'3 

4674 

0 

TC 

I BNKCALL 

TLRN  CFF  NC  ATT  LAPP. 

0475 

REF 

1 

06,2312 

1 7263 

0 

CACP 

NCATTCFF 

0476 

RFF 

1 

06,2213 

0 

e 4 5 7 

1 

LN7.2 

TC 

ZEPCICDL 

CA17 

RFF 

1 

06,2314 

4 

4763 

0 

cs 

B ITS4C5 

RFFOVE  ZEPC  and  COARSE. 

0478 

06,2315 

C 

CC06 

1 

EXTENC 

•347  9 

pff 

2 

LAST 

166 

36,2316 

03 

0 12 

1 

Ia  A NO 

CHAN12 

G4EC 

RFF 

14 

LAST 

132 

C6, 2317 

3 

4 741 

1 

CAF 

R ITU 

NATT  10  SECS  FOR  CTRS  TC  FIND  GTNEAIS 

048  1 

REF 

2 

LAST 

165 

66,2323 

0 

5 224 

c 

TC 

VARDELAY 

0482 

REF 

1 

'•6,232  1 

4 

2774 

0 

ISSUP 

cs 

n C T 5 4 

RENOVE  CAGING,  INL  FAIL  INHIEIT,  ANC 

0483 

REF 

1 4 

LAST 

166 

06,2322 

7 

1277 

0 

NASK 

I P0DES30 

ICOUFAIL  INHIBIT  FLAGS. 

0484 

PEF 

15 

LAST 

166 

06,2323 

55 

'277 

c 

TS 

I PCDES30 

0465 

PR=F 

1 4 

LAST 

88 

06 , 2324 

4 

4 746 

1 

CS 

B U6 

FNABl.F  CAP 

0486 

RFF 

4 

LAST 

159 

06,2325 

7 

13C0 

1 

NASK 

I NCDES33 

0487 

RFF 

5 

LAST 

166 

36,2326 

55 

•300 

1 

TS 

I NCDE  S33 

0487  1 

RFF 

1 

06,2327 

4 

0076 

1 

CS 

FLAGWPC2 

TEST  CRTFTFLC-:  IF  ON,  CC  NOTHING  BECALSE 

043  7? 

RFF 

1 

06, 2330 

7 

4 73  5 

c 

a'ASK 

DRFTBIT 

INUCCNF  SHCULC  EE  ALL  SET  IPIBESTART 

04673 

•6,2331 

0 

0006 

1 

EXTEND 

NITH  IWLSE  DCNN).  IF  CFF,  'ET  CRIFTFLC 

04674 

06,2232 

1 

2 336 

1 

ezF 

+ 4 

ANC  1/PIFACT  TO  GET  FREEFALL  INLCCNF 

04875 

REF 

2 

LAST 

166 

•16,  2332 

26 

0 76 

1 

ADS 

F LAGNR02 

CCING  (FFFSF  START  PR  ISS  TUPN-CM. 

04676 

REF 

1 

06,2334 

3 

CC25 

0 

CA 

T IRE  1 

04877 

PEF 

1 

06,2335 

57 

• C74 

c 

XCH 

1 /FI  FACT 

CANNCT  C-FT  FERE  IF  RESTART  NITF  IMLSE  UP 

0488 

REF 

1 

06,2336 

0 

2 70  3 

1 

TC 

SETI SSW 

ISS  NARMNG  NIGHT  HAVE  EEEN  INFIEITEC. 

04  89 

RFF 

1 L 

LAST 

166 

'’6,2337 

4 

4735 

0 

CS 

RIT15 

REMOVE  IMJ  DELAY  COMPLETE  DISCRETE. 

0490 

06, 234> 

C 

OfFf 

1 

EXTEND 

0491 

REF 

3 

LAST 

166 

06,2341 

33 

012 

1 

WAND 

CFAN12 

0492 

rff 

1 

36, 2342 

3 

5CC3 

1 

CAF 

4SECS 

CCNT  ENAELE  PRCG  ALARM  ON  PIP  FAIL  FCR 
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CA93 

REF 

2 

LAST 

165 

06 ,2343 

0 5203 

0 

TC 

W A IT L 1ST 

ANOTHER  ^ SECS. 

0494 

REF 

1 

E3, 1474 

EBAA  H = 

C C L I A C 

049S 

RFF 

1 

06, 2344 

03246 

1 

2CA0R 

PFAI LCK 

C495 

PFF 

1 

06,2345 

16  103 

1 

0499 

REF 

2 

LAST 

166 

06,2346 

1 5 2 6 1 

c 

TCP 

TASKC\/EP 

0502 

REF 

11 

LAST 

88 

06,2347 

3 4750 

1 

OPCNLY 

CAF 

B IT4 

IF  OPERATE  CA  CALY,  ANC  PE  ARE  IN  CCARSE 

050’ 

06,2350 

C CCT6 

1 

FXTEAC 

ALIGN,  CCNT  ZERO  THE  CELS  BECALSE  PE 

05'’4 

PEP 

4 

LAST 

166 

06, 2351 

02  0 12 

(} 

RANG 

CHAN  12 

MGET  EE  lA  GIREAL  LCCK 

05P5 

REF 

8 

LAST 

166 

C6,2352 

1C  000 

0 

CCS 

A 

05rif> 

REF 

4 

LAST 

165 

06,2353 

1 2374 

1 

TCF 

C33TEST 

C5C7 

PFF 

2 

LAST 

166 

06,2354 

3 4744 

1 

CAF 

T MUSEBI 1 

CTHERPISE,  ZFPC  TEE  CCLNTEPS. 

0 50  0 

REF 

2 

LAST 

166 

06,2355 

7 0C74 

0 

AASK 

FLAGWRCO 

UNLESS  SCMEONF  IS  USING  THE  IHL. 

0509 

REF 

9 

LAST 

167 

06, 2356 

1C  COO 

0 

rc  S 

A 

C51C 

PFF 

5 

LAST 

167 

06  ,2357 

1 2374 

1 

TC  F 

C 33TEST 

0511 

REF 

1 

06,2360 

0 2146 

c 

TC 

C AGESUB2 

SET  TUPACN  FLAGS. 

051 1 5 

REF 

2 

LAST 

166 

06,2361 

0 4674 

c 

ISSZERO 

TC 

I8AKC ALL 

TURN  CFF  NC  ATT  LAPP 

U 5 1 1 6 

RFF 

2 

LAST 

166 

06,2362 

1 7260 

0 

CACR 

NCATTCFF 

IRL  CAGE  CFF  ENTRY 

0512 

RFP 

13 

LAST 

F£ 

C6, 2363 

3 4 741 

1 

CAF 

BIT5 

ISS  ecu  ZEPC 

0513 

06,2364 

0 0006 

1 

EXTEND 

0514 

REF 

5 

LAFT 

1 61 

06 , 2365 

05  012 

1 

ViCP 

CHAN12 

0514  1 

FEF 

2 

LAST 

166 

06, 2366 

r, 

1 

TC 

ZFRCICDL 

0515 

PEF 

15 

LAST 

16  6 

06,2367 

3 4746 

0 

CAF 

B IT6 

WAIT  3CC  MS  FCR  AGS  TC  RECEIVE  SIGNAL. 

0516 

RFF 

3 

LAST 

161 

F6, 237C 

C 5203 

c 

TC 

V«AITLIST 

0517 

PFF 

4 

LAST 

165 

P6, 1414 

EBANK= 

M 1 1 

0518 

REF 

1 

06,2371 

02313 

1 

2CADF 

L1AZ2 

0518 

DTF 

1 

06,2372 

14  1C6 

c 

G519 

REF 

6 

LAST 

167 

06,2373 

1 2374 

1 

TCF 

C33TEST 
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P052O  FPCGPAN  name:  f33TFST 

P')52l  functional  DESCRIPTICN:  THIS  PRCGPAM  MCMTCPS  TEPFP  FLIP-ELTP  INBITS  CF  fEANNEl  33  AND  CALLS  TEE  AFPRCPRIA1E 

R05?3  SUBROUTINE  TO  PROCESS  A CHANGE.  IT  IS  ANALOGGUS  TO  IMLMON,  V^;HICH  MCMTCRS  CHANNEL  30,  ExCFPT  TEAT  IT  PEACS 
RT525  CHANNEL  33  HTH  A WANE  INSTPlJCTICN  BECAUSE  A 'WRITE'  PLLSE  IS  RECLIPED  TC  RESET  ''HE  FLIP-FLCPS.  lEE  BUS 
R0S?7  PROCESSEQ  AND  THE  SUBROUTINES  CALLEC  ARE; 


RQ528  PIT  FUNCTICA  SLBROLTINE 

R0529 

R0530  12  PIPA  FAIL  PIPFATL 

R0531  12  CrWNLTNK  TOO  FAST  ONTMFAST 

R0532 11  UPLINK  TCC  FAST URTMFAST 


R0533  UFCN  ENTRY  TO  THE  SUEP.OUTTNE,  THE  NEW  BIT  STATE  IS  IN  A. 


P053A  CALLING  SEQUENCE:  EVERY  A80  MLLISECCNCS  AFTER  TNONTEST. 

R0535  JOES  CP  TASKS  INITIATED:  NGN'E. 


R0536  SUPRCLTINES  CALLFC:  FIPFAIL,  CNTMFAST  AMD  UPTMFAST  ON  BIT  CHANGES. 


R0537  FRASAPLE  INITIALI  ZATTCN:  C{INCnES32)  = OCT  UOCC  CN  A FRESH  START  OR  RESTART,  ThEPEFCRE,  THESE  ALARMS  HLL 

P0539  REAPPFAR  IF  THE  CONDITIONS  PERSIST, 


R05AC  ALARM':  NONE. 

R05A1  FXIT:  GLCCKMIOM. 


R0542  CLTFUT:  IJPCATEC  PITS  13,  12  AND  11  OF  IMCDES22  WITH  CHANGES  PROCESSED. 


0543 

REP 

6 

LAST 

166 

06,2374 

3 1300 

0 

C3'<TEST  CA 

IMCDES33 

SEE  IE  relevant  CHAN  33  PITS  HAVE 

0 54  4 

PFF 

1 

06,2375 

7 5026 

1 

MASK 

33PDNSK 

C545 

RPF 

2 

LAST 

93 

06,2376 

54  00  1 

1 

TS 

L 

CHANGED. 

0546 

REF 

2 

LAST 

16E 

06,2377 

3 5C26 

c 

CAF 

33R  DMSK 

0547 

06, 2400 

0 0006 

1 

EXTEND 

0 54  F. 

REF 

1 

06 , 240  1 

03  033 

1 

WAND 

CHAN33 

RESETS  FLIP-FLCP  INPUT' 

0549 

06, 2402 

0 0006 

1 

EXTPND 

0550 

PEE 

3 

LAST 

16  2 

06, 24C3 

06  00  1 

0 

RXCR 

LCHAN 

0551 

06 , 2404 

0 0006 

1 

EXTEND 

0552 

REF 

1 

06,2405 

1 24  24 

1 

, RZP 

GLCCKMCN 

CN  NC  CHANGE. 

0553 

RPF 

8 

LAST 

163 

06 ,2406 

54  070 

1 

TS 

rlptregi 

SAVE  BITS  WHICH  HAVE  CHANGED. 

0554 

REF 

7 

LAST 

16E 

06, 2407 

22' 30C 

c 

LXCF 

I MCDES33 

0555 

06,  241'' 

0 C006 

I 

EXTEND 

0556 

RPF 

4 

LAST 

168 

06 ,2411 

06  011 

0 

RXOR 

LCHAN 

0557 

RPF 

8 

LAST 

168 

06,2412 

55 • 2CF 

1 

TS 

I MCDFS33 

UFCATEC  IMCCES33. 

0568 

REF 

3 

LAST 

158 

06,2413 

•a 

1 

CAF 

ZERO 

0559 

PEF 

9 

LAST 

166 

C6  , ?414 

56  07  1 

0 

XCF 

PUPTPEGl 

0 560 

06, 2415 

6 CCOC 

1 

CCUPLE 

GAP: 

ASSEVBLF 

REVISION 

1 16 

OF  AGC  PRCGRAR  LUNINARV  8> 

FASA  2021112-071 
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L 

T4RUPT 

FREGFAM 

LSER’S  PAGE 

NC.  14  E6  S4 

0561 

PEF 

1 

06,2416 

1 2421 

0 

TCF 

NXTIET  +1 

SCAN  FCR  BIT  CHANGES. 

0 562 

RFF 

4 

LAST 

162 

06, 2417 

6 4 7 5 2 

1 

-1 

AD 

CNF 

0563 

REF 

in 

LAST 

168 

06,2420 

24  07  ) 

0 

NXTIET 

INCR 

RUPTREG 1 

0564 

C6, 2421 

6 CCCC 

1 

+ 1 

CCLE  LF 

0565 

REF 

10 

LAST 

167 

06, 2422 

54  ocn 

Q 

IS 

A 

(CCCTNG  IDENTICAL 

TC  CFAN  30  ). 

0566 

REF 

2 

LAST 

16' 

C6,2423 

1 24  2 0 

1 

TCF 

NXTIET 

0567 

PEF 

3 

LAST 

162 

06,2424 

56  07  1 

1 

XCH 

PLPTREG2 

0568 

R^F 

11 

LAST 

169 

06,2425 

50  070 

0 

INDEX 

RLPTREG  1 

GET  NEl.  VALLE  CF 

BIT  ViFICH  CFANGEC. 

0565 

RFF 

1 5 

LAST 

87 

C6, 2426 

3 4737 

c 

CAF 

B IT13 

0570 

REF 

9 

LAST 

168 

06, 2427 

7 1 2C0 

1 

NASK 

I NPDES33 

0571 

REF 

1?. 

LAST 

169 

06,2430 

50  0 70 

0 

INDEX 

PL'PTREGl 

0572 

RFF 

1 

06,2431 

0 2762 

1 

TC 

C33 JNF 

0573 

R'^F 

4 

LAST 

169 

06,2432 

10  071 

0 

NXTFL22 

CCS 

RUPTREG2 

PRCCESS  PCSSIELE 

ACDITICNAL  CHANGES. 

0574 

REF 

3 

LAST 

169 

06 ,2433 

1 2417 

0 

TCF 

NXTIET  -1 
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P0575  PROGP.AW  NAME:  GLCCKNTN 

R057<S  cuNGTICNAL  EFFCPIPTICN;  THIS  PROGPA^I  MONITORS  THE  GDIZ  COLMTFP.  TC  CETFRPINE  kh-ETHEP  THE  ISS  IS  IN  GIPEAL  LCCK 
R0578  ANC  TAKES  ACTION  IF  IT  IS.  t(-ree  PEGICNS  OF  MICCLE  GIMEAL  ANGLE  (i^GA)  ARE  LSEC: 

R058M 1)  ABS(PGA)  L^SS  THAN  PR  FQUAL  TC  7C  CEGPEES  - NCPPAL  NCCE. 

R05E1  2)  AES(NCA)  GREATER  THAN  70  CFGREES  ANC  LESS  THAN  OR  FCUAL  TG  85  EEGREES  - GIPBAL  LCCK  LAPP  TUFNEC  CN. 

R05e3  3)  APS(PGA)  GPE/Tcp  Tt-AN  85  CFGREES  - TSS  RUT  IN  COARSE  ALIGN  ANC  NO  ATT  LAPP  TLRNFD  CN. 


R0585  calling  SEQLFNCE:  EVERY  A8Q  MLLTSECCNCS  AFTER  C33TEST. 

R05E6  JCeS  CR  TASKS  IMTIATFD:  ACAE. 


RC587  SUfiROLTINFS  CALLFC:  1)  SFTCCARS  VvHFN  APS(PGA)  GREATER  THAN  85  CEGPEES  AKC  ISS  NCT  IN  COARSE  ALIGN. 

R0589 2)  LAMPTEST  8EF0PF  TURNING  OFF  GIPBAL  LCCK  LAPP. 


P0590  FRASA8LR  I M T I A L I 2 AT  1 CN  : 

R0591 1)  FpfSF  START  CR  RESTART  '/iITH  NC  GRCLFS  ACTIVE:  CICCL2)  = 0,  IPrcES3G  BIT  6 = 0,  IPCCFS23  PIT  1 = C. 

RH  593  21  restart  UITF  GROMPS  ACTIVE:  SAPIE  AS  FRESH  START  EXCEPT  C(CDLZ)  NCT  CHANGEC  SC  GIWEAL  PCMTCR 

RQ595  FRCCEECS  AS  EEFGFE. 


P0596  ALAPPS:  1)  MGA  RP-GICN  (2)  CAUSES  GIPIBAL  LOCK  LAPP  TC  BE  LIT. 

RC597  2)  PGA  REGICN  (3)  CAUSES  THE  ISS  TO  BE  PUT  IN  COARSE  ALIGN  AND  THE  NC  ATT  LAPP  TG  BE  LIT  IF  EITHER  PC7 

R0599 SP  ALREADY. 


0600 
060  1 

PFF 

REF 

1 

1 

r-6, 2A3A 
06,2A35 

10 

1 

03A 

2AA1 

] 

'» 

GLCCKPCN 

CCS 

TCF 

CCL'Z 

GLOCKCHK 

SEE  IF  PiAGMTUDE  OF  PIGA  IS  GREATER  THAN 

0602 

PFF 

1 

06, 2A36 

1 

?Af  5 

C 

TCF 

SEtGLCCK 

70  DEGREES. 

06C3 

RFF 

2 

LAST 

170 

06 ,2 A3  7 

1 

2AA  1 

0 

TCF 

GLOCKCHK 

060A 

REF 

2 

LAST 

17C 

06, 2AAC 

1 

2A£5 

c 

TCF 

SETGLfCK 

0605 

RFF 

1 

06, 2AA  1 

6 

2512 

r 

GLOCKCHK 

AD 

-700EGS 

C6C6 

C6,2AA2 

0 

00(16 

1 

EXTFPO 

0607 

_REF 

3 

LAST 

17C 

06, 2AA3 

e 

2 A£A 

0 

BZPF 

SETGLCCK  -1 

NC  LCCK. 

0608 

REF 

1 

06, 2 AAA 

6 

2513 

1 

AD 

-15DEGS 

SEE  IF  AeS(PGA)  GFEATEP  THAN  85  CEGFFES. 

060  9 

06,?AA5 

0 

00)  6 

1 

EXT  ENC 

061C 

PEE 

1 

C£,2AAH 

6 

2 A 6 2 

c 

P.7YF 

NCGIPFUN 

0611 

PFF 

12 

LAST 

167 

06 ,2AA7 

3 

A 7 50 

1 

CAE 

B ITA 

IF  SO,  SYSTEP  SHCULC  BE  IN  CCAPSF  ALIGN 

0612 

06, 2A50 

0 

CC06 

1 

FXTEPC 

TC  PREVENT  GIM8AL  RUNANAY. 

0613 

RFF 

6 

1 AST 

167 

06, 2A5  1 

02 

02 

c 

RAND 

CHAM  2 

Q61A 

RFF 

11 

LAST 

169 

06 , 2A52 

10 

TOC 

0 

CCS 

A 

0615 

PPF 

2 

L AST 

17G 

i:  6 , 2 A 5 3 

1 

2A62 

1 

TCF 

NCGI PPUP 

0616 

RTF 

3 

LAST 

167 

06, 2A5A 

0 

A67A 

0 

TC 

I BNKC ALL 

0617 

R = F 

I 

C6,2A55 

17136 

1*1 

CACP 

SETCCAPS 

0617  3 

RTF 

1 

06,2^56 

*5 

£ 2A5 

1 

CAF 

SIX 

ENABLE  ISS  ERFCP  COUNTERS  IN  6C  NS 

C617A 

REF 

A 

LAST 

167 

06  ,?A57 

0 

5213 

0 

TC 

WAITLIST 

GAP;  ASSFNBLE  REVI'^inN  116  CF  ACC  PPCGRA*^  l.U^''INARY  BV  N^SA  20  2 1 ll2-r-/l 


IC;CG  AUG.  11,1969  lE^^^AID.099 


AGE  171 


l_  T4PIJPT  PROGRAM 


USER'S  PAGE  NO.  16  E6  SA 


0617E 

C6176 

06176 

REF 

REF 

PER 

2 

1 

1 

LAST 

167 

E3,  1474 

06 . 2460 

06.2461 

03132 

161C3 

1 

1 

EBANK= 

2CACP 

CEL  I NO 
CA+ECE 

0618 

REF 

16 

! AST 

167 

06,2462 

3 4 746 

C 

MCGIMRLN 

CAF 

R IT6 

TLPN  CN  GIMEAL  LCCK  LAMP. 

061S 

REF 

4 

LAST 

17C 

06,2463 

1 2465 

0 

TCF 

SETGLCCK 

0620 

REF 

4 

LAST 

166 

06, 2464 

3 4 7 5 5 

1 

-1 

CAF 

ZERO 

062  1 

REF 

6 

LAST 

158 

06, 2465 

6 1035 

0 

SETGLCCK 

AD 

CSPTAB  +11C 

SEE  IF  PRESENT  STATE  CF  GIMBAL  LCCK  LAMP 

0622 

PEE 

17 

LAST 

171 

06,2466 

7 4746 

1 

MASK 

e IT6 

AGREES  with  DESIRED  STATE  BV  HALF  ADDING 

0623 

06, 2467 

0 00116 

1 

EXTEND 

TEE  Tl^C. 

0624 

REF 

1 

06,2470 

1 5 2 70 

0 

E7  F 

GLOCKCK 

CK  AS  IS. 

0625 

REF 

7 

LAST 

171 

06 , 2471 

7 1035 

1 

MASK 

DSFTAB  +ilC 

IF  CFF,  CCNT  TURN  DN  IF  IMU  BEING  CAGED. 

0626 

REP 

12 

LAST 

170 

06, 2472 

10  COO 

0 

CCS 

A 

0627 

RFE 

1 

C6 ,2473 

1 2507 

0 

TCF 

GLAMpTST 

TURN  CFF  LNLESS  LAMP  TEST  IN  FRCGFESS. 

0628 

REF 

18 

LAST 

171 

06,2474 

3 4 746 

<3 

CAF 

BI  T6 

0625 

ref 

16 

LAST 

166 

■)6 ,2475 

7 1277 

0 

MASK 

1M0DES3C 

0630 

REF 

13 

LAST 

171 

C6, 2476 

10  OOO 

Q 

CCS 

A 

0631 

REF 

2 

LAST 

17  1 

06,2477 

1 5 2 70 

0 

TCF 

GLOCKCK 

C632 

REF 

8 

LAST 

17  1 

7 6 , 2 5'.)i‘) 

4 1035 

1 

GL  INVFRT 

CS 

DSPTA6  +11C 

IMVERT  GIMBAL  LCCK  LAMP. 

0633 

REF 

19 

LAST 

171 

06 ,2501 

7 4746 

1 

MASK 

B IT6 

0634 

REF 

15 

LAST' 

166 

06,2602 

6 4735 

1 

AD 

BIT15 

TC  INCICATF  CFANGF  IN  CSFTAB  +11C. 

0635 

REF 

9 

LAST 

171 

06,2503 

57  ' 735 

0 

XCF 

DSPTAE  +11C 

063  6 

REF 

1 

C6 , 2504 

7 2162 

1 

MASK 

CCT37737 

0637 

REE 

10 

LAST 

171 

06,2575 

27  "135 

1 

ACS 

DSPTAB  711C 

0638 

PEF 

“3 

LAST 

17  1 

■J  6, 2 50  6 

1 5 27C 

0 

TCF 

G LCCKCK 

0639 

REF 

1 

06,2577 

0 276  6 

1 

GLAMPTST 

TC 

LAMPTEST 

TURN  CFF  UMLFSS  LAMP  TEST  IN  FRCGFESS. 

064f 

REF 

4 

LAST 

171 

C6, 251C 

1 5270 

0 ’ 

TCF 

GLOCKCK 

0641 

REF 

1 

06,2511 

1 2 5QC 

1 

TCF 

GL  INVERT 

0642 

06,2512 

63434 

1 

-700EGS 

DEC 

-.38688 

-7C  DEGREES  SCALFO  IN  E A L F- R E v C LUT I C NS . 

0643 

06,2513 

75252 

0 

-150FGS 

EEC 

- .08333 
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P0£A4  CRGGF  AN  AANF  : TL IM . 


R06A5  FUNCTTPNAL  DEFCPIPTICN:  TH  T 9 FRCGRAN  NAIMAIAE  TEE  TENF  LAMP  (ETT  A CF  CFANKEL  11)  CN  THE  DSK7  TC  AGREE  V-ITH 

R06A7  THE  TFMP  SIGNAL  FPCM  THE  ISS  (BIT  15  OF  CHANNEL  30).  HOWEVER,  THF  LIGHT  WILL  NCT  EE  TLRNED  OFF  IF  A LANP  TEST 

RQFA9  15  IN  FPCGRESS. 


R065i) 

CALL ING 

SFQUEMCF : 

called  by 

IMUNON  CN 

A CHANGE 

CF  BIT 

15  OF  CHANNEL 

i 

• 

o 

R0651 

JCBS 

CF 

T ASKS 

INITIATED:  NONE. 

R 0 6 5 2 

SCBRCLTINES  CAL!  <=c  : 

LAMP  TEST 

• 

R-1653 

FRASAFL  E 

INITIALIZATION:  FRESH  START 

AND  RESTART  TURN 

THE  temp  lamp 

CFF  . 

ROt55 

ALARM 

< • 

TFNF 

lamp 

TUPNE'C  CN 

WHEN  IMU 

TEMP  GCES 

OUT  OF 

L IMTTS. 

R0656 

EXIT: 

NXTIFAIL. 

R0657 

CLTPLT  : 

SERVICE  CF 

TENF  LAMP 

• 

IM  A,  except  fcr  TLIM. 

0659 

REF 

1 

06,251A 

7 A733 

0 

TL  IM 

MASK 

PCSMAX 

REMOVE  BIT  FRCM  WORD  OF  CHANGES  AND 

SET 

0660 

REF 

5 

LAST 

169 

C6, 2515 

5 A 07  1 

0 

TS 

RLPTPEG2 

CSKY  TENF  LAMP  ACCORDINGLY. 

0661 

REF 

17 

1 AST 

171 

06,2516 

11  ' 277 

0 

CCS 

IMOOE  S30 

0662 

RFF 

1 

06,2517 

1 2525 

f 

TCF 

tenpck 

0663 

RRF 

2 

LAST 

172 

06, 252R 

1 2 = 2“= 

f- 

7CF 

TENPCK 

C66A 

REF 

n 

LAST 

1 7f 

06 ,2521 

3 A750 

1 

CAF 

B I'^A 

TLPN  CN  LAMP. 

0 66  5 

06, 2522 

C C0G6 

1 

EXTEND 

0666 

REF 

1 

06,2523 

05  111 

1 

WOR 

DSALMCUT 

■J667 

P'^F 

1 

Ob,252A 

1 2225 

1 

TCF 

NXTIFAIL 

066R 

P£F 

2 

L AST 

17  1 

06, 2525 

0 2 766 

1 

TE-NFTK 

TC 

LAMPTFST 

IF  TENF  NCW  CK,  CCNT  TUFN  OFF  LAMP 

IF 

0669 

RFF 

2 

LAST 

172 

06,2526 

1 2225 

1 

TCF 

NXTIFAIL 

LAMP  TEST  IN  PROGRESS. 

0670 

REF 

lA 

LAST 

172 

06,2527 

A A75C 

c 

CS 

e ITA 

0671 

06, 2530 

0 c 0 rj  6 

1 

EXTEND 

0672 

PE'F 

2 

LAST 

172 

06,2531 

03  -Ul 

1 

WAND 

OSALMQUT 

TURN  CFF  LAMP 

0673 

RFF 

Q 

LAST 

172 

06,2532 

1 2225 

1 

IGF 

NXTIFAIL 

. .. 
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L 

tarijpt  frcgpan 

USER'S  PAGE 

CO 

• 

LJ 

E6  SA 

P067A 

PROGRAM  NAME:  ITLRNCN. 

R9675 

FUNCTICNAL  CESCRIPTICN:  this  OR-IGRAM  IS  CALLEC  BY  IWLMON  WHEN 

A CEiANGE  CF  BIT  LA  CF  CEANNEL  30 

( ISS  TURN-CN 

R0677 

R0679 

R0681 

RECLEST)  IS  OFTEGTEO.  UFCN  ENTRY,  ITIJRNON  CEECKS  IF  A TURN-OM 
TF  NOT,  IT  CEECKS  WEETHFP  THE  TIJRN-ON  REQUEST  CHANGE  IS  TC  CN 
TEAT  TNCNTFST  WILL  INITIATE  tef  jsS  INITIALIZATION  SECLENCE. 

DFLAY  SEQUENCE  HAS  FAILED,  AND  IF  SC,  IT  EXITS. 
CR  CFF.  IF  CN,  IT  SETS  BIT  7 OF  IMCCES3C  TC  I SC 
IF  CFF,  TEE  TLPN-CN  CELAY  SIGNAL,  CHANNEL  12  EIT 

R0683 

R0685 

R0686 

15,  IS  CHECKFD  ANC  IF  I IS 
CF  IMCCFS30  IS  SET  TC  1 AND 
THE  SETTING  '~F  BIT 

CN,  TTURNCN  EXITS.  IF  TEF  CELAY  SIGNAL  IS  OFF,  PROC-RAR  ALARM 
TEE  FRCGRAE  EXITS. 

2 CF  IMCCES39  (ISS  CFLAY  SEQUENCE  FAIL)  INHIBITS  THIS  RCLTINE 

00207  T S ISSUED  , BIT  2 
AND  INLCF  FPCN 

9968a  PPOGFSSTNG  ANY  CHANGFS.  THIS  BIT  WILL  69  RESET  PY  TEE  ENCTNCN  ROUTINE  VvEEN  TEE  CURRENT  9C  SECCND  DELAV  PERICC 
P9690  ENTS. 


RPEEl  CALLING  SECLENCF:  FRCN  INUECN  WEEN  ISS  TIJRN-CN  PEGUEST  CEANGES  STATE. 

R9697  JOBS  CR  TASKS  TNITIATEO;  NONE. 


R0693  SLPPCLTINFS  CALLEC:  ALAPN,  IF  TEE  ISS  TURN-ON  REQUEST  IS  NOT  PRESENT  FOR  9C  SECCNDS. 


RQ695  erasable  IN  I T I AL T Z AT  I C N : FRFSH  START  ANC  RESTART  SET  BIT  15  OF  CEANNEL  12  ANC  BITS  2 AND  7 OF  IMCCES3C  TC  C, 


R.T697 

ANC 

BT''' 

lA  OF 

IMnrFS39  Tri  i. 

P C69P 

ALARMS  : 

PRCGPAN  AlAPN  09297 

IS  ISSLEC 

IF  TFE  ISS  TURN- 

CN  PEGUFST  S 

IGNAL  is  NCT  FRFSEM  fop  9C  SECCNDS. 

R 07T^i 

EXIT 

: NXTIFAIL. 

R0701 

CLIP 

LT  : 

PIT  7 

CF 

I^CnES3'9  TC 

START 

ISS 

IMT  lAL  IZAT  TON, 

OR  BIT  2 OF 

IMCDES3G  AND  PRCGRAM  ALARM  00207  TC  INCICATE 

P07C3 

A FAILED 

TURN- 

ON  SECLENCF, 

9704 

REF 

15 

LAST 

165 

96,2533 

3 A752 

0 

niRNON  CAF 

B TT2 

IF  delay  REQUEST  FAS  GONE  CFF 

0705 

RFF 

18 

LAST 

172 

06,2534 

7 1277 

U 

MASK 

IM0DES30 

PREMATLRFLY,  CO  NCT  PRCCESS  ANY  CHANGES 

9706 

PEF 

lA 

LAST 

171 

06,2535 

10  COQ 

0 ’ 

CCS 

A 

UNTIL  TFE  CURRENT  90  SEC  WAIT  EXPIRES. 

9707 

REF 

4 

LAST 

172 

06,2536 

1 2225 

1 

TCF 

NXTIFAIL 

0708 

REF 

2C 

LAST 

165 

(■6,2  537 

3 4736 

1 

CAF 

B IT  14 

SEE  TF  JUST  ON  OR  OFF. 

9709 

Rff 

19 

LAST 

173 

C6, 2540 

7 1277 

0 

MASK 

I MCDES3CI 

C71C 

06 ,2541 

C 000  6 

1 

EXTEND 

0711 

REF 

1 

06 , 254  2 

1 2 556 

1 

BZF 

I TURN  CM2 

IF  JUST  CN. 

0712 

RFF 

16 

LAST 

17  1 

96, 2 5 A3 

3 AT35 

1 

CAF 

B IT15 

0713 

06,25AA 

0 9906 

1 

EXT  EMC 

SEE  IF  DFLAY  PRESENT  DISCRETE  FAS  BEEN 

9714 

RFF 

7 

LAST 

17C 

06, 25A5 

02  01  2 

c 

RAND 

CHAN12 

SENT.  IF  SC,  action  CCMPLETF 

0715 

96 , 25A6 

0 9906 

1 

EXTEND 

0716 

06,2547 

1 255  1 

0 

BZF 

+ 2 

9717 

REF 

5 

LAST 

173 

96,2550 

1 2225 

1 

TCF 

NXTIf/sil 

0718 

REF 

16 

LAST 

173 

96,2551 

3 4752 

0 

CAF 

B IT2 

IF  NOT,  SET  BIT  TC  INCICATE  REQUEST  NCT 

07  19 

rff 

20 

LAST 

173 

C6,2552 

27'277 

c 

ACS 

INCCES3.) 

PRESENT  FCR  FULL  CURAT  IGN. 

0729 

REF 

2 

LAST 

165 

06,2553 

0 5567 

c 

TC 

ALARM 

0721 

96 ,2.554 

00  2 ■)  7 

1 

OCT 

207 

972  2 

RFF 

6 

LAST 

173 

06,2555 

1 2 22  5 

1 

TCF 

NXTIFAIL 
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C723 

172A 

2725 

PGF 

RFE 

PEP 

21 

15 

22 

LAST 

LAST 

LAST 

172 

165 

17A 

06.2556 

06.2557 
06,2560 

4 1277 
7 4 745 
27*277 

0 

1 

n 

ITURNCA2 

CS 

nASK 

ACS 

I PCCES3Q 
B IT7 

IPODL  5 20 

SFT  BIT7  TG  INDICATE  PAIT  CF  ] 

L SANFIF 

0726 

RFE 

1 

06,2561 

3 2 564 

1 

CAP 

RR  IN'  IT 

07261 

PFF 

1 

06,2562 

54  1 10 

0 

TS 

RADMCCES 

0727 

PEE 

7 

LAST 

173 

('6,2563 

1 2225 

1 

Tf  F 

NXTIFAIL 

3727  1 

C6,256A 

OC  1C2 

1 

RRIMT 

CCT 

00102 
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1.  T-^RIPT  program  USFR'S  PAGE  AO.  2C  Et  SA 

P0728  FRCGRAA  NAME:  IMLCAGE . 

P072F  FUNCTTCN«L  CESCPIFTICM  THIS  FRCC-P<M  PROCESSES  CEANGES  OF  THE  IMLCAGE  INBIT,  CHANNEL  30  BIT  11.  IF  TEE  EH 
R 1731  CHANIGES  TO  0 (CAGE  BUTTON  PRESSED),  THE  ISS  IS  CAGEC  ( ICDU  ZERO  + CCARSE  ALIGN  + NC  ATT  LAMP)  LN'TIl  TEE 

RJ733  ASTRONAUT  SELFCTS  ANCTHFP  PROGRAM  TO  ALIGN  TEE  ISS.  ANT  PULSE  TRAINS  TC  TEE  ICCL'S  ANC  GVPC'S  APE  TERMINATEC, 

R0735  THE  ASSOCIATED  OIJTCCUNTFPS  APE  ZERGEC  AND  THE  GYRO'S  ARE  CF-SELECTEC.  NO  ACTION  OCCURS  ^^HEN'  THE  BUTTON  IS 

P0737  RELEASFC  (IN'BIT  CHANGES  TO  1). 

R0738  CALLING  SEGUEN'CE:  BY  IMIJmqn  V'HPfg  CAGE  BIT  CHANGES.  

P0739  JOBS  OR  TASKS  INITIATED:  NONE. 

R07An  SUBROUTINES  CALLEC:  CACESUB. 

R074I  ERASABLE  INITIALIZATION:  FRFSE  START  ANC  RESTART  SET  BIT  II  OF  IMCrESZC  TC  1. 

R07A3  ALARMS:  NONF. 


R0744 

EXI-^ 

NXTIFAIL 

• 

R0745 

OUTPUT ; 

ISS  CAGFC, 

CCUNTFRS 

ZERCEC  , 

PULSF  TRAINS 

1 TFRMNATFC  ANC  NC 

ATT  LAMP  LIT. 

0747 

REF 

15 

LAST 

173 

06,2565 

10  non 

0 IMUCAGF 

CCS 

A 

NC  ACTICN  IF  GCING  CFF. 

C74  e 

RFF 

1 

06,2566 

1 2361 

0 

TCF 

ISSZERO 

074F 

RFF 

1 

C6, 2567 

A 300  2 

1 

CS 

CCT77000 

TEREINATE  ICCU,RCCU,  GYRO  RUSE  TRAINS 

0750 

06, 257C 

C 0006 

1 

EXTEND 

C751 

RFF 

1 

06 , 257  1 

0 3 014 

1 

WANC 

CEAN  14 

0752 

REF 

1 

06,2572 

A 2776 

1 

CS 

CCT272 

KNCCK  CCWN!  DISPLAY  INERTIAL  DATA,  nU 

07521 

06, 2573 

0 0006 

1 

EXTEND 

ERROR  CCLNTER  ENABLE,  ZEPC  ICDU,  CCARSE 

07522 

RFF 

fi 

LAST 

1 73 

06,2574 

03  012 

’1 

EiANC 

CEAN12 

ALIGN  ENABLE,  RR  Errcr  CCLNTER  ENABLE. 

075221 

PFF 

1 

06,2575 

A A7A5 

1 

CS 

ENGCNRl T 

INSURE  ENGCNFLG  IS  CLEAR. 

075222 

REF 

2 

LAST 

158 

06 ,2576 

7 oni 

0 

MASK 

FLAGWPD5 

075223 

REF 

*3 

LAST 

175 

06,2577 

5A  1 C 1 

C 

TS 

FLAGWPC5 

0752  3 

DCF 

I 

06,2600 

A 4 3 5 5 

1 

CS 

PRI 030 

TUFN  ENGINE  CFF. 

0752A 

06,26'M 

0 0006 

1 

EXTEND 

07525 

REF 

■7 

LAST 

172 

06,2602 

C2  Cll 

c 

RAND 

OSALECUT 

075251 

RFF 

21 

LAST 

173 

06,2603 

6 A736 

1 

AD 

BIT14 

075252 

06 ,2604 

0 CCC6 

1 

EXT  END 

075253 

REF 

4 

LAST 

175 

C6,26C5 

01  on 

0 

WRITE 

D SALECUT 

FCFCE  BIT1A=1,  BIT13=0. 

C7526 

PFF 

1 

06  , ?6'I6 

1 2743 

0 

TC 

C AGESLB  1 

07527 

REF 

A 

LA  ST 

17C 

C6, 26'7 

0 4674 

c 

TC 

I PN  KC  ALL 

KNCCK  CCWN  TRACK,  PEFSMMAT,  DRIFT  FLAGS 

0752  e 

PFP 

1 

46, 26 10 

17  167 

I 

CAOR 

RNDRF.FOR 

C753 

REE 

C 

LAST 

17  1 

06,2611 

4 4755 

0 

CS 

ZERO 

0754 

PFF 

1 

06,2612 

5A  C5C 

C 

TS 

CCUXCED 

0755 

REF 

1 

06, 2613 

54  051 

1 

TS 

CDUYCED 
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1 

T-^RUPT 

FRCGRAP 

LSER' £ PAGE 

NO.  21 

E6  S6 

0756 

REF 

1 

C6, 2616 

56  C52  1 

T£ 

CCUZCFC 

0757 

PEF 

1 

06, 2615 

56  067  C 

TS 

G VROCND 

)75R 

PPF 

1 

06,2616 

6 3001  1 

CS 

CCT760 

HAVING  WAITED  AT 

LEAST  27  MCT 

FPOP 

0759 

06,2617 

0 cooe  1 

EXTFNC 

GYRO  FUSE  train 

TERMFAT  ICN  , 

WE  CAN 

076C 

PEF 

2 

LAST 

1 75 

06,2620 

03  016  1 

WAND 

CLAN  16 

DE-SELECT  THE  GVPCS 

0761 

PEF 

F 

1 AST 

17A 

06,2621 

1 2225  1 

TCF 

NXT1F» IL 
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PT762  PPCGPA.V  NAME:  IMLCP. 

R0763  FUACTTPNAL  DESCPIPTTCN:  THIS  PPCGPAM  PROCESSES  CFANGES  IN  THE  ISS  CPEPATE  OISCPFTF,  EIT  9 CF  CFAANEL  3C. 

R0765  IF  THE  INBIT  THANGES  TO  0,  INDICATING  ISS  CN , TMCP  GENFRALLY  SETS  EIT  7 GF  IMCCES30  TO  1 TO  REQLESI  ISS 

R0767  INITJ  AL  IZATTON  VIA  TPrNTfST.  AN  EXCEPTION  IS  OLRING  A FAILED  ISS  DELAY  FLPING  ^.FICF  EIT  2 CF  1MCCES30  IS  SET 

R0769  TO  I AN D NC  furthfr  I M T I A L 1 Z AT  I C N IS  PEGGIREC.  WHEN  THE  INBIT  fhANGES  TO  1,  INCICATING  ISS  CEE,  IMISEFLG  IS 

P^:i771  TESTFG  TO  SEE  IF  ANY  PROGRAM  IaAS  L'ING  THF  ISS.  IF  SC,  PRCGRAM  ALAPM  0O21A  IS  ISSUEC. 

P0  773 CALLING  SEQUENCE:  PY  INUMQN  WHEN  BIT  9 OF  CHANNEL  3C  CHANGES. 


R0774  JOES  OR  TASKS  IMTIA.IfD:  NONE. 


R0775  SUEPGLTINES  CALLEF:  ALARM,  IF  ISS  IS  TURNED  OFF  NHILE  IN  USE. 

RC776  ERASABLE  I NI T I AL I Z AT  I C N : CN  FRESH  START  AND  RESTART,  PIT  9 CF  IMQCFS3C  IS  SET  TC  I EXCEPT  PHFN  THE  GINBAl  ICCK 

R-1778  LAMP  IS  ON,  IN  WHICH  CASE  IT  IS  SET  TO  0.  THIS  FREVFNTS  ICDU  ZERC  EY  TNCNTEST  WITH  THE  ISS  IN  GIMEAL  LCCK. 

R078D  ALARMS;  PRCGRAM  ALARM  0n?14  IF  THE  ISS  IS  TURNED  OFF  WHILE  IN  USE. 


R0781  EXIT:  NXTIFAIL. 


R3782  CUTPUT:  ISS  TNTT TAL  IZAT  ICN  REQUEST  !TMQDES30  BIT  7)  CR  PROGRAM  ALARM  C0214. 


0784 

06,2622 

C 0006 

1 

IMUDF 

EXTEND 

0785 

REF 

1 

06,2623 

1 2643 

0 

ezR 

I MUCF2 

0786 

PFF 

10 

LAST 

169 

06, 2624 

4 1300 

1 

cs 

1MODES33 

disable  CAP 

0787 

REE 

2C 

LAST 

171 

06,2625 

7 4746 

1 

MASK 

B IT6 

^788 

R'=F 

11 

LAST 

177 

06 ,2626 

2 7 • 300 

1 

ADS 

I MODE £33 

07885 

prp 

5 

LAST 

175 

96,2627 

0 4 674 

0 

TC 

ibnkcall 

KNCCK  CGWN  track,  REFSMMAT,  DRIFT  FLAGS 

0788A 

REF 

2 

LAST 

175 

C6, 263( 

17167 

1 

CACR 

RNCREFDR 

1788  7 

R’'F 

2 

LAST 

165 

!'  6 , 2 6 3 1 

4 277  7 

f, 

CS 

P.  I T S 7 S 8 

KNCCK  CCWN  RENOFZVCUS,  IMUUSF  FLAGS 

07886 

REF 

1 

LAST 

1 6 1 

06,2632 

7 0074 

0 

MAS  K 

FLAGWFCO 

0789 

REF 

4 

L AST 

ni 

C6 , 2633 

56  074 

1 

XCH 

FLAGWRCQ 

IF  GCING  CPF,  alarm  IF  FPCG  USING  IMU. 

G7891 

06,2634 

4 nooo 

0 

COM 

0 7 90 

'REF 

■ 1 

06,2635 

7 4744 

c 

nasK 

IMLSEFLG 

0791 

PFF 

16 

LAST 

175 

C6, 2636 

IJ  OOf! 

r 

CCS 

A 

0792 

RFF 

9 

LAST 

176 

06 , 2637 

1 2225 

1 

TC  F 

NXTIFAIL 

0793 

REF 

■a 

LAST 

173 

06,  264-" 

0 5 567 

c 

TC 

alarm 

H794 

06,2641 

00214 

0 

CCT 

214 

0795 

REF 

ID 

LAST 

177 

06,264? 

1 2225 

1 

TCF 

NXT  I FA  IL 

0796 

REF 

17 

LAST 

173 

'16,  2643 

3 ^ 7 5 2 

c 

I i^UOP? 

C'AF 

BIT2 

SEE  IF  FAILED  ISS  TUPN-CN  SEC  IN  PRDC. 

C797 

REF 

23 

LAST 

174 

06 , 2644 

7 1277 

0 

MASK 

TMnOES30 

C798 

RFF 

1 1 

LAST 

177 

C6, 2645 

1C  COO 

c 

CF  S 

A 

0799 

REF 

11 

LAST 

177 

f'6, 2646 

1 2225 

1 

TCP 

NXTIFAI L 

IF  SC,  CCNT  FPCCESS  UNTIL  PRESENT  90 

OPCO 

prp 

2 

1 AST 

1 73 

06 ,2647 

1 2‘^56 

1 

TCF 

ITURNCN2 

SECCNCS  EXPIRES, 
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P0801, 

PPCGP  AR 

FAME: 

F 1 PFA  IL 

R080? 

FUACTICNAL  DFSCRIFTIfN:  THIS 

PRCGPAM 

' FPCGESSES  CHANGES  OF  BIT  13  GF 

CHANNEL  33,  PIPA  FAIL.  IT 

SETS  BIT 

1C  CF 

R0809 

IMC0FS3O 

TO  AGREE. 

IT  CALLS 

SETISSK 

IN  CASE 

A PIPA  FAIL  NECFSSTTATES 

AN  ISS  NAPM  NG.  IF  NCT , I. 

E.,  IMCCES2C 

RceoF 

BIT  1 

= 

1 , ANT 

A PIPA  FAIL  IS 

PRPSFM 

■ ANC  the 

ISS  IS 

NGT  BEING  INITIALIZED,  PPCGPAM  ALARM  C0212 

IS  ISSLEC 

• 

ROeCR 

CALL  ING 

SEOUFNCF: 

BV  C22TEST 

CN  CHANGES  CF  CHANNEL  3 

3 eiT  13. 

RCSnq 

JCES 

CR 

T ASKS 

INITIATED:  NONE. 

RC81C 

SLBPOLTINFS  CALIFC; 

i 1)  SFTISSN,  ANC 

2)  ALARM 

(SEE  FUNCTICNAL  C E SC R IP T ION  ) . 

P0  812 

ERASAEL  e 

initialization:  see 

IMUMCN 

FGR  INTTI ALIZATICN  CF  IMCDES3T. 

the  rflavant  bits  ape  5,  7 

, 8,  9,  ANC  10. 

R0814 

ALAPP 

S : 

program  alarm  00212 

IF  FIFA 

FAIL  IS 

PRESENT 

BLT  NEITHER  155 

RAPNING  IS  TC  BE  ISSLED  NCR 

THE  ISS 

IS 

R0816 

PF  TNG 

INITIALIZEO. 

R0817 

FX  IT  : 

NXTFL33 

9 

R0818 

niTPLT  : 

PROGRAM  ALARM  Oi,'212 

ANC  lES 

V\ARN  ING 

MA  INTENANCE. 

0819 

REF 

18 

I.AST 

177 

C6.265C 

IG  000 

0 PIPFAIL  CCS 

A 

SET  eiTlO  IN  IMCCES30  SC 

ALL  ISS 

WARNING 

0820 

P = F 

19 

LAST 

132 

06,2651 

3 9792 

1 

CAP 

BITIC 

INFO  IS  IN  CNF  PFGISTEP. 

0P21 

PFF 

29 

LAST 

1 7 7 

06,2652 

57*277 

1 

XCH 

IMCCES30 

0822 

RFF 

1 

06,2652 

7 3009 

1 

MASK 

-BI TIO 

C823 

REF 

25 

LAST 

1 78 

06 ,2659 

27*277 

0 

ACS 

IMPDES30 

0829 

REF 

2 

LAST 

166 

06,2655 

C 2703 

1 

TC 

SETISSIa 

0825 

PFF 

26 

LAST 

178 

06,2656 

9 1277 

0 

CS 

I MODES30 

IF  PIP  FAIL  DCESNT  LIGHT 

ISS  WARNING,  CC 

0826 

RFF 

12 

LAST 

88 

C6 , 2657 

7 9 753 

0 

MASK 

(^ITl 

A PROGRAM  ALARM  TpL  CPEPATING 

ELT  NCT 

0827 

RFF 

19 

LAST 

178 

C6, 266C 

10  CCO 

0 

ECS 

A 

CACEC  CP  BEING  TURNEC  CN 

• 

0«28 

PFF 

1 

06,2661 

1 29  3 2 

1 

TCP 

MXTFL23 

0829 

cEF 

27 

LAST 

178 

06,2662 

2 1277 

1 

CA 

I MCCES30 

0 830 

RFF 

1 

06, 2663 

7 3000 

0 

MA  SK 

OCT  17  20 

0831 

PFF 

2C 

LAST 

178 

06,2669 

10  000 

0 

CCS 

A 

0832 

REF 

2 

LAST 

1 78 

06,2665 

1 2932 

1 

TCP 

NXTFL33 

ABCVE  CCNOITICN  NOT  MET. 

0833 

REF 

9 

LAST 

177 

06, 2666 

0 5 56  7 

0 

TC 

ALARM 

06'’9 

06,2667 

00212 

0 

CCT 

2 12 

0835 

PFF 

“3 

LAST 

178 

06,2670 

1 2922 

1 

TCF 

NXTFL33 
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L T^PtpT  FRCGRflP  . ISFR'S  RAGE  NO.  24  E6  S4 


P0e2f  PROGRAM'  NAMES:  DNTMFAST,  LFTRFAST 

R0827  g|J^CTTC^flL  CESCRTPTICN:  THESE  PRCGRAMS  PRPCESS  CHANGES  OF  BITS  1 2 AND  11  CF  CHAFNEL  33.  IF  A EIT  CFAAGES  TC  A 

R0839  0,  A PRCGRAM  ALARM  IS  ISSLRC.  TFE  ALARMS  ARE: 

R0840 BIT  ALARM CALSF 

R0841  

R0842  12  cues  ncv,NLIMK  TCC  FAST 

R0843  11  *^1106 LPLINK  TOG  FAST 


R0844  CALLING  SEQUENCE:  BY  C33TEST  CN  A BIT  CHANC-S. 


R0845  SUBROUTINES  CALLEC:  ALARM,  IF  A BIT  CFANGES  TC  A 0. 

R0346  ERASAELE  INITIALIZATION:  FRESH  START  OR  RESTART,  BITS  12  AND  II  OF  IMCDES33  ARE  SET  TC  1. 


R9848  ALARMS:  SEE  FUNCTICNAL  DESCRIPTICN. 


P0849  EXIT:  NXTFL33. 


R085C  OUTPUT:  FRCGPAM  ALARM  CM  A BIT  CFANGF  TO  0» 


3851 

REF 

21 

LAST 

176 

06,2671 

10  GOQ 

C 

nNTMF AST 

CCS 

A 

CC  FRCG  ALARM 

IF  TM 

TOG 

FAST. 

0852 

REF 

4 

LAST 

178 

06,2672 

1 2432 

1 

TCF 

NXTFL33 

0853 

RRF 

c 

LAST 

1 78 

06,2673 

0 5567 

0 

TC 

ALARM 

0854 

06,2674 

01  105 

1 

CCT 

1 105 

0855 

RE'' 

5 

LAST 

179 

06,2675 

1 2432 

1 

TCF 

N XTFL33 

0856 

RFF 

22 

LAST 

179 

06,2676 

10  ccc 

0 

UPTMFAST 

CCS 

A 

SAME  AS  CNLINK 

TOO 

FAST 

NITF  different 

0857 

ref 

6 

LAST 

179 

06, 2677 

1 2432 

1 

TCF 

NXTFL33 

ALARM  CCCE. 

C858 

REF 

6. 

LAST 

179 

06,2700 

0 5567 

0 

TC 

ALARM 

0859 

06,2701 

C 1 106 

1 

CCT 

1 106 

0860 

REF 

7 

LAST 

179 

06 ,2702 

1 2432 

1 

TCF 

NXTFL23 
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P0fl61  FRCGRA^  ,AAVF:  SETISS'a 

R'1862  PU^CTIC^AL  OF  GC.  R T F T I C N : THIS  PRCGRAP  TURNS  TEE  ISS  WARMNG  LAMP  ON  ANC  OFF  (CHANNEL  11  BIT  1 = 1 FCR  CA, 

R086A  0 FOR  OFF)  GEPFNPING  ON  THF  STATUS  OF  ImOOESSP  BITS  13  (IMU  FAIL)  A^C  A (TNFIEIT  I RU  FAIL),  12  (ICCU  FAIL)  ANC 

R0E66  3 (INFIPIT  ICCU  FAIL),  ANC  10  (FIFA  FAIL)  ANC  1 (1NFIE1T  PIPA  FAIL).  THE  LAMP  IS  LEFT  CN  IF  A LANF  TEST  IS  IN 

R0e68  PR.OGRFSS. 

R0869  CALLING  SEQUENCE:  CALLEC  BY  IMIJMON  ON  CHANGES  TO  INL  FAIL  AND  ICCL  FAIL.  CAILEC  EY  IFAILCK  ANC  FFAILCK  UFCN 

R0e71  RFRCVAL  CF  THF  FAIL  INHIBITS.  CALLEC  EY  PIpFAIL  WHEN  THE  PIPA  FAIL  DISCRETE  CHANGES.  IT  IS  CALLED  BY  PIFUSE 

R0873  SINCE  THE  PIPA  fatl  PROGRAM  ALARM  MAY  NECESSITATE  AN  ISS  HAPMNG,  ANC  LIKEWISE  EY  FIPFREfc  WHFN  THF  ALARM  CEFARTS 

R0875  ANC  IT  IS  CALI  EC  EY  IMUZFRC3  ANC  ISSUP  AFTER  THE  FAIL  INHIBITS  HAVE  BEEN  REMOVED. 


R0877  JOBS  OP  TASKS  IMTIATFD:  NONE. 

R0878  SUEROLTINES  CALLEC;  NONE. 


P0  87S  erasable  INTTIALTZAT  ICN; 


R088C  1)  IMODES30  - SEE  tmlmcN. 

R0881  2)  IMCCES23  BIT  1 = C (LAMP  TEST  NOT  IN  PROGRESS). 


RC882  ALARMS:  TSS  WARNING. 

R0882  I the  FCLLOWTNG  PROGRAM  ALARMS  (■  I L L SHEW  WHICH  FAILLRF  CALSEC  THE  ISS  WARN 
P08822  PRCGRAM  ALARM  ^0777  piPA  FAIL 

RG8823  FRCGRAM  ALARM  C3777  ICCL  FAIL 

P0882A  EPCGPAM  ALARM  CA777  ICDL  , PIPA  FAILS 

R0882  5 PRCGRAM  ALARM  07777  IM(|  FAIL 

Rn882C  PROGRAM  ALARM  1C777  IML  , PIFA  FAILS 

R08827  FRCGRAM  ALARM  L3777  IMU  , ICCU  FAILS 

RCeF2E  PRCGRAM  ALARM  1^777  IMU  , ICCU  , FIFA  FAILS 


PQ883  EXIT;  VIA  Q. 


R08RA- 

CLTPLT  : 

ISS 

WARNING 

LAMP  SET 

PROPERLY  . 

0885 

0886 
CFP7 

REF 

.REF 

1 

28 

LAST 

178 

06,2703 
06,27  )A 
06,2705 

3 A761 
7 127  7 
0 0 00  6 

0 

0 

1 

SETJSSW 

CAP 

MASK 

EXTEND 

0CT15 

IMCDES30 

SET  ISS  WARNING  USING  THF  FAIL  BITS  IN 
BITS  13,  12,  ANC  10  OF  IMCCES3C  ANC  THE 
FAILURE  INHIBIT  BITS  IN  PCSITICNS 

08P'’ 

RFF 

1 5 

LAST 

178 

06,2706 

7 A7A2 

C 

MR 

B ITIO 

A , 3,  ANC  1 . 

0889 

REF 

29 

LAST 

180 

06,2717 

3 1277 

1 

CA 

I MCDES30 

0890 

06,271C 

C CC06 

1 

extend 

0891 

RFF 

5 

LAST 

168 

06,2711 

OA  CC  1 

1 

RCR 

LCHAN 

0 INCICATES  FAILURE 

0892 

06, 2712 

A CCOO 

c 

COM 

0893 

REF 

1 

06,2713 

7 502  5 

1 

MASK 

CCT15C00 

089A 

rff 

23 

LAST 

179 

06, 27  lA 

10  COO 

0 

CCS 

A 

C895 

REF 

1 

06,2715 

1 2726 

1 

TCF 

I SSWON 

FAILURE. 

0 896 

PFF 

lA 

LAST 

Ttb 

C6, 2716 

3 A7E3 

1 

I SSWfFF 

CAE 

eiTi 

CCNT  turn  CFF  ISS  WARNING  IF  LAMP  TEST 

0897 

REF 

12 

LAST 

177 

06,2717 

7 1200 

1 

MASK 

I MUDES22 

IN  PPCGPESS. 

GAP:  ASSENRLF 

REVISION 
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C?58 

REF 

24 

LAST 

180 

06, 2 72 ( 

IP  CCC 

C 

CCS 

A 

0399 

PEF 

3 

LAST 

156 

06, 272  1 

0 '5002 

0 

TG 

Q 

090^ 

R>=F 

15 

LAST 

lec 

06,2722 

4 4 75  3 

0 

CS 

8IT1 

ngn  1 

06,2722 

0 CCC6 

1 

EXTEAC 

0902 

REF 

5 

LAST 

175 

06,2724 

T3  ni 

1 

HANG 

DSALMOUT 

090  3 

RFF 

4 

LAST 

1 61 

06,2725 

C 0002 

0 

TC 

Q 

0904 

06, 2726 

0 CQ06 

1 

I SSWCN 

FXTE^D 

0904C2 

REF 

1 

06,2727 

22  066 

1 

GXCF 

ITEMP6 

090404 

RFF 

1 

06,2730 

0 5 734 

1 

TC 

VAFALARN 

TELL  EVEFYCNE  WFAT  CAUSED  TFE  ISSNAPNING 

0904  1 

REF 

16 

LAST 

181 

06, 2731 

3 4753 

1 

CAE 

B ITl 

0905 

06,2732 

C 0006 

1 

EXTFFC 

0906 

pff 

6 

LAST 

181 

06,2733 

05  0 1 1 

1 

l,CR 

DSALNCLT 

0907 

REF 

2 

LAST 

181 

06,2734 

0 0066 

1 

TC 

ITCMP6 

0908 

RFF 

1 

06,2735 

4 3003 

r 

CAGFSLB 

GS 

B ITS6615 

SET  CUTEITS  AND  INTERNAL  FLAGS'FOR 

0909 

06,2736 

0 0006 

1 

EXTEND 

SYSTEN  TUPN-CN  CR  GAGE.  DISABLE  TFE 

0910 

REF 

c 

LAST 

175 

06,2737 

03  012 

1 

kANC 

C FAN  12 

ERROR  CCLNTER  AND  RENCVE  INL  DELAY  CCNF. 

0911 

RFF 

2 

LAST 

166 

06, 2740 

3 4763 

1 

CAF 

BITS4S5 

SEND  ZERC  AND  COARSE. 

0912 

06,274] 

0 000  6 

1 

EXTEND 

0913 

RFF 

10 

LAST 

181 

06,2742 

05  012 

1 

WGR 

CFANl 2 

0914 

RFF 

11 

L AST 

17  1 

06, 2743 

4 1035 

1 

CAGESLBl 

GS 

nSPTAB  +1ID 

TURN  CN  NC  ATT  LAPP 

0915 

PFF 

1 

06,2744 

7 2773 

1 

KASK 

GC400  10 

09  16 

RFF 

12 

LAST 

181 

06,2745 

27  'C35 

1 

ACS 

CSFTAR  +11C 

0918 

PFF 

3(i 

LAST 

18i 

^'6, 2746 

4 1277 

r 

CAGCSLB2 

CS 

1 node  '=30 

SCT  FLAGS  TC  I N C I C ATE  G A G ! NG  GP  TUPN-CN 

0919 

RCF 

1 

C6, 2747 

7 2775 

1 

NAS  K 

QCT75 

ANC  INFIBIT  ALL  ISS  V'ARNING  INFC 

0920 

R|=F 

21 

LAST 

181 

06,2750 

27*277 

c 

AOS 

I NCDES3Q 

0922 

RFF 

13 

LAST 

1 80 

06,2751 

4 1300 

1 

CS 

TNOOES33 

CISABIE  CAF  ALTC  AND  F.  C L C NCCES 

0923 

REF 

21 

LAST 

177 

06,2752 

7 4746 

1 

' 

NAS  K 

e IT6 

0924 

PFF 

14 

LAST 

18  1 

06,2753 

27  ' 3C0 

1 

ADS 

I NFDES33 

0925 

REF 

5 

LAST 

181 

■16 ,2  754 

0 0002 

0 

TC 

Q 

0926 

REF 

■ 2 

LAST 

176 

06,2703 

I PLFAI L 

ECLAIS 

SET ISSk 

0927 

REF 

4 

LAST 

181 

06,2703 

ICnUFA  IL 

FOUALS 

SETI SSk 

' 
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P092R  • JUPP  TABLES  ANT  CONSTANTc. 


T929 

REF 

1 

06 ,275  5 

1 2533 

1 

I FA IL JPF 

TCP 

I TURNON 

CHANNEL  20  DI SPATCH. 

0930 

PEE 

1 

06,2756 

1 2703 

C 

TCF 

I NUFAIL 

0931 

REF 

1 

06,2757 

1 2703 

0 

TCP 

ICDUFAIL 

0932 

pr-F 

1 

06,2760 

1 2565 

1 

TCF 

IPlJCAGE 

0933 

06,2761 

769CC 

1 

SORD^i  SK 

CCT 

76900 

(EIT  n NCT  SAPPLEC  HEFE). 

C93A 

REF 

1 

06 ,2762 

1 2622 

1 

TCF 

IPUOP 

0935 

PEF 

1 

06,2763 

1 2650 

1 

C33JP  F 

TCF 

P IPFA  IL 

CHANNEL  23  DISPATCH. 

0936 

REF 

1 

06,2769 

1 2 6 7 1 

1 

TCF 

DNTPiFAST 

0937 

REF 

1 

06,2765 

1 2676 

0 

TCF 

UPTPIFAST 

R093P 

SU8R0UT INF 

TO  SKIP 

IF  LAPP  ' 

TEST 

■ NET  IN 

FRCGPESS 

0939 

REF 

15 

L AST 

181 

06,2766 

9 1300 

1 

L AMPTEST 

CS 

IPODES33 

BIT  1 CF  IPCDES33  = 1 IF  LAPP  TEST  IN 

0990 

REF 

17 

LAST 

181 

06,2767 

7 9753 

0 

PASK 

E ITl 

PPCGRERS . 

099  1 

REF 

25 

LAST 

1 8 1 

06, 277F 

10  000 

n 

CCS 

A 

C992 

REF 

6 

LAST 

181 

06,2771 

2 9 00  2 

0 

INCR 

0 

0993 

REF 

7 

LAST 

162 

06,2772 

C 0002 

c 

TC 

G 

0999 

PEF 

1 

5026 

32ROPSK 

EQUALS 

PPI C16 

0995 

06,2773 

90010 

1 

Cf90010 

CCT 

900  10 

0997 

06,2779 

CCC59 

c 

PCT59 

CCT 

59 

0998 

06,2775 

00075 

0 

00T75 

CCT 

75 

09985 

06,2776 

002  7 2 

0 

QCT272 

CCT 

00272 

0999 

06,2777 

C03C0 

1 

BITS7f,6 

CCT 

3C0 

C95C 

06,3000 

01720 

0 

OCT  17  20 

rcT 

1 720 

0951 

06,3001 

00790 

1 

CCT79C 

CCT 

00790 

0952 

rff 

1 

50  2 5 

OCTl  5CCC 

FQLAL  5 

PPI015 

0953 

06 ,3002 

77000 

1 

0CT77000 

CCT 

77000 

0959 

06,3003 

9CC90 

1 

BITS6S15 

COT 

90090 

0955 

06,3009 

76777 

1 

-eiTio 

CCT 

-lOOC 

0956 

06 , 3005 

21950 

0 

90SECS 

CEC 

9 000 

0957 

REF 

1 

579  1 

12CPS 

= 

CCT19 

( CEC12  ) 

0958 

RFF 

9 

LAST 

161 

5270 

GLCCKCK 

ECUALS 

RESUME 
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P0959  FRCC-RiM  NAME_  PRAUTChK 

RC960  FLNCIICNAL  GFSCRIPTICN_  

R0961  RRAUTCi-k  IS  THE  RENDEZVOUS  RADAR  INBIt  MCNITCR.  INITIALLY  THE  RR 

R0962  FCNER  CN  AUTO  (CEAN  23  BIT  2)  INBIT  IS  CEFCKEC.  IF  NC  CHANGE,  THE 

R0963  PROGRAM  EXITS  Tr  RRCCUCHK.  IF  A CHANGE,  RAEMCrES  IS  UPCATEC 

P096A  ANC  A CHECK  MACE  IF  PR  POKER  HAS  JUST  CCMF  ON.  IF  JUST  CFF,  A CHECK 

R0965  IS  mace  TC  SEE  IF  A PROGRAM  WAS  USING  THE  RR  (STATE  BIT  7).  IF  NO, 

R0966  THE  PROGRAM  EXITS  TC  RRCDUCHK.  IF  YES,  PRCGRAM  ALARM  Q051A 

RG967  IS  RECUESTEC  BEFORE  EXITING  TC  PRCOUCHK.  IE  RR  POKER  HAS  JUST  CCME 

RC96R  CN,  A CHECK  IS  MAfF  TC  SEE  IF  A PROGRAM  WAS  USING  THE  RR  (STATE  BIT  7). 

R0969  IF  YES,  thF  program  EXITS  TO  RRCDUCHK  KITHCUT  RECLESTING  THE  TURN-CN 

R09?Fi  SFGUFNCE.  if  NO,  PACMCCFS  IS  UPCATEC  TO  INDICATE  RR  CDL  ZERO  AND 

R0971  RR  TURN-ON  SEOLFNCE  (BITS  13,  1).  A 10  MILLISECCNC  WAITLIST  CALL 
R0972  IS  THEN  SET  FOR  RRTURNON  BEECRE  THE  PROGRAM  EXITS  TC  NCFRGMQN. 


PG973  CALLING  SFQLENCE. 

R097A  TARUPT  EVERY  A8C  M I L 1 1 SEC  0 NQ S 


P0975  erasable  INITIALIZATION  REQlJTREC 
RC976  RADMODEs,  STATP 


R0977  SUPROUTIMES  CALLED. 
R0978  K at  TL  1ST 


R0979  JOBS  CP  TASKS  INITIATED 
RQ930  PRTLRNON 


P0983  alarms,  FRCGRAM  ALARM  0051A  - RACAR  GCES  OUT  OF  AUTO  mqdE  WHILE  BEING 
R0982  LSFC 


R0983  EXIT,  RRCCUCHK,  NOPRGMCN 


0984 

REF 

2 

LAST 

174 

06,3006 

3 Clio 

1 

RPAUTCHK  CA 

R ACMICCES 

SEE  IF  CHANGE  IN 

RR 

ALTC 

MCD'= 

BIT. 

0985 

06, 3'^:  7 

C CC06 

1 

EXTEND 

0986 

REF 

2 

LAST 

166 

C6, 3C  1C 

06  033 

1 

RXCR 

CHAN22 

0987 

REF 

1 

C6,30ll 

7 4753 

1 

MASK 

AUTOMBTT 

0988 

06,3012 

C CCC6 

1 

EXTEND 

C989 

REF 

1 

06,3  T13 

1 3J37 

1 

EZE 

RRCDLCHK 

09QO 

REF 

3 

LAST 

183 

06,3014 

22  no 

1 

LXCH 

R ACMCCES 

UPDATE  RACMCCES. 

0991 

06, 3015 

0 C006 

1 

EXTEND 

099? 

REF 

6 

LAST 

180 

U6  ,3016 

06  on 

0 

RXOR 

LCHAN 

09925 

REF 

1 

06,^617 

7 3C33 

c 

MASK 

0CTO5776 

CLP  CENT.  CES., 

REMOOE , 

REPOS, 

CCUZERC , 

C993 

REF 

4 

LAST 

183 

06, 3C?o 

54  110 

0 

7S 

RAOMICDE  S 

ANC  TURNCN  BIT 

S • 

0994 

REF 

18 

LAST 

177 

06 ,302  1 

7 4752 

1 

MASK 

B IT2 

SEE  IF  JLST  ON. 

0995 

PEE 

26 

LAST 

182 

C6, 3C22 

10  ono 

0 

rc  S 

A 

0996 

RFF 

2 

LAST 

183 

06 , 3023 

1 3034 

1 

TCP 

RRCDUCHK  -? 

OFF.  GO  DISABLE 

RR 

CCL 

ERPCP 

CCLNTERS. 

0999 

R s F 

1 

C6,3024 

3 7666 

c 

CA 

GCTlonol 

SET  RRCDUZRC  ANC 

TURNON 

BITS. 

100(’ 

= 

5 

L AST 

18  3 

06,3025 

26  1 10 

c 

ADS 

RADMCOFS 

GAP 


ASSgPBLE  PEVI^ION  116  OF  A GC  PRCGRAV  ULNIINAPV  EV  NASA  2021I12-G71 


1.9;0q  AUG.  11,1969  LPf'ONA  ID  .r-99  PAGE  HA 


L 74PIP1  FPCGEAM 


LSEP'S  PAGE  NC.  2E  E6 


ICOl 

100? 

1003 

PEP 

PEE 

RFF 

C 

5 

1 

LAST 

LAST 

Its 

170 

C6.3026 
06,3027 
F7 , 1456 

3 4153 
C 5203 

1 

0 

CAF 

TC 

EBAMK= 

ONE 

WAITLIST 

LCSCCUNT 

lOOA 

PEE 

1 

C6 , 3C3C 

02073 

1 

2CACP 

RPTUFACA 

1004 

PEE 

I 

06, 3031 

52107 

0 

10C5 

pep 

1 

C6,3032 

1 3126 

0 

TCF 

NCPPGNGN 

1006 

06, 3033 

05776 

1 

CCT05776  CCT 

5776 

( 
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L TA.RIJPT  PROGRAM 


USER'S  PAGE  NO.  30  Et  SR 


PIOQ7 

FPCGRAM  NAME.  RPCCUCEK 

P ICOR 

FLNCTICNAL  DESCPT F^ICN. 

R1009 

RIOIO 

RlOll 

RPCCUCEK  CHECKS  FOP  PR  CPU  FAIL  (CHAN  20  BIT  7).  INITIALLY  THE 
PR  Cru  FAIL  BIT  IS  SA»^°LFC  (FEAN  3)  BIT  7).  IF  NO  CHANGE,  THE 
program  exits  to  PRGIPCN.  if  a CHANGE,  TEE  RR  AUT C MCCE 

R1012 
R1013 
R 1014 

(RACMCCES  BIT  2)  BIT  IS  CEFCKED.  IF  NOT  IN  RR  ALTC  mcoE  , THE 

PRCGRAM  EXITS  TC  NCPPCMCN,  IF  IN  AIJTC  MQCE,  RACMCCES  BIT  7 

(RR  ecu  OK)  IS  UPCATEC  anO  IF  P-2C  IS  CPERATING  PRCGPAN  ALARM  00515  IS 

R1015 
R 1016 
RlOl  7 

PECUESTFC.  CCNTFCL  IS  TPANSFERREC  TO  SETTRKF  TO  LPDATE 

THE  tracker  fail  LAMP  (DSFTAP-HIC  BIT  8).  CCNTFCL  RETURNS  TO 

RRG IMCN  . 

»icia  calling  sequence. 

P1019  EVERY  AEG  MILLISFCCNDS  PPCM  RPAUTCHK  (VIA  T4RUFT)  UNLESS  A 
RL02O  7URN-CN  SEQUENCE  HAS  JUST  BEEN  INITIATED. 

P1C21  ERASAELE  I N I T I A L I 2 AT  I C N PFCUIFEC. 

Rin22  RACMQCFS 

Rin2B  SLPPOLTrNES  CALLED, 

P102A  SETTRKF 

R1025  JCBS  CP  TASKS  INITIATED. 

R1026  NCN'!' 


R1C27  ALARMc_ 

R1Q28  TRACKER  FAR 


R1029 

PRCGRAM 

ALARM 

00515 

- RPCCU 

FAIL  CURING 

P-20 

R1030 

R1031 

EXIT. 

PRG  IMCN, 

. NCRRGMCN 

10315 

REF 

19 

LAST 

183 

C6,3C34 

4 4752 

1 

- 3 

CS 

8 IT2 

1031  e 

06,2025 

G 0CC6 

1 

FXTENC 

103-1  7 

REF 

1 1 

LAST 

181 

06 ,3036 

0 3 012 

1 

7,ANC 

CEAN12 

AT  TURNGN,  CISABLE  CDL  EFFCR  CCLNTEFS. 

1032 

ref 

' 6 

LAST 

18  2 

06 , 30  2 7 

3 Clio 

1 

RPCCUCEK 

CA 

RACMCCES 

LAST  SAMFLFC  E IT  IN  RACMOCES. 

1033 

06, 3040 

0 0006 

1 

extend 

1C34 

REF 

2 

LAST 

162 

06 ,3041 

06  0 30 

1 

RXPR 

CEAN3F 

1035 

RFF 

1 

06, 20A2 

7 4745 

1 

MASK 

PCDUFPIT 

1036 

P6, 3043 

0 0006 

1 

EXTEND 

1027 

REF 

1 

06 ,3  )44 

1 3C71 

0 

BZF 

RRG  IMCN 

1038 

REF 

2 

LAST 

182 

06, 3C45 

3 4752 

c 

CAF 

ALTOMEI T 

IE  RR  NET  IN  AIJTC  MOCE,  CCN'T  CEANGE  BIT 

1C39 

REF 

7 

LAST 

185 

i)6 ,3046 

7 Tin 

0 

MASK 

R ADMOCFS 

7 CF  RACMCCES.  IF  THIS  RERE  NOT  CCNE, 

1040 

RFF 

27 

LAST 

182 

06,36/77 

IG  coo 

c 

CCS 

A 

THE  TRACKER  FAIL  MIGHT  GOME  ON  RHEN 

1041 

PFF 

2 

LAST 

18A 

06, 3050 

1 3126 

0 

TCF 

NCRRGMCN 

JLST  REACING  LP  CATA. 

1042 

REF 

2 

LAST 

185 

06,3051 

3 4745 

0 

CAF 

PCDUF  BIT 

SET  BIT  7 CF  RAOMIGDES  FCR  SETTRKF. 
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1043 

REF 

8 

LAST 

185 

06,2052 

22  110 

1 

LXCH 

RADMCDFS 

LFCATE  FACMCCES. 

104P 

06 , 2053 

C C006 

1 

EXT  FAF 

1!)4S 

REF 

3 

1 AST 

168 

06, 3C  5A 

C6  9 3 1 

r 

RXCP 

L 

1046 

RFF 

9 

LAST 

186 

06 ,3055 

5A  1 10 

0 

TS 

RACMCCES 

1047 

R.FF 

10 

LAST 

1 86 

06 , 3056 

2 ;)in 

1 

CA 

R ACMIOCES 

CIC  RF  ecu  FAIL 

1048 

REF 

1 

06,3057 

7 ^615 

c 

MASK 

13 ,7  ,2 

CCL  ZEPC+  CCIJFAIL-*  PR  AUTC 

1C49 

REF 

28 

LAST 

1 85 

06,3060 

1)  ■)  )0 

0 

CCS 

A 

1050 

REF 

1 

C6, 3061 

1 2C7C 

1 

TCF 

TPKFLCCU 

NC 

1051 

R-^F 

5 

LAST 

177 

^b, 3062 

A 0C7A 

0 

CS 

F L AGWRDC 

PNCVFLG  P20  CP  P22  GFEPATING 

1052 

REF 

1 

06 ,3063 

7 4745 

1 

MASK 

RNCV2EIT 

1053 

RFF 

29 

LAST 

186 

06, 3C6A 

in  coc 

c 

CCS 

A 

1054 

REF 

2 

LAST 

186 

06,3065 

1 30  70 

1 

TCF 

TRKFLCOL 

NC 

1055 

R'^F 

7 

LAST 

179 

06,3066 

■)  5 56  7 

0 

TC 

ALARM 

YES 

1056 

06,3067 

00  5 1 5 

c 

CCT 

0C515 

1057 

RFF 

1 

06 ,3070 

0 4564 

1 

TRKFLCCL  TC 

SETTRKF 

UPCATE  tracker  FAIL  LAMP  CN  CSKY. 
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PIC5E 

PRCGRAN  NAME_  RRGIPCN 

P ALTC  NCOE 

EXCEPT  WHEN  TH 

E PR  CDLS  ARE 

R 106D 

functional  descripticn_ 

TIER  IS  INITIATED  BY  THIS 

F^CNITCR  WHEN 

R1062 
R 1064 
R1065 

RRGINCN  IS  THE  PR  GINBAL  LI^IT  MCNITQP.  INITIALLY  THE  FOLLOWING  IS 
CHECKED  PFMODE,  RR  CDL:S  BEING  ZEPCPE,  PEFCSITICN,  ANC  RR 
NOT  IN  AUTO  MODE  (PACMODES  BITS  1^,  13,  11  2).  IF  ANY  OF  THESE 

ED  TC  DRIVE 

THE  GIMBALS  TC 

c 

II 

1— 

R1066 
R1067 
PI  06  8 

EMST  IHF  program  Exits  rr  GFNATPIX.  if  NCN'F  are  PRESENT  RRLIMCHK 
IS  CALLED  TO  SEE  IF  THE  PRESENT  PP  COL  ANGLES  (CFTY,  CFTX)  APE  WITHIN 
THF  LIMTS  CF  THE  CURRENT  mccE.  IF  WITHIN  LIMITS,  THE  FPCGRAN  EXITS 

R 1^69 
P1070 
PI  071 

TC  NORRGMCN.  IF  N CT  WITHIN  LIMTS,  THE  REPCSITICN  FLAG  (RACMCCES 

PIT  m IS  SET,  THP  RR  ALTO  TRACKER  AND  RR  ERRCR  CCLNTEP 

(CHAN  12  BITS  14,  2)  ARE  CISABLEC,  AND  A 20  MILLISECOND  WAITLIST 

R1072 

CALL  IS  SET  FOR  DCPREPOS  AFTFR  WHICH  THE  PRCGRAN  EXITS  TC  NOPRCMON. 

RHJ73 

calling  sfqufnce_ 

RIO?-^  EVfERV  ARC  MILLTSFCCNTS  FPCN  PFCCUCHK  (VIA  T4PUPT)  UNLESS  TURN-ON 
R1075  HAS  JUST  BEEN  INITIATED  VIA  RPALTCHK  CR  IF  THERE  HAS  BEEN  A CHANGE  IN 

RID76  THE  PP  ecu  FAIL  BIT  (CHAN  30  BIT  7)  ANC  THE  PR  IS  NOT  IN  THE  AUTC  NCDE 


P 1077  (PADMCCES  fil'r  2). 

R1078  ERASAFLF  IN  IT  T f|.  I Z AT  T0N_  RACPOCES 


R1C79  SLPPPLTINES  CALLFC 

RICSO  PPLIMCHK,  NAITLIST 


RinSl  JOE'S  CR  TASKS  INITIATED, 
RICP?  DCPPFFCS 


R10R3  ALARMS 
R1QB4  NONE 


R 1085  P-KIT, 
P1D86  NOPRGNCN 


1087 

1C88 

REF 

R‘PF 

4 

1 

LAST 

175 

06  ,3771 
06,3072 

30  101 
7 4 7 50 

1 

0 

RRGIMCN  CAE 
NASK 

FLAGWRD5 

NOPRNBIT 

I S NO 

ANGLE  NCMTCR  FLAG 

SET 

1P89 

PEE 

30 

LAST 

186 

06,3073 

1C  cac 

c 

CCS 

A 

1C90 

REF 

■ 3 

LAST 

185 

06,3074 

1 3126 

0 

TCF 

NOPRGMON 

YES  - 

SKIP  LIMIT  CHECK 

109'U 

PEE 

1 

.06,3075 

4 C1C3 

1 

CS 

FLAGWRD7 

IS  SERVICER  RUNNING? 

1090  2 

RFF 

1 

06,^076 

7 4747 

0 

NASK 

AVFGFBI T 

I09C3 

REF 

3 1 

LAST 

187 

06,3^77 

10  on.) 

0 

CCS 

A 

10904 

06, 3 100 

1 3 1C5 

1 

TCP 

+ 5 

NC  . 

EC  P25 

ingOE 

pep 

1 

06,3101 

3 C102 

1 

CA 

FL AGWPC6 

YES. 

IS  MUNFLAG  SET? 

1090  6 

REF 

1 

06 , 31  >2 

7 4744 

0 

NASK 

MLNFLBIT 

10907 

REP 

2 2 

LAST 

187 

06,3193 

10  COO 

0 

CCS 

A 

109<'8 

REF 

4 

LAST 

187 

06, 31 74 

1 3126 

c 

TCF 

NCPRGNCN 

YES. 

CCN'T  EC  R25 

1091 

RFF 

1 

06,3105 

3 3135 

0 

+ 5 CAP 

DCT32002 

INHIBIT  EY  R ENCCE  , ZERC  INC- 

,MCNITCR. 

1092 

REF 

1 1 

LAST 

186 

96 ,3  196 

7 0110 

0 

MASK 

RACMnCES 

CP  RR 

NCT  IN  ALTC. 

1093 

RPF 

■3  O 

LAST 

18T 

C6,31f7 

1C  0^0 

0 

CCS 

A 

1094 

REF 

5 

LAST 

187 

0 6,3  1 1C 

1 3126 

c 

TCF 

NCPRGNCN 
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1095 

1996 

REF 

RPF 

1 

1 

C6,31l 1 
'’6,^112 

C 4522 
0CC35 

1 

1 

TC 

ACRES 

RFL  IMCFK 
COLT 

SEE  IF  AAGLES  IN  LIMITS. 

1C97 

PEF 

1 

06,3113 

1 3115 

0 

TC  F 

MGNREPOS 

1093 

REF 

6 

LAST 

187 

C 6 , 3 1 1 A 

1 2126 

0 

7CF 

ACPPGACA 

(AECITICAAL  CCEING  MAY  GO  FERE). 

1099 

REF 

1 

06,3115 

3 474  1 

1 

MQ  ARE  PCS 

CAF 

P.EPOSBl  T 

SET  FLAG  TC  SFCW  RFPCSITICA  lA  FRCGFESS. 

HOC 

REF 

12 

LA  ST 

187 

C6,3116 

26  110 

0 

AOS 

R/CMCCES 

1191 

PEF 

1 

06,2117 

A 2136 

1 

cs 

OC720002 

CISAELE  TRACKER  AAC  EFFCR  CCUNTER. 

lie? 

■|6 ,3120 

0 OT06 

1 

EXTEND 

1 K3 

PFF 

12 

LAST 

185 

C6, 2121 

C2  ri2 

1 

V.AAC 

CFAA12 

1 104 

REF 

2 

LAST 

37 

06,3122 

3 4 752 

0 

CAF 

Tv,n 

1105 

REF 

6 

LAST 

18A 

06,3123 

0 5203 

0 

TC 

WAITLIST 

1 106 

PEF 

2 

L AS1- 

184 

F7 , 1A56 

EBA AK= 

LGSCCLA'7 

11C7 

rff 

1 

■'6,3124 

02140 

{) 

2CACR 

DGRREPOS 

1 107 

REF 

1 

G6  ,3  125 

5210  7 

0 

1108 

RFF 

13 

LAST 

188 

06,3126 

3 0110 

1 

NORRGMON 

CA 

RADMCDES 

IF  SELECT  SWITCH  IS  NOT  lA  LGC,  SEAC  RP 

llORl 

RFF 

3 

LAST 

18  5 

06,3127 

7 4752 

1 

MASK 

AUTOMB I T 

ecu  ZERO  BIT  TO  PREVEAT  MEMCRY  CYCLE 

1 108  2 

R'^F 

3A 

LAST 

187 

06,3120 

10  COO 

0 

CCS 

A 

SNATCHING  BY  MANIC  RP  CCUS.  BIT2  OF 

1 1083 

■96,3131 

13  132 

0 

AOCP 

PADACDES  AGREES  WITH  EIT2  GF  CHANNEL 

1 1 ORA 

06 ,3132 

0 00 ■lo 

1 

EXTEAC 

33.  FCR  THIS  CODING,  WHICH  ASSLMES 

11085 

PFF 

13 

LAST 

188 

06,3133 

05  012 

1 

V»CP 

CHAM  2 

AUTCNPIT  = EIT2,  THANKS  TO  HUGH  B-S. 

11CE6 

ppe 

1 

06,3134 

1 3140 

0 

TCF 

ENDRRMOA 

1 1 C87 

RFF 

03 

LAST 

16f 

06,3140 

EACRR  AC  A 

ECLALS 

0APT4S 

11  19 

06,2135 

320C2 

1 

nr732C02 

ncT 

32002 

1110 

06,3136 

200!)2 

1' 

OCT20002 

GCT 

2000  2 

1111 

06,3137 

C2100 

1 

nCTC210C 

CCT 

02100 

P20,P22  ►'ASK  BITS 
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P1112  PRCGR.S'^  Nf'^IE:  GP^iaiRIX  (GAP145)  NCn.  ^C.  2 C/TE:  CCTCEER  27,  L966 

RU13  AUTHflP:  jrNATHSN  C.  fCCFLSTCN  (ACAMS  ASSOCIATES) 


R11131  PnOIciHO:  7FFR.  1968  BY  F.  S.  UEISSMAN  TC  CELETE  CCNFUTATION  OF  YR12  AMD  MR  1 2 , V^HICH  ARE  N'Q  LCNGER  PECILRFC. 

Rill/,  This  FRCGPA»/  CALCULATES  ALL  TFE  S IMGLE-PRFC I S IC^  MATRIX  eTEMEMS  V,MCF  APE  LSEC  EY  LE^  CAF  TC  7RA^SfCP^'  VECTORS 
R1116  FRCM  GIMEAL  TC  PTLCT  ( BCfOY  ) AXES  ANC  BACK  AGAIN.  TFESE  ELEMENTS  ARE  LSEO  EXCLISIVELY  BY  BASIC  LA^GLAGE  RCLTINES 
Rllie  ANC  TFFREPORE  are  NCT  AF-RAYFD  FCR  ISE  BY  INTEFFPETIVE  FPCGFARS. 

RlllP  CALLING  SEQMFNCE:  GPMATPIX  IS  TRANSFERRED  TO  FRCP  DAPT4S  AND  IS  THIS  EXECUTED  4 TINES  A SECCNC  EY  T4RUPT. 

P1121  DAPT4S  IS  LISTED  IK  T4JUNF  TAELF  TWICE  EXPLICITLY  AND  ALSC  CCCUPS  AFTER  RRAUTCEK  UFICH  IS  ALSC  LIS7EC  TUICE). 

P1123  SUBRCLTINES  CALLEC:  SPSTN,  SPECS. 


R1124  NFFNAL  exit  node:  TCF  RESUME 

R112S  alarm  ANC  ABORT  MCDES:  NCNF. 


R113H  INPUT:  CCUX,  CDUY,  CDUZ. 


R1  131 

nUTPLl  : Mil  , N21 

, N31, 

N22  , 

N32. 

PI  132 

ACG  = CDUX,  AIG  = 

CDLY, 

AMG 

= CDLZ:  NNFNCMC  IS:  CIM  = XY  Z 

R1 133 
R1  134 

* 

H 

_ 

STMMG) 

rcS(NG)CCS(CG) 

SIMCG) 

1 4 

0 ^ 

R1135 

GP 

* 

-COS(MG)SIN(nG ) 

CGS(OG) 

c x= 

R1136 

0 GCS(CG)/CrS(NG) 

-SIMCG  )/COS  (MG  ) 

X 

R 1137 

M 

= 

0 S I N ( PG  ) 

CCS(CG) 

X 

P1138 

PC 

1 -S  IMMG  )CCS  (CG  )/COS(MG)  S I N ( N G ) S I N ( CG  ) /C  C S ( MG  ) 

114  3, 

RFF 

c 

1 AST 

167 

F6 , 1414 

EEANK= 

M 1 1 

1144 

REF 

1 

06,3140 

DAPT4S  EGLALS 

GFNATRIX 

R 1 145 

T4RUPT  CAF  LCGIC: 

1146 

RFF 

2 

LAST 

1 7C 

06 ,3  14C 

30  034 

0 

GPNATRIX  CAE 

CCUZ 

SINGLE  ENTRY 

POINT 

1 147 

RFF 

1 

)6, 3 14  1 

0 50  3 3 

1 

TC 

SPSIN 

SIN  (CCUZ  ) 

- 

S IN (NG  ) 

1148 

RFF 

6 

LAST 

189 

•j6 ,3  142 

55'414 

n 

TS 

MU 

SGALPC  AT 

1 

1149 

RFF 

3 

LAST 

189 

06,3143 

3C  C34 

r 

CAE 

CCLZ 

1150 

RFF 

1 

06,3144 

7 5032 

c 

TC 

SPCOS 

CCS(CCLZ ) 

= 

CCS(MG) 

115  1 

REF 

1 

06,3145 

54  061 

1 

TS 

CCSMG 

SCALEC  AT 

1 

( CNLY  A 

FACTCR ) 

1152 

RFF 

1 

06,3146 

3 >1  0 3 2 

r 

CAE 

CCLX 

1153 

P'^F 

2 

LAST 

189 

■16 ,3147 

0 503  3 

1 

TC 

SPSIN 

SIN(CCLX ) 

= 

SIN(CG) 

1154 

RFF 

1 

06,3150 

55'417 

c 

TS 

N22 

SCALEC  AT 

1 

(ALSO  IS 

MR22  ) 

1155 

REF 

2 

LAST 

189 

06,3151 

4 14  17 

c 

CS 

M22 
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I 1 56 
1157 

II  5fi 

REF 

REF 

2 

1 

LAST 

189 

C6 ,3152 

06.3153 

06.3154 

( CCQ6 
7 006  1 
5 5 ' 4 1 6 

1 

1 

1 

EXT  EAC 

RP 

TS 

CCSMG 

M31 

-SIA(CGKCS(R!G) 
SCALEC  AT  1 

1159 

REF 

2 

LAST 

185 

06,3155 

3C  032 

C 

CAE 

ccux 

1165 

RFF 

2 

LAST 

189 

,16.3  156 

0 5J32 

0 

TC 

SPCOS 

rcsircLx ) = ccs(CG) 

1161 

REF 

1 

06,3157 

55»  420 

1 

TS 

R32 

SCALEC  AT  1 (ALSO  IS 

1162 

06,3160 

0 CC06 

1 

EXTEAD 

1163 

REF 

3 

LAST 

190 

06,3161 

7 0061 

1 

RP 

CCSRG 

CnS(OGICCS(RG) 

1164 

RFF 

1 

06,3162 

5 5 ' 4 1 5 

1 

TS 

M21 

SCALEC  AT  1 

1191 

REF 

5 

LAST 

182 

06,3163 

r 5270 

1 

TC 

RESURc 

119  3 

RFF 

6 

LAST 

191 

527C 

ELDDAET4  ECUALS 

RESURE 
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L PCS  F/ilLURE  I^OMTrP  USER'S  F.fiGE  NO.  1 EO  SA 


ROfO  1 

PROGRAN  OESCRIPTICN 

R00O2 

fiUTFOR;  J S PILLER 

R00075 

POOIFTED  6 wARCH  1966  BY  P S WEISSRAN  TG  SET  UP  JOB  FCR  1/ACCS  WHEN  THE  MASKS  ARE  CHANGED. 

ROOD  3 
RCiC'iS 
ROCin? 

THIS  ROUTINE  IS  ATTACHED  TC  TARUPT,  AND  IS  ENTEPEC  EVERY  AE^'  M.  ITS  FUNCTION  IS  tc  EXAMINE  THE  LOW  E BITS 
CF  CH''NNEL  3?  TD  SEE  IF  ANY  I SCL  AT  ION- V A LV  E CLCSURE  BITS  HAVE  APPEARED  CR  CISAPPEAREC  (THE  CREW  IS  W/RNEC  CF  JET 
FAILURES  BY  LAMPS  LIT  BY  THE  GRUNRAN  F A I LURE -CET ECT  I CN  CIPPUITRY;  TFEY  MAY  RESPOND  BY  OPERATING  SWITCHES  WHICH 

R00P9 
Rom  1 
R0013 

ISOLATE  PAIRS  OF  JETS  PRCM  thf  PROPELLANT  TANKS  AND  SET  CHANNEL  32).  IN  THE  EVENT  THAT  CHANNEL  32 

DIFFER  ERCM  'PVALVFST',  THE  FECCRC  CF  ACTIONS  TAKEN  BY  THIS  ROUTINE,  THE  AFPRCPPIATE  FITS  IN  'CH5NASK'  £ 
•CH6MASK',  USED  BY  THF  DAP  JF T- SE LFC T I C N LOGIC,  ARE  UFCATEE,  AS  IS  'PVALVEST',  TC  SPEEC  LP  £ SHORTEN  THE 

B ITS 

R3U15 

R0017 

PCUTINE,  NO  MORF  THAN  ONE  CHANGF  I^  ACCEPTED  PER  ENTRY.  THE  H I GHF  S T-N  LMBE  R E C EIT  IN  CHANNEL  32  WiHICH  PEGUIPES 
action  is  thf  CNE  FRCCES'EC. 

Rome 

0QG2' 

ROO?? 

THE  CnoiNG  IN'  THE  FAILLR9  RCMTCP  HAS  BEEN  WRITTEN  SC  AS  TC  HAVE  ALNCST  CCRFLETE  RESTART  FFCTECTICN.  FOR 
EXAMPLE,  NO  ASSUMPTICN  IS  RACE  WFEN  SETTING  A 'CF5MASK*  BIT  TO  1 THAT  THE  PPEVICLS  STATE  IS  0,  AL1HCLGH  IT  CF 
COURSE  SHOULD  BE.  CNE  CASE  WHICH  RAY  EE  SEEN  TC  EVADE  PRCTECTICN  IS  THE  CCCUPRENCE  CF  A RESTART  AFTER  LPCATING 

R002A 
R0C26 
R00  2 8 

CNP  CP  BOTH  CAP  RASK-WORPS  BUT  BEFORE  UPDATING  'PVALVEST',  COUPLED  WITH  A CHANGE  IN  THE  VAlVE-EIT  BACK  TO  ITS 
FCPMFR  STATE,  THE  CCNSFCUENCF  CF  THIS  IS  THAT  THE  NEXT  ENTRY  WCULO  NOT  SEE  THE  CHANGE  INCQRPLETFLY  INCCPF- 
ORATEC  BY  THE  LAST  PASS  (BFCALS^  IT  WENT  AwAV  AT  JLST  THE  FIGHT  TINE),  BUT  THE  DAP  RASK-WCROS  WILL  BE  INCCPFECT. 

R003^ 

R0032 

P003A 

THIS  CCRBINATICN  cf  FVFN'TS  SFfms  QUITE  REN'OTF,  bUT  NOT  IRIPOSSIBLE  UNLESS  THE  CREW  CFFRATES  THE  SWITCHES  AT 
S'^CGNO  INTERVALS  OR  LONGER.  IN  ANY  EVENT,  A CISAGPEENENT  BETWEEN  REALITY  AND  THE  DAP  RASKS  WILL  BE  CURED 
THE  R IS TNTFRPPETFD  SWITCH  IS  REVERSED  AND  THEN  RESTORED  TC  ITS  CORRECT  PCSTTICN  (SLCWLY). 

HAUF- 
I F 

R0C36 

calling  SECLENCE; 

RCC37 

TCF  PCSRCMT  TIN  INTERRUPT  MCCE,  EVERY  ABO  MS.) 

R0038 

FXIT:  TCF  PCSRCNEX  (ALL  PATHS  EXIT  VIA  SUCH  AN'  INSTRUCTION) 

0039 

REF  7 last  19C  5270  PCSMCNEX  ECUALS  RESUME 

ROO  AO 

FPASAELE  initialization  REQUIRED: 

ROOAl 

R00A2 

VIA  FRESH  START:  FVAUVEST  = +0  (AUU  JETS  ENABUEC) 

CH5RASK,  CH6RASK  = +0  (ALU  JETS  r-K) 

R00A3 
ROO  A 5 

OUTPUT:  CH5MASK  f CH6MASK  UPDATED  (I'S  WHERE  JETS  NCT  TC  BE  USED,  IN  CHANNEL  5 £ 6 FCPMAT) 

PVAUTEST  UPDATED  (1,S  WHEN  VAUVE  CUCSURES  HAVE  BEEN  TRANSUATEC  INTO  CHEMASK  £ CH6MASK;  CHAN  32  FCPMAT) 

ROOA65 

JCB  TO  DC  I/ACOF. 

R00A7 

DEBRIS:  A,  L,  G AND  DEBRIS  CF  NOVAC. 

R0PA8 

SUBROUTINE  O.AUUED:  NOVAC. 

006? 

REF  1 1257  EBANK=  CH5MASK 

CC?c 

23,20"O  bank  23 

0060  REF  i C6, 2PJf'  SETLCC  RCSMCM 

0061  G6,^15A  BANK 
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QOh2 

00625 

PEF 

P.EF 

1 

1 

06,3164 

RC  SMCMT 

CCLNT* 

FGUALS 

S$/T4PCS 

RCSMON' 

0063 

REF 

6 

LAST 

175 

06,3164 

4 4755 

0 

RCSPCN 

CS 

ZERO 

0064 

06,3165 

r,  0 00  6 

1 

EXTEND 

0C65 

REE 

2 

LAST 

159 

06,3166 

06  032 

0 

RXOR 

CHAM  32 

RICK  LP  + INVERT  INVERTED  CHANNEL  32. 

C066 

PEE 

1 

06,3167 

7 4357 

c 

NASK 

LCR8 

KEEP  JET-FA  IL  PITS  ONLY. 

0067 

PFF 

8 

LAST 

182 

J6, 3 17r 

54  0C2 

1 

IS 

C 

0068 

REF 

1 

06,3171 

4 1273 

1 

CS 

PVALVeST 

_ _ 

0069 

REF 

9 

LAST 

192 

06,3172 

7 CCC2 

1 

NASK 

C 

FCRM  PC  + FC. 

007C 

PEF 

4 

LAST 

186 

;)6,3173 

54  001 

1 

TS 

L 

(P  = FREvir.LS  ISCLATICN  VALVE  STATE, 

0071 

REF 

in 

LAST 

192 

06,31 74 

4 00  )2 

1 

CS 

C 

C = CURRENT  VALVE  STATE  (CH  32)1. 

0072 

FEF 

2 

L AST 

192 

06, 3175 

7 1273 

1 

NASK 

PVALVEST 

CC73 

REF 

c; 

LAST 

192 

06 ,3 176 

2 6 001 

1 

ans 

L 

RESULT  NZ  INCICATFS  ACTTCN  PEGLIRFC. 

0074 

06,3177 

C CCC6 

1 

EXTEND 

0075 

ref 

1 

06,32  )C 

1 5 2 70 

0 

PZF 

RCSMCNE  X 

CLIT  IF  NC  aCTICN  PFCLIRFC. 

0C76 

C6,3201 

0 0006 

1 

EXTEND 

0077 

REF 

16 

LAST 

174 

06, 3202 

7 4 745 

1 

NR 

PITT 

MCVE  FITS  8 - 1 CF  a TC  H - 7 CF  L. 

CC78 

PCp 

6 

LAST 

192 

16 ,32)3 

56  0)1 

0 

XCF 

L 

ZERO  TC  L IN  THE  PROCESS. 

0079 

pFF 

7 

LAST 

192 

06,3204 

24  CCl 

0 

- 3 

INCP 

L 

0080 

06, 3235 

6 0000 

1 

CCLBLE 

ECUNC  TC  GET  CVEPFLCW  IN'  THIS  LCCF, 

CG81 

06,3206 

54  000 

0 

CVS  K 

SINCE  NE  ASSURED  INITIAL  NZ  IN  A. 

0082 

06,3207 

1 3204 

c 

TCP 

-3 

0083 

REF 

8 

LAST 

1 92 

06,3210 

50  00  1 

0 

INDF  X 

L 

0084 

REF 

16 

L AST 

165 

06,32! 1 

3 4743 

0 

ca 

FITS  -1 

SAVE  THE  RELEVANT  BTT  (6  - 1). 

0085 

RFF 

! 1 

LAST 

192 

06, 3212 

54  CC2 

] 

1 s 

C 

0C86 

PEF 

3 

LAST 

192 

06,3213 

7 1273 

1 

MASK 

PVALVEST 

LCCK  AT  PREVICLS  VALVE  STATE  EIT. 

0C87 

REF 

s c 

LAST 

lee 

06,3214 

10  COO 

c 

CCS 

a 

0088 

REF 

1 

06,3215 

1 323  1 

r 

TCF 

VCPENED 

THE  VALVE  HAS  JUST  PFEN  OPENED. 

0C89 

REF 

2 

LAST 

191 

06,3216 

4 1257 

1 

CS 

CH5MASK 

THE  VALVF  HAS  JLST  BEEN  CLOSED. 

0090 

RFF 

9 

LAST 

192 

06,3217 

50  COl 

0 

INDE  X 

L 

0091 

REF 

1 

06,3229 

7 3250 

1 

MASK 

5FAI L7A0 

0092 

PEF 

3 

1 AST 

192 

06,3221 

27'257 

1 

ADS 

CF5MASK 

SET  INHIBIT  BIT  FCR  CHANNEL  5 JET. 

039  3 

REF 

1 

06,3222 

4 1 2 6 C 

0 

CS 

CH6MASK 

0C94 

PFF 

m 

LAST 

192 

06,3223 

50  OOl 

0 

INDEX 

t. 

0095 

RFF 

1 

06,3224 

7 3260 

1 

MASH 

6 FA  I L1A8 

0096 

R>^F 

2 

LAST 

192 

06, 3225 

27 '26C 

c 

ADS 

CH6MASK 

SET  INGIEIT  EIT  FCR  CHANNEL  6 JET. 

CC97 

RFF 

\7 

LAST 

192 

C6, 3226 

3 0002 

0 

CA 

C 

OOP8 

REF 

4 

LAST 

192 

06,3227 

27' 273 

1 

ADS 

PVALVFST 

RECCRC  ACTICN  TAKEN. 

0099 

REF 

1 

16,3230 

1 3244 

1 

TCF 

1 /ACCFIX 

SET  UR  1/ACCJCB  AND  EXIT. 
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0100 

REF 

11. 

LAST 

1S2 

■06,3  23  1 

50  99  1 

c 

VCFENEC 

I MCE  A 

L 

A VALVF  FAS  JLST  EEEN  CRENEC. 

ClOl 

RFF 

2 

LAST 

192 

06,323? 

A 3250 

1 

CS 

5FAILTAB 

01C2 

REF 

4 

LA  ST 

192 

06,3233 

7 1257 

1 

NASK 

CF5  MASK 

0103 

RFF 

5 

LAST 

193 

06, ^23A 

5 5*25”? 

1 

IS 

CH5MASK 

PEFCVE  TFFIEIT  ETT  FCR  CHANNEL  5 

JET  . 

C104 

REF 

12 

LAST 

1 S3 

C6, 3235 

50  001 

0 

INCEA 

L 

0105 

REF 

2 

LAST 

19? 

06,3226 

A 32  6C 

1 

CS 

6 F A I L T A e 

0106 

REF 

3 

LAST 

192 

06,3237 

7 1260 

0 

RASK 

CF6MASK 

0 107 

REF 

A 

LAST 

193 

06 , 3?A'i 

55*260 

0 

TS 

CF6MASK 

PEROVE  INHIBIT  BIT  FOR  CHANNEL  6 

JET. 

0108 

RFF 

13 

LAST 

192 

06, 32  A 1 

A 0CO2 

1 

CS 

C 

0K9 

RFF 

5 

LAST 

192 

96 , 32A2 

7 1273 

1 

MASK 

PVALVEST 

0110 

REF 

6 

LAST 

193 

06, 32A3 

55*273 

1 

TS 

PVALVFST 

RECCRC  ACTICN  TAKEN. 

0111 

REF 

1 

06, 32AA 

3 7720 

0 

1/ACCFIX 

CAP 

PRI027 

SET  UF  1/ACCS  SC  THAT  THE  SViITCH 

CIJRV  ES 

)112 

RFF 

2 

LAST 

159 

06 , 32A5 

0 5072 

1 

TC 

NCVAC 

FCR  TJETLAW  CAN  BE  WCDIFIEC  IF 

CH  ERA  SK 

0113 

REF 

A 

LAST 

13-; 

R6,  1 537 

EBANK= 

AC  SC 

FAS  BEEN  ALTEREC. 

0 1 1 A 

REF 

1 

06  ,3246 

( 3 6 A A 

1 

2CACR 

1 /ACC  JOB 

01  lA 

REF 

1 

06, 32A7 

42  106 

c 

0115 

RFF 

2 

LAST 

192 

06, 32 5Q 

1 5270 

c 

TCF 

P.CSRCNEX 

EXIT. 

0117 

06,3247 

5FAILTAE 

ECUALS 

- 1 

CH  5 JET  BIT  CORRESPONDING  TC  CH 

32  BIT  : 

0118 

06,3251 

OCCAO 

c 

CCT 

0C040 

8 

Olio 

06, 3? 52 

0CC2O 

0 

OCT 

CC02C 

7 

Ol?'" 

C6,3253 

COlOO 

0 

CCT 

00100 

6 

0121 

C6,325A 

CC200 

0 

CCT 

CC20C 

5 

0122 

■06 ,3255 

00010 

0 

CCT 

CCOlO 

A 

0123 

06,3256 

ocroi 

c 

CCT 

00001 

3 

01  2A 

06,3257 

OCCOA 

0 

OCT 

OCC04 

2 

0125 

06  ,3260 

009  ■) 2 

0 

CCT 

00002 

1 

0126 

06,3257 

6F6I LTAB 

ECUALS 

-1 

CH  6 JET  BIT  CORRESPONDING  TO  CH 

22  BIT: 

0127 

06,3261 

noolo 

0 

CCT 

OCOlO 

e 

0128 

06 ,326? 

00020 

0 

CCT 

00020 

7 

0129 

06,3263 

OCCOA 

c 

CCT 

ncnu4 

6 

013C 

06,3264 

00200 

0 

OCT 

0C20C 

c 

0131 

06,3265 

oocci 

c 

CCT 

oouo  1 

A 

0132 

06, 3266 

0CC02 

c 

CCT 

0C002 

5 

0133 

06,3267 

00040 

0 

CCT 

00040 

2 

013A 

C6,327f 

CClOO 

c 

CCT 

001  JO 

1 
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OCOl  22,?904  BANK  22 

9002  REF  ' 1 ' 5,2'’!00  SE7LCC  DCWNTELR 

0C03 Q5.2')b5 BANK 

COCA  PEF  7 LAST  155  C3AC  F6ANK=  CMF'ELFF 


ROOP';  SPECIAL  rCWELINK  CF  CCCFS 


A00C6 

OP  CCCE 

ACDPESSI^xAMPLE ) SEND 

S.  . 

SIT  15 

SITS  14-12 

BITS  11 

AO  on  7 

-0 

AOO'18 

— 

A0CC9 

AOOlO 

IDN ACR 

TIME2 

(2  AGC 

NCS  ) 

0 

0 

ECACR 

AOCll 

2CMACR 

TEPHEM 

( 4 AGC 

NOS  ) 

0 

1 

FCACR 

A0012 

3CNACR 

VGEQCY 

(6  AGC 

WCS  ) 

0 

2 

ECADR 

A0013 

40NADR 

STATE 

(8  AGC 

VvCS  » 

n 

3 

ECACR 

A0C14 

5CNACD 

UPRUFF 

( lOAGC 

VvDS) 

c 

4 

ECACR 

A0015 

6DNACR 

DSPTAE 

(12AGC 

WCS  ) 

0 

ECADR 

A0016 

CNCHAN 

3C 

CHANNELS 

0 

7 

CHANNEL 

AOCl  7 

ACCPESS 

AOOl  8 

CNFTP 

nextlist 

PC  INTS 

TC  NEXT 

0 

6 

ACRES 

AOCIP 

LIST. 

R0C2C  COkNLIST  FORMAT  OEFIMTICFS  AND  PLLES- 

R0021  1 . END  OF  A LIST  = -XDNADP  ( X = 1 TO  6),  -DNPTR,  CR  -DNCHAK. 

RCC22  P.  SNAPSHOT  SUBLJST  = LIST  V,HlCh  STARTS  WITH  A -ICNACR. 

R0023  3.  SNAPSHOT  SUFi|.IST  CAN  rNLT  CONTAIN  ICNACPS. 

R0O2A  4.  TIME2  lONADR  MUST  BE  LOCATED  IN  THE  CONTROL  LIST  CF  A DQWNLIST. 

R0025  5.  ERASABLE  CONN  TELEMETRY  NCRCS  SHCLIC  BE  GRCUFEC  IN  SECUENTIAL 

RO'126  LCCATIONS  AS  MLCH  AS  POSSIBLE  TO  SAVE  ST0R4GE  LSED  BY  COWNLINK  LISTS. 


0C27 

0028 

REF 

1 

CCC7 

, EFASZERC 

cnuNTx 
ECLAl  S 

tl/DL  1ST 
7 

002  9 
0C3P 
0032 

RPP 

REF 

1 

2 LAST  194 

000  7 
CC07 
05,2065 

UNKNOWN 
SPAR  F 

77340  C LCWIDCCD 

EQLALS 

ECUALS 

CCT 

ERASZLRC 
ERAS  ZEPC 
77340 

LSE 

LCW 

SPARE  TG  INCICATE  AVAILABLE  SPACE 
IC  CCCE 

00  3 3 

REF 

1 

T 5, 2172 

NCMDNLST 

EQUALS 

LMCSTADL 

FRESH  START  AND 

FCST 

F27  rCwMIST 

0034 

PEE 

1 

05 ,2407 

AGSl  I ST 

ECLALS 

L NAGS  ICL 

0035 

pep 

2 LAST  194 

05,2407 

UPDNL  1ST 

equals 

L NAGSIDL 

UPCATE  FRCGFAN 

(F27) 

CCWNl  1ST 
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POf!36  LM  ORETTAL  MANEUVERS  LIST 


R003  7 

--  rCNTROL 

L 1ST 

0038 

9039 

RTF 

1 

05,2066 

05,2066 

32  127 

1 

LRCRRNCL 

FCUALS 

CNPTR 

LMCRBROl 

SEND  ID  BY  SPECIAL  GODING 
CCLLECT  SNAFSFCT 

0C4 

REF 

3 

LAST 

194 

05,2067 

2434J 

0 

6DNACR 

dntmblff 

SEND  SNAFShCT 

1 

REF 

1 

05, 2C7C 

C3451 

1 

ICNACP 

CELLT4 

CELLT4  , + 1 

r)C42 

REF 

2 

LAST 

141 

05,  2'. 71 

13443 

0 

3DNADR 

RTAPG 

PTARG,+1.. .+5 

0C43 

REF 

1 

05,2072 

02256 

1 

ICNACP 

RLEV 

ELEV,+1 

0‘)A4 

REF 

1 

05, 2073 

01341 

0 

IDNACR 

TEVENT 

TEVENT, +1 

0045 

REF 

1 

05,2074 

25733 

1 

6DNADR 

REF  SMMAT 

RRFSMMAT+0...+11D 

0046 

RRF 

1 

05,2075 

03633 

1 

ICNACP 

TCS  I 

TCSI, +l 

004  7 

REF 

1 

05, 2'.76 

12266 

c 

30NACR 

DELVEETl 

0ELVEETH0...+5 

0C48 

REF 

2 

LAST 

144 

05,2077 

13700 

1 

2CNACR 

VGTIG 

VGTIG+0...+5 

0C49 

REF 

2 

LAST 

107 

(15,  2 ICC 

01335 

c 

IDNACR 

DNLRVEL  2 

DNLRVEL  2, CNLRALT 

0056 

REF 

1 

05,2101 

03630 

1 

IDMADR 

TPASS4 

T F A S S 4 , + 1 

00  5 1 

REF 

1 

05 , 2 102 

32136 

1 

CNPTR 

IV^'ORBMOF 

COMMON  DATA 

0052 

REF 

1 

05, 2 ns 

0CC24 

1 

IDNADP 

T IME2 

TIME2/1 

005  3 

REF 

1 

U5,21  >4 

3 214  5 

0 

CNPTR 

LMORBM03 

CCLLECT  SNAFSHCT 

0054 

REF 

4 

LAST 

195 

05,2105 

24340 

0 

6DNACP 

DNTMEUFF 

SEND  SNAPShCT 

00  5 5 

REF 

1 

) 5 , 2 1 3 6 

32  154 

r 

CNPTR 

L R0RBM04 

CCMMCM  DATA 

C056 

PFF 

1 

05,2107 

97115 

0 

2GIMACR 

PCSTORKL 

POSTORKL,NEGTCPKL,POSTCRKV,NEGTCRI<V 

0058 

REF 

1 

05, 21ir 

RCCC7 

0 

ICNACP 

SPARE 

005  9 

R F F 

I 

05,2111 

0 17  7 6 

c 

IDNADR 

TCDH 

TCCH,+1 

Q06C 

REF 

1 

05,2112 

12274 

0 

3CNACR 

DELVEFT2 

CELVEET240...+5 

006  1 

RPR 

1 

05,2113 

P 3 6 3 5 

1 

IDNACR 

TTPI 

TTPI,  *1 

0062 

REF 

1 

05,2114 

12365 

1 

30NACR 

0FLVEET3 

DELVEET3-KI...+5 

0063 

RFP 

2 

LAST 

107 

05,2115 

01330 

0 

ICNACP 

CNRR ANGF 

CNRR ANGF  ,DNRRDnT 

■1(165 

REF 

2 

LAST 

10  7 

05,2116 

05333 

1 

20N  ACP 

DNLPVELX 

DNLRVELX,CMPVELY,CNLFVEL2,CNLFALT 

0066 

RRp 

1 

05,2117 

035  77 

i< 

ICN  ACR 

D IFFALT 

DI FFALT  ,+  1 

0067 

REF 

1 

■‘•5,2120 

01326 

1 

IDNACR 

lemmass 

LEMMASS, CSMMASS 

006  8 

c>t=F 

32 

LAST 

18  1 

05,2121 

0127  7 

1 

IDNADR 

I MODE  S 30 

IMCCES3r,IMCCES33 

0069 

REF 

1 

65,2122 

03441 

0 

IDNACR 

T IG 

TI  G,^-  1 

0')7'i 

REF 

1 

C5, 2 123 

3 215  7 

c 

DNFT  P 

L MORE  MO  5 

CC-MCN  CATA 

907  1 . 

REF 

1 

05, 2124 

32170 

a 

DMPTR 

LMORBM06 

COMMON  DATA 

■0G72 

RPF 

2 

LAST 

19  5 

05,2125 

0000  7 

0 

ICN ACR 

SPARE 

FORMERLY  PIR 

0073 

RFF 

2 

LAST 

148 

05, 2126 

7 4 2 6 1 

1 

-IDNACR 

TC-C 

TGC  ,+  l 

RCC74 

--  SU8-LISTS  --- 

0076 

REF 

2 

LAST 

12  1 

:)  5 , 2 1 2 7 

76C56 

c 

LMCRB  NOl 

-IDNADR 

P-CThEP  +2 

R-CTHER+2,+3  SNAPSHOT 

1076 

RFF 

3 

LAST 

195 

05,2  130 

01723 

0 

IDNADR 

R-CTHER  +4 

R-CTHEP+4 ,+5 

0C77 

REF 

2 

LAST 

121 

05,2131 

Cl  725 

0 

IDNACR 

V-CTFER 

V-CTHER,-*! 

0078 

RPF 

3 

LAST 

195 

T5, 2132 

01  72  7 

1 

IDNADR 

V-CTHFR  +2 

V-CTHER+2,+3 

0079 

FFR 

4 

LAST 

195 

05 ,2  133 

01731 

0 

IDNACR 

V-OTFEP  +4 

V-CTHER+4 , +5 

0080 

RFF 

1 

05,2134 

01570 

1 

ICNACP 

T-CTFFR 

T-OTHER , + 1 

0081 

REF 

4 

LAST 

195 

05,2135 

76060 

c 

-IDNADR 

R-CTHER 

R-CTHEP+0, +1 

0CE2 

REF 

1 

05  ,21 36 

04  32'') 

1 

LM0REMU2 

2CNACR 

REOOCTR 

REC0CTR,'IHETAC  , + l , + 2 CCMMCN  DATA 
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0083 

REF 

1 

u5, 2137 

0 1432 

0 

lONADP 

R S68C 

RSFEC  , + l 

QCEA 

REF 

5 

LAST 

1 30 

05,214C 

07021 

0 

2CNACR 

cnegaf 

CM F GAF,C ME GAQ,CMEGAR, GARBAGE 

0085 

REF 

4 

LAST 

137 

''5,2141 

07235 

1 

2nNACP 

CDL'XC 

CDUXC,CCUYC,CCUZO,GARBAGE 

0C86 

R'^F 

3 

LAST 

19P 

05,2  142 

O4032 

1 

20NACR 

CDL  X 

CDLX  ,CDL'»  ,CDUZ  ,CDLT 

0087 

REF 

16 

LAST 

96 

18,2143 

24074 

1 

6CNACR 

STATE 

STATE+n. ..+11D  (FLAGWORDS) 

0088 

REF 

13 

LAST 

18  1 

05,2144 

52  7 5 5 

1 

-6DNACR 

D SPTAB 

CSPTAE  TABLES 

CC89 

R>^F 

1 

05,2145 

76556 

c 

LRGREwns-lCNAnR 

RN  +2 

PN  +2, + 3 SNAPSHCT 

0C50 

REF 

2 

LAS^ 

196 

05, 2146 

01223 

0 

IDNADP 

RN  +4 

PN  44, +5 

00<3i 

REF 

1 

05,2147 

C 1225 

0 

IDNADR 

VN 

VN  ,4l 

CC0  2 

REF 

2 

LAST 

196 

05,215C 

01227 

1 

IDNACP 

VN  +2 

VN  42,43 

0093 

REF 

3 

LAST 

196 

05,2151 

0123  1 

0 

IDNACR 

VN  +4 

V h +4  j + 5 

0094 

PEF 

1 

05,2152 

0 1233 

1 

IDNADR 

PIPTIME 

FI FTI ME  ,41 

0095 

PEP 

O 

LAST 

196 

05,2153 

76560 

0 

-IDNACP 

RN 

RN,4l 

0096 

REF 

3 

LAST 

135 

05,2154 

07243 

c 

LMQRB''04  2DNADR 

ONEGA FD 

CMEGAFC,CNEGACC,CMEGARC,GAPBAGE 

CC97 

REF 

1 

05,2155 

10372 

0 

3DNACR 

CADRFLSH 

CADRFLSH,4  1,  + 2,FAUREG,41,42 

CC98 

RFF 

1 

LAST 

188 

05, 2156 

7 7 6 6 7 

c 

-IDNACP 

R ACNCCES 

FACMCCES,CAFerrLS  COMMON 

DATA 

0099 

REF 

6 

LAST 

196 

05,2157 

07021 

0 

LN0RBR05  2DNADR 

ONEGAP 

CMEGAF,C ME  GAG, CMFGAP, GARBAGE 

0100 

REF 

5 

LAST 

196 

05,2160 

07235 

1 

2CNACR 

CCIIXC 

CCLXC  ,CCLXC ,CCUZD  .GARBAGE 

0101 

PEF 

4 

LAST 

196 

05,2161 

0F032 

1 

2DNACF 

CCLX 

CnLX,CCLY,CCU2,CCUT 

0102 

RFF 

1 

05,2162 

0 3024 

1 

IDNADR 

ALPHAS 

ALPHAS  .ALFHAR  CCMMCN 

DATA 

0103 

PFF 

1 

05,2163 

03  113 

1 

ICNACP 

PCSTCPKF 

FCSTCFKF  .NFGTCRKP 

0104 

05,2164 

3401  1 

0 

DNCHAN 

1 1 

CHANNELS!!  , 12 

C1C5 

05,2165 

34013 

1 

CNCFAN 

13 

CHANNELS  13  , 14 

0106 

05,2166 

34C3C 

c 

CNCHAN 

30 

CFANNELS30, 31 

0107 

05,2167 

43745 

0 

-DNCHAN 

32 

CHANNELS32  ,33 

0108 

REF 

2 

LAST 

148 

05,2170 

03560 

1 

LNCR8M76  ICNACB 

P IFT  INFl 

PTPTIME,4l  COMMON 

DATA 

0109 

RFF 

4 

LAST 

99 

05, 2171 

67453 

1 

-3DNACR 

DELV 

CELV40..  .45 

R 0 1 1 f 
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POIH  LP  CCAST  A^^  ALTGNNEM  GCWMIST 


R0112 

— rCNTpri 

LIST 

0113 

05, 2172 

LMCSTADL 

EQUALS 

SEND  IC  EY  SPECIAL  CCCING 

Cl  lA 

REF 

1 

05 ,2172 

32127 

1 

CNPTR 

LMCSTAO 1 

COLLECT  SNAPSHCT 

•)115 

RFF 

5 

LA  ST 

195 

05,2173 

2939C 

0 

6CNACR 

ONT^BUFF 

SENC  SNAPSFCT 

0116 

REF 

1 

05,2179 

02020 

1 

ICNACP 

AGSK 

AGSK,+1 

C117 

Rt^F 

2 

LAST 

12  5 

05,2175 

02779 

1 

ICNACR 

TALIGN 

TALIGN  ,+  1 

0118 

PFF 

2 

LAST 

195 

F5, 2 176 

07115 

C 

2CAACP 

PCSTCRKU 

PCSTrPKU,NEGTCRKU,PCSTCRKV,NEGTCRKV 

ni?n 

RF^ 

3 

LAST 

195 

05,2177 

C133C 

c 

IDNACR 

DNRRANGE 

CNPRANGE,CNRRCCT 

0121 

RPF 

2 

LAST 

195 

05,22')C 

01391 

0 

ICNACP 

TEVFNT 

TFVENT,+ 1 

0122 

PFF 

2 

1 AST 

195 

C5, 2201 

25733 

1 

6CNACP 

refsnnat 

PEFSN^AT-^Q...^11C 

0123 

RFF 

1 

05 ,2202 

00  7 39 

1 

IDNADR 

ACTCODE 

ACTCODE  .GARBAGE 

012A 

RTF 

1 

05 ,22C3 

12022 

1 

3CNACR 

RLS 

RLS-»0  . .,  + 5 

0125 

REF 

3 

LAST 

195 

C 5 , 2 20  9 

fj  c 3 3 3 

1 

2DNACP 

DNLRVELX 

CNLPVELX,CNLPV£LY,CNLPVEL2,CNLPALT 

C126 

PRF 

3 

LAST 

195 

05,2205 

13700 

1 

3DNACR 

VGTIG 

VGTIGX  ,Y  ,Z 

0 127 

REF 

1 

C5 ,2206 

32  136 

1 

CAFTF 

LNCSTA02 

CCNNCN  DATA 

0128 

RFF 

2 

LAST 

195 

05,2297 

00C29 

1 

IDNADR 

TINE2 

TINE2/1 

C129 

RFF 

1 

05 ,22  10 

32195 

0 

CMPTR 

LNCSTA03 

COLLECT  SNAPSKCT 

0130 

P'^F 

6 

LAST 

19  7 

C5, 22  1 1 

29390 

c 

60NACR 

ONTNeUFF 

SENC  SNAPSFCT 

0131 

REF 

1 

05,2212 

32  159 

0 

DNPTP 

LNCSTA09 

CCNNON  DATA 

0 132 

RFF 

1 

05,2213 

32226 

c 

CNPTR 

LNCSTA07 

CCNNON  DATA 

0133 

REF 

A 

LAST 

197 

f 5, 22  19 

0 5 333 

1 

20NACP 

DNLRVELX 

CMPVELX,CMPVELY,CNLPVEL2,CNLPALT 

0I3A 

REF 

1 

05 ,221  5 

'I9C36 

0 

2CNACR 

ecus 

CDLS,FIFAX,PIFAY,FIPAZ 

0135 

RFF 

2 

LAST 

96 

C5.2216 

on  112 

c 

ICNACP 

L ASTYf PC 

LA  STYCPC  ,LASTXCMC 

0136 

RFF 

2 

LAST 

195 

«■  5, 2217 

01326 

1 

IDNADR 

LEPNASS 

LFPPASS  , CS  M“A  S S 

C137 

REF 

33 

LAST 

195 

05 , 22?9 

0 12  7 7 

1 

IDNACR 

IN0DES3Q 

INODE  S 30  ,I MODE  S33 

0138 

RFF 

2 

LAST 

19  5 

C5,2221 

0399  1 

c 

ICNACR 

T IG 

T IG,  + 1 

0139 

REF 

1 

05,2222 

32  157 

0 

DNPTP 

LNCSTA05 

COMMON  DATA 

OlAO 

REF 

1 A 

1 AST 

196 

05 ,2223 

52  755 

1 

-6CNACR 

CSFT AB 

CSPTAP4f  ...  + 11D  TAEiLE 

R,tlAl 

--  SL8-LISTS  - — 

Cl  A2 

RFF 

2 

LAST 

196 

05,2127 

LRCSTAOl 

EQUALS 

LNORBNO 1 

CCNMCN  DrNNLIST  DATA 

01A3 

RFF 

2 

LA  ST 

19  5 

C5.2136 

LRCSTA02 

EQUALS 

L NCPBROZ 

CCNMCN  CCWNLIST  CATA 

OlAA 

RFF 

2 

LAST 

19  5 

C5,2195 

LPCSTA03 

EQUALS 

LNCPBROS 

COMMON  CCV\NLIST  CATA 

' 01A5 

RFF 

2 

LAST 

195 

05,2159 

LNCSTA09 

EQUALS 

LNCPBN09 

COMMON  CCNNLIST  DATA 

01A6 

Rf^F 

2 

1 AST 

195 

05,2157 

Lh'C  STA05 

EQUALS 

LNGRBNn5 

COMMON  CCWNLIST  CATA 

01A7 

REF 

1 

■j5 ,2229 

0 5 700 

c 

LPCSTAC6 

2CNACR 

X789 

X789+C...+3  COMMON  DATA 

01A8 

RFF 

3 

LAST 

197 

05,2225 

7 7 6 6 5 

1 

-ICNACR 

LASTYCNC 

LASTYCMF.LASTXCMC 

01A9 

RFF 

2 

LAST 

129 

05,2226 

1 2 7 3 7 

1 

LMCSTAC7 

3DNADR 

OGC 

CGC  ,+  l , ICC  , + l ,WCC  , + l CCMMCN  DATA 

C 15C 

PFF 

2 

LAST 

1 2 5 

05,2227 

02755 

1 

ICNACR 

BESTI 

BEST  I ,BEST J 

0151 

RFF 

2 

LAST 

125 

C5 ,2230 

1 2 7 60 

c 

3DNACP 

STAPSAVl 

STAPSAV1+0...+5 

0152 

PFF 

3 

LAST 

129 

05 ,2231 

6501  1 

1 

-3CNACR 

S7AR£fiV2 

STARSAV2+Q...+5 
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L 

nnwNL  INK 

LISTS 

USER'S  PAGE  NO.  6 EC  S4 

P915A 

LN 

RFAOE  2VOUS 

ANC 

PRE-TFFUS7 

LCUN'L  1ST 

R0155 

— ocntrcl  list 

0156 

05,2232 

LRRFACDL 

FCUALS 

SEND  IC  EY  SPECIAL  CODING 

C157 

PEP 

1 

05 ,2232 

32127 

1 

CNPTR 

LRRENCO  1 

CCLLEC7  SNAFSI-CT 

019? 

REF 

7 

LAST 

197 

05,2233 

2434C 

C 

6CNACR 

CNTR6UFF 

SEND  SNAPSPCT 

0159 

pep. 

1 

05, 2234 

32  27  6 

C 

DNPTR 

LRREND07 

CCLLFCT  SNAPSPCT 

0160 

REF 

6 

LAST 

199 

05,2235 

14340 

C 

4CNACR 

cntnbuff 

SENC  SNAPSPCT 

0161 

RFF 

2 

t A ST 

195 

05, 2236 

03451 

1 

ICNACR 

DFLLT4 

CELLT4,  + 1 

0162 

RFF 

3 

LAST 

195 

05 , 2237 

13443 

0 

3DNACR 

RTARG 

RTAPGO.  ..+5 

0163 

RFF 

1 

C5 ,2240 

13433 

1 

3CNACP 

DELVSLV 

DELVSLV+0. . .+5 

016A 

prp 

2 

LAST 

IF  5 

05,2241 

03  633 

1 

lONAGP 

TO  SI 

TCSI  , + l 

0165 

R9F 

2 

LAST 

195 

05 ,2  242 

12266 

0 

3DNACR 

DELVEET 1 

DELVEET+C-..+5 

0166 

RFF 

03 

LAST 

19  6 

05,2243 

COCO? 

c 

ICKACP 

SPARE 

0167 

REF 

2 

LAST 

195 

05,2244 

03  6 30 

1 

IDNACR 

TFASS4 

TFASS4 , +1 

0166 

RFF 

1 

05,2245 

32224 

1 

CNPTR 

LRREND06 

CCNMON  CATA 

0169 

RFF 

1 

05 , 2246 

32  136 

1 

CNPTR 

LNRENC02 

CCNNCN  CATA 

C17L 

REF 

3 

LAST 

197 

05,2247 

00024 

1 

IDNADR 

TINE  2 

TINE2/1 

0171 

RFF 

1 

05,2250 

32145 

0 

FNPTP 

LNRENC03 

COLLECT  SNAPSHOT 

0172 

RFF 

9 

LAST 

199 

05,2251 

243-^0 

0 

6CNACR 

CNT'^BLFF 

SENC  SNAPSHOT 

0173 

REF 

1 

05  ,2252 

32154 

c 

CNPTR 

L NRENC04 

CCNMON  DATA 

017^. 

REF 

3 

LAST 

197 

05,2253 

07115 

0 

2CNACR 

PCSTCFKU 

PCSTOFKU,NEGTCRKU,POSTCPK V ,NEGTGRKV 

0176 

REF 

4 

LAST 

199 

05,2254 

00007 

0 

IDNADR 

SPARE 

0 177 

REF 

2 

LAST 

195 

05,2255 

01776 

0 

ICNACP 

TCCH 

TCCH,  + 1 

0178 

REF 

2 

LAST 

195 

05,2256 

12274 

c 

3DNACR 

DELVEET2 

CELVFET2+0...45 

0179 

RFF 

2 

LAST 

195 

05,2257 

03635 

1 

IDMACP 

TTDI 

TTPI ,+l 

0160 

RFF 

2 

LAST 

195 

05 ,2260 

12365 

1 

3CNACR 

CELVEFT3 

CELVEET340...+5 

0 18  1 

REF 

2 

LAST 

195 

05,2261 

02256 

1 

IDNACR 

F LEV 

ELFV , 41 

0162 

REF 

2 

LAST 

197 

05,2262 

0 4 0 3 6 

0 

2CNACR 

CCLS 

CDLS,FIFAX,FIFAY,FIPAZ 

0 183 

REF 

4 

LAST 

197 

05,2263 

GO  1 12 

c 

ICNACR 

LASTYCNC 

LASTYCNC,L ASTXCMC 

0184 

RFF 

3 

LAST 

197 

05, 2264 

013  2 6 

1 

IDNADR 

LENMASS 

LFNNASS,CSN»'ASS 

0165 

REF 

24 

LAST 

197 

05,2265 

01277 

1 

ICNACP 

! NCCES3C 

IMCCES3C  ,INCDES33 

0186 

RFF 

3 

LAST 

197 

05,2266 

03441 

0 

IDNACR 

T IG 

T IC, 41 

0187 

REF 

1 

05,2267 

32  157 

0 

CNPTR 

LNRENCC5 

CCNNCN  DATA 

0 168 

RFF 

C 

LAST 

199 

05 ,2270 

00G07 

0 

ICNACR 

SPARE 

0189 

REF 

1 

05,2271 

03620 

0 

IDNACR 

CENTANG 

CFNTANG,41 

0190 

PFF 

1 

05,2272 

03466 

c 

ICNACR 

NN 

NM  ,4  1 

0191 

REF 

2 

LAST 

195 

05,2273 

03577 

1 

IDNACR 

D IFF  ALT 

CTFFALT, 41 

0192 

REF 

1 

05,227^ 

02347 

0 

IDNACR 

DELVTPF 

CFLVTFF  ,41 

0 193 

REF 

6 

LAST 

19  9 

05,2275 

77770 

1 

-IDNACF 

S FARE 

R0194 

- — SUB-LISTS  

0195 

REF 

3 

LAST 

1 97 

05,2127 

LRRFKCO 1 

equals 

LNORBNOl 

CCNNCN  CCPNLIST  CATA 

0196 

RFF 

Q 

LAST 

1 9 7 

05,2136 

LRREAC02 

ECLALS 

LNCReN02 

CCNNCN  CCWNLIST  CATA 

0197  P=F 


3 LAST  197  05.21A5 


LMRENCC3  EQUALS  L^0RB^'03 


CCWNLIST  CATA 
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0198 

REF 

3 

LAST 

197 

05,2154 

LRRENC04 

ECLALS 

LNCPBN04 

CCNNCN  CCWNLIST 

CATA 

0199 

RPF 

3 

1 AST 

197 

05.2157 

LMPFNC05 

EQUALS 

LN'GRBN'05 

CCRRCN  DCViNLIST 

CATA 

o?no 

RFF 

1 

05,2224 

LFREAC06 

ECUALS 

LRCSTA06 

CCRMON  CCWNLIST 

CATA 

0201 

REF 

1 

05,2276 

74220 

C 

LRRENCC7- 

ICNACR 

A TG 

AIG  ,ANG 

SNAPSFOT 

C2C2 

RFF 

1 

05,2277 

0346  1 

1 

ICNACR 

ACG 

ACG,TR1<NKCNT 

0203 

REF 

2 

LAST 

1A7 

r5,23rr 

0 3 7 5 2 

1 

ICNACR 

TANGNF 

TANGN6,  ■*] 

020^ 

RFF 

2 

LAST 

1A7 

05,2301 

03754 

1 

IDNADR 

PKTI RE 

RKTIRE  , + l 

C2C5 

REF 

2 

LAST 

14  7 

05,2302 

74017 

1 

- 

ICNACR 

RANGRCCT 

CNRRANGF ,CNRRCCT 

R0206 
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0209 

02M 

REF 

1 

05, 2303 
C5, 230? 

22  24  1 

C 

LNCSASCL 

EGLALS 

DNPTR 

L FDSASC7 

SEND  IC  BY  SPECIAL  COCING 
CCLLECI  5NAFSFCT 

0211 

RPF 

1 

05,2304 

32355 

n 

CN  PTP 

LPCS Asoe 

SEND  SNAPSHOT 

0212 

P'^F 

3 

LAST 

197 

''5,2305 

0124  1 

C 

IDNACF 

TEVFNT 

TEVFNT,-H 

0213 

REE 

2 

1 AST 

137 

C5 ,2306 

13  2 5 3 

1 

3CMACR 

UNEC/2 

LNEC/2F0...+5 

021  A 

REF 

2 

LAST 

152 

05,2307 

13645 

1 

3DNACF 

VGVECT 

VGVECT+n .45 

021  5 

FFF 

2 

L AST 

150 

: ' 5 , 2 2 1 0 

02642 

1 

IDNADP 

TTF  /e 

TTF/8  ,41 

0216 

P'^F 

2 

LAS'^ 

151 

05,231  1 

03664 

0 

ICN ACR 

DELTAF 

DELTAF, +1 

0217 

0 p F 

2 

LAST 

197 

05,2212 

12C22 

1 

3PN  AC  P 

P LS 

PLS+U  . . . -*5 

0220 

RFF 

2 

LAST 

12C 

''5,23  12 

0 2 2 7 6 

r 

IDNADR 

7D0TD 

ZDCTD  , + l 

C22  1 

DEF 

1 

05,2314 

32224 

1 

CNPTP 

LNCSAS09 

COI'NON  DATA 

0222 

RFF 

1 

05,2315 

32136 

1 

CNPTR 

LPCSAS02 

CCHMON  DATA 

0223 

RFF 

4 

LAST 

199 

05 ,2316 

00024 

1 

ICNAER 

T IME2 

TINE2/1 

022A 

RFF 

1 

05,2317 

32  145 

C 

rN'PTR 

LNCSAS03 

COLLECT  SNAPSHOT 

0225 

REF 

I'! 

LAST 

199 

.■>5, 23  29 

24240 

C 

60NA0R 

DNTMBL'^F 

SFNC  SNAFSFCT 

0226 

REF 

1 

05,232  1 

32154 

0 

CMPTR 

LNDSAS04 

CCMNON  DATA 

0227 

REF 

4 

LAST 

IFC 

05,2222 

C71  15 

0 

2DNACR 

PCSTCRKU 

PCSTCRKU, NEGTCRKU,POSTCRKV,N EG TCRKV 

0229 

RFF 

2 

LAST 

12? 

05, 2323 

12626 

a 

3DNACR 

RGU 

RGL+0. . . 45 

C23C 

RFF 

2 

LAST 

15f 

05,2324 

13626 

1 

3CNACR 

VGU 

VGL  + C.  ..  + 5 

0231 

REF 

2 

LAST 

1 5C 

05,2225 

12634 

1 

3DNADP 

LAND 

LANC+0.  . . + 5 

0232 

REF 

2 

LAST 

120 

05 ,2326 

02262 

0 

ICNACR 

AT 

AT  ,+  1 

023^ 

REF 

2 

LAST 

122 

05  ,232  7 

0 2 400 

1 

ICNACR 

TLANC  ' 

TLAN0,4l 

023A 

RFF 

p 

LAST 

15C 

C:  5,  2 2 30 

036  1 5 

0 

IDNADR 

FC 

FC  .GAPeAGE 

0235 

REF 

5 

LAST 

199 

05 ,2331 

00112 

0 

idnacr 

LASTYCMD 

LASTYCI'DtLASTKCMD 

0236 

RFF 

4 

LAST 

199 

05,2232 

C 1326 

1 

IDNACP 

LENNASS 

LE^NASS, CSNPASS 

023  7 

REF 

35 

LAST 

19  9 

05,2333 

0 1277 

1 

IDNADR 

I NCDES30 

ir'CCES3n  ,IFCCES33 

C236 

RFF 

4 

LAST 

199 

05,2334 

0344  1 

0 

ICNACR 

T IC 

T IG,  + 1 

0239 

REF 

1 

05,2235 

32  157 

c 

DNPTR 

LNCSAS05 

CCNNCN  CATA 

O2A0 

RFF 

1 

05 ,2336 

32170 

0 

CNPTR 

LNDSASC6 

CCNNCN  DATA 

02A1 

REF 

2 

LAST 

15C 

05  ,233  7 

03614 

1 

ICNACR 

PSEUCC55 

PSFUDC55, GARBAGE 

0242 

RFF 

3 

LAST 

155 

05, 2340 

74324 

1 

■ IDNADR 

TICGC 

TTCGC  , + l 

R0243 

— SUB-LISTS  --- 

0244 

REF 

'4 

LAST 

199 

05, 2136 

LNDSASC2 

FCLALS 

LNCRPN02 

CCP'F'CN  CCWNLIST  CATA 

0245 

RFF 

4 

LAST 

199 

05,2145 

LNCSAS02 

EQUALS 

lnorepos 

CCNVCN  DCNNLIST  CATA 

0246 

RFF 

4 

LAST 

20C 

05,2154 

LNTSAS04 

ECUALS 

L'“CPepa4 

CCNMON  CCWNLIST  DATA 

0247 

PFF 

4 

LAST 

200 

05, 2157 

LPCSA  S05 

EQUALS 

1 NORBN'35 

CCNNCN  CCWNLIST  CATA 

0248 

REF 

2 

LAST 

195 

05,2170 

LN'CSAS(>6 

EQUALS 

L I'nRRiW06 

CORMON  DCWNLIST  DATA 

0249 

REF 

2 

LAST 

12C 

05,2341 

7544  1 

1 

LNDSA  S07- 

■IDNACR 

LRZCCUCL 

LPZCDLCL, GARBAGE  SNAPSHOT 

0250 

REF 

2 

LAST 

150 

05,2342 

03651 

0 

IDNADR 

VSELECT 

VSELEC^  , GARBAGE 

025  1 

RFF 

1 

05 ,2343 

02337 

1 

ICNACF 

LfiVT  INCL 

LP VTIRCL  ,+  1 
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USER'S  PAGE  NO.  9 EC  S4 


C252 

REF 

2 

LAST 

150 

Q5, 234A 

03652 

0 

lONACR 

VNEAS 

VMEAS  , + l 

0253 

R«=F 

3 

LAST 

20C 

05,2395 

03759 

1 

ICNACR 

MKT  IME 

RKTIME,  +1 

02  5A 

REF 

2 

L AS-'- 

150 

05,2396 

03659 

C 

IDNACP 

HREAS 

FRFAS  , + 1 

0255 

REF 

3 

LAST 

152 

05 ,2397 

03  7 56 

C 

ICNACR 

RR 

RR  ,+  1 

0256 

REF 

2 

LAST 

2CC 

05, 235C 

03957 

1 

IDNACR 

AIG 

AIG,ARG 

0257 

R>"F 

2 

LAST 

20C 

05,2351 

0 3 9 6 1 

1 

IDNADR 

ACG 

ACG  ,TPHRKCNT 

0258 

RFF 

3 

LAST 

20C 

05,2352 

03752 

1 

IDNACR 

T ANGNB 

TANGNB ,+ 1 

0259 

REF 

LAST 

202 

05,2353 

03759 

1 

IDNACR 

RKTI RE 

RKT IR  E , + 1 

0260 

REF 

2 

LAST 

12C 

05, 2359 

75993 

0 

- 

IDNADR 

LRXCDLDL 

LP  >CDLCL .LPVCCLDL 

0261 

RFF 

1 1 

LAST 

2C1 

05,2355 

29390 

0 

LRCS AS08 

6DN  ACR 

CNTRibUFF 

SEND  SNAPSFCT 

0262 

RFF 

12 

LAST 

202 

05,2356 

5 7923 

f 

- 

SDNACR 

CMReLFF  +12D 

0263 

REF 

2 

LAST 

200 

05,2229 

LNCSASCS 

EQUALS 

LRICSTA06 

CCRRCN  OCWNLIST  DATA 

R026A 
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L DCV.NLINK  LISTS 


LSER' S PAGE  NO.  1C  EO  SA 


P0265  Lw  lunar  SURFACE  ALIGN  DCVvNLI'T 


RO  26  6 rCNTROL  LIST 


0267 

0268 

Rcp 

1 

05,2357 

05,2357 

32  127 

1 

LM  SALCl 

ECLALS 

dnptr 

LNLSALOl 

SEND  ID  EY  SPECIAL  COOING 
CCILFCT  SNAFSFCT 

C269 

REF 

13 

1 AST 

202 

05 ,2360 

24340 

0 

60NACR 

DNTMBUFF 

SEND  SNAPSHOT 

0270 

REF 

1 

05,2361 

32276 

C 

CNPTR 

LNLSAL07 

CQLIECT  SNAPSFCT 

0271 

REF 

14 

LAST 

203 

05,2362 

14  340 

0 

4DNADP 

DNTMBLFF 

SEND  SNAFShCT 

0272 

RFF 

■3 

LAST 

197 

05,2363 

02  774 

1 

ICNACR 

TALIGN 

TAL  IGN  ,+  l 

0273 

REF 

3 

LAST 

197 

05,2364 

25  733 

1 

6DNA0P 

PEFSNNAT 

PEFSMNAT40...411D 

C27A 

REF 

2 

LAST 

117 

05,2365 

26236 

1 

6CN ACR 

YNBSAV 

YNBSAV+0...+5,ZNfiSAV+C...+5 

0275 

REF 

1 

05 , 2366 

32224 

1 

CNFTP 

L»^LSAL08 

CCMMCN  CATA 

0276 

REF 

1 

05,2367 

32  136 

1 

DNPTR 

LM.SAL02 

CCNNCN  CATA 

0277 

REF 

5 

LAST 

201 

05,2370 

00024 

1 

ICNACR 

T INIF2 

TIME/  1 

0278 

REF 

1 

05,2371 

321^5 

0 

CNPTP 

LRLS  AL0  3 

CCLLFCT  SNAPSHOT 

0279 

REF 

15 

LAST 

20  3 

05,2372 

2434J 

0 

6DNADR 

DNTMBLFF 

SEND  SNAFSHCT 

0280 

REF 

1 

05,2373 

32154 

0 

CNPTP 

LMLSAL04 

COMMON  CATA 

0281 

RFF 

1 

05,2374 

32226 

c 

CNPTP 

LNLSAL09 

CCHNCN  CATA 

0282 

RFF 

4 

LAST 

117 

05,2375 

12230 

0 

3DNACR 

GSAV 

GSAV  + 0. . .+  5 

0283 

REF 

2 

LAST 

197 

C5 , 2376 

0 20  20 

1 

ICNACR 

AGSK 

AGSK, 41 

028A 

FEF 

6 

LAST 

2<)  1 

05,2377 

CO  1 12 

c 

IDNADR 

lastvcmd 

LASTYCNC  ,LAST  XCMC 

0285 

REF 

5 

LAST 

201 

05 , 2400 

0 1326 

1 

IDNACR 

LEMMASS 

LEMMA  SS,CSMMASS 

0286 

REF 

36 

LAST 

20  1 

05,2401 

G1277 

1 

IDNACP 

I NCDES30 

IMCCES30, IMCCES33 

0287 

REF 

5 

LAST 

201 

05,2402 

03441 

0 

IDNADR 

TIG 

TIG,4l 

0288 

RFF 

1 

C5,24C3 

32157 

0 

CNPTP 

LMSAL05 

COMMON  CATA 

0289 

REF 

1 

05, 240A 

32  170 

c 

CNPTP 

LNLSAL06 

CCNNCN  CATA 

C290 

REF 

7 

LAST 

199 

05,2495 

00007 

0 

IDNACR 

SPARE 

0291 

REF 

8 

LAST 

203 

05,2406 

7 77  70 

1 

-ICNACR 

SPARE 

R0292 

--  SUB-LISTS  — 

0293 

REF 

4 

LAST 

199 

05,2127 

LNLSALOl 

EQUALS 

LNCRBMOl 

COMMON  CCk>NLIST  DATA 

0 294 

REF 

e, 

LAST 

201 

05,2136 

LM  SA  L02 

ECLALS 

LMCRBM02 

CCMMON  CCWNLIST  CATA 

0295 

RFF 

5 

LAST 

201 

05  ,2145 

LRLSAL03 

EQUALS 

L NCR  BMC?  2 

COMMON  CCWNLIST  CATA 

0296 

REF 

C 

LAS'T 

2-^  1 

•05,2154 

L^LSAL04 

EQUALS 

LNCRBN04 

COMMON  CCWNLIST  CATA 

0 29  7 

REF 

5 

LAST 

2'?  1 

05, 2157 

LNL  SALC5 

EQUAL  S 

LNQRBM05 

CCMMCN  CCWNLIST  CATA 

C298 

RFF 

3 

LAST 

201 

05, 2170 

LNLSA  L0  6 

EQUALS 

LNGPBM06 

COMMON  CCWNLIST  DATA 

0299 

REF 

2 

1 AST 

199 

05, 2276 

LM  SALQ7 

EQUALS 

LNRENC07 

CCMMON  CrwiNLIST  CATA 

C300 

fff 

3 

LAST 

202 

05  ,2224 

LNLSALCF 

EQUALS 

LMCST A06 

COMMON  DCWNLISl  CATA 

0301  REF 


2 LAST  197  C5,222f 


LMSAL09  ECL'ALS  LACSTAO? 


CCNRCN  CCWNLIST  CATA 
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L 

DC1«M  INK 

LISTS 

USER'S  RAGE  NC.  12  EC  S4 

PQ3G3 

1_M 

AGS  INITIALIZAIICN  ANT  LFOAIE  CO'MIST 

R0304 

■ fCNTROL 

LIST 

03C5 

05,2407 

LRAGS  I:L 

EQUALS 

SENC  IC  BY  SPECIAL  CCDING 

03^6 

REF 

2 

LAST 

1 1 8 

05, 24C7 

122C0 

0 

30NACP 

AGSBUEF  +0 

AGSEUFF+0.  ..  + 5 

03 C 7 

REF 

3 

LAST 

20  5 

05,2410 

02214 

1 

IDNADR 

AGSBUFF  +12C 

AGSBURF+12D , GARBAGE 

0308 

RFF 

4 

LAST 

205 

05,2411 

12201 

1 

3FN  ACR 

AGSeUFF  +1 

AGSBUFF+  1. ..  + 6 

0309 

REF 

5 

LAST 

205 

C5, 2412 

022  15 

(1 

IDNACF 

AGSBLFE  +13C 

AGSRUFF+13C .GARBAGE 

0310 

FFF 

6 

LAST 

205 

05  ,2413 

12206 

0 

3CN AGP 

AGSBLFF  +6 

AGSeUFF+6. ..+11 

0311 

REF 

7 

LAST 

2C5 

05,2414 

02214 

1 

ICN ACR 

AGSBUFF  +12C 

AGSBUFF+12, GARBAGE 

0312 

PFC 

8 

LAST 

20  5 

)5, 241^ 

12  20  7 

1 

3DNADR 

AGSBLFF  +7 

AGSRiJ  FF  + 7.  . . + 12C 

0313 

ref 

9 

LAST 

20  5 

C5 , 2416 

02215 

0 

ICN ACR 

AGSBUFF  +13C 

AGSEUFF+13D, GARBAGE 

0314 

RFF 

2 

LAST 

104 

05,2417 

25167 

0 

6DNADP 

r CNPNLNE 

CCNFNLNF.UFCLCMCC ,UPVFRE,UFCrUNT, 

A0315 

LPELFF+0.. .+7 

0316 

REF 

1 

05,2420 

25203 

1 

6CNACR 

UR  PUFF  +8C 

LPPLFF  +8D...+19D 

0317 

REF 

1 

05,2421 

32  136 

1 

CNPTR 

LNAGS 102 

CFFNCN  CATA 

0318 

RFF 

6 

LAST 

203 

05,2422 

00024 

1 

IDNIACR 

T IME2 

TINE2/  1 

0319 

REF 

1 

C5 , 2423 

32  145 

c 

CNFTR 

LBAGSI03 

CCLLECT  'SNAPSHOT 

0320 

REF 

16 

LAST 

20  3 

05,2424 

24  340 

0 

6DNADR 

DN'TMBLFF 

SENC  SNAFSHCT 

C321 

RFF 

1 

05  ,2425 

32154 

0 

CNPTR 

LNAGSI04 

CCMNON  DATA 

0 32  2 

REF 

5 

LAST 

20  1 

05,2426 

C7115 

0 

2DNACP 

PCSTCRKU 

FCSTCFKU,NFGTGRKU,POSTCRKV,NEGTCRKV 

0324 

RFF 

9 

LAST 

20  3 

05,2427 

00007 

0 

IDNADR 

STARE 

0325 

REF 

1C 

LAST 

20  5 

05 ,243C 

0CC07 

0 

ICNACP 

SPARE 

032fc 

RRF 

3 

LAST 

20  3 

05,2431 

C2"20 

1 

ION ACR 

AGSK 

AGSK,  n 

C327 

REF 

2 

LAST 

205 

05,2432 

25173 

0 

6CNACR 

UPBUF  F 

LFPLFF+0.. . + 1 ID 

0328 

REF 

3 

LAST 

205 

C5 , 2433 

1 5 20  7 

c 

4CNACF 

UFPUFF  +12C 

UFBUFF+12C...+19D 

0329 

RFF 

6 

L AST 

20  3 

05,2434 

01326 

1 

IDNADR 

LENNASS 

LENNASS  .CSNFASS 

033C 

RFF 

37 

LAST 

203 

05 , 2435 

01277 

1 

IDNACR 

INnDES30 

TNCDE  S2C ,I MODES33 

.1331 

RFF 

11 

LAST 

205 

C5,2436 

0CC07 

'0 

ICNACP 

SPARE 

0332 

PRF 

1 

05, 2437 

32157 

0 

DNPTP 

LNAGSI 05 

CCNNON  DATA 

0333 

REF 

1 5 

LAST 

19  7 

C5 ,244C 

52  755 

1 

-6DNACF 

DSPTAE 

CSPTAB+C.. . + 1 in 

R1334 

■ SLB-LISTS  — - 

0 33  5 

RCF 

6 

LAST 

203 

05,2136 

LR  AGS  102 

EQUALS 

LNORBN02 

CCNYCN  DCNNLIST  CATA 

0336 

REF 

6 

LAST 

20  3 

05,2145 

LNAGS  103 

EQUALS 

LRCReNOS 

CCNNCN  CrWNLIST  CATA 

1337 

REF 

6 

LAST 

2.13 

05,2154 

LMAGS  IC4 

EQUALS 

LN0RBN04 

CCNNCN  CCNNLIST  CATA 

0 3 38 

REF 

6 

LAST 

203 

C5, 2157 

LNAGS  105 

EQUALS 

LRCPPPOS 

CCNMCN  CCNNLIST  DATA 

R0339  

0340 

REF 

2 

LAST 

194 

05,2441 

02  172 

1 

CNTAEL  E 

GENACR 

LNGSTADL 

LN  CCAST  AND  ALIGN  OCV<NLIST 

1341 

RFF 

■7 

LAST 

196 

05 , 24  4 2 

•J  2 40  7 

0 

GENACR 

LA'AGSICL 

LN  AGS  IMTIALI  ZATIPN/LDDATE  CCFNLIST 

0342 

REF 

1 

05, 2443 

C2232 

0 

GENADR 

LPRENDDL 

LN  PENCFZVCUS  AND  PRE-THRLST  CGWNLIST 

C343 

REF 

1 

05 , 2444 

02066 

0 

GENADR 

LNURBPDL 

LN  ORBITAL  MANEUVERS  DC^NLIST 

0344 

REF 

1 

05,2445 

C2303 

c 

GENADR 

LNDS ASCL 

LM  CFSCFNT  ANC  ASCENT  COWNLIST 
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L CO^iNLINK 


REF 


L I STS 


tSEP'S  PAGE  NO.  13  EO  S4 


C3^5 


1 


05,2446  02357  1 


(ENACP  LPLSALDL 


LK  LUNAR  SURFACE  ALIGN  DCIrNLIST 


•l 
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L AGS  INITIALIZATION  USER'S  PAGE  NO.  1 EO  SA 


Ronni 

PPCGPAR  NAME: 

AGS  IMT  TAL  I ZAT  ION  (RA7) 

PCC02 

iaRITten  by  : 

PHCCE  / KILRCY  / FCLLETT 

R0003 

RonoA 

ROC  NO.  : 
CATE  : 

0 

23  MARCF  1967 

P0C05 

MOD  RY 

KILRCY 

ROOiT^> 

MOC  NO.  : 

1 

RC007 

ROOOR 

DATE  : 

MOD  RY  ; 

28  fCTCPFR  1967 
FCl LETT 

P00O9 
ROOl  1 

FLNCT.  DESC.; 

(1)  TC  FPCVICE  THE  AGS  ABORT  ELECTRONICS  ASSEMBLY  ( A EA ) V'TTP  T|-e 
(PCSITirN,VFLfCITY,TIME)  IN  LEM  I MU  CCCRCINATES  BY  MEANS  OF  TEE 

LEM  AND  CSM 
LGC  DIGITAL 

STATE  VECTORS 
DCWNLINK. 

RO  )13 
R0C15 
ROOI9 

(?)  TC  ZERO  THE  ICDU,  IGC  AND  AEA  GIMEAL  ANGLE  CCLNTERS  SIMULTANEOUSLY  IN  ORDER  TC  ESTABLISH  A 
CGMMCN  ZERO  REFERENCE  FOR  THE  MEASUREMENT  OF  G I MB AL  ( EU L E R ) ANGLES  WHICH  DEFINE  LEM  ATTITUDE 
(3)  TO  ESTABLISH  THE  GROUND  ELAPSED  TIME  CF  AFA  CLOCK  ZERO. (IF  AN  AEA  CLOCK  ZERC  IS 

R0021 

RECUESTFC  CORING  THIS  PROGRAM 

RCC22 

LOG  SEOTICN  : 

AGS  initialization 

RQ023 
R00  2A 

CALLING  SEQ  : 

PROGRAM  IS  ENTERED  WHEN  ASTRCNALT  KEYS  V47E  CN  CSKY. 

RAT  may  BF  called  AT  ANY  TIME  EXCEPT  WHEN  ANOTHER  EXTENDED  VERB 

IS  IN  RRCGRESS 

R0026 

R0027 

SUBPOLT  INES 

called  : 

RCO?  8 

NORMAL  EXIT  : 

ENDEXT 

R0D29 

RQ03f^ 

ALARM/ABOP.T  : 

ALARM  - BAD  REfSmMAT  - c6dD;:220 

CFEPATCR  ERROR  IF  VAT  SELFCTFC  DURING  ANOTHER  EXTENDED  VERB. 

RC032 

R0033 

R003A 

ERASABLFS 
ISED  : 

SAMPTIME  (Z)  TIME  DF  :FNTEP:  KFYSTRCKE 

AGSK  (2)  GRCUNC  ELAPSED  TIME  OF  THE  AEA  CLOCK  :ZERC: 

Roose 

R0038 

AGSBLEF  (lAD)  CONTAINS  AGS  I N IT J A L I Z AT  I CN  DATA  (SEE  iCUTPUT: 

ACSW.CRD  (1)  PREVIOUS  COWNLIST  SAVED  HERE 

BELCW  ) 

00  39 

RPF  10  LAST 

2D£  E4,160D  EBANK=  ACSBIIFF 

OCAO 

AC,?CCC  RANK 

OOAl 

0CA2 

REF  1 

32,2000  SETLOC  RA7 

32,2005  RANK 

00A3 

REF  1 

CCLNT*  $$/R47 

OGAA 

REF  1 

32,2005  3 A737  0 AGSINIT  CAR  REFSMBIT 

00A5 

00A6 

REF  1 

REF  36  LAST 

32,2006  7 OC77  0 MASK  FIAGWPD3  CHECK  PEFSMFLG. 

192  32,2007  10  000  0 CCS  A 
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0CA7 

PFF 

1 

32 , 20  K 

0 2C17 

C 

TC 

P ECSPTEN 

PFFSMMAT  IS  CK 

0048 

RPf 

8 

LAST 

186 

32, 2011 

0 5567 

c 

7C 

ALARV 

REFSMNAT  IS  PAC 

0C49 

32,2012 

00220 

1 

CCT 

2 20 

0050 

REF 

1 

32, 2013 

C 5^72 

c 

1C 

ENCEXT 

0061 

32,2014 

C 0036 

1 

MEWAGS 

EXTEND 

006  2 

Rt^F 

1 

32,2015 

3 0014 

1 

CCA 

SAl^PT  IMF 

TIME  CF  THE  :ENTER:  KEVSTRCKE 

0063 

PEE 

4 

LAST 

?05 

32,2016 

53*421 

0 

CXCH 

AGSK 

8FCCMES  NEW  AEA  CLOCK  :ZERO: 

0C64 

32 ,2017 

0 0006 

1 

R FCSPT  EM 

EXTEND 

0C65 

REF 

c 

LAST 

208 

32 , 2020 

3 1A2  1 

1 

CCA 

agsk 

0066 

PEF 

2 

LAST 

102 

32,2021 

53  *C51 

0 

CXCH 

DSPTENX 

CC67 

PFF 

1 

32 , 2022 

3 2172 

1 

AGSCISPK 

CAF 

V06N 16 

006  8 

R'^F 

1 

32, 2C23 

C 4616 

1 

TC 

BANKCALL 

PI  = OOXXX.  FPS.,  R2  = nOOXX  MIN., 
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V,R  HE 

CFAN13 

0123 

05,2527 

C 0006 

1 

EXTEND 

0129 

PEF 

3 

LAST 

176 

05,2530 

Cl  C 19 

0 

kP  ITE 

CHAM9 

0125 

REP 

18 

LAST 

212 

05,2531 

9 1035 

1 

CS 

DSPTAB  +11D 

0126 

RFF 

2 

LAST 

2 1 2 

05,2532 

7 9 77  1 

0 

NASK 

e ITS9S6 

0127 

REF 

38 

LAST 

209 

05,2533 

10  000 

0 

CCS 

A 

0128 

05 ,2  539 

0 2 590 

1 

TC 

+ 9 

01.29 

REF 

Q 

LAST 

213 

05,2535 

3 477  1 

1 

CA 

BITS986 

0130 

05  ,2536 

0 0006 

1 

EXTEND 

THE  INL  NAS  IN  CCARSE  ALIGN  IN  GINEAL 

013  1 

REF 

15 

LAST 

21  3 

05 , 2537 

0 5 9 12 

1 

kCP 

CFAN12 

LCCK,  SC  PUT  IT  BACK  TNTC  CCARSE  ALIGN. 

013? 

PEF 

1 

05, 2590 

0 269  1 

c 

+ 9 

TC 

MR. KLEAN 

0133 

REF 

10 

LAST 

212 

05,2591 

9 9755 

0 

CS 

ZERC 

0139 

Q r p 

1 

05,2592 

55*010 

c 

7 S 

MCDREG 

0135 

REF 

1 

05,2593 

3 3 3 60 

1 

CAP 

IM30INI F 

FRFSH  START  INU  I M T I A L I Z AT  I C N . 

0136 

REF 

38 

LAST 

205 

05,2599 

55*277 

0 

TS 

IMCCES30 

0137 

RFF 

1 

05,2595 

3 30  6 5 

1 

CAP 

MAXDB 

0138 

REF 

1 

05  ,?596 

55 ' 393 

0 

TS 

DB 

0139 

REF 

2 

LAST 

212 

05,2597 

3 9751, 

c 

CAE 

FCUP 

0190 

PEF 

1 

05, 2550 

55*322 

1 

TS 

RATFI NDX 

INITIALIZE  KALCMANU  RATE 

0191 

PFF 

1 

05,255 1 

3 3061 

0 

CA 

BOOL  STRT 

0192 

PFF 

1 

05,2552 

59  111 

1 

TS 

DAFECCLS 

0193 

REF 

1 

05, 2553 

3 5015 

0 

CAF 

EBANK6 

0199 

REF 

' 1 

05,2559 

59  003 

0 

TS 

EEAN'K 

0195 

REF 

1 

F6,  1990 

FBANK  = 

HI  ASCENT 

C 1 9 5 1 

REF 

1 

05,2555 

3 30  56 

1 

CA 

STIKSTRT 

01952 

REF 

1 

05,2556 

551^44 

c 

TS 

STIKSENS 

01953 

REF 

1 

05,2557 

3 3057 

c 

CA 

RATESTRT 

C1959 

REF 

2 

LAST 

131 

05 ,2560 

55*976 

1 

TS 

-RATEDB 

0196 

RFF 

1 

05,2561 

3 2000 

c 

CAF 

FLLLAFS 

INITIALIZE  MAXIMUM  ASCENT  MASS  FOR  USE 

0197 

PEF 

2 

LAST 

213 

05,2562 

55*909 

0 

TS 

HIA  SCENT 

EY  1/ACCS  UNTIL  THF  FAC  LCAC  IS  CCNE. 

019  8 

REF 

1 

05,2563 

3 3062 

0 

C A 

7 700  ICC T 

LOAD  CAP  FILTER  GAINS  FAC  LCAO 

0199 

REF 

1 

05,2569 

5 5 • i Q 3 

0 

TS 

DKTPAF 

TC  BEST  PRESENT  ESTIMATE  CF  GOOCIES 

C15C 

PEF 

1 

05,2565 

55  * 906 

0 

TS 

LMTRAP 

. 19  DEG 

0151 

REF 

1 

05 , 2566 

3 30  6 3 

1 

CA 

60CEC 

GAP 
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L FRESK  START  AMD  RESTART 


LSEF'S  FACE  NC.  3 E6  S3 


R152 

0153 

015^ 

PEF 

REF 

PEF 

1 

1 

11 

LAST 

213 

05,2567 
C5, 2570 
05,2571 

55 ' 405 
5 5 • 4 n 
3 4 7 6 5 

0 

1 

1 

TS 

IS 

CA 

DKKAOSN 

LMKACSN 

ZERO 

6 SEC  GAIN  FCR  ALPFA 

C155 

REF 

1 

05,2572 

55 '40 7 

1 

TS 

LMOMFCAN 

LNITY  GAIN 

0156 

RFF 

2 

LAST 

2 C 9 

C5,2573 

3 4363 

0 

CA 

TEN 

0157 

PFF 

1 

'15.2  5 74 

55  • 40  4 

1 

TS 

OKCMEGAN 

1 SEC  GAIN  FCR  CMEGA 

01  5P 

REF 

17 

LAST 

152 

05,2575 

3 4 744 

1 

CAP 

B IT8 

SFT  COCKED  CB  TC  1.4  DEG 

. MAY  CVEPWRITE 

0 15P 

PEF 

1 

05,2576 

55 '41  1 

0 

TS 

DKDB 

KITE  FAC  ICAC. 

C16C 

PEF 

1 

05,2577 

3 5026 

c 

CAF 

I M 3 3 I M I T 

0 161 

RFF 

23 

LAST 

208 

C5 , 260C 

6 4 14  6 

c 

AC 

B IT6 

KEEP  BCTF  CAP  ANC  ERROP- 

NEEDLES  display 

■■'16  2 

PEF 

16 

1 AST 

18? 

')5,  260  1 

55  • 300 

1 

TS 

I MODES33 

CFF  LNTIL  ICCU  ZERO  IS 

F IN  ISFEC  . 

ri63 

05,2602 

C C0C6 

1 

FXTEND 

INITIALIZE  SWITCHES  CNLV 

CN  FPESF  START. 

0164 

RFF 

1 

05, 2603 

5 3 3 6 5 

1 

CCA 

SHNIT 

0165 

PFF 

17 

LAST 

196 

05,2604 

52  075 

1 

DXCH 

STATE 

0 166 

RFF 

2 

LAST 

214 

05,2605 

3 3366 

1 

CA 

SKIMIT  +2 

0167 

RFF 

18 

LAST 

21^ 

05 , 26C6 

54  076 

1 

TS 

STATE  +2 

0168 

PFF 

2 

LAST 

207 

05,2607 

3 4737 

0 

CA 

PEFSMBTT 

DC  NOT  ALTER  REFSMFLG  CN 

FPESF  START. 

0165 

OFF 

19 

LAST 

214 

05 , 26  1C 

7 0'T7  7 

0 

PASK 

STATE  +3 

0170 

PFF 

3 

1 AST 

214 

'■'5,2611 

6 336  7 

c 

AO 

SUN  IT  +3 

C171 

RFF 

20 

LAST 

214 

05 , 26  12 

54  3 7 7 

0 

TS 

STATE  +3 

017? 

05,2613 

C CCC6 

1 

EXTEND 

0173 

RFF 

4 

LAST 

214 

05,2614 

3 337  1 

1 

CCA 

SKINI T +4 

0174 

REF 

21 

LAST 

21  4 

05,2615 

52  101 

0 

CXCF 

STATE  +4 

0 175 

05,2616 

C CCC6 

] 

EXTEND 

0176 

RFF 

5 

LAST 

214 

05,2617 

3 3373 

0 

CCA 

SVvINlT  +6 

0177 

REF 

22 

LAST 

214 

05,2620 

52  103 

1 

CXCF 

STATE  +6 

0178 

REF 

1 

05,2621 

3 4744 

1 

CA 

SLRFFBI T 

CC  NCT  ALTER  SURFFLAG  CN 

FRESF  START. 

Cl  75 

RFF 

1 

05  ,2622 

6 4740 

0 

AD 

CMPONBI T 

C''CGNFLG 

;i  18C> 

RFF 

1 

05,2623 

6 4741 

1 

AC 

LMCONEIT 

LMGONFLG 

0181 

RTF 

23 

LAST 

214 

05,R624 

7 0104 

0 

MASK 

STATE  +8D 

0 18? 

RFF 

6 

LAST 

2 14 

05,2625 

6 3374 

1 

AC 

Sli^INIT  +8C 

0183 

PEF 

24 

L AST 

214 

05,2626 

54  104 

c 

TS 

STATE  +8C 

01  84 

REF 

7 

LAST 

214 

05 ,2627 

3 3375 

0 

CA 

SNINIT  +90 

0165 

PEF 

25 

LAST 

214 

C5 , 2630 

5 4 10  5 

1. 

TS 

STATE  +9C 

0186 

PEF 

1 

05, 2631 

3 413  7 

t 

CA 

APSFLBI T 

DC  NCT  ALTER  AFSFLAG  CN 

FPESF  START. 

0187 

REF 

26 

LAST 

214 

05  , 2632 

7 0 10  6 

1 

MASK 

STATE  +10D 

0188 

REF 

a 

LAST 

214 

05,2633 

6 3376 

r 

AO 

SFINIT  +10C 

0189 

REF 

27 

(AST 

214 

05,2634 

54  106 

1 

TS 

STATE  +10C 

0150  , 

REF 

9 

LAST 

214 

05,2635 

3 3377 

1 

CAF 

SWINIT  +11C 

0191 

REF 

28 

LAST 

214 

C 5 , 2 6 3 6 

5 4 10  7 

c 

TS 

STATE  +11C 

019? 

RFF 

2 

LAST 

166 

05,2637 

0 4635 

0 

fmcrstrt 

TC 

pcstjlmp 

NOW  IN  ANCTFFP  BANK. 

0 153 

REF 

1 

05, 264C 

0321  1 

0 

CACP 

CLMMYJCe  + 2 

PICKS  UP  AT  RELINT.  (CONT  ZERC  NEWJCE) 

0194 

05, 264  1 

0 C0U4 

0 

MR  .KLEAN 

INJHINT 

C155 

05,2642 

0 0006 

1 

EXTEND 

0196 

PFF 

2 

LAST 

1 58 

05,2643 

’ 4 7 5 5 

1 

CCA 

NFGO 

0157 

RFF 

1 

05,2644 

5?  754 

0 

CXCH 

-PHASE2 
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L FRESH  START  AND  RESTART  LSER'S  PAGE  NO.  4 E6  S3 


0198 

0199 

0200 

REF 

REF 

3 

1 

LAST 

214 

05.2645 

05. 2646 

05.2647 

0 CC06 
3 4755 
52  760 

1 

1 

1 

PCGKLEAN 

EXTENC 

DC  A NEGO 

CXCF  -PFASE4 

0201 

v5, 265f 

C 000  6 

1 

V37KLEAN 

EXTEND 

0202 

REF 

4 

LAST 

215 

05,2651 

3 4755 

1 

CCA 

NEGO 

0203 

REF 

1 

C5 ,265  2 

52  762 

C 

CXCF 

-FHASE5 

0204 

05,2653 

C CCC6 

I 

ABTKLEAN 

EXTEND 

C205 

REF 

5 

LAST 

215 

05,2654 

3 4755 

1 

CCA 

NEGO 

0206 

REF 

1 

05,2655 

52  7 56 

1 

r,xch 

-FHASE3 

0207 

05, 2656 

G 0006 

1 

EXTEND 

0208 

REF 

6 

LAST 

215 

05,2657 

3 4755 

1 

CCA 

NFGO 

0 209 

REF 

1 

05,2660 

5 2 7 5 2 

c 

CXCF 

-FHASEl 

0210 

■)5 ,2661 

0 0006 

1 

EXTEND 

0211 

REF 

7 

LAST 

21  5 

C5 , 2662 

3 4 75  5 

1 

CCA 

NEGO 

0212 

REF 

1 

05, 2663 

52  764 

c 

CXCH 

-PHASE6 

0213 

REF 

14 

LAST 

193 

05,2664 

0 000  2 

0 

TC 

Q 
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L 

FRPSH 

START  AND 

PEST  APT 

LSER' S PAGE  NC.  5 E6  S3 

P021  A 

CONES 

HFFF 

FRCN  ICC  AT  ICN  , 

GCJAY . 

RESTART 

ANY  PROGRAMS  InHICH  MAY  HAVE  BEEN  RLNMNG  AT  THE  TIME 

)21  s' 

FEE 

4 

! AST 

2 12 

P3,  1400 

EBANK= 

L STl 

021  7 

REF 

3 

LAST 

212 

H5 ,2665 

24 

320 

0 

GCFROG 

INCR 

REDOCTR  ADVANCE  RESTART  CCUNTFF. 

0218 

PEE 

1 5 

LAST 

21  5 

05,2666 

22 

C02 

0 

LXCE 

C 

0219 

C5, 2667 

0 

000  6 

1 

EXTEND 

C22P 

REF 

1 

05  ,26  70 

04 

00  7 

1 

ROR 

SUPERBMK 

0221 

PEE 

2 

LAST 

196 

(;5,2671 

C *3 

' 433 

c 

CXCh 

RSBBG 

0222 

REE 

19 

LAST 

213 

C5.2672 

3 

1035 

0 

CA 

DSPTAB  4L1C 

0222 

REF 

1 5 

1 AST 

172 

05,2673 

7 

4750 

0 

NASK 

8 IT  4 

022A 

C5,2674 

C 

CC06 

1 

EXTEND 

0225 

05,2675 

1 

2701 

1 

87  F 

4 4 

0226 

REF 

2 A 

LA  FT 

21  4 

C5 ,2676 

6 

4 746 

c 

AC 

8IT6  SET  EPRCP  CCUNTER  ENABLE 

0227 

05,2677 

C 

CCC6 

1 

EXTEND 

022S 

REF 

16 

LAST 

21  3 

05 , 2700 

05 

ni  2 

1 

(,CR 

CHAN12  ISS  WAS  IN  C(TARS  ALIGN  SC  GC  BACK  TC 

0229 

REE 

1 

C5,27f  1 

0 

3066 

1 

BLTTQNS 

TC 

L IGHTSET 

P02  30 

ERASCHK  TFYPCPARILY  STORES  THE  CCNTENTS  CF  Ti^C  ERASAEIE  LCCATICNS,  X 

R0232 

ANC  X+1  INTC 

SKEEP5  ANC  SKEEP6.  IT  ALSC  STORES  X INTC  SKEEP7  ANC 

R023A 

ERf^STCRE.  IF 

ERASCHK  IS  INTERRUPTED  BY  A RESTART,  C(EPESTCPE)  SECLLC 

R0236 

EQUAL 

C(SKEEP7),AND  BE  A 4 NUMBER  lESS  THAN  2CCC  CCT.  ClHERUSE 

R0238 

C(ERESTCPE)  SFCULC  EQUAL  40. 

0239 

REE 

2 

LAST 

158 

05,  2 7 -'2 

3 

42  50 

c 

CAE 

HI  5 

02AT 

PFF 

3 

LAST 

213 

05,2703 

7 

1 360 

1 

MASK 

FPESTCRE 

02A1 

05,2704 

0 

CCC6 

1 

EXTEND 

■02A2 

05,27:5 

1 

2707 

1 

BZF 

+2  IF  ERESTCRE  NCT  = 40  CE  4N  LESS  THAN  2K, 

02A3 

REF 

1 

05,2706 

1 

3103 

1 

TCP 

NCNAVKEY  43  DO  FRESH  START  - E MEMORY  MIGHT  BE  BAD 

02AA 

REE 

4 

LAST 

216 

C5.27C7 

4 

1260 

1 

CS 

E RESTORE 

C2A5 

'>5 ,2710 

0 

0006 

1 

EXTEND 

02A6 

REF 

1 

C5.2711 

1 

2726 

1 

BZF 

DCPSTAPT  = 40  CCNTINUE  WITH  RESTART. 

02A7 

REF 

1 

'15,  2712 

6 

1377 

0 

AO 

SKEEP7 

C2A  8 

05,2713 

0 ■ 

0006 

1 

EXTEND 

0249 

05,2714 

1 

2716 

1 

BZF 

42  = SKFEF7,  PESTCRE  E MEMCRY. 

0250 

REF 

2 

LAST 

216 

05, 2715 

1 

3103 

1 

TCP 

NCNAVKEY  43  DP  FRESH  START  - E MEMCRY  WIGHT  BE  FAC 

0251 

PPE 

2 

1 AST 

lOS 

C5 ,2716 

3 

1374 

J 

CA 

SKEER4 

0252 

REF 

2 

LAST 

213 

05,2717 

54 

0C3 

0 

TS 

EBANK  EBANK  CF  E MEMCRY  THAT  WAS  UNCFR  TEST. 

, 0253 

j5,2720 

i) 

0006 

1 

EXTEND 

(NOT  CXCH  SINCE  THIS  MIGHT  HARFEN  AGAIN) 

WTRGAF  ,WTRr,4P  , OC  2 , T A , S Y S I N ,GET  .DATA  CHEDK  ,0000£08,  CS  AY  (NOT  CXCh  SINCE  THIS  MGHT  HAPPEN  AGAIN) 
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L FRESH  START  AN'O  RESTART 
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0152 

REF 

1 

05,2567 

55 '405 

0 

TS 

DKKAOSN 

0153 

RFF 

1 

05,2570 

55' 410 

1 

TS 

LRKACSN 

6 SEC  GAIN  FOR  ALPHA 

0154 

REE 

1 1 

LAST 

213 

05,2571 

3 4 755 

1 

CA 

ZERO 

0155 

REF 

■ 1 

05,2572 

55'407 

1 

TS 

LMOMEGAN 

UNITY  GAIN 

0156 

PEE 

2 

LAST 

2CS 

C5, 2573 

2 4 263 

C 

CA 

TEN 

0157 

RFE 

1 

05,2574 

5 5 • 4 ^ 

1 

TS 

DKCMEGAN 

1 SEC  GAIN  FOR  CREGA 

0 150 

REF 

1 7 

LAST 

1 92 

05,2575 

3 4744 

1 

OAF 

eiTR 

SET  CCCKED  CB  TO  1.4  DEG.  RAY  CVERVsRITE 

0159 

RFF 

1 

05,2576 

55' 411 

c 

TS 

DKDB 

with  RAC  LCAC. 

0160 

REF 

1 

05,2577 

3 5326 

c 

CAF 

IM23IN1T 

0161 

REF 

23 

LAST 

206 

05,2600 

6 4 746 

0 

AD 

B 1T6 

KEEP  BOTH  DAP  AND  ERROR-NEEDLES  DISPLAY 

0162 

RFF 

16 

LAST 

182 

05,  260  1 

55  ' 300 

1 

TS 

I RODE  S33 

CFF  UNTIL  TCCU  ZERO  IS  FINISREC. 

0163 

05,2602 

0 0006 

1 

EXTEND 

INITIALIZE  SWITCHES  ONLY  CN  FRESH  START. 

0164 

REF 

1 

05,2603 

3 3365 

1 

CCA 

S 1,1  NIT 

0165 

REF 

17 

LAST 

196 

05, 26C4 

52  075 

1 

OXCH 

STATE 

0166 

REF 

2 

LAST 

216 

05,2605 

3 3 366 

1 

CA 

SWINIT  +2 

0167 

RFF 

18 

LAST 

214 

05,2606 

5 4 0 76 

1 

TS 

STATE  +2 

0168 

REF 

2 

LAST 

207 

05,2607 

3 4737 

0 

CA 

REFSMBIT 

DC  NO!  ALTER  REFSRFLG  CN  FRESH  START. 

0169 

REF 

19 

LAST 

214 

05 , 26 10 

7 00  7 7 

0 

RASK 

state  +3 

0170 

RFF 

3 

LAST 

214 

05,2611 

6 3 26  7 

c 

AD 

SUINIT  +3 

0171 

REF 

20 

LAST 

214 

05,2612 

54  077 

0 

TS 

STATE  4-3 

0 172 

05,2613 

C 0006 

1 

EXTEND 

0173 

REF 

4 

LAST 

214 

05,2614 

3 3371 

1 

DC  A 

S1,INI  1 +4 

0174 

REF 

21 

LAST 

21  4 

05,2615 

52  101 

0 

OXCH 

STATE  +4 

0175 

05,2616 

Q 000  6 

1 

EXTEND 

0116 

pep 

5 

LAST 

214 

05 ,2617 

3 3373 

0 

CCA 

SUINIT  +6 
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015? 

REF 

1 

05,2567 

5 5*  ^05 

r 

TS 

OKKACSN 

0153 

REF 

1 

05,2576 

55 ' 4 10 

1 

TS 

LRKACSN 

6 SEC  GAIN  FCP  ALPHA 

C 15A 

REF 

11 

LAST 

213 

05,2571 

3 4755 

1 

CA 

ZERO 

0155 

REF 

1 

05,2572 

55'4C7 

1 

TS 

LRCREGAN 

UNITY  GAIN 

0156 

REF 

2 

LAST 

209 

05, 2573 

3 4363 

0 

CA 

TEN 

0157 

REF 

1 

05,2574 

55 '404 

1 

TS 

DKCMEGAN 

1 SEC  GA  IN  FOR  OMEGA 

0158 

REF 

17 

LAST 

192 

05, 2575 

3 4744 

1 

CAF 

BTT8 

SFT  CCCKEC  Ce  Tr  1.4  c E G . MAY  OVERWRITE 

015  9 

REF 

1 

05 ,2576 

55'411 

0 

TS 

DKDB 

with  pad  LOAD. 

016F 

REF 

1 

05,2577 

3 5026 

C 

CAF 

IN33IMT 

0161 

REF 

23 

LAST 

2 18 

05,2600 

6 4 74  6 

0 

AD 

8IT6 

KEEP  BOTH  DAP  AND  E RR G P -N E E DL E S DISPLAY 

C16? 

REF 

16 

LAST 

182 

05, 2601 

55 • 300 

1 

TS 

I RCDES33 

OFF  UNTIL  ICDU  ZERO  IS  FINISHED. 

0163 

C5, 2602 

0 0C06 

1 

EXTEND 

initialize  switches  CNLY  CN  FRESH  START. 

0164 

REF 

1 

05 ,2603 

3 3365 

1 

CCA 

SWINIT 

0165 

REF 

17 

LAST 

196 

C5 ,26C4 

52  ,)75 

1 

rxCF 

state 

0166 

REF 

2 

LAST 

214 

05, 26  '5 

3 3 366 

1 

CA 

SUINIT  +2 

0167 

REE 

18 

LAST 

214 

05,2606 

54  176 

1 

TS 

STATE  +2 

0168 

PFF 

2 

LAST 

207 

05,2607 

3 4 73  7 

0 

CA 

REFSREIT 
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6001 

BANK 

0577 

RFF 

1 

CrUNT*  $J/POO 

0578 

REF 

1 

6001 

3 8768 

0 

GGTOPOOH 

CAF  0CT33 

8.33SFCT  FCP  GOPOOFIX 

05  79 

RFF 

13 

LAST  193 

6002 

58  001 

1 

TS  L 

0580 

6 00  3 

8 CCRC 

C 

CCM 

0581 

REF 

2 

LAST  215 

6008 

52  760 

1 

CXFH  -PHASE8 

C5E2 

REF 

3 

LAST  218 

60C5 

0 8635 

0 

TC  PCSTJUMP 

0583 

RFF 

1 

6006 

10C28 

0 

CAOR  GCPCCFIX 

0588 

600  7 

00028 

1 

0CT28 

MM  20 

0585 

6010 

10031 

) 

0CT31 

AM  2 5 

0586 

20,2008 

BANK  2C 

0587 

REF 

1 

08,2  10  1 

SFTLOC  VERB37 

0588 

C8,2C28 

BANK 

'J5B9 

RFF 

1 

COUNT*  SJ/POO 

VERB  37  ANC  POO  IN  BANK  8. 

0590 

REF 

2 

LAST  2C9 

08,2028 

0 5516 

0 

GCPOCFIX 

TC  CCWNFLAG 

ALLOW  X-AXIS  OVERRIDE 

159  1 

REF 

1 

08,2025 

003  11 

1 

AORES  XCVINFLG 

059? 

REF 

3 

lAST  225 

08 ,2026 

0 5 516 

0 

TC  DOWNFLAG 

INSURE  THAT  ULLAGE  IS  CFF 

0593 

REF 

1 

08 , 2027 

0 1318 

1 

ACRFS  ULLAGFLG 

GAP ; 
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05S35 

05GA 

3595 

PEF 

REF 

PEF 

1 

1 

8 LAST  209 

04,2030 
04,203  1 
04, 2032 

0 5475 
2 2C37 
0 A6  16 

1 

1 

1 

TC 
f AF 
TC 

CLEARHRK  +2 
V37N99 

bankcall 

release  nark  cisplay  system. 

05S6 

REF 

1 

04, 2033 

20477 

1 

CACR 

GCFLASH 

0597 

04,2034 

1 2031 

n 

TCF 

-3 

0598 

04,2035 

1 2.’' 3 1 

0 

TCF 

-A 

0599 

04,2936 

1 2031 

0 

TCF 

-5 

0600 

C4, 2C37 

11343 

'J  V37N99 

VN 

3799 
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L FkE?H  START  AND  RESTART  USER'S  PAGE  NO.  16  E2  S3 

P0601  PRCGRAN  NARF  V37  ASSEf'BL  V SLNOANCE 

RC6C2  LOG  SECTION FRFSF  START  ANC  RESTART 


R06)3  FlJNCTICNAl  CFSCRIPTION 


R06OA  1.  CHECK  IF  NFW  PPCGRAM  ALLCWEO.  IF  BIT  1 OF  FL AGWR C2 ( NQOOF L AG ) IS  SET,  AN  ALAPN  1520  IS  CALLEC. 

R0606  2.  CHECK  FOR  VALIDITY  CF  PRCGRAP  SELECTFO.  IF  AN  IMVALIC  PPCGRAM  IS  SFLECTEC,  THE  OPFRATOP  ERROR  LIGHT  IS 

P0608 SET  ANC  CURRENT  ACTIVITY,  IF  ANY,  CONTINLFS. 

RC6CS  3.  SERVICER  IS  TEPMNATFG  IF  IT  HAS  PEEN  PUNNING. 

Rr)6in  A.  install  is  execlted  to  avoid  intep.rlft ing  integration. 

P061 1 5.  THE  FNC-INE  IS  TURNFp  OFF  ANC  THE  DA-.P  IS  INITIALIZED  FOR  COAST. 

P0612  6.  TRACK  ANC  UPDATE  FLAGS  ARE  SET  TC  ZEFC. 

RU613  7.  niSPLAY  SYSTEM  IS  RELEASED. 

R061 A fl.  THE  FOLICWING  APE  PEPPCPNEC  FOR  EACH  OF  THE  THREE  CASES. 

R0615  A.  PROGRAM  SELECTED  IS  PCO. 

RD616  1.  RENDEZVOUS  AND  P25  FLAGS  ARE  RESET. (KILL  P20  AND  P25) 

PD617 2.  STATINTI IS  SCHFCULEC  BY  SETTING  RESTART  GROUP  2. 

RD61B  3.  MAJOR  MODE  OC  IS  STORED  IN  THE  MODE  PEG  I ST E P ( MCDREG  ) . 

P0619  A.  SUPPRPANK  3 IS  SELECTED. 

PQ62C 5.  NPCOFLAG  IS  RESET. 

RT621  6.  AIL  RESTART  GROUPS  EXCEPT  GROUP  2 ARE  CLEARED.  CCNTRCL  I ST R ANS F ER PE C TC  RESTART  PRCGRAM  (GCPR0G2) 

R0623  WHICH  CAUSES  ALL  CURRENT  ACTIVITY  TO  BE  DISCONTINUFD  AND  A S MINUTF  INTEGRATION  CYCLF  TC  BE 

PC62  5 . INITIATED. 

R0626  B.  PROGRAM  SELECTED  IS  R2U  OR  P2E. 

R0627  1.  IF  THE  CUSR'^NT  MAJCR  MCDc  IS  THE  SAME  AS  THE  SELECTED  NEWPROGPAM,  THE  PROGRAM  IS  RE- 1 NI  T I A L I ZED 

R0629 VIA  V37XEG,  ALL  RESTART  GROUPS,  EXCEPT  GPCLP  4 ARE  CLEARED. 

R0631  2.  IF  THE  CURRENT  MAJOR  MODE  IS  NOT  EQUAL  TO  THE  NEW  RECUEST,  A CHECK  IS  MADE  TC  SEE  IF  THE  RECLEST- 

R0633  FO  MAJCR  MODE  HAS  EEEN  PUNNING  IN  THE  BACKGROUND, 

R0634 ANC  IF  IT  HAS,  NC  NEW  PROGRAM  IS  SCHECLLED  , THE  EXISTING 

R0635  P20  OR  P25  IS  PESTAPTFC  TO  CONTINUE,  ANC  ITS  M M IS  SET. 

R0636  3.  CONTROL  IS  TfANSFFRREO  TC  GCPRCG2. 

R0637  C.  PROGRAM  SELECTED  IS  NEITHER  PCf,P20,  NOR  P25 

R0638  1.  V37XEC  IS  SCHEDULEC  (AS  A JOB)  BY  SETTING  RESTART  GROUP  A 

R0639  2.  ALL  CURRENT  ACTIVITY  EXCEPT  RENDEZVOUS  AND  TRACKING  IS  CISCCNTINUEC  BY  CLEARING  ALL  RESTART 

R06AI  GROUPS.  IF  the  RENDEZVOUS  OP  the  P25  FLAG  IS  CN,  GRCLP  2 IS  NOT  CLEAREC,  ALLOWING  THESE  PRCGPAMS 

R06^i3  TC  CCNTI  N LE  . 

R06AA  INPUT/nUTPUT  INFORMAT  ION 


RC6A5  A.  CALI  ING  <!FCi)ENCF 


P06A6 

R06A7 

R06A6 

CONTROL  IS  DIRECTED  TC  V37  EY  THE  VERBEAN 
VERBFAN  GOES  TC  C ( VERBT AB +C ( VEKBREG 1 ) . 
MMCHflNG  EXECUTES  A TC  FOSTJUMP,  CACR 

ROUTINE. 

VERB  37  = MMCHANG. 
V37. 

R0649 

E.  ERASABLE  INITIALIZATION 

NCNF 

R065O 
R065  1 

C.  OLTPUT 
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L 

FRESH 

START  AMF  RESTART 

LSFP’S  FACE  NO.  17  E3  S3 

RC652 

MAJOR  MCCF 

CHAFGF 

R065^ 

D. 

CEBP  IS 

R0654 

mmnumbfr, 

MPAC  +1 

, MINDEX 

, BASETEMP  +C(MINDEX),  FLAGFRDO,  FLAGWRGl,  FLAGWRC2,  MQDREG,  GDLGC  -1, 

R0656 

GOLOC,  GOLCC  +L, 

GCLCC  +2 

, EASETEMP, 

-PFASE2, 

, PHASE2, 

-PHASE4 

R06  5 7 

PRriGR  am 

ANALYSIS 

RC658 

t. 

SUBROUT  TNES 

CAL  LEO 

R0699 

ALARM,  RELDSF,  PINBRNCh, 

IFTSTALL,  EFGINrF2, 

ALLCCAST, 

V37KLFAN,  G0PRCG2,  FALTCN,  FINDVAC,  SLPEPSR, 

R0661 

OSPMM 

R0662 

8. 

FORMAL  FXIT 

TC  ENDCFJCe 

R0663 

C. 

ALARMS 

1520  (MAjcP  MGD 

F CHAFGE  FC7 

FEPM  ITTEC) 

0664 

REF 

1 

04, 2040 

5 4 ] 7 4 

1 V37 

TS 

MIMNUMBER 

SAVE  NAJCR  MCCE 

0665 

REF 

4 

LAST  219 

04,2041 

3 4355 

0 

CAF 

PR  1030 

RESTART  AT  PINBALL  PRICRIIY 

0665 

REF 

2 

LAST  ?12 

04, 2C42 

54  366 

C 

TS 

PESTREG 

0667 

REF 

41 

LAST  217 

04, 2U43 

3 1277 

1 

CA 

1 MODES  30 

IS  IML  BTINB  INITIALIZED 

0668 

RFF 

28 

LAST  223 

04,2044 

7 4746 

1 

MASK 

B IT6 

0669 

PFF 

43 

LAST  218 

04 , 2045 

10  ooc 

0 

CCS 

A 

C67C 

REF 

1 

04,2046 

1 2065 

1 

TCF 

CANTROO 

067] 

REF 

2 

LAST  228 

04,2047 

4 0774 

1 

CS 

mmmjmcer 

IS  PTC  PEQUFSTEC?' 

0672 

REF 

1 

U4, 2050 

6 240  1 

0 

AD 

DEC70 

0673 

04,2051 

0 0006 

1 

extend 

0674 

REF 

1 

04, 2052 

1 2 3 74 

1 

ezF 

SETUP70 

YES 

0675 

REF 

8 

LAST  223 

04,2053 

6 4753 

1 

AD 

CNF 

IS  F71  REQUESTED? 

0676 

04,2054 

0 00  16 

1 

EXTEND 

0677 

REF 

1 

04,2055 

1 2373 

EZF 

SETUP71 

YFS 

0678 

RRF 

3 

LAFT  228 

C4, 2056 

3 0 7 74 

c 

CA 

MMNUMEFR 

TS  NEW  REQUEST  PCC 

0679 

04,2057 

0 000  6 

1 

extfnd 

0680 

REF 

1 

C4,2C6r 

1 21)7 

1 

ezF 

ISSFPVCN 

YFS,  CHECK  SERVICFR  STATLS 

0681 

REF 

3 

LAST  166 

04,2061 

4 0076 

1 

CS 

FLAG1.RD2 

NC,  IS  NCCC  V37  FLAG  SET 

C682 

REF 

1 

■)4,2062 

7 4753 

0 

MIASK 

NOOOB  IT 

0683 

REF 

44 

LAST  228 

04,2963 

1C  C”C 

r 

CCS 

A 

06  84 

PPF 

1 

i'i4, 2 064 

1 2)72 

1 

TCF 

CHECKTAB 

NO 

0685 

PFF 

10 

1 AST  218 

04,2065 

0 5567 

n CANTPCO 

TC 

ALARM 

0686 

C4, 2066 

0 1520 

1 

CCT 

1520 

0687 

RFF 

1 

04,2067 

.)  44  5 7 

0 V37BAC 

TC 

RELOSP 

RELEASES  DISPLAY  fRCM  ASTRONAUT 

0688 

PFF 

4 

LAST  225 

04,2070 

0 4635 

C 

TC 

PCST JUMP 

ERING  BACK  LAST  NORMIAL  DISPLAY  IF  TFFRE 

068  9 

REF 

1 

04,  2'  7 1 

21051 

c 

CADR 

PINBRNCH 

WAS  CNE.  OTHERWISE  DC  AN  ECJ. 

0690  REF 


1 


04,2072  2 2466  1 CFFCKTAE  CA 


NCV37l^K 
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0691 

REF 

28 

LAST 

222 

OA.2073 

5 A 15  5 

1 

AC-4INMM 

TS 

MFAC  +1 

069? 

REF 

29 

LAST 

229 

0A,2':7A 

50  155 

0 

NCX 

MFAC  +1 

0693 

RCF 

1 

OA, 2i 75 

3 2 A3 5 

1 

CA 

FP'^MMl 

CBTAIN  WFICF  MM  THIS  IS  FOP 

C69A 

REF 

1 

0A,2  i76 

7 6077 

0 

MASK 

LCW7 

0695 

CA, 2077 

A OT'J'J 

c 

CCR 

0696 

PEF 

A 

L AST 

228 

'I A,  2 1 TO 

6 C77A 

c 

AD 

MMNL’MBEP 

C6  97 

PEF 

A5 

LAST 

228 

OA  , 2 1 > 1 

10  ^OO 

0 

CCS 

A 

0698 

RFF 

30 

LAST 

229 

OA, 2 102 

10  155 

1 

CCS 

MFAC  +1 

IF  GR,  SEE  IF  ANYMORE  IN  LIST 

0699 

PEF 

1 

LA. 21  13 

1 2)73 

C’ 

TCF 

AGAI NMM 

YES,  GET  NEXT  CNF 

0700 

pff 

1 

OA, 210A 

1 232A 

1 

TCF 

V37NCNO 

LAST  TIMF  OR  PASSED  MM 

0 701 

RPF 

31 

LAST 

229 

OA, 2 105 

2 0155 

c 

CA 

MFAC  +1 

0702 

REF 

1 

0A,?1  16 

5A  773 

0 

TS 

Ml  INOFX 

SAVE  INDEX  FCP  LATER 

0703 

REF 

2 

LAST 

187 

OA, 2107 

A C103 

1 

I SSER\,CN 

CS 

FLAGWRC7 

V37  FLAG  SET  - I.E.  IS  SERVICER  GCING 

070A 

RRF 

1 

OA, 2 1 n 

7 A7A6 

1 

MASK 

V37FLBI T 

0 7C5 

REF 

A6 

LAST 

229 

0A,21 1 1 

10  000 

0 

CCS 

A 

0706 

PEF 

1 

OA, 2 1 12 

1 2132 

1 

TCF 

CANV37 

NC 

0707 

REF 

A 

LAST 

225 

OA  , 2 1 1 3 

0 5516 

0 

TC 

DOWNFLAG 

YES, TURN  OFF  THE  AVERAGE  FLAG  ANC 

0708 

REF 

1 

0A,211 A 

00163 

0 

ACRES 

AV EG  FLAG 

WAIT  FOR  SERVICER  TO  RETURN  TO  V37PET. 

0711 

PEF 

1 

OA,  2115 

1 5155 

1 

TCF 

ENOOF JCB 

0712 

REF 

9 

LAST 

218 

OA ,21  16 

A 0C7A 

0 

V37RET 

CS 

FLAGWRDO 

IS  P20  CF  P22  PUNNING? 

0713 

PEF 

2 

LAST 

186 

OA, 2 1 17 

7 A7A5 

1 

MASK 

RNDVZeiT 

071A 

RFF 

A7 

LAST 

229 

OA,212C 

10  COO 

c 

CCS 

A 

C71  5 

OA, 2121 

1 212  3 

1 

TCF 

+ 2 

NT.  CHECK  FOR  P25. 

0716 

REF 

1 

OA, 2122 

1 2130 

c 

TCF 

2 . 7SFT 

YES.  CC  2.7SFCT 

0717 

REF 

1 0 

1 AST 

229 

'lA,  2 123 

A 007A 

c 

CS 

FLAGWROC 

IS  P25  RUNNING? 

0718 

REF 

1 

0A,212A 

7 A7A3 

1 

MASK 

P25FL8IT 

0719 

RFF 

A8 

L AST 

229 

OA, 2125 

1C  oco 

,c 

CCS 

A 

0720 

RFF 

1 

0A,2126 

3 23 7T 

1 

2.0SPT 

CA 

0CT37667 

0721 

REF 

15 

LAST 

219 

r, A, 2127 

6 A7A7 

1 

2.11SPT 

AD 

BIT5 

0722 

REF 

1 

i.iA,2  130 

6 237  1 

0 

2.7SPT 

AO 

OCTAOC72 

C723 

REF 

1 

CA ,21 31 

0 5357 

0 

TC 

PHSCHNG.4 

072A 

REF 

1 5 

LAST 

222 

CA, 2132 

3 A 7 5 

1 

CANV37 

CAE 

ZEPC 

0725 

OA  ,2133 

0 000  6 

1 

EXTEND 

0726 

REF 

2 

LAST 

21.6 

0A,213A 

01  00  7 

1 

WP  ITE 

SUFEPBNK 

0727 

REF 

1 

04,2125 

3 2 2 6 7 

1 

CAF 

RCDAO 

0728 

REF 

1 

OA  ,2136 

5A  37A 

0 

TS 

TEMIPFLSH 

0729 

REF 

1 

CA, 2 137 

C 5^53 

1 

TC 

PFZSC.FNG 

073  0 

OA, 21AC 

0001 A 

1 

CCT 

lA 

073  1 

REF 

3 

LAST 

2C8 

0A,21Al 

0 60A2 

1 

RCC 

TC 

INTPRFT 

0732 


''A,  21A2 


7762A  1 


CALL 


WAIT  FCP  INTEGRATION  TC  FINISH 
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0732 

0734 

P!=F. 

1 

04.2143 

04. 2144 

2 7412 
77  776 

0 

1 

DLMMVAO 

EXIT 

INTSTALL 

0735 

RFF 

5 

LAST 

229 

■)4,?145 

0 5516 

r 

TC 

DOWNFLAG 

0736 

RFF 

1 

04, 2146 

OC  124 

c 

ACRES 

3 AX  I SFLG 

RESET  3-AXIS  FLAG 

07362 

REF 

6 

LAST 

2 30 

04,2147 

0 5 5 16 

c 

TC 

OCWNFLAG 

07364 

REF 

1 

04,2150 

00055 

1 

ACRES 

PCCHFLAG 

0737 

PEP 

1 

04,2151 

3 4 73  5 

1 

CAE 

L PBVei T 

CLEAN  UF  the  F12  FLAGwCPC. 

C73P 

REF 

1 

04,2152 

54  107 

n 

TS 

FLGWRDl  1 

C73E2 

RFF 

7 

LAST 

23C 

C4, 2 153 

0 5516 

c 

TC 

CCWNFLAG 

INSURE  THAT  TFE  RC4FLAG  IS  CLEAR. 

073R4 

REF 

2 

LAST 

71 

04,2154 

00063 

1 

ACRES 

R04FLAG 

C73845 

RPF 

8 

LAST 

230 

04,2155 

0 5516 

0 

TC 

CCWNFLAG 

07385 

REF 

1 

04,2156 

OC056 

1 

ACRES 

GLCKFAI  L 

FLAGWr.RC  3 BIT  14 

' 0 73  £6 

REF 

9 

LAST 

230 

04,2157 

0 5 516 

0 

TC 

CnWMFLAG 

INSURE  NLNFLAG  IS  CLEAR. 

0 7388 

RFF 

1 

t4,216C 

00  1 4 1 

0 

ACRES 

NUNFL  AG 

0739 

REF 

10 

LAST 

230 

04, 2161 

0 55  16 

f 

TC 

nCWNFLAG 

ALLCk  X-AXIS  rVERP  IDE . 

C74A'. 

REF 

2 

LAST 

225 

04, 2162 

O0311 

1 

ACRES 

XQVI NFLG 

0741 

REF 

5 

LAST 

229 

04,2163 

1C  774 

1 

CCS 

N N MJ  N B E R 

IS  THIS  A FCGF  REQUEST 

0742 

RFF 

1 

04, 2164 

1 2312 

1 

TCF 

NOUVEAU 

NC,  PICK  UP  N£H  PPPGRAN 

0 74  3 

pcF 

2 

LAST 

228 

04,2165 

0 4457 

0 

PCEH 

TC 

RELOSF 

RELEASE  ETSPLAY  SYSTEM 

0744 

REF 

1 

< ' 4 , 2 16  6 

3 5 C 1 7 

1 

CAE 

PPIC5 

SET  variable  restart  PPICPITY  FOR 

0745 

REF 

1 

04,2167 

55 ' 05  5 

1 

TS 

PHSPRDT  2 

POO  INTEGRATION. 

0746 

REF 

1 

C4, 217C 

0 6C11 

1 

TC 

C L P A n C C 

CLPALNCr  CCES  AN  INFINT. 

0747 

RFF 

2 

LAST 

228 

F4, 2171 

4 4753 

0 

CS 

NCDOBI T 

TLPN  CFF  NCCCFLAG. 

0 74  8 

REF 

4 

LAST 

228 

04,2172 

7 0076 

1 

NAS  K 

FLAGWFC2 

0749 

F'^F 

C 

L AST 

230 

04,2173 

54  076 

1 

TS 

FLAGVyRC2 

0750^ 

REF 

7 

LAST 

224 

04,2174 

3 4756 

1 

CA 

FIVE 

SET  RESTART  FCR  STATEINTl 

075  1 

RER 

14 

LAST 

22  E 

04,2175 

54  on 

1 

TS 

L 

0752 

04, 2176 

4 0000 

Q 

CCN 

C753 

REF 

2 

LAST 

214 

04,2177 

52  754 

0 

CXCF 

-PHASE2 

0754 

REF 

1 

04, 2200 

4 2372 

1 

CS 

0CT7O0 

TURN  CFF  P20,P25,IMU  IN  USE  FLAG 

0755 

RFF 

11 

LAST 

229 

04,22'U 

7 0074 

0 

NASK 

P LAGWRDO 

0756 

RFF 

12 

LAST 

23G 

04 ,2202 

54  C74 

0 

TS 

FL AGWRPO 

RENOFLG 

0757 

REF 

1 

04, 2203 

3 4 7 5 5 

1 

CAP 

DNLACFO'J 

0758 

REF 

6 

1 AST 

217 

04 ,2204 

54  333 

ri 

s Fucnpoo 

TS 

DNLSTCOD 

SET  UP  APPRCPRIATE  CCV^MIST  CODE 

0759 

REF 

4 

LAST 

21  7 

C4, 2205 

5 5 * 3 21 

1 

TS 

AGSWCPn 

(CURRENT  LIST  WILL  BE  COMPLETED  BEFORE 

GAP 
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0761 

0762 

REF  • 
RFF 

6 

1 

LAST 

177 

06,2206 
')A,  2277 

0 6 6 7 6 
75561 

0 

1 

TC 

GADP 

I ENKCAl L 
ENGI  NCF  1 

0763 

REF 

7 

LAST 

23  1 

06,2210 

0 6676 

L) 

TC 

I ENKCALL 

INSLRE  ALLCCAST. 

076A 

REF 

1 

06,2211 

60  20  5 

1 

CACR 

ALLCCAST 

COES  A RESTCPE8. 

0765 

REF 

1 

''6 ,2212 

6 67  75 

1 

cs 

0CT12C 

TLRN  CFF  TRACK,  UPDATE  FLAGS 

C 766 

REF 

2 

LAST 

212 

06,2212 

5 5 ’ C 7 1 

1 

IS 

EEANKTEN 

0767 

RFF 

5 

LAST 

218 

76, 2216 

7 007  5 

1 

MASK 

F LAGWRD 1 

C768 

ref 

6 

LAST 

23  1 

06,2215 

56  075 

1 

TS 

FLAC-WRD  1 

0769 

ref 

8 

LAST 

231 

06,2216 

0 6676 

0 

TC 

I8NKCALL 

KILL  GRCUPS  1,3, 5, 6 

0770 

RFF 

1 

)6, 2217 

12650 

1 

CADR 

V27KLEAN 

077  1 

REF 

6 

LAST 

230 

06,2220 

10  776 

1 

CCS 

MMMJMPEP 

IS  IT  POCH 

7772 

REF 

1 

06 ,2221 

1 2230 

0 

TCF 

RENOVCC 

NO 

0773 

REF 

9 

LAST 

231 

06,2222 

.)  6676 

0 

GTHOC 

TC 

I BNKCALL 

REDUNCAK7  EXCEPT  FOR  GROLF  6 

077A 

REF 

1 

06,2223 

12665 

0 

f ADP 

FCCKLF/'^ 

0775 

REF 

7 

LAST 

231 

06, 2226 

3 0 7 76 

c 

CA 

MPNUMBEP 

0 7 76 

RFF 

2 

LAST 

21F 

06,2225 

55*01) 

0 

TS 

MCDREG 

0777 

REF 

5 

LAST 

228 

•76,2226 

0 6635 

0 

GCGnpPGG 

TC 

PCST JLRP 

C778 

REF 

1 

06,2227 

12766 

0 

CACR 

GGPRCG2 

0779 

REF 

A 

LAST 

231 

06,2230 

6 ICIO 

0 

RFNDVGC 

CS 

NCCREG 

IS  CURRENT  PRCGRAM'  22 

0780 

REF 

1 

06, 2231 

6 2330 

0 

AD 

PCT26 

0 781 

06,2232 

0 0006 

1 

EXTEAD 

078  2 

REF 

1 

06,2233 

1 2252 

1 

aZF 

RFSET22 

YES  - clear  RENDEZVOUS  FLAG 

0783 

R = F 

8 

LAST 

231 

06,2236 

6 

(7776 

1 

CS 

MNNUMBER 

.IS  NEW  FPCGPAN  F22 

0786 

R>=F 

2 

LAST 

231 

06,2235 

6 

2330 

0 

AD 

0CT26 

0785 

06, 2236 

0 

0006 

1 

EXTEND 

0 7 66 

REF 

2 

1 AST 

231 

06,2237 

1 

2252 

1 

ezF 

RESET22 

0787  ' 

REF 

1 

06, R260 

6 

7 75  1 

c 

AD 

NEG2 

IS  NEW  FROGRAM  = P20  DR  P25 

0788 

06,2261 

0 

0006 

) 

EXTEND 

0789 

REF 

1 

)6 ,2262 

1 

22  66 

1 

EZF 

R ENDNCG 

YES 

0790 

REF 

3 

LAST 

23C 

06,2263 

6 

67  56 

1 

. AO 

FIVE 

25 

C7S1 

06,2266 

•7 

0076 

1 

EXTEND 

0792 

RFF 

2 

LAST 

231 

C6 ,2265 

1 

2266 

1 

ezF 

RENONCO 

YES 

% 

0793 

RFR 

1 

16,  2266 

•a 

2326 

1 

CA 

0CT5C; 

NC,  IS  fitfFR  P20  OR  P25  FUNNING 

0796 

REF 

13 

LAST 

230 

06,2267 

7 

CC76 

0 

MASK 

FLAGWRDO 

0795 

REF 

69 

LAST 

229 

C6, 225C 

1C 

COO 

0 

CCS 

A 

0 796 

PEF 

1 

'6,  225  1 

1 

226  1 

I 

TCF 

proFi zz 

YFS,  LEAVE  GRCtP  2 TG  PICK  UP  F20  CF  F25 
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0797 

079R 

0799 

REF 

REF 

REF 

2 

14 

15 

LAST 

LAST 

LAST 

230 

231 

232 

04, 2252 
,t4,2  2 53 
04,2254 

4 

7 

54 

2 3 7 2 
0C74 
074 

1 

0 

0 

PEEFT22 

CS 

MASK 

TS 

CCT700 

FLAGWROO 

FLAGWRDO 

clear  PFMCEZVCUS, F25 
AND  IML  IN  LSE  FLAGS 

0800 

REF 

2 

LAST 

230 

■j4,  2255 

0 

60  1 1 

1 

TC 

C LRADMCC 

0801 

'4 , 2256 

0 

0306 

1 

K ILL2 

EXTEND 

NO,  KILL  2 

0802 

REF 

8 

LAST 

215 

04,2257 

3 

4755 

1 

CEA 

NEGO 

0803 

RFF 

3 

LAST 

230 

04, 2260 

52 

754 

0 

CXCH 

-PHASE2 

080A 

R!=F 

1 

14,2261 

3 

2 3 66 

0 

PCCF  I ZZ 

CAF 

V 37QCA0 

RESTART  POINT  FOR  V37XEC 

080  8 

RFF 

2 

1 AST 

229 

04, 2262 

54 

3 74 

0 

TS 

TEMPFLSF 

C8C6 

REF 

1 

' '4, 2 263 

1 

2226 

1 

TC  F 

GOGDPROG 

0807 

RFF 

C 

LAST 

231 

04,2264 

4 

ICIO 

0 

RF^D^CC 

CS 

MCCREG 

0808 

REF 

1 

04, 2265 

6 

6 00  7 

0 

AD 

0CT24 

C8C9 

04,3266 

0 

0006 

1 

EXTFND 

08  in 

REF 

1 

04,2267 

1 

2256 

c 

BZF 

KILL2 

F20  OR  F25  ON  TOP  OF  P 20  OR 

F25  - 

081 1 

REF 

A 

LAST 

231 

04,2270 

6 

4756 

1 

AD 

FIVE 

0812 

04,2271 

0 

0006 

1 

EXTENC 

0813 

RFF 

2 

LAST 

232 

04,2272 

1 

2 2 5 6 

0 

ezF 

K ILL2 

081  A 

REF 

2 

LAST 

23  1 

04,2273 

3 

2326 

1 

CA 

OCT5CO 

0815 

REF 

16 

LAST 

232 

C4, 2274 

7 

0974 

c 

NASK 

F LAGlvRCO 

0816 

RFF 

9 

LAST 

231 

04, 2275 

6 

0 7 74 

0 

AD 

MMNUN8E  R 

0817 

04,3276 

4 

OOOO 

n 

COM 

0818 

REF 

1 

09,2377 

6 

2331 

1 

AD 

P20PEG 

IS  IT  2M  ANC  IS  RENDEZVOUS 

FLAG  ON 

0819 

04, 2300 

0 

0006 

1 

EXTEND 

082C 

REF 

1 

04,2301 

1 

2306 

1 

ezF 

STATCUO 

YES 

0821 

REF 

1 

04, 2 3 '12 

6 

2 32  7 

0 

AD 

GCT3G5 

IS  IT  25  AND  IS  P25  BIT  ON 

0822 

04 ,2308 

0 

000  6 

1 

EXTEND 

0623 

REF 

2 

LAST 

232 

C4 ,2304 

1 

2 30  6 

1 

ezF 

STATCUO 

YES,  LEAVE  AS  IS 

0824 

REF 

3 

LAST 

232 

■:'4, 2 30  5 

1 

2256 

'0 

TC  F 

KILL2 

C825 

RFF 

7 

LAST 

23  1 

04 ,2306 

4 

0075 

1 

ST  AT  cun 

CS 

FLAGWRDl 

SET  TRACKFLAG 

0826 

RFF 

2 

LAST 

231 

04,2307 

7 

4775 

1 

MASK 

0CT120 

update  flag 

0827 

REF 

■8 

LAST 

232 

04,2310 

26 

J75 

1 

ADS 

FLAGWRDl 

0828 

REF 

1 

04,2311 

1 

2222 

0 

TCF 

GCMQC 

0829 

RFF 

■7 

LAST 

232 

04,2312 

3 

2326 

1 

NOLVEAU 

CAF 

nCT500 

IS  P20  CP  F25  FLAG  SFT 

CF30 

RFF 

1? 

L AST 

232 

04 ,2’U3 

7 

0074 

0 

MASK 

FLAGWRDO 

0831 

RFF 

50 

LAST 

231 

C4, 2314 

10 

coc 

c 

CCS 

A 

0832 

04,2315 

1 

2320 

0 

TCF 

+ 3 

YES 

C833 

RFF 

11 

LAST 

23C 

04 ,2316 

ri 

5516 

c 

TC 

DOWN  FLAG 

NO, RESET  IMUINLSE  FLAG 

■JR  34 

REF 

1 

04,2317 

cccr7 

0 

ADRFS 

I MUSE 

0835 

rff 

2 

LAST 

229 

04,2320 

50 

773 

1 

INDEX 

MIMDE  X 

0836 

REF 

1 

04,2321 

3 

2467 

0 

CAF 

DM  ACMMl 

DETAIN  APPROPRIATE  DGWNLIST 

ADDRESS 
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L 

F8FSH 

START  AA'O 

RESTART 

LSFR*S  PAGE  NO.  22  E2  S3 

0837 

04,2322 

0 0004 

0 

IMHINT 

C83R 

REF 

1 

04,2323 

1 2 204 

1 

TCF 

SEUCCPOC 

0839 

REF 

1 

04,2329 

0 4364 

1 

V27NCNC 

TC 

F ALTCN 

CCPE  FEPE  IF  PM  REQUESTED  COFSNT  EXIST 

C6AC 

PFF 

1 

09,2325 

1 2067 

0 

TCF 

V37BAC 

08A1 

RE<= 

17 

L AST 

217 

4759 

CCTOGOlO 

ECLiALS 

6 IT4 

0842 

04, 2326 

00  59  ) 

1 

0CT5CG 

OCT 

500 

BITS  7 AND  9 

0 843 

04,2327 

00  305 

1 

0CT3O5 

CCT 

305 

084A 

04,2330 

0CC26 

0 

0CT26 

CCT 

26 

0845 

)4, 2331 

00124 

0 

P 20R  F G 

CCT 

124 

08A6 

04,2332 

0 CC04 

0 

V37XEC 

lAFIAT 

0847 

REF 

3 

LAST 

232 

04,2333 

50  77  2 

1 

INDEX 

PI  INDEX 

0648 

REF 

2 

LAST 

229 

04,2334 

3 2435 

1 

CAF 

PREPIPI 

OBTAIN  PPIO,  E6ANK,  AND  PP 

0849 

REF 

1 

04,2335 

5 5 ' C 5 7 

0 

TS 

PPTEP  F 

0850 

REF 

1 

04,2336 

54  C2C 

1 

7S 

C VP 

SHIFT  RIGHT  TC  PITS  14  - 10 

085  1 

RFF 

2 

LAST 

233 

04,2337 

3 0020 

0 

CA 

CYR 

0852 

REF 

1 

04. 234C 

7 7 7 30 

c 

8ASK 

PRIC37 

0853 

RFF 

1 

04,2341 

55*061 

0 

TS 

PHSPRDT4 

PRESET  GROUP  9 RESTART  FPICFITY 

0854 

REF 

1 

04, 2342 

54  )63 

0 

TS 

NEWPPin 

STCRE  PRIO  FOP  SPVAC 

0855 

REF 

2 

LAST 

233 

i' 4 , 2 2 4 3 

3 1057 

1 

CA 

MPIEPF 

CBTAIN  EEANK  - BITS  8,  9,  10  CF  PPTfPP, 

C856 

04,2344 

0 0006 

1 

EXTEND 

0857 

R = F 

18 

LAST 

219 

04,2345 

7 4 744 

0 

NP 

8TT8 

0858 

RFF 

1 

04, 2346 

7 4 757 

1 

PASK 

LCU2 

0859 

REF 

15 

LAST 

23C 

04,2347 

54  lOl 

1 

TS 

L 

0 860 

REF 

4 

LAST 

233 

J 4, 2350 

50  773 

1 

INDEX 

P INDEX 

0861 

REF 

1 

04,2351 

3 2404 

0 

CAF 

FCAORMP  1 

0862 

pep 

1 

04,2252 

55 ' 06C 

1, 

TS 

e A S E T E P F 

PAKF  EBCCN  BY  ADDING  HIE  OF  FGADP 

0863 

REF 

3 

1 AST 

2 16 

04,2353 

7 4 350 

1 

PASK 

HI5 

C 664 

REF 

16 

LAST 

23^ 

04,2354 

26  001 

1 

ADS 

L 

0 86  5 

REF 

2 

LAST 

233 

04,2355 

3 1C60 

0 

CA 

BASETEMF 

CBTAIN  GENADF  PORTION  CF  2CA0R  . 

0866  . 

REF 

1 

04, 2356 

7 53  12 

0 

PASK 

LCWIC 

0867 

REF 

15 

LAST 

166 

04,2357 

6 4741 

1 

AC 

eiTii 

0868 

RFF 

1 

04,2360 

0 5 116 

1 

1C 

SFVAC 

0869 

D[2C 

3 

LAST 

233 

04,2361 

3 1057 

1 

V37XEQC 

CA 

mmtemp 

UPCN  RETURN  FRCP  FINDVAC  PI ACF  THF 

087C 

REF 

2 

LAST 

229 

04,2362 

7 ten 

c 

PASK 

LCw7 

NFW  PP  IN  PCCRFG  (THF  LOVs  7 PITS  CF 

0871 

REF 

1 

04, 2362 

0 52  14 

1 

1C 

NEWPODE A 

FHSFRCTl  ) 

0872 

REF 

3 

LAST 

23C 

04,2364 

0 4457 

n 

TC 

RELDSF 

RFIEASF  CISPLAY 

0873 

REF 

2 

LAST 

229 

04,2365 

Q 5 155 

0 

TC 

ENDCF JOB 

AND  EX  ]T 

C674 

R<=F 

1 

5650 

^8  0-7 

EQUALS 

OCT  7777C 
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0875 

0678 

0877 

RFF 

PEF 

REF 

1 

1 

1 

1057 

1060 

04,2366 

1C335 

r 

MMTEMF  EGLALS 
BASETEMP  equals 
V370CAC  CACR 

PHSPRCT3 
TBASE6 
V37XEG  +3 

0878 

PEF 

1 

04, 2367 

10  144 

1 

RnOAC  CADR 

DLMMYAD 

CP80 

04,2370 

37667 

1 

0CT37667  CCT 

37667 

0 881 

06,2371 

4CC72 

0 

□CT40C72  CCT 

4C-J72 

0832 

04,2372 

00700 

0 

nCTTOO  CCT 

7CC 

R0eP3 

0884 

nPF 

1 

04,237? 

3 6250 

c 

SEfUPTl  CAF 

THREE 

0685 

PEF 

18 

LAST 

223 

04,2374 

54  T02 

1 

SETUP70  TS 

Q 

0666 

04,2375 

0 0006 

1 

EXTEND 

0887 

REF 

1 

04, 2376 

3 2 6 T 3 

1 

CCA 

P7OCA0R 

0688 

RFF 

19 

LAST 

234 

04,2377 

6 0002 

0 

AD 

0 

0889 

04, 240G 

52  C''6 

r 

CTC8 

0890 

■i4, 2401 

00  106 

0 

0EC70  DEC 

7C 

089  1 

REF 

Q 

LAST 

148 

E7 , 1520 

EPANK= 

R 

0 89  2 

REF 

1 

04,2402 

02067 

1 

P70CA0R  2CADP 

P70 

C892 

REF 

1 

04,2403 

42067 

0 

R0893 

FOR 

VERB 

37  TWO 

TABLES  ARE  MAINTAINED 

e 

EACH  TABLE  HAS  AN 

1 ENTRY  FOR  EACH 

R0894 

PAJOR  MCCE  THAT 

CAN 

BE  STARTED 

FROM  THE 

KEYBOARD.  THE  ENTRIES  ARE  PLT 

R0895 

INTO 

THE 

TABLE 

WITH 

THE  ENTRY 

FCR  THE 

HIGHEST  major  MOCE 

i COMING  FTRST, 

P 0896 

TO  THE  LOWEST  MAJOR 

MCOF:  WHICH 

I S THE 

LAST  ENTRY  IN  EACH 

i table. 

R0897 

THE  FCACPPM  "^ABLE  CONTAINS  TEE 

FCAOR  OF  THF  STARTING  JOB  OF 

RC898 

THE 

MAJOR 

MOOF. 

FOR  '^XAPPLE  , 

A0899 

FCADRMMI  FCADR 

P79 

START 

CF 

P 

79 

A 0900 

FCACR 

PR0G18 

START 

CF 

P 

18 

A0901 

' 

FCADR 

POl 

start 

OF 

P 

01 

R09n2 

NOTE 

f 

THE  FIRST 

ENTRY  MUST 

BE  LABLFD 

FCADRMMI. 

RQ903 

— 

09  06 

REF 

1 

04, 2606 

262C7 

C 

FCADRMMI  FCADR 

P76 

0 90  7 

RFF 

1 

04,24-15 

72  641 

1 

FCACR 

P75 

0908 

REF 

1 

04,2406 

72457 

1 

FCACR 

P74 

0909 

REF 

1 

04, 2407 

7222  5 

1 

FCADR 

P73 

C910 

REF 

1 

04,2410 

72036 

1 

FCADR 

P72 

0911 

R'=F 

1 

T4, 26  1 1 

7 1271 

c 

FCACR 

LAND  JUNK 

0912 

RFF 

1 

04,2612 

64777 

1 

FCADR 

P63LM 

0 9 13 

RFF 

1 

06,2613 

33277 

0 

FCADR 

P57 

0914 

RFF 

1 

06,2616 

32050 

c 

FCADR 

PprG52 

C915 

REF 

1 

04 ,2415 

3 1621 

1 

FCACR 

P51 

0916 

PFF 

1 

04,24  16 

7 5662 

1 

FCADR 

P47LM 

0917 

REF 

1 

04, 2417 

7 5 6 16 

1 

FCAOR 

P62LM 

0918 

°EF 

1 

04 , 2420 

75276 

0 

FCADR 

P61LM 

0919 

RFF 

1 

P4, 2421 

75153 

1 

FCADR 

P40LM 

0922 

RFF 

1 

04,2422 

72635 

1 

FCAOR 

p O Q 

G^P 
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L 

FRF9H 

START 

AMD  RFSTAPT 

LSER' S 

PAGE 

NO. 

24 

E3  S3 

0923 

Pf  F 

1 

94,2423 

72455 

r 

FFADR 

P34 

992A 

R«^F 

1 

34,2424 

72223 

1 

EC  ADR 

D *2  Q 

0925 

REF 

1 

<^4 ,2425 

72v334 

0 

FCACP 

P32 

3927 

P = F 

1 

94,2426 

72000 

1 

FCACR 

P30 

0928 

REF 

1 

04,2427 

53  4 30 

3 

FCADR 

PROG25 

0929 

RFF 

1 

04,243C 

5 r 0 c c 

1 

FCACP 

PRCG22 

0939 

RFF 

1 

04,2431 

515C5 

C 

FCADR 

PR0G21 

G931 

RFF 

1 

34,2432 

50  )3  3 

1 

FCACR 

PRCG20 

0932 

R PF 

1 

04,2432 

6 C 9 6 1 

c 

FCACP 

P12LF 

0933 

REF 

1 

34,2434 

77652 

0 

FCADR 

PC6 

R093^ 

THE 

PREMN  TABLE  COMMAS  THE  E-BAFK,NAJCP  FCCE 

, AMC  PRIORITY 

R093  5 

IMFORMAT ION  , 

IT  IS  IN  THE  FOLLOWING 

FORM  , 

RG936 

PPP 

PPF  FEW  NFF  vr/R 

P0937 

WHERE  THF  7 R BITS  CCNTAT  N 

THE  NAJCP  NODE  NLNBER 

R0938 

3 E BITS 

CONTAIN) 

THE  E-BANK 

NLMBER 

R 0939 

5 P BITS 

CONTAIN 

TFE  priority  AT  WFICF  TFE  JOB  IS 

P0940 

TO  pp 

STARTED 

R09^1 

FOR 

FXAWFLF, 

AQ9A2 

P R F'M  N 1 

COT 

6 7 213 

PR lOR  ITY 

33 

A0943 

e-eank 

5 

Ar944 

FA  JCR 

FCCE 

1 1 

A0945 

CCT 

2 543  7 

PR  lOR  ITY 

12 

A0946 

E-BANK 

6 

AC  94  7 

MAJOR 

MODE 

31 

R0948 

NOT  9, 

THE 

FIRST  entry  must 

BE  LABELED  PREWWl 

0951 

04,2435 

27714 

3 PRFM.Ml 

CCT 

2 7 714 

MM  76 

EBANK 

7 

FFIC 

13 

0952 

04,2436 

27  713 

1 

CCT 

2 77  1 3 

MM  75 

FBANK 

7 

PRIG 

13 

0953 

C4,2437 

27  7 12 

0 

CCT 

27712 

FM  74 

EEANK 

7 

FRIO 

13 

0954 

34,2440 

2771  1 

0 

ncT 

2 771  1 

FM  73 

EBANK 

7 

PRIG 

13 

0955 

04,2441 

27710 

1 

CCT 

27710 

FF  72 

EEANK 

7 

PR  10 

13 

0956 

04, 2442 

27704 

1 

OCT 

2 7 704 

FF  68 

EEANK 

7 

PR  IC 

13 

0957 

34 ,2443 

27677 

1 

CCT 

27677 

FIM  63 

EBANK 

7 

PRIO 

13 

9958 

'14,  2 4 44 

27271 

n 

CCT 

2 7271 

FF  57 

EEANK 

5 

PR  in 

13 

1959 

34, 2445 

27264 

1 

COT 

27264 

FF  52 

EBANK 

5 

PRI  C 

13 

0960 

04,2446 

27263 

0 

CCT 

27263 

MFI  51 

EBANK 

5 

PRIO 

13 

0961 

04,2447 

2 765  7 

0 

CCT 

2 7657 

FF  47 

EEANK 

7 

PR  IC 

12 

0962 

04,2450 

27652 

0 

OCT 

2 7652 

FFi  42 

EEANK 

7 

PRl  C 

13 

0963 

04 , 245  1 

2765  1 

0 

CCT 

27651 

FF  4 1 

EEANK 

7 

PR  in 

13 

0964 

•'4,  2452 

27650 

1 

OCT 

2 7650 

FM  40 

EEANK 

7 

PRIG 

13 

0967 

04 ,2453 

27643 

0 

GOT 

27643 

MM  5 5 

EBANK 

7 

PRIC 

13 

(1968 

04, 2454 

27642 

1 

CCT 

27642 

MF  34 

EEANK 

7 

PR  in 

13 

096  9 

04, 2455 

27641 

1 

CCT 

2764  1 

MM  33 

EPANK 

7 

FPI  0 

13 

09  70 

04,2456 

2 7640 

0 

CCT 

27640 

FIM  32 

EBANK 

7 

PR  in 

12 

3972 

04, 2457 

27636 

1 

CCT 

? 7636 

FF  30 

r E ANK 

7 

PRIO 

13 

0973 

.14,2460 

27631 

3 

OCT 

27631 

FF  25 

EEANK 

7 

FRIO 

1 3 
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L FRESH  START  AND  RFSTART  LSFR'S  PAGF  NO.  25  E3  S3 


D97A 

OA , 2A6  1 

27626 

0 

CCT 

27626 

NN 

22 

EFANK 

7 

FSIC 

13 

0975 

04,2A62 

27625 

0 

OCT 

27625 

MM 

2 1 

EBANK 

1 

PRIC 

13 

0976 

OA, 2A63 

2762A 

1 

CCT 

2762A 

MM 

20 

EEANK 

1 

PRIO 

13 

0977  , OA,2A6A  27C1A  1 OCT  2761A  RR  12  EEARK  7 PRIG  13 

0978  0A,2A65  2 70'J6  1 OCT  27006  MM  C6  EBANK  A PRIO  13 

R0979  NOTE,  THE  FQLLCWING  CONSTANT  IS  THE  NUMBER  OF  PNTPIES  IR  EACH  CF 


R0980  THE  APCVE  LISTS-KTF,  TRF  NUR8ER  OF  RIAJOR  MODES(EXCEPT  POO 

R0981  THAT  CAN  BE  CAiLEO  FRCR  THE  KEYBCARC  RINGS  CNE) 


0982 

OA, 2A66 

0O03T 

1 

NOV37MM 

CEC 

2 4 

M M' S - 1 

0985 

RFF 

1 

OA , 2A67 

00  J 12 

0 

cmlacmm 1 

ACRES 

R ENDEZVU 

P76 

0986 

REF 

2 

LAST 

236 

nA,2A70 

00GQ2 

0 

ADR5S 

RENDE  ZVU 

P75 

!J9  87 

RFF 

3 

LAST 

236 

OA, 2 A 71 

00002 

0 

AORES 

RENOEZVU 

P7^ 

0988 

REF 

A 

LAST 

236 

CA,2A72 

000'. » 2 

0 

ACRES 

RENDEZVU 

P73 

0989 

REF 

5 

LAST 

236 

OA, 2A73 

O0CO2 

c 

ADRES 

RENDEZVL 

F72 

0990 

REF 

1 

OA , 2A7A 

OOOOA 

0 

ACRES 

OESASCNT 

P6g 

0991 

REF 

2 

LA  ST 

236 

0A,2A75 

0000  A 

0 

ACRES 

DESASCNT 

P63 

0992 

REF 

1 

OA , 2A76 

OOOn  5 

1 

ACRES 

llnrsaln 

F57 

0993 

RPP 

1 

OA.2A77 

000  in 

1 

ADRES 

COSTALIN 

P52 

099A 

REF 

2 

LAST 

236 

OA, 250C 

LOOOQ 

1 

ACRES 

CCSTAIIN 

F51 

0995 

P^F 

1 

OA, 2501 

000  0 3 

1 

ADRF  S 

CRBMANUY 

PAT 

0996 

REF 

2 

LAST 

236 

OA ,2502 

0000  3 

1 

ACRES 

ORBMANUV 

PA2 

0997 

REF 

•a 

LAST 

236 

04,2503 

0000  3 

1 

ADRES 

C fbmanuv 

PAl 

0998 

REF 

A 

LAST 

236 

OA  ,2504 

0000  3 

1 

ACRES 

ORBMANUV 

FAO 

1001 

REF 

6 

LA  ST 

236 

CA  , 2505 

om  J2 

c 

ACRES 

RENDF  ZVU 

F35 

1002 

REF 

7 

LAST 

236 

04,2506 

0CC02 

0 

ADP.FS 

PENDEZVL 

F3A 

1C''3 

REF 

8 

LAST 

236 

OA  ,2507 

00002 

0 

ADRES 

RENOEZVU 

p a -a 

10  1A 

PEF 

9 

LAST 

236 

04,2519 

0CCC2 

0 

AORES 

RENDEZVL 

F32 

1006 

REF 

10 

LAST 

236 

04,2511 

00002 

0 

ADRES 

RENOEZVU 

P30 

100  7 

REF 

1 1 

LAST 

236 

04,2512 

00002 

0 

ACRES 

RENTE  ZVU 

025 

10. TS 

PEF 

2 

LAST 

236 

GA, 2513 

OCC05' 

. 1 

AORE  S 

LLNRSALN 

F22 

1009 

PEF 

12 

LAST 

236 

.04,2514 

1000  2 

0 

ACRES 

RENDEZVL 

P2  1 

lOlo 

REF 

13 

LAST 

236 

OA  ,25  15 

000  .)  2 

0 

ACRES 

RFNDEZVU 

P20 

1011 

REF 

3 

LAST 

236 

04,2516 

OCO'JA 

0 

ADRES 

OESASCNT 

F12 

1012 

REF 

3 

LAST 

236 

OA  ,2517 

on 0 )0 

1 

ACRES 

CCSTALIN 

P06 

10  13 

REF 

16 

LAST 

229 

4 755 

DM  AOPOO 

= 

ZERO 

lOlA 

0000 

COSTALTN 

= 

0 

1315 

0001 

AGSUPCAT 

= 

1 

1016 

RFNOFZVL 

2 

n 1 T 

00  73 

0R3MANUV 

= 

3 

1018 

00  'A 

C PS  AS  C NT 

= 

A 

1019 

COO  5 

LLNP  sain 

= 

5 

1C20 

13  ,2026 

BANK 

13 

1021 

REF 

2 

t ART 

A6 

13,2000 

SfTLCC 

I NT  INIT 

1022 

13,2026 

BANK 

1023 

REF 

2 

LAST 

A6  TO 

46  : 

2 

2« 

COUNTS' 

i 1/IMI.N 

102A 


REF 


2 LAST  111 


E3,  155A 


EBANK=  RPECTCSR 
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L FPE.SH  START  AND  ^FSTART 


USER'S  PAGE  NO.  2(>  E? 


R1025  THI<:  RFITINE  DOES  TFE  PPP  INTEGPATICN 


1026 

13  , 2026 

4 2 01  4 

0 

STATELP 

SET 

BCE 

FXTRAFOLATE  CN  STATE  VEC.TCR 

1027 

REF 

1 

13,2027 

01474 

1 

VINTFLAG 

102R 

pep 

1 

13,2030 

0434  7 

0 

SURFFLAG 

ALSO  6X6  W-MATRIX  IF  LN  ON  LLNAR 

1029 

PFF 

1 

13,2031 

2 6 0 3 6 

0 

OCINT 

SURFACE  ANC  W-MATRIX  VALIC 

1030 

13,2032 

43014 

0 

BOE 

SET 

FOP  RENDEZVOUS  NAVIGATION. 

1031 

REF 

1 

13, 2'  3 2 

02  7 56 

1 

PENCNFLG 

103? 

REF 

2 

LAST 

237 

13, 2 ’34 

26036 

0 

OCI  NT 

1033 

P.PF 

1 

13,2035 

C1476 

0 

C IFOFLAG 

1034 

13,2036 

45014 

'J 

OOINT 

CLEAR 

CALL 

1035 

REF 

1 

13,2037 

0 1667 

1 

PRECIFLG 

ENGAGES  4-TINE  STEP  LOGIC  IN  INTEGRATION 

1 016 

PEF 

1 

13,2040 

2 713  5 

0 

INTEGRV 

WFEN  MOOPEG  = 0 

1037 

13,2041 

712  14 

c 

BCN 

DLCAC 

1C3R 

REF 

2 

LAST 

23  7 

13,2042 

04307 

] 

SLRFFLAG 

1039 

RFF 

1 

1 3 , 2 04  3 

26063 

0 

NC-INT 

1040 

REF 

3 

LAST 

1 1 2 

13,2044 

01571 

0 

TETCSP 

1041 

REF 

3 

LAST 

208 

13 ,2045 

34  )41 

0 

STCALL 

TOEC  1 

104? 

P>-F 

2 

LAST 

23C 

13,2046 

27412 

0 

T NTST AL  L 

1043 

13,2747 

45C14 

0 

CLEAR 

CALL 

EXTRAPOLATE  LN  STATE  VECTOR 

1044 

RFF 

2 

LAST 

237 

13,2050 

01674 

0 

V INT  FLAG 

1045 

PEF 

1 

13,2051 

2664  5 

1 

SETIFLGS 

1046 

13,?o52 

77614 

1 

eoF 

ALSO  9X9  W-NATRIX  IF  W IS  VALIC 

1047 

PEF 

2 

LAST 

237 

13,2053 

02  756 

1 

RENCWFLG 

104R 

PEF 

1 

13,2054 

2 6 Q 6 0 

c 

OCI NT2 

1C49 

13,2055 

4 3.114 

0 

SET 

SET 

1050 

RFF 

2 

LAST 

237 

13,2056 

C1476 

c 

dinoflag 

1051 

REF 

1 

13, 2.I5  7 

01475 

0 

06CR9FLG 

1052 

13,2060 

45  014 

0 

DC  INT2 

SET 

CALL 

1053 

PEF 

2 

LAST 

237 

13,206  1 

01467 

,0 

PRECIFLG 

CISFNGAGE  4 TINE  STEP  LOGIC  IN  INTEG. 

1C54 

PEF 

2 

1 AST 

23  7 

13,2  162 

27135 

) 

IN'TFGRV 

1055 

13,2063 

77614 

1 

KC-I NT 

CLRGC 

1056 

REF 

3 

LAST 

209 

13, 2064 

0 1236 

1 

NCOGFLAG 

1 C57 

RFF 

1 

13 ,2'i65 

26633 

n 

ENOl NT 

R 1058 

TF  ISV  INT 

IS  CALLED 

BY  M OTOAV  1 

AN02 

1C59 

13, P 166 

43414 

1 

TF  ISV  INT 

CLEAR 

P.VO 

1060 

REF 

3 

LAST 

237 

13,2167 

Cl  674 

0 

V INTFLAG 
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L 

restart  TABLES 

USER'S  PAGE  NO.  1 

EO  S3 

PCCCl 

RESTART  TABLES 

R0002 

R0003 

R0CO5 

THERF  ARE  TWC  FORNS  CF  PFSTART  TABLES  FDR  EACH  GROUP.  THEY  ARE  KNOWN  AS  THE 
RESTART  TABLES.  THE  COD  TABLES  HAVE  ONLY  CNE  ENTRY  CF  THREE  LOCATIONS  WHILE 

EVEN  RFSTART  TABLES 
THE  EVEN  TABLES  HAVF 

AND  THE  CCC 
TWO  ENTRIES 

RD0D7 

RC0C9 

ROGIO 

EACH  USING  THRFE  LOCATIONS.  THE  IN'FORNATICN  AS  TC  WHETHER  IT  IS  A JCB,  WAITLIST,  OR  A LCNGCALL  IS  GIVEN  BY  THE 
way  things  arf  put  into  the  tables. 

A JOB  HAS  ns  PRIORITY  STCREC  IN  FR0TTA6  CF  THE  CORRECT  PHASE  SPOT  - A POSITIVE  PRIORITY  INDICATES  A 

PDM12 
RCCI  A 

FINDVAC  JFR,  a negative  PRIORITY  A NOVAC.  THE  2CA0R  OF  THE  JCB  IS  STORED  IN' 
FOR  EXAMPLE, 

THE  CADRTAB. 

AD015 

A3016 

5.7SPCT  CCT  23000 

2CA0R  SOMEJOB 

R0017  A RESTART  OF  GROUP  5 WlTh  PHASE  SEVEN  NCUID  THEN  CAUSE  SCNFJOE  TO  EF  RESTARTEC  AS  A FINOVAC  WITH  PoiORlTY  23. 


AT019 

5. 5SPCT 

CCT 

-23000 

A0C2I' 

2CACR 

ANYJOB 

R0021 

HERE  A RESTART  OF  GROUP  5 WITH  PHASE  7 WOULD  CAUSE  ANYJCB  TO  EE  RESTARTEC  AS  A NCVAC  WITH  PRIORITY  23. 

R0023 

R0025 

R0D27 

A LCNGCALL  HAS  ITS  GEMACR  QF  ITS  2CA0R  STORED  NEGATIVELY  AND  ITS  BBCON  STORED  POSITIVELY.  IN  ITS  PRDTTAB  IS 
PLACEC  THF  LOCATION  CF  A DP  REGISTER  THAT  CONTAINS  THE  DELTA  TIME  THAT  LOMGCALL  HAD  BEEN  ORIGINALLY  STARTED 
WITH.  EXAMPl.E, 

A002B 

A0029 

3.6SPOT 

GEN  ADR 
-GENADR 

DELTAT 

LONGTASK 

A0030 

BBCON 

LCNGTASK 

A0Q31 

OCT 

3 1000 

A0032 

2CADP 

JCBAGAIN 

R0033 

THIS  wrULD  START  UP  LONGTASK  AT  THE  APPROPRIATE 

TIME,  CP 

immediately  if  the  TIME  HAD  ALREADY  PASSED,  n SHOULD 

P 003S  BE  NOTE^  THAT  IF  CELTAT  IS  IN  A SlvI'TOHEC  F BANK,  THIS  INFCRMATO  IN'  SEOUIC  BE  IN  THE  8PCGN  CFTHE  2CA0R  OF  ThE 
R0037  TASK.  FROM  ABOVE,  WE  SFE  THAT  THE  SECOND  PART  CF  THIS  PHASE  WOULC  EE  STARTED  AS  A JOE  WITH  A FRICRITY  OF  31. 


RCC39 

R0041 

ROOA? 

WAITLTST  calls  ARE  TDENTIFTFO 
IS  POSITIVE,  THEN  I CONTAINS 
LCfATICN  CONTAINING  THE  DELTA 

BY  THE  FACT  THAT  THEIR  2CADR  IS  STORED  NEGATIVELY.  IF  PPDTTA8  OF  THE  PHASE  SFCT 
THE  delta  time,  IF  PRCTTAB  IS  NEGATIVE  THEN  IT  IS  THE  -GENADR  OF  AN  ERASABLE 
TIME,  THAT  IS,  THE  TIME  IS  STORED  INDIRECTLY.  IT  SHCLLC  BE  NOTED  AS  ABCVE,  THAT 

RC0A5 

ROOA7 

ROOA9 

IF  THF  TIME  IS  STORED  INDIRECTLY,  THE  EBCON  MUST  CCNTAIN  THE  NECESSARY  F BANK  INFORMATION  IF  APPLICABLE.  WITH 
waitlist  WF  have  one  further  option,  if  -0  IS  STCPED  IN  PPCTTAB,  IT  WILL  CAUSE  AN  IMM'^CIATE  RESTART  OF  THE 
TASK.  EXAMFLFS, 

A0050 

AOOBl 

CCT  77777 

-2CACR  ATASK 

THIS  WILL  CAUSE  AN  IMMEDIATE  RESTART 
CF  THE  TASK  :ATASK: 

A0C52 

AOOBB 

DEC  2CC 

-2CACP  DUMMY 

IF  THF  TIME  CF  THE  2 SECONDS  SINCE  DUMMY 
WAS  PUT  CN  WAITLIST  IS  LP  , IT  WILL  BEGIN 

A005A  IN  10  NS,  CTFEPWISE  IT  WILL  BEGIN  WHEN 

A0rS5  IT  NOPMALLY  WCLLD  have  BEGUN. 
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L 

R8STAPT 

TA8LE5 

USER'S  RAGE  NO.  2 EC  S3 

A 005  6 

-GFNADR 

DTI  ME 

WHFRF  CTIPE  CCNTAINS  t |- f CFLTA  TINE 

A0057 

-2CACR 

TASKTASK 

othfrmsb  this  is  as  ABCVE 

R0055 

« * # « * 

NOW  TEF  TABLES  THEPSELYES  **=!“=!=* 

0055 

01 , 2:102 

BANK 

0 1 

0C6C 

PPF 

1 

Cl  ,2000 

SETLCC 

RESTART 

•J061 

01 , 200  2 

BANK 

CC6? 

oi  ,2000 

prcttap 

EQUALS 

12  )0U 

USED  TO  FIND  THE  PRIORITY  OR  DELTATINE 

006  0 

01,2001 

r ADRTAB 

EQUALS 

12UU1 

THIS  ANC  THE  NEXT  RELATIVE  LOC  CONTAIN 

A0064 

RESTART  2CADR 

0065 

RFC 

1 

CCUNT^> 

J 1/RSTAE 

TABLES  IN  BANK  1. 

0066 

RF.F 

1 

01, 200  2 

0 CMC 

0 

SI ZETAB 

TC 

1.2SFCT  -12006 

CC67 

REF 

1 

01 , 20  3 3 

3 0023 

0 

TC 

1.3SPCT  - 12C04 

006R 

REF 

1 

01,2.  ’’4 

0 CCIC 

C 

TC 

2.2Sfr.T  -12006 

0069 

REF 

1 

01, 2105 

0 CC'26 

C 

TC 

2.3SRCT  -12C04 

CC7T 

REF 

1 

01 ,2006 

0 0010 

0 

TC 

3.2SFCT  -12C06 

007  1 

RFF 

1 

"1 , 2007 

0 0 0 5 6 

1 

TC 

3.3SFCT  -12004 

0072 

REF 

1 

01 , RHID 

0 006  2 

0 

TC 

4.2SFCT  -12C06 

007^ 

REF 

1 

01  ,211  1 

0 0072 

1 

TC 

4.3SFCT  -12004 

0074 

REF 

1 

0 1, 2012 

0 0145 

1 

TC 

5.2SPCT  -12(06 

0C75 

RFF 

1 

01,2013 

0 (3163 

0 

TC 

5.3SP0T  -12C04 

0076 

P EF 

1 

01,2014 

0 CCIC 

C 

TC 

6.2SFCT  -12006 

0C77 

RFF 

1 

01, 2015 

C C174 

c 

1C 

6.3SFCT  -12004 

0078 

01,2016 

21  COO 

1 

1 .2SPCT 

CCT 

2 lOO'J 

A rUNMY  FXANPLF  TC  BE  REPLACED  AS  SCCN 

0079 

PPc 

29 

LAST 

214 

CC74 

EBANK= 

STATE 

0080 

REF 

3 

LAST 

233 

01,2017 

05155 

0 

2CADR 

ENDOFOOB 

AS  THERE  IS  A LEGITINATE  1.2SFCT 

0C80 

Cl  ,2020 

04063 

I't 

008  I 

C 1,?C21 

CC  144 

r 

EEC 

ICO 

OCR? 

REF 

30 

LAST 

239 

0074 

EBANK= 

STATE 

0083 

REF 

LAST 

16  7 

Cl  , 2022 

05261 

1 

2 C A C R 

TASKCVER 

0083 

01,2022 

04C60 

c 

RQC64 

ANV 

«CRE 

GROLP 

1 . EVE^ 

> RFSTART 

values 

SEOULC  GC 

HERE 

008  5 

REF 

2 

LAST 

14F 

Cl,  2024 

763CC 

c 

1 .3SFCT 

-GENACR 

S AVET-30 

0086 

REF 

2 

1 AST 

148 

F7,  1515 

EBANK= 

D VC  N T R 

0087 

REF 

1 

Cl  ,2'125 

75427 

1 

■ -2CACP 

Ul LGTASK 

0087 

RFF 

1 

Cl , 2C26 

037  10 

1 

0C872 

01 ,2  i?7 

32000 

0 

1.5SP0T 

OCT 

32C0C 

00874 

REF 

■a 

LAST 

202 

E7,  1654 

E6ANK= 

HPEAS 

00876 

OFF 

1 

01, 20^0 

03622 

0 

2CADR 

REREFCS 

QC876 

RFF 

1 

01 , 2331 

66  367 

0 

R0C88 

ANY 

MORE 

GROUP 

l.CDD 

RESTART 

VALLES 

SHOULD  GC  HFRF 

0089 

REF 

2 

LAST 

239 

01,2'^16 

2.2SPCT 

EQUALS 

1. 2SP0T 

R0090 

ANY 

mcfe 

GROUP 

2.  EVEN  RESTART 

VALLES 

SHCULC  GC 

HERE 

0091 

REF 

1 

01,2632 

0263  1 

1 

2. 2SPQT 

GFNACR 

6CCSECS 
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L 

RESTART  ■ 

r ABLER 

USER'S  PAGE  NO. 

3 

EC  S3 

0092 

REF 

1 

n ,2033 

75173 

D 

-GENACP 

STATEINT 

)093 

RTF 

3 

LAST 

236 

E3,  1554 

EBAM<  = 

RRECTCSM 

009A 

REF 

2 

LAST 

240 

41 ,2034 

26063 

0 

eecQN 

STATEINT 

0095 

C1,2C35 

C5CGC 

1 

2. 5SPCT 

CCT 

05000 

0096 

REF 

4 

LAST 

240 

F3, 1554 

EBANK= 

RRECTCSM 

0C97 

REF 

1 

Cl ,2036 

0261  3 

1 

2GADP 

STATIKTl 

0097 

RFF 

1 

01,2037 

26063 

c 

0098 

01,2040 

02734 

0 

2.7SP0T 

EEC 

1 500 

0099 

RFF 

3 

LAST 

18F 

E7  , 1456 

FEANK= 

LCSCCUNT 

UlOO 

REF 

1 

ni,  2-)4  1 

C C Q -2 

c 

-2CADR 

P2t  LEMC 1 

ClOO 

RFF 

1 

01,2042 

2 771  0 

1 

0 101 

€1,2043 

lACCC 

1 

2.11 SPC7 

CCT 

14000 

0102 

REF 

3 

LAST 

147 

F7,  1762 

EBANK= 

P21TIME 

0 10  3 

RFF 

1 

01 ,2  044 

02414 

1 

2 r A E P 

P25LEM 

0103 

RFF 

1 

Cl, 20  A 5 

5''C67 

0 

0104 

01  ,2  046 

1000  ) 

0 

2. 13SP0T 

ncT 

ICOOC 

0105 

REF 
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1 

TCF 

CREV^MANU 

VBA  9 

START  ALTCMATIC  ATTITLCE  NANELVFP 

0020 

RFF 

1 

A3 , 20  lA 

0 

2A1A 

1 

TC 

GCLOACLV 

VB50 

FLFASE  PERFORM 

0021 

PEF 

3 

LAST 

262 

A3, 20 15 

0 

2 1 lA 

1 

TC 

ALF/FND 

VP51 

SFAFE 

0022 

FFF 

2 

1 AST 

262 

A3 , 2016 

0 

2A1A 

1 

TC 

GCLOAOLV 

VB52 

PLEASE  MARK  > - RETICLE. 

002  3 

REF 

3 

LAST 

262 

A3, 20  17 

0 

2AIA 

1 

TC 

GCLOACLV 

V053 

PLEASE  MARK  Y - RETICLE. 

002A 

FFF 

A 

LAST 

262 

A3, 2020 

c 

2A  lA 

1 

TC 

GCLOAOLV 

Ve  5A 

FLFASE  MARK  X CP  Y - RETICLE 

0025 

RFF 

1 

A3 ,202 1 

0 

2A3A 

0 

TC 

A L T NT  I M F 

VP55 

ALIGN  TIME 

0026 

REF 

1 

A3, 2C22 

c 

30A  1 

1 

TC 

TPPTPACK 

VP56 

TERMINATE  TRACKING  - P20  * P25 

0027 

REF 

1 

A3, 2023 

0 

2317 

0 

TC 

LRON 

VB57 

PERMIT  LANDING  RACAR  LFCATES 

0P?8 

PEF 

1 

A3 , 202A 

Q 

2360 

c 

TC 

LFCFF 

VBSe 

INFIBIT  lancing  RACAR  LOCATES 

0029 

PEF 

1 

A3, 2025 

tO 

2 1 A5 

c 

TC 

LRPCS2K 

VE59 

CCMMANC  LR  TC  PCSlTlCNi  2. 

CC30 

REF 

1 

A3 , 2026 

> 

2 167 

0 

TC 

RATECISP 

VB6C 

display  cap  estimated  RATES 

■)031 

REF 

1 

A3, 2027 

0 

2157 

0 

TC 

DA  PATTFR 

VE61 

CISFLAY  cap  ATTITUDE  ERROR 

003  2 

PFF 

1 

A3, 2'':i30 

0 

2162 

0 

TC 

TCTATTER 

VE62 

CISFLAY  TCTAL  ATTITUDE  EPPCR 

0033 

REF 

1 

A 3, 2031 

0 

2AA7 

1 

TC 

ROA 

VB63 

SAMPLF  RADAR  ONCE  PER  SECCND 

003A 

PEF 

1 

A3, 2032 

0 

2 72  1 

1 

TC 

VE6A 

VB6A 

CALCULATE, DISPLAY  S-EANC  ANT  ANGLES 

0035 

REF 

1 

A 5,2  133 

0 

32A2 

0 

TC 

SNUFFQUT 

VB65 

DISABLE  L,V  JETS  CLRING  CFS  BURNS. 

0C36 

PEF 

1 

A3,  20 3 A 

c 

3 157 

1 

TC 

ATTACFEC 

VE66 

ATTACFEC  MCVE  TUS  TO  OTFER  STATE 

0037 

PFF 

1 

A3, 2035 

c 

223A 

1 

TC 

V67 

VB67 

N MATRIX  MCNITCR 

0038 

PEF 

A 

LAST 

262 

A3 ,2036 

0 

211A 

1 

TC 

ALM/FND 

VB68 

SPARE 

^ O n 39 

PEF 

1 

A3 ,2037 

"3 

2037 

1 

VERB65 

TC 

VFFR69 

VB69 

FORCE  A FARDNARF  RESTART 

00  AO 

pop 

1 

A3, 20  AO 

0 

37A5 

1 

TC 

V70LP0AT 

VB70 

UFCATF  LIFTOFF  T IME. 

OCAl 

RFF 

1 

A3,2 JAl 

0 

3 7A7 

c 

TC 

V71UP0AT 

VB71 

LNIVFRSAL  LPDATE  - PLCCK  ADDRESS. 

00A2 

REF 

1 

A3, 20A? 

0 

3751 

1 

TC 

V72UFCAT 

VE72 

universal  update  - SINGLE  ADDRESS. 

00A3 

REF 

1 

A 3 , 2 0 A 3 

0 

3 753 

c 

TC 

V73UPnAT 

VE73 

LPDATE  AGC  TIME  (OCTAL). 

OOAA 

PFF 

1 

A3 , 2 )AA 

0 

3C62 

3 

TC 

CNEDUPP 

VB7A 

initialize  DCKN-TELEMFTPY  FPCGFAM 

AO  0A5 

FCR  ERASABLE  CUMIP. 

00  A 6 

PEF 

1 

A3,20A5 

3 

32A5 

1 

TC 

OLTSNLFF 

ve  75 

ENABLE  L,V  JETS  CURING  CFS  BURNS. 
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n)47 

5=F 

1 

43,2046 

0 

302  1 

1 

TC 

M I P:  I R F 

VB76 

MMRUR  IRFULSE  RCCF 

0048 

RFF 

1 

43,2047 

•\ 

3124 

1 

7C 

NCRINIMP 

VB77 

rate  CCRRAND  RCPE 

0C49 

PEP 

1 

43, 205C 

1 

243? 

0 

1C 

R77 

VB78 

START  LR  SPLRIOLS  RETURN  TEST 

OOB’7 

PEP 

1 

43, 2051 

0 

265  1 

1 

TC 

R77EP0 

VB79 

TEPRINATE  LR  SPUPICUS  RETURN  TEST 

0051 

RPP 

1 

43 , 2052 

0 

3066 

1 

TC 

LERVEC 

VR6C 

LPCATE  LEM  STATE  VECTOR 

0;i5? 

PFP 

1 

43, 2C5  3 

c 

3C71 

1 

TC 

CSRVEC 

V FBI 

UPCATE  CSM  STATE  VECTOR 

005  3 

REP 

1 

43, 2054 

0 

2766 

1 

TC 

V82RFRF 

VB62 

RECLEST  CReiT  PARAR  CISPLAY  (P30) 

>VJ54 

REP 

1 

43,2055 

0 

2 776 

0 

TC 

V83PERF 

VR83 

REQUEST  READ  PAPAR  DISPLAY  (R31) 

0055 

PEP 

C 

LAST 

262 

43. 2"56 

0 

2 114 

1 

TC 

ALR/ENC 

\/pe4 

SFAPE 

0056 

REF 

\ 

43 , 2057 

0 

3250 

0 

TC 

VERB85 

VB85 

DISPLAY  PR  LCS  AZ  ANC  ELEV 

0057 

RPP 

6 

LAST 

2 6 2 

43.2C6C 

0 

2 114 

1 

TC 

ALR/END 

VE66 

SPARE 

005  8 

REF 

7 

LAST 

263 

43, 2E6  1 

0 

2 114 

1 

TC 

ALR/ENO 

VB67 

SPAFE 

0C59 

P'^F 

8 

LAST 

26  2 

43,2’’62 

0 

2 114 

1 

TC 

ALR/END 

VB68 

SPARE 

0060 

RFF 

1 

43, 2063 

0 

3C04 

c 

TC 

V89  PEPF 

V 889 

ALIGN  XORZ  LERI  AXIS  ALONG  LOS  (R62) 

0061 

REF 

1 

43, 2)64 

0 

3 113 

0 

TC 

V9CPERF 

VB9G 

CLT  CF  PLANE  RENCEZVCUS  CTSFLAY 

006  2 

R'tp 

1 

43,2065 

0 

3115 

1 

TC 

GCSHCSIJM 

VB9  1 

CISFLAY  BANK  SURi. 

1063 

REF 

1 

43,2066 

0 

3 10  1 

1 

TC 

SYSTEST 

VB92 

CFEFATE  IRU  FERFQRRANCF  TEST. 

0C64 

REF 

1 

43,2067 

0 

3 1 10 

1 

TC 

WRIATR  XNG 

VB93 

clear  RENCV«FLG 

0065 

Rcp 

9 

LAST 

263 

43,2070 

0 

2 114 

1 

TC 

ALR/ENC 

VB9  4 

SPARE 

0 066 

RFF 

1 

43, 2071 

0 

3C76 

c 

TC 

UPOATCFF 

VP95 

NC  state  vector  ufcate  allowed 

0C67 

R'^F 

1 

43, 20  72 

0 

322  1 

0 

TC 

VEP  B96 

VR96 

INTERRLPT  INTEGRATION  AND  GC  TC  FCC 

016  8 

RTF 

5 

LAST 

262 

43, 2073 

c 

2414 

1 

TC 

GCLCACLV 

V897 

PLEASE  VERIFY  ENGINE  FAILURE 

006  9 

RFF 

10 

LAST 

263 

43 , 2174 

0 

2114 

1 

TC 

ALM/END 

VB98 

SFAPE 

0070 

REF 

6 

LAST 

262 

43,2075 

0 

2414 

1 

TC 

GCLCACLV 

VB99 

PLEASE  ENABLE  ENGINE 

P')07  1 

FNC 

OF 

FXT.FNEE 

C VfRB 

FAN 

0072 

RFF 

5 

LAST 

246 

43,2076 

1 1 '043 

0 

TEST  XACT 

CCS 

EXTVBACT 

APE  extended  verbs  8USY 

0073 

REF 

1 1 

LAST 

26  2 

43, 2C77 

C 2114 

1 

Tf 

ALR/ENC 

YES,  TURN  CN  CPERATOR  LIGHT 

0 )74 

PEE 

2 

LAST 

223 

43,2110 

3 ulOO 

Q 

CA 

FLAGv»RD4 

APE  FPICFITY  DISPLAYS  USING  CSKY 

CC75 

REF 

1 

43,2101 

7 2123 

1 

RASK 

CC24100 

00751 

PEF 

65 

LAST 

26  1 

43,2  1 12 

1C  COG 

G 

CCS 

A 

00752 

RRF 

12 

LAST 

263 

43,21 13 

0 2 114 

1 

TC 

ALM/ENO 

YES 

00  76 

RFF 

1 

43,21  14 

3 4362 

1 

CAF 

OCT25 

SET  BITS  1,  3,  AND  5 

1077 

PEF 

6 

LAST 

263 

43,  2 105 

5 5 » 0 3 

G 

SETXTACT 

TS 

F XT VEACT 

NC.  SET  flag  TC  SHOW  EXT  VERB  CISPLAY 

A C C 7 a 

SYSTER  BUSY 

0C?9 

PEF 

23 

LAST 

258 

43,2106 

3 000  2 

0 

CA 

Q 

0080 

RFF 

34 

LAST 

262 

43, 2 1 >7 

54  155 

1 

TS 

MPAG  +1 

0C81 

RRF 

4 

LAST 

244 

43,2110 

4 4 752 

1 

CS 

Two 

BLANK  EVERYTHING  EXCEPT  RR  AND  VERB 

1137 

REF 

1 

43,2111 

9 4154 

0 

TC 

N vsue 

1083 

43,2112 

0 2 113 

0 

TC 

+ 1 

0C«4 

REF 

35 

LAST 

262 

43,2113 

0 0155 

0 

TC 

RFAC  +1 

0 087 

RFF 

6 

LAST 

209 

5472 

TFRMEXTV 

EQUALS 

ENCEXT 

nrp3 

PEF 

7 

1 AST 

263 

5472 

ENCEXTVP 

EQUALS 

FNDEXT 

109  1 

REF 

2 

LAST 

233 

43,2114 

0 4364 

1 

ALR/ENC 

TC 

FALTCN 

TURN  CN  CPERATOR  ERROR  LIGHT 
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OOP? 

0093 

REF 

REF 

7 

2 

LAST 

LAST 

255 
2 2 E 

43.2115 

41.2116 

0 4635 
2 1 C 5 1 

0 

C 

GORIN' 

TC 

CACP 

°CST  JUf^P 
P I NPFNCH 

) )94 

RFF 

6 

LAST 

232 

43,2117 

3 1010 

1 

CHKPOOH 

CA 

MCDREG 

CHECK  FCP  pro  CR  PGC-. 

0095 

43,2120 

0 0006 

1 

EXTEND 

1096 

RFF 

1 

43,2121 

1 6 74  5 

C 

ezF 

TCG 

CC97 

R«=F 

13 

LAST 

263 

43,2122 

0 2114 

1 

TC 

ALM/ENO 

00971 

43,2123 

24KG 

0 

CC24100 

CCT 

2 4100 
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Pi')98 

VBZFRO 

VFR3  AC 

CESCPIFTICN 

P009P 

R r I'^r 

1. 

RFQUIRE  FFUN 

20  (ircu 

1 ANCLFS  ) CR 

NCUN 

12  (r'CCU  ANGLES). 

P Jl'Jl 

2. 

FOP 

N?0,  CHECK 

IMUCADR 

IN  AN  EFFCRT  TC 

Avoir  A 1210  RESTART. 

R91  '? 

FOR 

N72,  check 

IF  EITHER  RACAR  IS 

IN  USE. 

RO  103 

3. 

EXFCLTt  THF  CFL  7ERC. 

P JlOA 

A . 

STALL  UNTILL 

THE  ZERC 

IS  CCNE. 

PCIOS 

3. 

CC^ 

■T  DIFFEREMATF  eft  ween  a eae 

CR  GCGC  RETURN. 

R0106 

6. 

FXTT,  RF -ESTABLI SHI NG 

THE  INTFRPLFTED 

CISPLAY  (IE  ANY). 

01  in 

'’EF 

1 

A3, 212A 

0 2 17  5 

p vezERC 

1C 

CF/I  NERT 

0111 

PFF 

1 

A3, 2125 

0 2127 

1 

TC 

I MUZEPCK 

RETURN  HERE  IF  NOUN  = ICDL(2C) 

M 12 

RFF 

1 

A3, 2126 

0 2136 

1 

TC 

RRZERCK 

RETURN  HERE  IF  NCUN  = PCDU(72) 

0113 

PFF 

1 

A3 , 2 12  7 

0 2 A 30 

1 IPUZEROK 

TC 

CKMOCCAD 

01131 

RFF 

13 

LAST 

26  1 

A3,213C 

0 A616 

1 

TC 

BANKCAL  l 

KEYBOARC  REQ  FOR  ISS  CCUZERC 

) 1 lA 

RFF 

2 

LAST 

209 

A3, 2 13  1 

1 6 7C6 

1 

CADR 

I N L Z E R r 

0113 

rff 

lA 

LAST 

265 

A3 ,2  132 

■1  A616 

1 

TC 

BANKCALL 

STALL 

0113 

RPF 

2 

1 AST 

209 

A3, 2 133 

1771C 

1 

CACR 

I MSTALL 

1117 

A3, 213A 

0 2135 

1 

TC 

+ 1 

0118 

RFF 

1 

A3, 2135 

0 2115 

0 

TC 

GCPIN 

IMUZFRO 

0 12U 

PEF 

1 

A 3 , 2 1 3 e 

0 267A 

0 RRZERCK 

TC 

RCRUSFCK 

01202 

PEF 

13 

LAST 

265 

A3 ,21 37 

0 A6  16 

1 

TC 

BANKCALL 

0121 

RFF 

! 

A3,21AC 

52  35A 

1 

CACP 

RR  ZERC 

U22 

RFF 

16 

LAST 

265 

A3,21A1 

0 A616 

1 RWAITK 

1C 

BANKCALL 

0123 

PEF 

1 

A3 ,2 1A2 

1 77  16 

1 

CACR 

RADSTALL 

0 1 2A 

A3, 21A3 

1 21AA 

C 

1CF 

+ 1 

0123 

RFF 

2 

LAST 

265 

A3,21AA 

0 2115 

0 

TC 

GCPI  N 

RRZERC 

R0126 

LRPOSPK 

VERB  59 

CESCFIPT ICN 

P >127 

rL)h»MANO  LANCING 

RACAR  TO 

POSITICN  2 

R0129 

1. 

FX  IT 

with  CP  EFRCP  IF 

SCMECNE  IS 

US  INC- 

EITHER  RADAR. 

P0130 

2. 

ALAPR  WITH  CEDE  523  IF  POS  2 IS 

NCT  INCICATEC  WITHIN 

R0131 

THF 

FRESCPIBEC  TIME. 

- 

P 0 1 3 1 1 

3. 

RF- 

FSTABL  !SH 

THE  CISPLAYS. 

0132 

OPF 

2 

LAST 

265 

A3,21A5 

C 267A 

0 LRP0S2K 

TC 

RCPUSECK 

11322 

REF 

17 

L 1ST 

265 

A3, 2 1A6 

0 A616 

1 

TC 

BANKCALL 

COMMAND  LR  TC  PCSITICN  2 

1133 

REF 

1 

A3,21A7 

53A5A 

1 

CACP 

LPPrS2 

013A 

pFF 

18 

L AST 

265 

A3, 2150 

C A 6 1 6 

1 

TC 

BANKCAL  L 

01  3A  1 

REF 

7 

LAST 

265 

-:'3,2151 

17  7)6 

0 

CACR 

RADSTALL 

01  2A2 

REF 

1 

A3, 2152 

C 215A 

0 

1C 

LPF2A  LM 

U3A3 

REF 

3 

LAST 

265 

A3, 2 153 

0 211  = 

0 

1C 

GCPIN 

C13A5 

REF 

17 

LAST 

257 

A3 ,215A 

0 5567 

0 LPP2ALM 

TC 

alarm 

0 13A6 

A3, 2155 

0C523 

C 

CCT 

523 

013A7 

RTF 

A 

LAST 

265 

A3, 2156 

0 ^115 

0 

TC 

GCPI  N 
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P UB5 

V6  1 

VERB 

61, 

CISPLAY  DAP 

ATTITLOE 

ERRORS  ON 

FOAI 

ATTITUDE  EPPCP 

NEEDLES. 

0137 

RFF 

12 

LAST 

23? 

43,2157 

')  5516  0 

DAPATT  ER 

TO 

DCWNFLAG 

3138 

REF 

1 

43 ,2160 

33313  C 

ADRES 

NEFDLFLG 

0139 

REF 

2 

L AST 

262 

43,2161 

1 2164  1 

30.  F 

TCTATTER 

+ 2 

R31^3 

V62 

VERB 

62  , 

DISPLAY  TOTAL  ATTITUDE  ERRORS 

ON  FDA  I ATTITUDE 

ERROR  NEEDLES. 

3 142 

REF 

1 

43,2162 

0 5504  C 

TCTATIEP 

TO 

UFFLAG 

:i43 

PFF 

2 

LAST 

266 

43,2163 

00013  0 

ADRES 

NEEDLFLG 

31431 

RFF 

13 

LAST 

266 

43,2164 

0 5516  0 

+ 2 

TO 

DOWNFLAG 

31432 

PFF 

1 

43 , 2 165 

CCOOO  1 

ADRES 

NEED2FLG 

C144 

REF 

5 

LAST 

265 

43,2166 

) 2115  0 

TO 

GOP  IN 

P0144 1 

V6C 

VERB 

60, 

DISPLAY  DAP 

ESTIMATED 

RATES  ON 

FDA  I 

ATTITUDE  FRRCF 

NEEDLES  . 

31443 

REF 

2 

LAST 

266 

43, 2167 

0 5504  C 

RATED  ISP 

1C 

UPFLAG 

01444 

PEE 

2 

LAST 

266 

43,2170 

COOOO  1 

ADRES 

NEED2FLG 

U445 

RFF 

6 

LAST 

266 

43,2171 

C 2115  0 

TC 

GCFI  N 

R’llAS 
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P1146 

R0147 

R01A8 

P0149 

P n 5 I 

P'JIS2 

P PI.  =3 

P015A 

R0135 

P01S6 

P0157 

PU58 

R0168 

R0169 

R017C 

R31  71 

R0172 

R0173 

PP17^ 

R8175 

R 0 1 7 E 5 

P7176 

ROl  76 

P0179 

ROl  80 

P0181 

R9182 

R0184 

R0185 

RP186 


VeCC^PK  VEPR  41  CESCRIPTIGN 

COAPSE  ALIGN  r^L  CP  PACAP 

1.  REQUIRE  NOUN  20  OR  NCIN'  72  CR  7LPN  CN  CFERATCP  EPRCR. 

2.  RFCUIPE  EXT  VERE  CISPLAY  SYS  aVAILABLE  OR  TURN  ON  QPERATCR  EPRCR  LIGHT  ANC  GC  TC  FINEPNCE. 

CASE  1 NCUN  20  (ICCU  ANGLES) 

3.  SET  EXT  VEPR  CISPLAY  ACTIVE  FLAG. 

4.  CISPLAY  FLASHING  V25.N22  (LOAC  NEl^  ICCU  ANGLES). 

RESPONSE  S 

A.  TFFNINATF 

1.  RELEASE  EXT  VERB  CISPLAY  SYSTEM 

B.  PROCEED 

1.  COARSE  ALIGN  TO  THE  EXISTING  THETAD'S  (IC0RK2). 

C,  ENTER 

1.  COARSE  ALIGN  TO  THE  LQACEC  THETAD'S  (ICGRK2). 

ICCPK2 

1.  RE-DISPLAY  VERB  41. 

2.  EXECUTE  INUCOARS  ( IMU  COARSE  ALIGN). 

3.  EXECUTE  TPLSTALL  (ALLOW  TINE  ECR  CATA  TRANSFER). 

4.  RELEASE  EXT  VERB  DISPLAY  SYSTEH. 

CASE  2 NCUN  72  ( PCCU  ANGLES) 

EXIT  kITh  CP  ERRFR  IF  SCRECNE  IS  USING  EITHER  SACAC. 

5.  DISPLAY  FLASHING  V24.N73  (LOAC  NEN  RR  ''FUMON  ANGLE  AND  NEt*  SHAEJ  ANGLE). 

RESPCNSES 

A.  TFPNINATF 

1.  RFL'^ASE  EXT  VERB  CISPLAY  SYS. 

R,  PRCCFEC  CP  ENTER 

I.  EXECUTE  AURLCKON  (ASK  FPERATCP  FCR  LFCK-EN  P F C L I P E H E N TS  ) . 

2.  KH-CISPLAY  VERB  41. 

3.  SCHEDLLF  PPDESK2  NITH  FRICPITY  20. 

4.  RFLEASE  EXT  VERB  DISPLAY  SYS. 


P01R7 


ALPLFKCN 


R0188 
ROl  89 

RCI9G 

R0194  E.  PROCEED 

R01P5  1.  RESET  LOCK-ON  SrtITCH 

P 0 1 9 5 1 J 2.  SET  CCNTINLCLS  DESIGNATE  FLAG 

P01952  3.  disable  R25 

RClSe  C.  VR2  E 1 E,  PI  = 00001,  PROCEED 

RCIS7 1.  SET  LCCK-GN  SWITCH 


0198 

0199 
02  10 

REF 

PEE 

REF 

2 

1 

1 
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CCLNT* 

tJ/EXTVB 

0721 

43,2765 

12600 

1 

V4  3K 

VN 

4300 

P 1752  V82PERF  VERB  82  DESCPIFTICN 

R0723 RFQURST  CRBTT  PARjSMETERS  CISPLAY  (R3C ) 


R072'^  1.  TF  AVERAGE  G IS  CRF: 

R0725  FLASH  CISPLAY  V'lANOB.  R2  INCICA7ES  tiHICH  SHIP'S  STATE  YECTCR  IS 

P'3  7?6 TO  BE  UPLATFD.  INITIAL  CHClCE  IS  TUS  SHIP  (R2=l).  ASTRONALT 


RD727 

RC728 

R0729 

CAN  CHANGE  TO  CTHEP  SHIP  BY  V22EXE,  WHERE  X NOT  FQ  1. 
SELFCTFD  STATE  VFCTDF  UPDATED  BY  THISPREC  ICTHPREC). 

CALLS  SR30.1  (WHICH  CALLS  TFFCCNPU  + TFFFP/RA)  TO  CALCULATE 

R0730 
RP731 
R 1 7 3 2 

RPER  (P'^RTGEE  RAHILS),  RAPC  (APCGEE  RADIUS),  HFER  (PERIGEE 
HEIGHT  ABOVE  LAUNCH  PAD  OR  LUNAR  LANDING  SITE),  HAPG  (APOGEE 
HEIGHT  AS  ABOVE),  TFER  (TnE  TD  PERIGEE),  TFF  (TIHF  TO 

P 7733 
RQ734 
R0735 

INTERSECT  300  KPT  ABOVE  PAD  OR  35KFT  ABCVE  LANCING  SITE). 

FLASH  NCMTCR  V16N44  (HAPC,  HP£R,  TFFj.TFF  IS  -59M59S  IF  IT  WAS 
MOT  COMPLTABLE,  CTHERUSE  it  INCPENENTS  CNCE  pep  SECOND. 

P 1736 
R0737 
R7738 

astronaut  fas  CPTICN  TC  MONITOR  TPER  BY  KEYING  IN  N 32  E. 
DISPLAY  IS-  IN  FVS,  IS  NEGATIVE  (AS  WAS  TFF),  AND  INCREMENTS 
ONCE  PER  SECOND  ONLY  IF  TFF  DISPLAY  WAS  -59N59S. 

R7739 

RD740 

2.  IF  AVERAGE  G IS  CN: 

CA1.LS  SR30.1  APPROX  EVERY  TWC  SECS.  STATE  VECTOR  IS  ALWAYS 

R7741 

R0742 

P0743 

FOR  TFIS  VFHTCLE.  V62  DOES  NCT  CISTLRE  STATE  VECTCP.  RESLLTS 
QF  SR30.1  APE  RAPE,  PPPR,  FAFC,  FPFP,  TPER,  tff. 

FLASH  PONITCP  V16N44  (HAPC,  HFER,  TFF). 

R0744 
R T745 

IF  MODF  IS  Pll,  then  call  CELRSPL  SO  ASTRONALT  CAN  PCNITCP 
RESULTS  BY  N50E.  SPLASH  CCMFUTATICN  CCNE  ONCE  PER  TWO  SECS. 
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FPCM 
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RFF  1 

REF  1 
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V82CCN  2CACP 
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R0754 

R0755 

V883PERC 

P EQUFST 
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RENDFZVCUS  PARAMETER  CISPLAV  (R31) 
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R0758 

1.  SET  EXT  VERB  DISPLAY  BUSY  FLAG. 

2.  SCHEPLIF  R31CALL  WITH  FRICPITV  5. 
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P0760 

R0761 
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R2  RANGE  RATE 
R3  THCTA 

0762 

RFF  11 

LAST  28A 

43,2776  0 2076  1 

V83PERF  TC 

TESTXACT 

0763 

0764 

0765 

REF  23 
REF  10 
RFF  1 

LAST  2TE 
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43, 2777  2 4752  C 
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E7,  1611 

CAF 

TC 

EBANK= 

81  T2 
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TSTRT 

0766 
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'1767 

Rff  1 

REF  1 
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TC 
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VERP  80 

DESCRIPTICN 

RENDEZVOUS  RINAL 

ATTITUDE  RCUTINE  (R62) 

R0769 

R077') 

CALLED  BV  VERB  8S  ENTFR  DLRING  POOo  PPIC 
DISPLAYS  FINAL  FCAI  BALL  ANGLES  TO  PGINT 

r>  USED.  CALCULATES  AND. 
LM  1-X  OR  +Z  AXIS  AT  CSV. 

R'1771 

R3772 

1,  KEV  IN  V 89  E CNLY  IF  IN  PRCG  00.  IF 
EXIT  R63,  OTHFRlvISF  CCNTINUF. 

NCT  IN  POO,  OPERATOR  ERROR 

and 

R0773 

R0774 

2.  IF  IN  P7'»,  DC  INU 
nRTFNTATIPN  KNOWN  TC 

STATUS  CFECK  ROUTINE  (R02BCTH).  IP 
IGC,  CCNTINUF, 

INU  CN  AND 

ITS 

R0775 

R0776 

P0777 

3.  FtASF  display  V C4  N C6.  R2  INDICATES  WHICH  SPACECRAFT  AXIS  IS  TC 
BE  PCINTFC  AT  CSV.  INHIAL  CFCICE  IS  PREFERRED  ( +Z  ) AXIS  (R2=l). 
ASTRONALT  CAN  CHANGE  TO  (+X)  AXIS  (R2  NCT  = 1)  BY  V 22  E 2 F.  CONTINUE 

P3778 

AFTFR  KEYING  IN  FFCCEED. 

P 0775 

4.  BOTH 

VBHICl  ■=  STATE  VETTCRS  LFCATEC  EY 

CONIC  ECS. 

R J78.) 

5.  HALF 

MAGNITUDE  UNIT  LOS  VECTOR  (IN  STABLE  NEN6EP  CCCPCINATES)  AND 
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R 1731 
P078  2 

HAL'=  ^'AGMTLDF  UMT  SPACFGR/5F7 
PRFPARFC  FOP  VECPCINT. 

AXIS  VFCTCR 

(IN  RCCY  CCCPDINATES) 

P0  7B3 
P 178^ 

6.  GTRBAl  angles  FPOR  VFCPCINT 
BALLANGF.  FLASH  DISPLAY  V '16  A 

TRANSFCPMEC 
le  AND  AWAIT 

INTO  FCAI  ball  ANGLES  3V 
PESFCNSF. 

P 773G 
P07E6 
P0787 

7.  RECYCLE  - PETUP^  TC  STEP  A. 
TERMNATE  - EXIT  R63. 

PROCEED  - RESET  3AXISFLG  AND 

CALL  R6CLER 

FCR  ATTITLCE  RANELVER. 

0788 

RFF 

2 

LAST 

2 82 

43, 3004 

')  2117  1 

V89PERF  TC 

CHKPOOH 

(1789 

REF 

12 

LAST 

2 84 

43,3005 

C 2076  1 

TC 

TFSTXACT 

0790 

REE 

1 

'(■3, 3'J0  6 

2 4727  0 
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REF 

6 

LAST 
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TC 

F INDVAC 
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RFF 

3 
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EBANK= 

RCNE 
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1 
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V89CALL 
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REF 

1 

43,3011 

54104  C 

1794 

RFF 

12 
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284 

43,3012 

0 5155  0 

TC 

ENOOF JCE 

P079G 

V93PFRF 

VERB  93 

DESCRIPTION 

R 3 796 

REQUEST 

RENOEZYCLS  CUT-QF- 

PLANE  CISFLAY  ( F36 ) 

R')797 

1 . 

SET 

EXT  VERB 

DISPLAY  BLSY  FLAG. 

RC798 

2 . 

SCHEDULE  R36 

call  with 

PPICRITY  1C 

R0799 

A . ni  SPI AY 

P08DO 

TIME  OF  EVENT  - HOURS  , YINL7ES  , S 

ECCNDS 

Rceoi 

Y CUT-CE 

-PLANE  FCSITION  - NAUTICAL 

M ILES 

R 380? 

YDOT  OLT 

-DF-PLANE 

VELCCITY  - FEET/SECCNC 

R0803 

PSI  angle  ETW  LINE 

OF  S IGHT  AND  FCRWARD 

R0804 

cirecticn  vector  in  HCRIZCNTAL 

PLANE  - CEGFEES 

3835 

RRF 

12 

LAST 

285 

43, 3012 

0 2''76  1 

VSOPFRE  TC 

TFSTXACT 

0EC6 

REF 

3 

LAST 

284 

43,3  >14 

3 5021  1 

CAP 

PR  IC17 

R 2 6 , V 9 C 

0807 

REF 

7 

LAST 

285 

43,3315 

C 5105  a 

TC 

F INDVAC 

0808 

REF 

2 

I.AST 

118 

F4, 1606 

EEAN(<  = 

R FA  SS36 

C8C9 

REF 

1 

43,3016 

02643  1 

2CACR 

R36 

3809 

REF 

1 

43, 3017 

1C1C4  C 

0810 

REF 

13 

LAST 

285 

43,3020 

1 5155  1 

TCF 

END(?F  jne 

R 0 8 1 1 

M MMP 

VERB  76 

CFSCR  1 FT ICN 

P08  1 2 

M IN IVUM 

1 N P L L S F 

BODE 

R 181  3 

1 . 

SET 

MINIMUM  IPPULSE  RFC 

YCDE  flag  to  i„ 

0814 

Rcp 

q 

LAST 

277 

43  ,3021 

3 5 50  4 C 

YTMYF  , TC 

tJFFL  AG 

SET  PULSES  = 1 (MIN. 

IMPULSE  MODE) 

081  5 

0 C p 

1 

43,2322 

00233  1 

AORES 

PLLSFFLG 

0816 

REF 

13 
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43,3023 

i 2115  1 

TCF 

GGPIN 

RETLPN  VIA  PINBRNCH 

R0817 

NOYl Nl MP 

VERB  77 

DESCRIPTION 

R0818 

FATE  CCPMANC  MODE 

P 0819 

1. 

SET 

MMwlw  IRPULSE  RFC 

NCCE  flag  TC  0. 

(ZERC  INDICATES 

NOT  MINIMUM  IMPULSE 

MCCE. » . 

R 1821 

2. 

MPVE 

CDUX,CDLY,CDLZ  INTO  CDUX C , CCL YD  , C DL ZD . 
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280 
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A3, 3T25 
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0 5516 
CC30  2 
0 OOOA 

C 

1 

0 

AC^T  AIPF  TC 

AORE  S 
INF  INT 

rCWNFLAG 

PLLSEFLG 

SET  PULSES  = 0 (ACT  VIMMLN  IMPULSE  f^GCE 

08’4 

PEF 

1 1 

LAST 

2A5 

A3  ,3027 

0 A67A 

C 

1C 

I ENKCALL 

0825 

PFF 

1 

A3, 3030 

A015A 

0 

CADR 

Z ATTERQR 

CE26 

REF 

lA 

LAST 

285 

A3 ,3031 

0 2115 

0 

TC 
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P0827  f.RFWMAKU  VERB  A9  CESCPIFTTCA 

R1828  START  AUTO'-'A^IC  ATTI^UCE  MANEUVER 

RC829 1.  RECDIPE  FRCGPAV  00  ACTIVE. 


PC830 

R0831 

R0832 

2.  PPT  EXT  VERB  DISPLAY  ELSY  FLAG 

3.  SCFEDULF  R62CISP  UITF  PRIORITY 
A.  release  ext  vere  CISFLAY. 

• 

10. 

R0833 

Rt20ISP 

R083A 

!.  DISPLAY  FLAShlAG  V06,A22. 

R0835 

RPSPCASE  S 

R0836 

A.  TERMINATE 

R0P37 

1.  GC  TC  GCTCFCCH. 

R0638 

B.  PRECEFO 

R0839 

1.  SET  3AXISFLG  TO  INDICATE 

MANEUVER  IS  SPECIFIFD  BY  3 AXIS. 

ROP^l 

2.  EXECUTE  RSOLEV  (ATTITUDE 

AAAEUVEP  ). 

P J8A2  C . ENTPP 

P08A3  1.  REPEAT  FLfiSETNG  V36,N22. 


08AA 

REF 

3 

LAST 

285 

A3 ,303  2 

C 2117 

1 

CREwMANL  TC 

CFK  PCCH 

DEMAND  PCO 

08A5 

REF 

lA 

LAST 

285 

A3, 3033 

0 2076 

1 

TC 

TESTXACT 

QEA6 

R = F 

2 

LAST 

285 

A3 , 303A 

3 A 73 7 

0 

CAF 

PRI CIO 

08A7 

REF 

8 

LAST 

285 

A3, 3035 

C 5105 

0 

TC 

F INDVAC 

08A8 

R = F 

2 

LAST 

136 

E6, 1676 

EBANK= 

BCOU 

08A9 

REF 

1 

A3 , 3036 

02103 

1 

2CACP 

P62DISP 

0 8A9 

RPF 

1 

A3,3C37 

A6  106 

1 

C85G 

PEF 

lA 

L AST 

285 

A3,30A0 

U 5155 

0 

TC 

ENDOF JOB 
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PT8S1 

trrtpack 

VERB  56 

GESCPIPTIOM 

R0852 

TEPPIKAl 

= TRACKING  (F20 

ANC  F25). 

R')853 

] 

. KACCK 

nnwNi  renoezvous, 

TRACK,  ANC  LPCATE 

FLAGS. 

PC854 

2 

. RFCUIRE  F2'i 

EF  F25 

NET 

RUNN  INC- 

ALONE  CR 

; GO  TO  GOTOFOCH 

(RECLEST  PROGRAR  CO). 

R0856 

3 

. SCHEDULF  V56TCVAC  WITH 

PRIORITY 

30. 

80887 

V56TCVAC 

R0888 

1 

. PXFCLTE  ILTSTALL  (IF 

INTEGPAT  ICN 

IS  RUNNING,  STALL  LNT  II 

IT  IS  F IN  ISHED. ) . 

C0  860 

2 

. 7PP0 

GROUP  2 

TO  HALT 

P20. 

R0861 

3 

. TFANSFFR  CnMTRCL  TC 

GCFPCC-2  (SCFTWAPF  PES7AR1). 

0862 

REF 

1 

43 , 304  1 

3 3061 

c 

T R«TP ACK 

CA 

B ITS9+7 

IS  RFNC  CR  P25  FLAG  ON 

0863 

PFF 

IS 

LAST 

232 

43, 39Z|2 

7 00  7 4 

0 

RA  S K 

F LAG  WROO 

0 864 

43 , 3043 

0 0)06 

1 

EXTEND 

0865 

PFF 

15 

LAST 

286 

43, 3G44 

1 2115 

1 

BZF 

G C P I N 

NC 

0866 

REF 

21 

t AST 

286 

43,3045 

0 5516 

0 

TC 

nOWNFLAG 

0867 

PFF 

1 

43 , 3046 

00010 

0 

ACRES 

PNCVZFLG 

086  8 

PEF 

22 

LAST 

288 

43,3047 

0 5516 

c 

7C 

OCWNFLAG 

- 

086? 

REF 

1 

43 ,3  )5  ) 

O0')0  6 

1 

ACRES 

P25PLAG 

0870 

REF 

2 - 

LAST 

288 

43 ,3051 

0 5516 

r 

TC 

OCWNF  LAG 

ENSURE  SEARCH  FLAG  IS  CFF 

087], 

PFF 

1 

43,3052 

000  3 7 

0 

AORES 

SRCHCFTN 

C872 

RE"^ 

2 

LAST 

28  1 

43, 3053 

3 4747 

1 

CA 

TRACKBIT 

IS  track  flag  CN? 

0873 

REF 

10 

LAST 

28  1 

43,3054 

7 GC75 

1 

RAS  K 

FLAGWRDl 

0874 

43 ,3055 

0 0006 

1 

EXTEND 

0875 

PEF 

16 

L AST 

288 

43,3C56 

1 2115 

1 

ezF 

G G P I N 

0876 

PEF 

19 

1 AST 

276 

43, 3057 

0 4635 

0 

TG 

PCSTJLRF 

0877 

PFF 

1 

43,3360 

64054 

r 

CACR 

TRMTRAK 1 

0 8 7 8 

43,3061 

or:  5C0 

1 

e ITS9  + 7 

CC7 

5 00 

0879 

PFF 

3 

LAST 

276 

42, 2000 

SE  TLCC 

SBAND 

BANK  42 

C88C  , 

42,2054 

BANK 

0881 

PFF 

2 

LAST 

28?  TO 

2 83: 

15 

15=!= 

CGLNT>x 

t$/EXTVE 

0882 

P'^F 

24 

LAST 

288 

42 ,2054 

0 55  16 

0 

trmtraki 

' TC 

DCWNFLAG 

0883 

REF 

1 

42,2055 

00027 

1 

ACRES 

UPDATFLG 

UPDATE  FLAG  DCWN 

0884 

REF 

25 

LAST 

288 

42, 2056 

C 5516 

c 

7C 

OCWNFLAG 

€885 

PFF 

1 

42,2057 

0003  1 

0 

ACRES 

TRACKFLG 

TRACK  FLAG  DOWN 

0886 

Ri^F 

26 

LAST 

288 

42, 2060 

0 5516 

t 

1C 

OCWNFLAG 

0887 

REF 

2 

LAST 

232 

42, 2061 

•'!0€07 

n 

ADRE  S 

I RLSE 

0888 

RFF 

6 

LAST 

252 

42,2062 

0 6042 

1 

TC 

INTPPET 

0889 

42,2063 

77624 

1 

CAl  L 

089G 

REF 

3 

LAST 
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42 ,2  )64 

27412 

0 

INTSTALL 

DCNT  IN7ERRLPT  INIEGRAIICN 
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0891 

0692 

RE.F 
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LAST 
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TC 

P FA  SC  PNG 
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2 
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REF 
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RATES 

1C  STOP 
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STCPPATE 
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REF 

13 

1 AST 

289 

92,2073 

0 9679 

0 

TC 

I BMKCALL 

0898 

REF 

1 

92,2079 

90115 

0 

CADR 

RESTOFCB 

( 

0899 

REF 

9 

L AST 

27C 

92,2075 

0 601  1 

1 

TC 
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EXTEAC 
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09  06 

RFF 

2 
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c 

CADR 

GCPRCG2 

CAUSE  RESTART. 

R0905 

CNEEUWP 

VERB  79 

DESCR  IFTIDM 

R0906 

initialize  dcwn- 

-TELEMETRY  FRCGRAF  FCF  ERASABLE  MEMORY 

DUMP. 

P0907 
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. SET 

EXT  VERB 

DT  SPLAY 
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• 
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BANK 
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SETLCC 

PINPALLl 

1 283 

60 ,2  ) )0 

EAMK 

128A 

PFF 

1 

CCUNT+ 

$J/EXTVe 

1285 

R£P 

3 

LAST 

299 

60,2000 

3 5C  1 7 

1 

DSPRRLO  S 

CAF 

PRI05 

1286 

Rt^F 

12 

1.  AST 

299 

6 1 ,200  1 

0 5175 

0 

TC 

P INDVAC 

1287 

REF 

Q 

LAST 

30C 

E6,  160C 

EBANK= 

RF-AZ 

1288 

REF 

1 

60, 2002 

02017 

0 

2CADP 

PRLCSDSP 

1288 

REF 

1 

60 ,20)3 

6C  106 

1 

1289 

REF 

3 

LAST 

281 

60, 2CC6 

3 6760 

0 

CAF 

PRI  C6 

1290 

RFF 

5 

LAST 

29  3 

60,2005 

0 5166 

1 

TC 

PRIOCHNG 

1291 

REF 

1 

60,20^6 

3 2076 

1 

CAF 

V16N56 

12°2 

REF 

56 

L AST 

297 

6.),  200  7 

0 6616 

1 

TC 

BANKCALL 

1293 

RPF 

6 

LAST 

278 

60,2010 

20353 

0 

CACR 

GOMARKFR 

129A 

RPF 

6 

LAST 

272 

60,2011 

C 5 563 

1 

K 

B5CFF 

1295 

ref 

5 

LAST 

300 

60, 2 112 

0 5563 

1 

TC 

8 50FF 

1296 

REF 

6 

LAST 

3C0 

60,2013 

0 5563 

1 

TC 

P5CFF 

1297 

PFF 

19 

L AST 

297 

60,2016 

3 675  1 

c 

CAP 

6IT3 

1298 

REF 

7 

LAST 

297 

60,2  (15 

U 5666 

1 

TC 

BLANKET 

1299 

PFF 

23 

LAST 

299 

60,2016 

C 5 155 

0 

TC 

ENCCFJCF 

130'^ 

60,2017 

0 J006 

1 

RRLOSCSP 

EXTFND 

13'’! 

REF 

2 

LAST 

1 88 

60 ,2  120 

3 0036 

1 

CCA 

CCUT 

1 2 

REF 

62 

LAST 

291 

60,2021 

52  155 

1 

CXCH 

(»( P A C 

13'^3 

PFF 

9 

LAST 

298 

60,2  (22 

Q 6062 

1 

TC 

I NTPRF.T 

130A 

60,2023 

77626 

1 

CALL 

1305 

REF 

1 

60,2026 

66C65 

c 

PRNBPFAC 

GET  PP  LCS 

IN  eCCY  AXIS. 

1396 

60,2025 

00001 

0 

STORE 

OC 

UNIT  LCS 

13<'7 

60,2026 

16  )0  7 

0 

STCCL 

6C 

1308 

REF 

1 

6-1,2  02  7 

C 6 526 

1 

HI6ZEPCS 

1309 

60,2030 

26011 

1 

STCVL 

80 

1310 

60,2031 

C C C C 7 

c 

6D 

1311 

60,2032 

77656 

1 

UNI  T 

1312 

6'1,2C33 

ii 

ST  CPE 

6C 

UNIT  CF  LOS 

PROJ  IN  X-Z  PLANE 

1313 

60 ,2036 

7 7 66  1 

1 

CCT 

1316 

REF 

3 

LAST 

37 

60,2035 

065  16 

0 

UNITZ 

1315 

pcp 

1 

60 ,2036 

2602  1 

1 

STCVL 

CCSTF 

16C 

1316 

REF 

3 

LAST 

37 

60, 2037 

06  522 

1 

UNI  TX 

1317 

60 ,2060 

77661 

1 

COT 

1318 

6 7 , 2C6 1 

CCPR? 

r 

c 

6C 

1319 

REF 

1 

60, 2062 

36023 

1 

STCALL 

SI  NTH 

18C 
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1^20 

1321 

132? 

PEF 

1 

40,2043 
40  , ? T44 
40  ,?C45 

‘■1122 

43244 

60047 

1 

1 

1 

BPL 

APCTPIG 
DAD 
+ 2 

INSLRE  CISFLAV  CF  0 

- 360  CFG. 

1323 

RF.F 

1 

40,2046 

C6  53  2 

C 

DFFCSNAX 

INTROCUCFS  AN  ERRCR 

CF  E-28  REVS. 

132A 

RFF 

1 

40 ,2047 

26203 

1 

STnVL 

RR-El EV 

132F 

4C,2P5C 

00001 

0 

OF 

1326 

40,2051 

7 764  1 

1 

DCT 

1327 

REF 

2 

1 AST 

37 

4‘)  ,2052 

06520 

0 

UNITY 

13?P 

RFF 

2 

LAST 

3Pf 

40. 2C53 

24C23 

r 

STCVL 

SINTh 

1329 

40, ?054 

ocroi 

c 

OD 

133P 

4C,2P55 

77641 

1 

CCT 

1331 

40,2056 

OOCC7 

c 

6D 

133? 

P.FF 

2 

LAST 

30C 

40,7057 

34021 

0 

STCALL 

CCSTH 

1333 

P.FF 

2 

LAST 

3C  1 

43,7060 

47327. 

1 

ARCTR  IG 

133A 

40,2061 

43244 

1 

BPL 

DAO 

INSURE  DISPLAY  CF  0 

- 360  CFG. 

133F 

40 , 2062 

60064 

0 

+ 2 

1336 

RFF 

2 

LAST 

30  1 

40,2063 

06532 

c 

DFPCS^'AX 

INTROCUCFS  AN  ERROR 

OF  B-2  8 REVS. 

1337 

REF 

4 

LAST 

300 

40,2064 

02201 

0 

STORE 

PR-AZ 

133P 

40,7065 

77776 

1 

FX  IT 

1339 

PEF 

2 

LAST 

27F 

40, 2C66 

3 4777 

1 

FA 

1 SFC 

134P 

RFF 

57 

LAST 

300 

40,2  >67 

0 4616 

1 

TC 

BANKC ALl 

13A1 

REF 

6 

LAST 

280 

4C,2C7C 

01736 

1 

CACR 

DFL AYJDE 

13A? 

RFF 

18 

LAST 

272 

40,2071 

3 4 74  7 

1 

CA 

BITS 

13A3 

PEF 

8 

LAST 

272 

40,?u72 

7 1043 

0 

RASK 

EXTVBACT 

13AA 

REF 

89 

LA'T 

296 

40,2073 

10  CQC 

c 

crs 

A 

1345 

RFF 

2 

LAST 

300 

40,2074 

0 2C17 

c 

TC 

PRLOSOSP 

1346 

REF 

25 

LAST 

297 

40,2075 

0 5472 

0 

TC 

ENDEXT 

1347 

40, 2)76 

C4C7C 

1.  V16N56 

\/K 

1 656 
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Picon  THE  FOLLOWING  REFERS  TO  THE  NCLN  TAELFS 


RlOOl  CCPFCNFNT  COCF  MJPEFP  INTERPRETATION 

p ICO?  fCrOC 1 CCPFCNEA?' 

R1003  OOCOI 
R10n4  fCnC 

RICG5  XIXXX 

R1006  IXXXX  bite  = 1.  NO  LOAD 

R1007  END  GF  GOPPONENT  CEDE  MJPPEPS 


2 rCNFCNENT 

3 CC'mfcNENT 

eiT4  = 1.  CECIPAI.  cnly 


R1008  SF  ROLTINF  CODE  MLNEER  I NTER F RET  AT  I C A 


R1009  OOOTO  OCTAL  ONLY 

RICIO  09001  STRAIGHT  FRACTICNAL 

RIO  II  QTOIO  rCU  GEC-REFS  (XXX.  XX) 

P1012  oorii  arithmetic  sf 

R1013  ncioc  ARI'^H  DPI  CLT(WULT  BY  2EXP14  AT  EXE)  IMSTRAIGHT) 

PI014  OOl'il  ARITH  CP2  OUI  ( STR  A j G FT  ) IN  ( SI  7 AT  END  ) 

R1C15  COllO  LANDING  FACAR  FCSITICN  ( +OUO0X  ) 

R1016  OHlll  ARITH  CP3  OLT  ( SL  7 AT  END)  IN  ( STRAIGHT) 

R1C17  niOOO  WHOLE  HOURS  IN  Rl,  WHOLE  MINUTES  (MOD  60)  IN  R2, 

R1018  SECONGS  (MOD  6:  ) fXX.XX  IN  R3 . ALARMS  IF  USED  WITH  OCTAL 

P1019  OlOOl  MINUTES  (MiQC  6ii  ) IN  D102,  D3  BLANK,  SECONDS  (MOD  60)  IN  D4C5 

P 1020  LIMITS  TC  59E59  IF  MAG  EXCEECS  THIS  VALUE. 

P1P21  ALARMS  IF  USED  WITH  OCTAL  x x x x- x.  IN  (ALARY) 

R1022  0101)  ARITH  C04  OUT  (STRAIGHT)  IN  ( SL  3 AT  ENE) 

P1C221  illOll  ARITHl  SF  OLT(MLLT  BY  2EXP14  AT  ENC)  IN(STRAIGHT) 

R10222  OlinO  2 INTEGERS  IN  D1D2,  D405,  03  BLANK. 

R1C223  AL  «PNS  IF  USED  WITH  OCTAL  xxxxxx=x<x=  IN  (ALARM) 

R 1022A  OllCl  ^60-CDU  DEGREES  (XXX.XX) 

R10225  'nil'  RR  RANGE  15  BIT  MAG  TO  DP,  THEN  SCALE  XXX<X<XX<X<  IN  (ALARM) 

R1P22A  01111  RR  RANGE  PATE  15  ETT  MAG  TC  CP,  THEN  SCALE  xxxxxxx  IN  (ALARMi) 

R1023  FMC  OF  SE  ROUTINE  CGOE  NUMBERS 


R1024  SF  CGNSTANT  CGOF  NUMBER  . INTERPRET  AT  I C N 


RIC?5  lOOCO 

R1026  nocco 

R10265  COfCC 
R1027  CTCGl 
R102B  O'lOl  ' 
R1C29  COCIO 
R1030  00011 

R1031  001  I » 

R1032  OOICI 
R 10321  00101 


WHGLF  USE  ARITH 

OF  Tiivg  sfc  (XXX.XX  SEC)  LSE  ARITHDFl 
LF  FCSITIGN  (+OOCCX)  USE  LR  POSITION 

SPARE 

ecu  CEGREES LSE  CPU  DEGREFS 

36')-CCU  CEGREES  USE  360-C0U  CEGREES 

DP  OcgreES  (9C)  XX. XXX  DEG  USE  ARITHCF3 
CP  CEGREES  (36C)  XXX.XX  OEG  LSE  ARITHDP4 
degrees  (180)  XXX.XX  EEC  USE  ARITH 
CFTICAL  TRACKER  AZIMUTH  ANGLE ( X XX , X XC E G ) 
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NCUN 

T ABLES 

LSGR'S  PAGE 

NF.  2 

EO  S4 

R 103?2 
R 103-4 
R 1035 

COHO 

com 

USE  ARITPCPl 

WETGHT2  (YXXXY.  LBS)  LSE  ARITHl 

PCSITICN5  (XXX. XX  NAUTICAL  MILES) 

PI035  1 
R1037 
P 1C37  1 

niono 

USE  ARITFCF3 

P0SITI0N4  (XXXX.X  NAUTICAL  MILES) 

use  ARITHDP3 

P 1038 
P1039 
R 1040 

niooi 
u ru  0 

OlCll 

VELGC1TY2  (XXXXX.  FT/SFC)  USE  ARITHCP4 
VEnCITY3  (XXXX.X  FT/SEC)  USE  ARITH0P3 
ELEVATICN  CFGREES (89.999MAX ) LSE  ARITE 

P1041 

R1C42 

P1043 

OHIO 

f ini 

RENOFZYQUS  RADAR  RANGE  (XXX. XX  NALT  MI) 

USE  RR  RANGE 

PENCEZYCUS  RACAR  RANGE  R A T E ( X X X XX . F T / S E C 

PI  044 
P 1C45 
RI046 

01  1 10 

LSE  RR  RANGE  PATE 

LANCING  RACAR  A LT  ITU C E ( X X X X X . F F E T ) 

LSE  ARITHCPl 

R1047 
R 1048 
81049 

0 1 1 1 1 
1 1000 

INITIAL/FINAL  ALTITUCE(XXXXX.FEET) 

LSE  ARITHCPl 

ALTITUDE  RATc^t  XXXXX. FT/SEC)  LSE  APITH 

R lG‘'-n 
P 105  1 
R105? 

lOCOl 

10010 

9 CRW arc/lateral  VELOC  ITY( XXX XX.  feet /SEC  ) 

USE  ARITH 

PCTATIGNAL  HAND  CCNTRCLLEP  ANGLE  RATES 

R 1053 
P.  1054 
P1055 

1 'Cl  1 

XXXXX .DEG/S tC  USE  ARITH 

LANDING  RACAR  V E L X ( X X X X X . F E E T /S E C ) 

USE  ARITHOPl 

R 1056 
R1057 
R 1058 

10  100 
1 JlOl 

landing  RACAR  V E L Y ( XX X XX  . F E ET/S EC  ) 

LSE  ARITHCPl 

LANCING  RACAR  V EL Z ( XX X XX  . FEET / S EC  ) 

P 1059 
R1P60 
R 10691  1 

1 ' 110 
10  111 

USE  ARITHCPl 

POSITION?  (XXXX.X  MALT  Ml)  USE  ARITHCP4 
TRIM  CEGREFS2  (XXX. XX  CEG)  USE  ARITH 

R1061 
R 106101 
P 106  1C  2 

nooo 

1 1C(  1 

CCPPUTEO  AITITLCE  (XXXXX.  FEET) 

LSE  APITHDPl 

DC  DEGREES  (XXXX.X  CEG)  USE  ARITHCP3 

P106103 
P 106K-!, 
R106 105 

1 1010 
UCl  1 
11100 

POSTTICINF  (XXXXX.  FT)  LSE  ARITHDP3 
VELCCITY4  (XXXX.X  FT/SFC)  USE  ARITH0P2 
RADIANS  (XX. XXX  RADIANS)  USE  APITHCP4 

R1062 

END  CF 

SF  CCNSTANT 

CEDE  NUMBERS 

R 1063  FCP  GPF/STFR  TH4N  SINGLF  PPFCISICN  SCALES,  PUT  ACFPFSS  CF  NAJCP  PAPT  INTO 
RL064  NOUN  TABLES. 

R1063  rpTAL  I CAES  PLACE  ->0  INTO  NAJCR  PART,  DATA  INTO  NINOR  PART. 

Rin66  ncTAL  DISPLAYS  SHOV.  PTNCR  FART  '"(njLY. 

RlOf>7  TC  C-FT  AT  BCTH  F'AJCR  ANC  “INOR  PARTS!  IN  OCTAL),  L SE  KCLN  01. 


RlCftS  A NCLN  PAY  PE  OECIAREC  :CECIPAL  CNLY:  EY  PAKING  eiTA=l  CF  ITS  CCPFCNENT 

Pl06q  CODE  NUNPFR.  IF  Th-IS  NOUN  IS  LSEO  V^ITH  ANY  OCTAL  DISPLAY  VERB,  CP  Tf 
DATA  IS  LEADED  IN  CCTAL,  IT  ALAPPS. 


R107U 
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R1072  LCADFn,  CR  ALARR. 

R1073  ALARM  IF  AN  ATTEMPT  IS  RApp  TC  LCAQ  :SPLI7  R I NUT E S/S FC C NO S : (RMESS  ) . 

R1-;)7A  THIS  TS  USFF  FOR  DISPLAY  ONLY. 


GAP;  ASSENSL^  RFVISION  116  CF  AGC  PRCCP/iv  LU’^lNiiPY  EY  N/iSA  202  11  12-071 1S:CS  AUG.  11,196^  LpMQNAID.C99  FAGF  305 


L 

PINBALL  NGUN  T4PLES 

USER'S  PAGE  NC. 

A 

EC  SA 

P1075 

7HF  FTLLCwING  RCUTINES  AFE  FCP  RFfCINC-  THE  NOUN  TABLES  ANC  THF  SF  TABLES 

R1076 

(k^HICH  ARE  IN  A SFPARATF  BANK  FRCN  THF  REST  CF  FINBALLl.  THESE  RFACING 

R1077 

ROUTINES  APr  tN  ^EE  SAME  BANK  AS  THE  TABLES.  THEY  ARE  CALLED  BY  OXCE  Z. 

R 1 C 7 E 

LCONMAB 

LEAPS 

NNACTEM  WITH  THE  NNACTAE 

ENTRY,  NNTYPTFM 

WIITH  THE 

R1T7'I 

MNTYPTAB 

ENTRY. 

IF 

THF  NEUN  1 

S MIXED 

, lOAOlTEM  IS  LCACEC  WITH  THE  FIRST 

P 1080 

IOADOTAB 

ENTRY  , 

IFAC2TFM  THE 

SECCNC 

ICACCTAB  ENTRY,  ICA03TCM  THE  THIRD 

R 1081 

IDADCTAB 

ENTRY, 

RLTMXTEM  VvITH 

THE  RUTMXTAB  FNTFY.  MIXER 

IS  SET  FOR 

R1  082 

MIXED 

ER 

NORMAL 

NEUN  . 

12rr 

06,3271 

RANK 

6 

12002 

REF 

2 

LAST 

282 

A2 ,200c 

SETL  CC 

PINBALL3 

12003 

A 2 , 2 n 3 

BANK 

12005 

pep 

1 

COUNT  X 

t t/NOUNS 

1201 

PEF 

1 

A2, 2 103 

52  152 

C 

LCDNNTAB  CXCH 

I DAD2TEM 

SAVE  RETURN  INFQ  IN  ICAC2TEM,  ICAC3TEM. 

1202 

REF 

3 

LAST 

267 

A2,  2 UA 

51  '001 

1 

INDE  X 

MGUNREG 

1203 

P£F 

1 

A2 ,2 105 

3 215A 

0 

CAE 

NNADTAB 

1 2 tA 

REF 

1 

A2,21'6 

5A  1A6 

C 

TS 

NNADTEM 

I205 

REF 

A 

LAST 

305 

A2 ,21  '7 

51 ' 10  1 

1 

INDEX 

NOUNREG 

1206 

PEF 

1 

A2 ,2110 

3 2370 

1 

CAF 

NNTYPTAB 

1207 

REF 

1 

A2, 2 1 1 1 

5A  1A7 

1 

T S 

NNTYFTEM 

1208 

R'^F 

5 

LAST 

305 

A2  ,21  12 

A 1001 

0 

CS 

NOUNREG 

1209 

PEF 

1 

A2,2113 

6 A 771 

1 

AD 

M I X C C N 

1210 

A2, 2 llA 

C CC06 

1 

EXTEND 

1211 

PFE 

1 

A?  ,2115 

6 2121 

1 

EZWF 

LCDMIXNN 

NCLN  NUMBER  G/E  FIRST  MXED  NCLN 

1212 

REF 

lA 

LAST 

279 

A2, 2 1 16 

3 A 753 

1 

CAF 

ONE 

NCLN  MJMEER  L/  FIRST  MIXEC  NOUN 

1213 

REF 

1 

A?  ,2117 

5A  lAO 

0 

TS 

M IXBR 

NCFMAL.  Tl  INTC  MXBR. 

121  A 

PEF 

1 

A2  ,2121 

0 2 137 

■) 

TC 

LCDNLV 

1215 

FEF 

1 1 

LAST 

283 

A 2 , 2 1 2 1 

2 A 7 52 

0 

LCDMI XNN  CAF 

TWO 

MIXED.  +2  INTC  MIXBR. 

1216 

REF 

2 

LAST 

305 

A2 ,2122 

5A  lAO 

0 

TS 

M IXBR 

1217 

RFF 

6 

L A ST 

30  5 

A2, 21 23 

51  'CCl 

1 

INDEX 

NCLNREG 

1218 

REF 

1 

A2, 212A 

3 306A 

0 

CAF 

RUTMXTA3  -ACO 

FIRST  MIXEC  NCUN  = AD. 

1219 

REF 

1 

A2 ,2125 

5A  153 

1 

TS 

RUTMXTEM 

1220 

REF 

2 

LAST 

233 

A2, 2 126 

3 50  12 

1 

CAF 

LCWIO 

1221 

REF 

2 

LAST 

305 

A2  ,2127 

7 01A6 

0 

MASK 

NNADTEM 

1222 

pr  c: 

28 

LAST 

283 

A2  ,2130 

5A  002 

I 

TS 

G 

TEMP 

1223 

REF 

90 

LAST 

30  1 

A?, 2 1 3 1 

5C  OCC 

1 

INDEX 

A 

122A 

PEE 

1 

A2,2132 

3 2650 

0 

CAF 

idaddtab 

1225 

REF 

1 

A2, 2 132 

5A  15C 

1 

TS 

I CADITEM 

LEAD  ICACITEM  WITH  FIRST  IDADCTAB  ENTRY 

1226 

A2, 213A 

C 0006 

1 

EXTEND 

1227 

REF 

29 

LAST 

305 

■ A?, 2135 

5 0002 

0 

INDEX 

Q 

LOAD  ICAC2TEM  WITH  2ND  IDADCTAB  EMFY 

122R 

REF 

2 

LAST 

305 

A 2 , 2 1 3 6 

3 2652 

1 

OCA 

IDADOTAE  +1 

LCAC  ICAC3TFM  wITH  3PC  ICACCTAB  ENTRY. 

1229 

RFF 

2 

LAST 

305 

A2  ,2137 

52  152 

0 

LCDNLV  CXCH 

IDA02TEM 

PI  I REUPN  INFC  I NTC  A , L . 

1230 

RFF 

1 

A2 ,21  AG 

52  006 

v7 

CXCH 

Z 

1231 

PEF 

1 

A77  1 

MIXC.ON 

0CT50 

(CEC  AOl 

R 1232  GTSFOLT  LCADS  SPTF^Pt,  SFTEPF2  WITH  THE  CP  SFCUTAE  ENTRIES. 

1233  PFF  I A2,2IA1  52  12A  1 G3SFCL1  CXCF  SFTEPFl  2X(SFCCNUM)  ARRIVFS  IN  SFTEMPl. 
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12RA 

A2 ,2142 

0 0006 

1 

extent. 

1235 

pPP 

91 

LAST 

£ 

42,2143 

5 fCTC 

1 

INDEX 

A 

1236 

R'^F 

1 

42,2144 

3 2557 

1 

CCA 

SFPUTAB 

1237 

REF 

2 

LAST 

3C  £ 

42,2145 

52  124 

1 SFCCN 

CXCF 

S FTEi^Fl 

123B 

REF 

2 

L AST 

30  5 

42,2146 

52  C06 

0 

CXCH 

Z 

R 1239 

G7SFI N 

LOADS  SFTERPl  , SFTEWF2 

W ITh  THE 

CP  SF  INTAE  ENTR  lES  . 

1240 

REP  3 

LAST  306  42,2147 

52  124 

1 

GTSFIN  CXCh 

SFTENPl 

2X(SFCCNUN)  ARRIVES  IN  SFTEMPl. 

1241 

42, 2150 

C 000  6 

1 

EXTEND 

1242 

REF  92 

LAST  3C6  42,2151 

5 0 3C0 

1 

TNCEX 

A 

1243 

REF  1 

42,2152 

3 2465 

1 

CCA 

SFI N7A8 

1244 

PPF  1 

42,2153 

1 2 145 

1 

TCF 

SFCON 

A140C 

NN 

NCPNAL  NCONS 

14'>1 

42,2154 

ocooo 

1 NNADTAR 

OCT 

ocooo 

00 

NOT  IN  USE 

14C2 

42 ,2155 

4 coo  7 

0 

CCT 

40000 

0 1 

SPECIFY  NACHTNE  ADDPES5  (PP.ACT  ICNAL  ) 

140? 

42,2156 

4 000  0 

C 

CCT 

4000') 

02 

SPECIFY  MACHINE  ADDRESS  (WHCLE) 

1404 

42,2157 

40C-i-7 

0 

CCT 

4000C 

03 

SPECIFY  MACHINE  ADDRESS  (CEGREES) 

1405 

REF 

3 

LAST 

2 78 

42,2160 

01  744 

M 

ECACR 

CSPTPMl 

C4 

ANGLLAR  ER RQK /DI FFER FNCE 

1 406 

RFF 

4 

LAST 

306 

42,2161 

C1044 

0 

FCACP 

DSFTE^'1 

05 

ANGULAR  EPRCR/CIFPERENf E 

1 4 7 

RFF 

1 

42,2162 

0 114  3 

0 

ECACR 

nPTIONl 

06 

CPTTCN  CCDE 

1408 

R 

1 

42,2163 

0 1002 

1 

EFACF 

X PEG 

07 

FC6CR  OF  WORC  TO  BE  MOCIFIFO 

A14H81 

CNES  FCR  BITS  TO  BE  MCCIFIEC 

A 14C82 

1 TC  FPT  OR  0 TO  RESET  SELECTED  BITS 

140Q 

q c p 

2 

LAST 
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42, 2164 

01363 

0 

ECACR 

A 1 N C A C P 

OB 

alarm  data 

141  1 

RFF 

4 

LAST 

212 

42,2165 

00375 

0 

FCADR 

FAI LREG 

C9 

ALARM  CCCES 

1411 

42  ,2166 

77776 

1 

CCT 

77776 

10 

CHANNEL  TO  3E  SPFCIFIEC 

1412 

RFF 

3 

1 AST 

199 

42,2167 

C36  33 

1 

ECACR 

TCSI 

11 

TIG  GF  GSI  <HRS,MIN,SEC  ) 

1413 

RFF 

7 
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42  ,2170 
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ECACR 
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12 

OPTICN  CCDE 
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1414 

RFF 

3 
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42,2171 

017  7 6 

0 
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TCDH 
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TIC-  CF  CCF  (HRS, MIN,  SEC) 

1415 
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4 
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20  8 

42 ,2172 
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ECADR 

DSPTEMX 

14 
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A 14 1 5 1 
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1416 

42,2173 

77777 

0 

OCT 

77777 

15 

INCREMENT  MACHINE  ACCRESS 

1417 

RFF 
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306 

42,2174 

01050 

0 

ECACR 

OSPTENX 

16 

TIME  GF  EVENT  ( HR S , M I N , SEC ) 

141  B 

42,2175 

ocoac 

1 

CCT 

OGOOO 

17 

SPARE 

1419 

REF 

1 

42,2176 

72  344 

0 

ECACR 

FOAIX 

18 

ALTO  MANEUVER  BALL  ANGIES 

1420 

42,2177 

rccco 

1 

CCT' 
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19 

SPARE 

1421 

REF 

6 
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254 

42,2200 

OQC32 

0 

ECAOR 

CDUX 

20 

ICCU  ANGLES 
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1 
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0CC37 
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P IP  AX 

21 

PI  PAS 

1423 
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42,2202 

CC321 

1 

ECACR 

Tt-ETAC 

22 
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1424 

42,2203 
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1 
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OCOOC 

23 

SPARE 

1425 

REF 

3 
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91057 
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ECACR 
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24 
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1A29 

42  ,2?1C 

CCE'’C 

1 

CCT 
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28 

SPARE 

143^1 

42,2211 

OCGOO 

1 

CCT 

00030 

29 

SPARE 

1431 

42  ,221  2 

OCOno 

1 

OCT 

0 

30 

SPARE 

143? 

42,2213 

oococ 

1 

ECT 

0 

31 

SPARE 

1433 

RCP 

1 

42,2214 

02  142 

1 

ECAOR 
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32 

TIRE  TC 

PERIGEE  (HRS  , MIN, SEC ) 

1434 
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42,2215 

03441 
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ECACR 
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33 

TINE  CF 

IGNITION  (HRS,NIM  SEC) 

1435 

Ri^F 
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42,2216 

0 1C44 

0 

ECADR 

DSPTERl 

34 

TINE  CF 

EVENT  (HRS, MN, SEC) 

1436 

PEF 

9 
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241 

42,2217 

03453 

0 

ECADR 

TTQGO 

35 

TINE  TC 

GC  TC  EVENT  (HRS, MN, SEC) 

1437 

REF 

10 

LAST 
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42, 2220 

0 0C24 

1 

ECADR 

TIME2 

36 
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AGC  CLOCK  ( HRS, MIN, SEC ) 

143R 

REF 

3 
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199 

42,2221 

03635 

1 

ECADR 

TTPI 

37 

TIG  CF 

TFI  (HRS,nIN,SEC  ) 

143C 

REF 
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LAST 

11  1 

42,2222 

01516 

1 

ECACR 

TET 

38 

TINE  CF 

STATE  BEING  INTEGRATED 

1440 

42,2223 

GCOOO 

1 

CCT 
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39 

SPARE 

PI  440  1 

FNC 

EF 

NAAGTAP 

FE  F 

NEFMAL  NCUNS 

A 14402 
144  1 
A1441  1 

42,2224 

64  COO 

Q 

CCT 

64C00 

MN 

40 

MIXED  NCUNS 

TINE  TC  IGN  IT  ICN/CUTCFF 
VG 

A 144  1 2 

DELTA  V ( ACCUMDLATEC ) 

1442 

42,2225 

02C03 

0 

OCT 

02003 

41 

target  AZINUTH 

A14421 

ELEVATION 

1443 

42,2226 

24QC6 

1 

CCT 

24006 

42 

AFCGEE 

A 1443  1 

PERIGEE 

A 14432 

DELTA  V (PEQLIRED) 

1 444 

42,2227 

2401  1 

1 

CCT 

2 4011 

43 

LAT  ITUCE 

A 1444  1 

LCNG  1 TUDE 

A 14442 

ALT  ITLDE 

1 445 

42,2230 

6 4 C 1 4 

C 

CCT 

64014 

44 

APCGEE 

A 1445  1 

PERIGEE 

A 14452 

TFF 

1446 

42, 2231 

64C  1 ? 

c 

rcT 

64(17 

45 

NARKS 

A 14461 

TTI  CF  NEXT  BLRN 

A14462 

NG  A 

1447 

42, 2232 

0CC22 

1 

OCT 

00022 

^6 

AUTCFILCT  CCNF  IGURAT ION 

1448 

42 , 2233 

22  )25 
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OCT 

22025 

47 

LEM  V.EIGHT 

A14481 

CSN  WEIGHT 

1449 

42, 2234 

22030 

1 

CCT 

2 2030 

48 

GIN6AL  PITCH  TRIM 

A 1449  1 

GINBAL  RCLL  TRIM 

14  50 

42,2235 

24C33 

1 

CCT 

24(;33 

49 

DELTA  R 

A 1450  1 

DELTA  V 

A 14502 

RACAR  DATA  SOURCE  COCE 

1451 

42,2236 

00000 

1 

CCT 

0 

50 

SPARE 

1452 

4?, 2237 

22'T41 

1 

OCT 

22041 
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S-BANC  ANTENNA  PITCH 

A14521 

YAW 

1453 

42,  224'' 

0CC44 

1 

OCT 

00044 

52 

central  ANGLE  CF  ACTIVE  VEHICLE 

1454 

42  ,2241 
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1 

CCT 

OOUOO 

53 

SPARE 

1455 

42,2242 

24C52 
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CCT 

24052 
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RANGE 
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A 14552 

THETA 
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A 145  £ 1 
A14582 
1459 

42 ,2244 

02060 

0 

OCT 

0206C 

56 

ELEVATICN  ANGLE 
CENTRAL  ANGLE 
RR  LCS  AZINLTH 

A 1459  1 

ELEVATICN 

1460 

42,2245 

GCQOO 

1 

CC  T 
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57 

SPARE 

1461 

42,2246 

24066 

1 

□ CT 

24066 

58 

PERIGEE  ALT 

A1461  1 

CELTA  V TPI 

A14612 

CELTA  V TPF 

1462 

42,2247 

24C71 

1 

CCT 

2 4071 

59 

CELTA  VELCCITY  LCS 

1463 

42,225C 

24C74 

1 

CCT 

2 4074 

60 

l-ORIZCNTAL  VELCCITY 

A14631 

6L1ITLDE  RaTE 

a 14632 

CONFUTED  ALTITLOE 

1464 

42, 2251 

646  77 

C 

OCT 

64C77 

61 

TINE  TC  GC  IN  BRAKING  PEASE 

M464  1 

TINE  TO  IGNITICN 

A14642 

CPCSS  RANGE  CISTAMCE 

1465 

42, 2252 

64  102 

r 

OCT 

64102 

62 

AfiSCLLTE  VALUE  CF  VELCCITY 

A 1465  1 

TINE  TO  IGNITION 

A14652 

CELTA  V ( ACCUNULATEC  ) 

1466 

42,2253 

24105 

0 

OCT 

24105 

63 

ABSCLLTE  VALLE  CF  VELCCITY 

A 1466  ! 

ALTITUDE  RATE 

A14662 

CCNFLTEC  ALTITUCE 

1467 

42,2254 

64110 

0 

OCT 

64110 

64 

TIME  LEFT  FOR  REDE S I GN A T I CN - L P C ANGLE 

A 1467  1 

ALTITUCE  FATE 

A14672 

CONPLTEC  ALTITUDE 

1468 

42,2255 

24113 

1 

CCT 

24113 

65 

SAMPLED  AGC  TINE  (HRS, MN, SEC) 

A14681 

(FETCFED  IN  INTERRUPT) 

14  70 

42,2256 

62116 

0 

OCT 

62  116 

66 

LR  RANGE 

A 1 47C  ] 

POSITION 

1471 

42,2257 

'"4  12  1 

1 

OCT 

04121 

67 

LPVX 

A 1471  1 

LP  VT 

A14712 

LRVZ 

147? 

42, 226C 

64  124 

1 

CCT 

64124 

68 

SLANT  RANGE  TC  LANCING  SIGHT 

A 1472  1 

TINE  TO  GO  IN  BRAKING  PHASE 

A14722 

LP  ALTITUCE  - CCNRUTEC  ALTITUCE 

1 47  3 

42  ,2261 

24127 

0 

OCT 

24127 

69 

LANDING  SITE  CCRRECTICN,  Z-CCNPCNENT 

A 1 4 7 3 1 

LANCING  SITE  CORRECIION,  Y-CCMPCNEN'T 

A1473? 

LANCING  SITE  CORRECTION,  X-CCNPCNFNT 

1474 

42 ,2262 

04132 

0 

OCT 

04132 

70 

A01  CETENT  CODE/STAP  CEDE 

1475 

42,2263 

0413  5 

1 

CCT 

04135 

71 

AOT  CETENT  COCE/STAR  CCCF 

1476 

42, 2264 

02140 

fj 

OCT 

C214C 

72 

RP  36C  - TRUNNICN  ANGLE 

A 1 4 7 6 1 

sfaft  angle 

1477 

42,2265 

C2  143 

r 

CCT 

02143 

73 

NEW  RF  360  - TRUNNICN  ANGLE 

A 1 4 7 7 1 

SHAFT  ANGLE 

1478 

42,2266 

64146 

0 

CCT 

64146 

74 

TINE  TO  IGNITION 

A14731 

yawafter  vehicle  rise 

A 1478? 

PITCH  AFTER  VEHICLE  RISE 

1479 

42,2267 
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c 

CCT 

64151 

75 

CELTA  alt  ItuCF  CCH 

A1479  1 

DELTA  TINE  (CCH-CSI  CP  TFI-CCH) 

A 1479? 
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A 1A80  1 
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lAfn 

42.2271 
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0 

OCT 

62157 

77 

DESIRED  RADIAL  VELOCITY 
CRCSS-PANGE  DISTANCE 
TINE  7C  ENGINE  CUTOFF 

A 1A8  1 1 

VELOCITY  NCPl'AL  TO  C SN  PLANE 

148? 

42, 2272 

64  162 

0 

CCT 

64162 

78 

PR  PANGE 

A14£?1 

RANGE  RATE 

A14872 

TINE  FRC»<  IGNITION 

1483 

42,2273 

24165 

0 

CCT 

24165 

79 

CURSOR  ANGLE 

A 1483  1 

SP  IRAL  ANGLE 

A14B32 

FCSITTCN  CODE 

1484 

4?  ,2274 

02  17’7 

n 

ncT 

02170 

80 

DATA  INDICATOR 

A 1484  1 

CMEGA 

1488 

42, 2275 

24173 

1 

CC7 

24173 

81 

CEITA  V (LV ) 

l48iS 

42,2276 

24176 

1 

GOT 

24176 

82 

DELTA  V (LV) 

1487 

42,2277 

24  201 

1 

CCT 

2 4201 

83 

DELTA  V (BCCY) 

1488 

42 ,23  70 

24204 

1 

CCT 

24204 

84 

DELTA  V (C7HEP  VEHICLE  ) 

1488 

42 ,2301 

24207 

1 

CCT 

24207 

85 

VC-  (BCDY) 

1498 

42,2302 

242  1 2 

c 

CCT 

24212 

86 

VG  (LV) 

1481 

42 ,23  >3 

02215 

0 

CCT 

02215 

67 

BACKLF  CPTICS  LOS  AZINLTH 

A 148  1 1 

ELEVATION 

1492 

42,  23'14 

24220 

1 

CCT 

2422U 

88 

HALF  LMT  SUN  OR  PLANET  VECTOR 

1483 

42,2305 

24223 

1 

OCT 

24223 

89 

LANDMARK  LATITUDE 

A14<^31 

LONGITUDE/2 

A14932 

ALTITUDE 

1484 

42,2306 

24226 

1 

CCT 

24226 

cr 

Y 

A14<34  1 

Y CCT 

A1484? 

PSI 

1488 

42 ,23L7 

04231 

U 

CCT 

0 4231 

9 1 

AL  T ITUDE 

M498  1 

VELCC  ITY 

A 14852 

FLIGHT  PATH  ANGLE 

1496 

42,231C 

CCOOO 

1 

CCT 

OOuOO 

92 

SPARE 

1487 

42,231 1 

0 4 2 3 7 

0 

CCT 

04237 

83 

DELTA  GYRC  angles 

1488 

4^  ,2312 

COOOO 

1 

CCT 

OOOOC 

84 

SPARE 

1489 

42,2^13 
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1 

CCT 

0 

95 

SPARE 

1 500 

42  ,2314 

000  70 

1 

rCT 

0 

86 

SPARE 

150! 

42,2315 

04253' 

' 1 

CCT 

04253 

87 

SYSTE("  test  INPUTS 

15'I2 

42,2316 

04256 

1 

OCT 

0 4256 

98 

SYSTEM  test  RESULTS 

15C3 

42,2317 

24261 

1 

ncT 

24261 

c c 

RMS  IN  PCSITICN 

A 15H3  1 

pi^s  IN  velocity 

A15n32 

RMS  IN  BIAS 

R 15C4 

8ND  OF 

NNAmAB  FCF 

8IXEC  NCLAS 

Aiaoo 

AN 

NCRNAL  NOUNS 

18C1 

42  ,2320 

00  0 00 

1 

NLiTYPTAE  OCT 

OCOCC 

CO 

NOT  IN  USE 

1802 

42 ,2321 

04040 

1 

CGT 

04040 

01 

3CCMP  fractional 

1803 

42,2322 

C4  14C 

0 

CCT 

0414C 

02 

3CCNF  WHOLE 

18C4 

42,2323 

14102 

n 

CCT 

0 4 10? 

03 

3C0MP  CDL  DEGREES 

1805 

42,2324 

CC5C4 

C 

CCT 

00504 

04 

ICCRP  CPCEG(360) 

1 8<>6 

42,2325 

00504 

0 

CCT 

0C504 

05 

ICCNF  CPDEG(360) 
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18U7 

92,2326 

C9CCC 

C 

rcT 

09000 

06 

3CCNF 

CCTAL  CNLY 

1 308 

92,2327 

C9000 

C 

CCT 

G9cac 

C7 

3CC8P 

CCTAL  CNLY 

1 809 

92,2330 

09  300 

0 

CCT 

U900C 

08 

3CCWP 

CCTAL  CNLY 

1310 

92,2331 

C9CCC 

C 

CCT 

C9C00 

09 

3CCNF 

CCTAL  CNLY 

1811 

92  ,2332 

00000 

1 

OCT 

CCClOO 

10 

ICCPP 

CCTAL  CNLY 

1812 

92,23^3 

2990G 

0 

CCT 

29900 

1 1 

3CCYP 

FYS  (DEC  ONL  Y ) 

1813 

92,2339 

02800 

0 

OCT 

C2000 

12 

2CC^P 

CCTAL  CNLY 

1819 

92,2335 

29900 

u 

CCT 

29900 

13 

3C0OP 

FMS  (DEC  CNLY) 

181? 

92,2336 

G919C 

c 

CCT 

091 9v.'' 

19 

3CCRP 

WHOLE 

1 816 

92,2337 

000(10 

1 

CCT 

GCOOO 

15 

ICCRF 

CCTAL  CNLY 

1817 

92  ,2  390 

29900 

0 

CCT 

29900 

16 

3CCMP 

FNS  (DEC  ONLY) 

18)8 

92,2391 

OOOOO 

1 

CCT 

0 

17 

SPARE 

1819 

92,2392 

09  10  2 

0 

OCT 

09102 

18 

3C  C N P 

ecu  DEG 

1820 

92,2393 

CCCOC 

1 

CCT 

ooco 

19 

SPARE 

182.1 

92,2399 

G9102 

0 

CCT 

09102 

20 

3CCNF 

ecu  CEGPEES 

1822 

92 ,2395 

C9190 

0 

CCT 

09  190 

21 

3CCVP 

WFCLE 

1823 

92,2396 

09102 

0 

CCT 

09102 

22 

3CC'^P 

ecu  DEGREES 

1829 

92,2397 

COOOO 

1 

CCT 

OCCOO 

23 

SPARE 

1825 

92  ,2350 

2990  } 

0 

CCT 

2990C 

29 

3C0MP 

EPS  (DEC  CNLY) 

1826 

92,2351 

09  190 

f 

CCT 

0919C 

25 

3CCNF 

WFCLE 

1827 

92  ,2352 

09000 

0 

OCT 

G90O0 

26 

3CCPP 

CCTAL  CNLY 

1828 

92,2353 

C C 1 9 C 

1 

CCT 

00190 

27 

ICCPP 

WFCLE 

1820 

92,2359 

COOGO 

1 

OCT 

ocooo 

28 

SFAFE 

1 830 

92,2355 

GOQOO 

1 

OCT 

OCOOO 

29 

SPARE 

1831 

92,2356 

CC''GO 

1 

CCT 

0 

30 

SPARE 

1 332 

92,2357 

00000 

1 

CCT 

0 

31 

SPARE 

1833 

92 ,2360 

299)0 

0 

CCT 

2 9 900 

32 

3CCNIP 

FMS  (DEC  CNLY) 

1839 

92,2361 

299CC 

c 

CCT 

2 9900 

33 

3CCNF 

F'^S  (DEC  CNLY) 

1 835 

92,2362 

29900 

0 

ncT 

29900 

39 

3CCYP 

HNS  (DEC  CNLY) 

1 836 

92 , 2 36  3 

2 9 90  0 

f 

CCT 

29900 

35 

3CCNF 

Hf^S  (DEC  ONL  Y ) 

1 837 

92,2369 

29900 

(■ 

OCT 

29900 

36 

3CCNF 

FFS  (DEC  CNLY) 

1838 

92,2365 

29900 

0 

OCT 

2 9900 

3 7 

3CQMP 

HPS  (DEC  CNLY) 

1839 

92,2366 

2991C 

c 

CCT 

29900 

38 

3CCNP 

FWS  (DEC  ONLY) 

189'^ 

92 , 2367 

COOOO 

1 , 

OCT 

CCOOC 

3 9 

SPARE 

R 1890  1 

END  CF  NNTYPTAB  FCR 

NCRPAL  NCLNS 

A18902 
1 891 

92  ,2  370 

29  500 

1 

OCT 

29  500 

NN 

90 

FIXED 

3CCFF 

NCUNS 

NIN/SEC,  VEL3,  VEL3 

A1891 1 

(NC  LOAD,  DEC  ONLY ) 

1892 

92,2371 

00592 

1 

CCT 

00592 

91 

2CCFF 

ecu  CEG,  ELEY  DEG 

1 893 

92,2372 

29910 

1 

CCT 

29910 

92 

3CCNP 

P0S9,  PCS9,  YEL3 

A18931 

(CEC  CNLY) 

1 899 

92,2373 

20209 

0 

OCT 

2C2C9 

93 

3CCFP 

0FDEG(360),  CFCEG(360),  FCS9 

A 1899  1 

(DEC  ONLY) 

1895 

92,2379 

0C910 

1 

OCT 

0 C 9 1C 

9 9 

3CCFF 

FCS9,  FCS9,  FIN/SEC 

A18951 

(NC  LCAC,  DEC  CNLY) 

1 896 

92,2375 

ICCOO 

0 

CCT 

1 00  ,10 

95 

3CCFP 

WFCLE,  MINI/SEC,  CPCEG(36G) 

A18961 

(NC  LCAC  , CEC  CNLY ) 

1897 

92 ,2376 

000, JO 

1 

CCT 

00000 

96 

ICCFP 

CCTAL  ONLY 

GAP 
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1 84  8 

42,2377 

00  306 

1 

CCT 

GC306 

47 

2CCNF 

WEIGFT2  8CP  EACF 

A 18481 

(DEC  ONLY) 

1849 

42, 2*0f 

01367 

1 

CCT 

0 1367 

48 

2CCYP 

TRIP  CEG2  FCR  EACH 

A18491 

(CEC  CNLY) 

1850 

42,2401 

00510 

0 

CCT 

OC510 

49 

3CC^P 

PCS4,  YEL3,  V,F-C1E 

A1850  1 

(CEC  CNLY) 

1 851 

42 ,2402 

ooooo 

1 

GCT 

0 

5C 

SFAFE 

1852 

4?  ,2403 

CC204 

1 

CCT 

002)4 

51 

2CCf'P 

DPDEG(360I,  CPCFG(36C) 

A18521 

(CEC  CNLY) 

1853 

42 ,2404 

00004 

0 

CCT 

00004 

52 

ICCMP 

CPDEG(36C) 

1854 

42 , 2405 

cooco 

1 

CCT 

OOOOO 

53 

SPARE 

1 855 

42,2406 

IC507 

1 

OCT 

1C507 

54 

3CC8P 

FCS5,  VEL3,  CFCEG(360) 

A 1655  1 

(DEC  ONLY) 

1858 

42 , 24C7 

1C200 

1 

CCT 

102  00 

55 

3CCNF 

WFCLE,  CPDFG(36C),  CPCEG(360) 

A 1 8 5 6 1 

(CEC  CNIY) 

1859 

42 ,241  C 

00204 

1 

CCT 

00204 

56 

2CC^P 

CP0EG(360),  CPDEG(36C) 

1 86;' 

42,2411 

f OOOO 

1 

OCT 

CCOOC 

57 

SFAFE 

A 1860  1 

(DEC  ONLY) 

1861 

42,2412 

2451C 

c 

CCT 

24510 

58 

3CC8P 

FCS4,  VEL3,  VEL3 

A1861  1 

(CrC  CNLY) 

1 86? 

42,2413 

24512 

1 

CCT 

24512 

59 

3CCNP 

VEL3  FCR  FACE 

A1862  1 

(CEC  CNLY) 

1 863 

42,2414 

60512 

1 

OCT 

6C512 

60 

3CC8P 

VEL3,  V8L3,  CCPF  ALT 

A 1663  1 

(DFC  CNLY) 

1 864 

42,2415 

54000 

0 

OCT 

54C0C 

61 

3CCAF 

PI'N/SEC,  f'IN/SEC,  PCS7 

A 1 86A  1 

(NC  LCAD,  DEC  CNLY) 

1865 

42,2416 

24C12 

1 

CCT 

24012 

62 

3CCWF 

VEL3,  MIN/SEC,  VEL3 

A18651 

(NC  LCAC,  CEC  CNLY) 

1866 

42,2417 

60512 

1 

CCT 

60512 

6 3 

3CCMP 

VEL3,  VEL3,  CCMF  ALT 

A1R66  1 

(CEC  CNLY) 

1 667 

42,2420 

6 T50J 

1 

UCT 

6C5CC 

6^ 

3CCPP 

2 1 NT,  VEL3,  CCPF  ALT 

A1 8671 

(NC  LOAC,  CEC  ONLY ) 

1868 

42,2421 

oooco 

1 

OCT 

OCCOO 

65 

3CCAF 

F^S  (CEC  ONLY  ) 

1 869 

42,2422 

00016 

CCT 

,10016 

66 

2CCWP 

LANCING  RADAR  ALT,  PCSITTCN 

A18691 

(NO  LCAC,  DEC  ONLY) 

1 870 

42,2423 

53223 

1 

CCT 

53223 

67 

3CCPP 

LANCING  PACAR  VFLX  , Y , 1 

1871 

42  ,2424 

60026 

0 

CCT 

60026 

68 

3C0WP 

P0S7,  PIN/SEC,  CCPR  ALT 

A1871  1 

(NC  LCAC,  CEC  CNL  Y ) 

1 872 

42,2425 

61430 

1 

OCT 

6 1430 

69 

3C  CPF 

CCPF  ALT,  CCPF  ALT,  CCPF  ALT 

A 1872  1 

(DEC  ONLY) 

1873 

4 2 , 2 4 2 6. 

oocno 

1 

CCT 

D 

70 

3CCNF 

CCTAL  CNLY  FCR  EACF 

1874 

42 ,2427 

OOOOO 

1 

OCT 

0 

7 1 

3C  CPP 

OCTAL  CNLY  FCR  EACH 

1875 

. 42,243C 

00102 

1 

CCT 

0010  2 

72 

2CCMF 

360-CCU  DEG,  CCU  DEG 

1 876 

42,2431 

to  102 

1 

OCT 

0C1O2 

73 

2CCPF 

36C-CDU  DEG,  CCL  CEG 

1877 

42,2432 

10200 

1 

CCT 

10200 

74 

3CCMP 

MIN/SEC,  DPDEGl  360)  ,DFDEG (360) 

A1R77  1 

(NC  LCAC,  CEC  CNLY  ) 

1878 

42,2433 

00010 

0 

OCT 

COOIC 

75 

3CCPP 

FCS4,  PIN/SEC,  PIN/SEC 

A 1878  1 

(NO  LOAC,  CEC  ONL  Y ) 

1 879 

42, 2434 

20512 

c 

CCT 

2C512 

76 

3CCPF 

VEL3,  VEL3,  FCS4 

ftlETSl  (OfC  ONLY) 
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^2, 2435 

CC50C 

1 

OCT 

0C5QC 

77 

2CCNF 

MN/SEC,  VFL3 

A 18801 

(NO  LOAC,  DEC  CMV) 

188  1 

42,2436 

0C654 

0 

CCT 

30654 

78 

3CCPP 

RR  RANGE,  RR  RANGE  RATE,  P/S 

A1881  1 

(NC  LCAC,  CEC  CMY  ) 

188? 

42 ,2437 

001  )2 

1 

CCT 

00102 

79 

3C0MP 

COL  DEG,  COL  DEG,  InHCLE 

A18821 

(CEC  CNLY) 

1 888 

42,2440 

00  200 

3 

CCT 

CC20C 

80 

2CCAF 

^iHCLE,  DFDFG(360) 

1884 

42 ,2441 

2451  2 

1 

CCT 

2451? 

8 1 

SCCYF 

VEL3  FOR  EACE 

A18841 

(CEC  CNLY) 

1685 

42 , 2442 

24512 

1 

OCT 

24512 

82 

3C0MP 

VEL3  FOR  EACH 

A 1885  1 

( CFC  ONLY  1 

1 8 86 

42,2443 

24512 

1 

OCT 

24512 

83 

3CCPP 

VEL3  9CR  EACH 

A 1 886  1 

(DEC  CNLY) 

1887 

^2 , 2444 

24  = 12 

1 

CCT 

2 4512 

84 

3CCNF 

VEL3  FCR  EACH 

Al  6871 

(CEC  CNLY) 

1888 

42 ,2445 

24512 

1 

CCT 

2 4512 

85 

3CCMP 

VEL3  FOR  EACH 

A18881 

(CEC  CNLY) 

1889 

42,2446 

24512 

1 

CCT 

24512 

66 

3CCMP 

VEL3  FOR  EACH 

A18891 

(CEC  ONLY) 

1890 

42, 2447 

0C1C2 

1 

CCT 

or  102 

87 

2C  CPF 

CCL  DEC-  FCR  EACH 

1891 

42  ,2450 

00000 

1 

CCT 

n 

88 

3CGWP 

FRAC  FOR  EACH 

A18912 

(CEC  CNLY) 

1892 

42,2451 

16143 

0 

OCT 

16143 

69 

3CCNP 

DFDEG  (90,  CFCEG  (90  ) , FCS5 

A 1892  1 

(CEC  ONLY) 

1 893 

42, 2452 

10  50  7 

1 

CCT 

10  507 

SO 

3CCNF 

FCS5,  VEL3,  CFCEC-(360) 

Al  893  1 

(DEC  CNLY) 

1894 

42, 2453 

10450 

1 

CCT 

1 3450 

91 

3CCPP 

PCS4,  VEL2,  CPDEG(36C) 

1 895 

42,2454 

00000 

1 

OCT 

OCMOO 

92 

SPARE 

1896 

42,2455 

06  143 

1 

CCT 

0 6 14  3 

S3 

3CCMP 

CPDEG(90  FOR  EACH 

1 897 

42 , 2456 

OOOOO 

1 

CCT 

ncooo 

94 

SPARE 

1898 

42,2457 

OO’JOO 

1 

OCT 

0 

95 

SPARE 

1899 

42 , 246C 

00  con 

1 

CCT 

0 

96 

SPARE 

1900 

42, 2461 

occoc 

1 

OCT 

OOGOO 

97 

3CCPP 

WHCLE  FCP  EACH 

1901 

42 ,2462 

OOOOO 

1 

CCT 

OOOOO 

se 

3CCMP 

VvHOLE,  FRAC,  (-HCLE 

19)2 

42, 2463 

71572 

1 

CCT 

71572 

99 

3CCPF 

FCS9,  VEL4,  RADIANS 

A1932  1 

, 

(CEC  CNLY) 

R 1903 

PNO  CP 

NMYPTA8  FCP 

MXEC  NCIJNS 

2200 

42,2464 

L 6 

1 

SFINTAB  OCT 

0 6006 

PiHCLE  , CP  TIPE  (SEC) 

2201 

42  ,2465 

03  240 

1 

OCT 

03240 

2 2C2 

42,2466 

CCCOO 

1 

CCT 

OOOOO 

SPARE 

2203 

42, 2467 

CO  000 

1 

OCT 

OOnoo 

22C4 

■42 ,2470 

000)3 

1 

CCT 

OOOOO 

CDL  DEGREES,  36C-CDL  DEGREES 

22)5 

42,2471 

CC08G 

1 

CCT 

03000 

(SFCCNS  IN  CEGINSF  ) 

2206 

42,2472 

!■'  7C7 

C 

OCT 

107(7 

CP  DEGREES  (90 

22C7 

42 , 2473 

C3435 

0 

CCT 

03435 

IPPEC  BY  1 

2298 

42,2474 

13C70 

1 

CCT 

1 3070 

CP  CEGREES  (360)(F0INT  6E7WN  BITS  11-12) 

2?.r  9 

42, 2475 

34  3 4 5 

1 

OCT 

3^345 

LPPEC  BY  1 

2210 

42 ,2476 

0000  5 

1 

CCT 

3 0005 

DEGREES  (180) 
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2211 

42,2477 

21616 

0 

OCT 

21616 

2212 

42  ,2500 

26  113 

0 

CCT 

26113 

WE  1GHT2 

2213 

42, 25  U 

31713 

c 

OCT 

31713 

2214 

42 ,25.12 

00070 

0 

OCT 

U0070 

PCS  IT  ICN  5 

2215 

4 2 , 2 5 3 

2C46C 

1 

CCT 

20460 

2216 

42,2514 

0 1 C 6 5 

c 

CCT 

01065 

FCSITICN4 

2217 

42 ,2505 

05  740 

1 

CCT 

05740 

221B 

42,2506 

11414 

c 

CCT 

11414 

VELCC1TY2  <PCINT  BETWN  BITS  11-12) 

2219 

42,2507 

31463 

1 

CCT 

31463 

2 2 20 

42  ,2  510 

07475 

0 

CCT 

07475 

VELnClTY3 

2221 

42,2511 

160  5 1 

1 

cr  T 

16051 

2222 

42 ,2512 

OOOOl 

0 

ncT 

OOOOl 

ELEVATION  DEGREES 

2223 

42,2'=12 

03434 

1 

CCT 

03434 

2224 

42,2514 

0CG4  7 

1 

OCT 

CC047 

FFNCtZVCLS  RAEAP  RANGE 

2225 

42,2515 

21135 

0 

CCT 

21135 

2226 

42,2516 

7 7(66 

r 

CCT 

77766 

FENCFZVruS  RACAR  RANGE  RATE 

2227 

42  ,2517 

50  71  1 

0 

OCT 

5C71 1 

2228 

42  ,252C 

00005 

1 

2CEC* 

.926734)599 

E5 

E-28  « LANDING  RADAR  ALTITLDE 

2228 

42,  252  1 

250C6 

c 

2230 

42,2522 

00002 

0 

CCT 

00002 

TNITIAL/FINAL  ALTITLDE 

2231 

42,2522 

23224 

1 

CCT 

23224 

223? 

42,2524 

00014 

1 

CCT 

00014 

ALTITLDE  RATE 

2233 

42,2525 

06500 

1 

CCT 

06500 

2234 

42,2576 

00012 

1 

CCT 

0C012 

FCRVsAPC/ LAT  ERAL  VELCCITY 

2235 

4? ,2527 

36455 

c 

OCT 

36455 

2236 

47,2530 

04256 

1 

CCT 

04256 

ROT  HAND  CCNT  ANGLE  RATE 

2237 

42,2531 

0737  1 

0 

CCT 

07071 

223  e 

42,2532 

77766 

0 

2DEC4 

- 1,55279503c 

E5 

B-28  -7  LANCING  RADAR  VEIX 

2238 

42,2533 

60  5 5 7 

c 

2240 

42,2534 

0C0O5 

1 

2PEC« 

, E25CE25087 

E5 

E-2E  7 LANCING  RAQAR  VELY 

2240 

42,2535 

01114 

1 

2242 

42,2536 

0CCC7 

0 

2DEC=!' 

1.153668673 

E5 

E-28  7 lancing  radar  VELZ 

224? 

42,2537 

0124,7 

1 

2244 

42 ,254C 

04324 

0 

CCT 

'14324 

POS  IT  ICN7 

2245 

42,2541 

276Q0 

1 

OCT 

2 7600 

2246 

42,2542 

000  36 

1 

OCT 

0 0036 

TRIM  CEGREES2 

2247 

^2,2543 

2C44C 

c 

CCT 

2C440 

2248 

42,2544 

000  3 5 

1 

CC  T 

00036 

CCMFLTEC  ALTITUCE 

2249 

42,2545 

3040  1 

0 

CCT 

3C40C 

2250 

42,2546 

23420 

c 

CCT 

23420 

DP  DEGREES 

2251 

42,2547 

0000  ) 

1 

CCT 

OCOOO 

2252 

42,2550 

01670 

1 

2CEC 

30480 

B-19 

POSIT  ION  9 

225? 

42,2551 

20000 

0 

2253 

^2,255? 

07475 

c 

2DEC 

3C  .4F 

6-7 

velocity^ 

2253 

42,2553 

16C51 

1 

2254 

42,2554 

144091 

0 

20EC 

ICC  B- 

•8 

RACI  ANS 

2254 

42,2555 

000  11 

1 

A22*;n  E^^;  CF  SFINTAE 
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23CO 

42,2556 

95174 

n 

SFCUTAB  COT 

05  174 

^^HCLE  , CF  TINE  ( SEC  ) 

2 3H 

42,2557 

13261 

0 

CCT 

13261 

231? 

42,2560 

009  10 

1 

OCT 

OCCOC 

SPARE 

2303 

42  ,2561 

0099  7 

1 

CCT 

ononn 

23-^4 

42,2562 

occoo 

1 

CCT 

OOCOQ 

ecu  DEGREES,  36'9-CDU  CEGPEES 

2305 

42 ,2563 

990  19 

1 

QCT 

ccooc 

( SFCCNS  IN  DEGQUTSF  , 360 

-Cr.LG  ) 

2396 

42,2564 

00714 

9 

CCT 

00714 

CP  CEGREES  (90)  (POINT  BETl^N 

BITS 

7-8) 

2307 

42, 2565 

21463 

1 

CCT 

31463 

23f.B 

42 ,2566 

13412 

1 

OCT 

13412 

DP  DEGREES  (360 

2399 

42,2567 

Q7534 

1 

CCT 

97534 

2310 

42,2570 

05605 

1 

CCT 

056C5 

CEGREES  (180) 

2311 

42 ,2‘=71 

03656 

1 

CCT 

0 3656 

2312 

42,2572 

ccro  1 

0 

CCT 

oooni 

V«F  IGET2 

2313 

42,2573 

16170 

0 

ncT 

1617C 

2314 

42,2574 

00441 

0 

CCT 

00441 

POSIT  10N5 

2315 

42,2575 

3 4 3 ^ 6 

( 

CCT 

34306 

2316 

42,2576 

97176 

0 

OCT 

97176 

PGSITI0N4  (POINT  BEUN 

BITS 

7-8  ) 

2317 

^2,2577 

216C3 

1 

CCT 

2 1603 

231B 

4 2,  2 60C 

1 5349 

1 

CCT 

1 534C 

l/ELCC  n V2 

2319 

42,2601 

15349 

1 

CCT 

15340 

232  ■) 

42, 2602 

01C31 

1 

CCT 

01.31 

VELCC1TY3  (POINT  EETWN 

P ITS 

7-fi  ) 

232  1 

42  ,2603 

21032 

0 

OCT 

2 1032 

232  2 

42 ,2604 

34631 

1 

CCT 

34631 

ElEVATION  CEGREES 

2323 

42,2605 

23  146 

c 

CCT 

23146 

2324 

42,2606 

00636 

1 

OCT 

90636 

RFN0E2V0LS  RADAR  RANGE 

2325 

42,2677 

14  552 

c 

CCT 

14552 

2326 

42,2610 

74552 

c 

OCT 

74552 

PENCLZVCLS  RACAR  RANGE  RATE 

2327 

42  ,261  1 

70307 

1 

CCT 

70307 

2328 

42,2612 

C552C 

c 

2DFC 

1 .079 

E-5 

814 

LANCING  RADAR  ALTITUDE 

2 32  E 

42 ,2613 

15312 

0 

2339 

42,2614 

14226 

1 

CCT 

14226 

INITIAL/FINAL  ALTITUDE 

2331 

42,2615 

31757 

f 

OCT 

31757 

233? 

42  ,2616 

924  76 

0 

GCT 

02476 

ALTITUDE  RATE 

2333 

42,2617 

C5531- 

■ r 

CCT 

05531 

2334 

42,2620 

02727 

1 

GC  7 

02727 

FCPluAFC/LATEPAL  VELCCITY 

2335 

4^,2621 

16415 

0 

CCT 

16415 

2336 

42,2622 

0'1G07 

c 

CCT 

00007 

rct  hanc  ccnt  angle  pate 

2337 

42,2623 

13734 

0 

OCT 

13734 

2 338 

42 ,2624 

74477 

0 

2CFC 

- .6440 

E-5 

E14 

LANCING  RADAR  VELX 

2338 

42,2625 

50643 

9 

2340 

42,2626 

06265 

0 

20EC 

1.212 

E-5 

B 14 

LANDING  RADAR  VELY 

234U 

42,2627 

16''0  4 

1 

2 342 

42,2630 

3 4 4 2 6 

r 

20CC 

. 8668 

r-5 

P14 

LANCING  RACAP  VELZ 

2342 

42,2671 

31433 

1 

2344 

42, 2632 

3477? 

1 

CCT 

34772 

PCS  IT  1CN7 

2345 

42 ,2633 

07016 

1 

OCT 

0 7C1  6 

2346 

42 ,2634 

01039 

0 

CCT 

9 1030 

TRIW  CEGPFFS2 

2347 

^2,2635 

3 3 6 7 5 

c 

OCT 

33675 

2348 

42 ,2636 

91946 

1 

GCT 

0 in 46 

CONPUTED  ALTITUDE 

234C 

42,2637 

157C0 

1 

CCT 

1 5700 
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235C 

42 , 2540 

OJ321 

1 

cn 

00  321 

CP  DEGREES 

2351 

42t  2E41 

267C6 

1 

CCT 

2 6706 

235? 

42, 2642 

04221 

0 

20  EC 

17.2010499  E-7 

FCSITICN  9 

2352 

42,2643 

27430 

3 

2353 

42,2644 

01C3  1 

1 

2DEC 

.C328C8399 

VELCr  ITY4 

2353 

42,2645 

21332 

0 

235A 

42,2646 

12  172 

0 

2CEC 

.32 

RACIANS 

235A 

42,2647 

24122 

1 

A23Sf 

END  OF  SFOUTAB 

A2400 

NN 

SF  CCNSTANT 

SF  ROLTINE 

2401 

REF 

1 t 

LAST 

307 

42,2653 

33453 

0 

ICADCTAB  ECADP 

TTOGO 

40 

PIN/SEC 

P/S 

2 40? 

REF 

1 

42,2651 

03663 

1 

ECACP 

VCr  ISF 

40 

VEL  3 

DP3 

2433 

REF 

2 

LAST 

14E 

42,2652 

02  5 17 

C 

ECACR 

D\/TCTAL 

40 

VEL3 

CP2 

2404 

REF 

8 

LAST 

307 

42,2653 

11044 

0 

ECADP. 

DSPTENl 

4 1 

COL  DFG 

ecu 

2405 

PFF 

9 

LAST 

3 1 f 

42,2654 

01045 

1 

ECACP 

DSPTFPl  +1 

41 

ELEV  CEG 

ARTH 

2406 

42, 2655 

COOOO 

1 

QCT 

0 

41 

SPARE  CCPFCNEMl 

24C7 

REE 

3 

LAST 

284 

42,2656 

02316 

1 

ECACR 

HAPO 

42 

P0S4 

CF3 

243  8 

REF 

1 

42,2657 

C2320 

1 

ECADP 

HFER 

42 

PCS4 

DP  3 

2439 

REF 

2 

LAST 

315 

42 , 2660 

33663 

1 

ECADP 

VGDT  SP 

42 

VE  L3 

CF3 

241*^ 

RE<= 

2 

LAST 

1C4 

42 ,2661 

01117 

1 

ECADP 

LAT 

43 

CPDEGl 360 ) 

DP4 

2411 

REF 

2 

LAST 

1G4 

42,2662 

01121 

1 

ECACP 

LCN'G 

43 

C F C 6 G < 3 60  ) 

CP4 

2412 

REF 

2 

LAST 

104 

42  ,2663 

01123 

0 

ECAEP 

ALT 

43 

P0S4 

DF3 

?4  1 3 

REF 

2 

LAST 

lie 

42,2664 

C2117 

1 

ECACP 

HA  PCX 

44 

F0S4 

0P3 

2414 

REE 

1 

42,2665 

02  12  1 

1 

FCADR 

H FFPX 

44 

FCS4 

DP3 

2415 

REF 

2 

LAST 

116 

42 ,2666 

02  140 

0 

ECACR 

TFF 

44 

Ml  N'/SFC 

P/S 

2416 

REF 

3 

LAST 

24  1 

42 , 2667 

03462 

1 

ECACP 

TRKNiKCNT 

45 

WHCLE 

ARTH 

241  7 

REF 

11 

1 AST 

315 

42,2673 

03453 

0 

ECADR 

TTOGC 

45 

PIN/SEC 

P/S 

2418 

REF 

1 

42,2671 

02252 

0 

ECACP 

+ NGA 

45 

CPCEG(360) 

DP4 

2419 

REF 

1 1: 

LAST 

294 

42,2672 

C 1240 

1 

ECACR 

DAPOATRl 

46 

CCTAL  CNLY 

OCT 

242C 

42,2673 

0000  0 

1 

OCT 

3 

46 

SPARE  CCPPCNENT 

2421 

42,2674 

OCCOO 

'1 

CCT 

3 

4 6 

SPARE  CCYRONENT 

2422 

REF 

11 

LAST 

296 

42,2675 

01326 

1 

ECADR 

LEPPASS 

47 

LEIGFT2 

ARTF  1 

2423 

REF 

4 

LAST 

296 

42,2676 

31  32  7 

0 

ECACR 

CSI^MASS 

47 

NE  IGHT2 

APTHl 

2424 

42,2677 

CCCOC 

1 

CCT 

0 

47 

SPARE  CCPPCNENT 

2425 

REF 

1 

42 ,2700 

0 3032 

0 

ECADR 

PITTIME 

48 

TRIP  DEG2 

APTH 

2426 

REF 

2 

LAST 

297 

42  ,2  7 n 

03001 

3 

ECACP 

RCLLTIME 

48 

TR  IP  CEG2 

ARTH 

2427 

42,2702 

CCOOO 

1 

CCT 

0 

48 

SFARF  CC»'FCNENT 

2428 

PER 

1 

4?  ,27u3 

33314 

1 

ECACP 

P22DISP 

49 

PC54 

CF3 

2429 

REF 

2 

LAST 

3 1 5 

42 , 270A 

90316 

c 

ECACR 

R22CISF  +2 

49 

VEL2 

CP  2 

2430 

REF 

1 

42,2735 

01356 

0 

ECADR 

VvHCHPEAC 

49 

WHCLE 

APTH 

2431 

42  ,2  7 16 

03  300 

1 

CCT 

0 

50 

SPARE 

2432 

42,2707 

CCQ30 

1 

CCT 

0 

53 

SPARE 

2433 

42 , 271 3 

00330 

1 

CCT 

0 

50 

SPARE 

24  34 

REF 

4 

LAST 

28  1 

42,2711 

02300 

1 

ECACP 

ALPHASR 

5 1 

CPCEG(360) 

DP4 

2435 

REF 

3 

LAST 

119 

42,2712 

0 2 2)2 

0 

ECADR 

3FTASB 

51 

CPCEG  (360 ) 

DP4 

2436 

42,2713 

OCOOC 

1 

OCT 

0 

51 

SPARE  CCPPCNENT 

2437 

OFF 

1 

42 , 27  14 

■ 117  5 5 

1 

ECACP 

ACTCENT 

52 

CPDEG  (360  I 

DP4 

gap;  assemble  PFVISTCN  116  CF  AGC  PRCGR<5i>'  LU^INAPY  by  ^,as/i  2021112-071 


I^tC^  ALG.  1 1,1969  LE^|^^  AID.C99  PAGE 31  6 


L PINB/'LL  NCUK'  TflBl  ES 


LSEF'S  pyiGE  ^C.  15  EC  SA 


2A36 

2439 

244’i 

42.2715 

42.2716 
42,  271  7 

00000 

CCCOO 

occoo 

1 

1 

1 

OCT 

CCT 

OCT 

CCCOC 

00000 

00000 

52 
52 
5 3 

SPARE  CCRFCREM 
SPARE  CC^PDNENT 
SPARE 

244  1 

42 ,2720 

O'lOOO 

1 

CCT 

ODUUO 

c - 

2442 

42,2721 

ocooo 

1 

CCT 

00060 

53 

2443 

REF 

7 

LAST 

119 

42,2722 

02200 

1 

ECADR 

RANGE 

54 

P0S5 

CPI 

2444 

REF 

LAST 

1 1 6 

42,2723 

02  202 

0 

ECACF 

RFATE 

54 

VEL2 

DP3 

2445 

RFF 

•3 

L AST 

116 

42,2724 

C22U4 

c 

ECADR 

RTHETA 

54 

CPCEG  (36  > ) 

CP4 

2446 

R'=F 

2 

LAST 

199 

42,2725 

03466 

0 

FCACR 

NK 

C C 

WHC  LE 

ARTE 

2447 

r;^f 

3 

LAST 

199 

42, 2726 

02256 

1 

fCACP 

ELEV 

55 

CPEEG  (360  ) 

DPA 

2448 

RFF 

2 

LAST 

199 

42, 2727 

0 2 6 20 

0 

ECADR 

CENTANG 

55 

CPCEG  (360 ) 

DP4 

2449 

REF 

5 

LAST 

30  1 

42,273C 

02  200 

1 

ECADR 

RR-AZ 

56 

DPCEC ( 36C  ) 

CF4 

2450 

REF 

2 

LAST 

30  1 

42,273  1 

022C2 

Q 

FCACP 

RR-ELEV 

56 

CPCEG  (36.)  ) 

DP4 

2451 

42, 2732 

00000 

1 

CCT 

0 

56 

SPAPF  CCRFCNFRT 

2452 

42,2733 

OCOOO 

1 

CCT 

0 

57 

SPARE 

2453 

42,2734 

00000 

1 

rcT 

(5 

57 

SPARE 

2454 

42,2735 

ocooo 

1 

ncT 

0 

57 

spare 

2455 

RFF 

2 

LAST 

142 

42,2736 

03605 

1 

FCACP 

PCSTTPI 

58 

FCS4 

DP2 

2456 

REF 

5 

L-'ST 

142 

42,2737 

03  5 7 5 

0 

ECADR 

DEIVTPI 

58 

VFL  3 

0P3 

2457 

pPF 

2 

LAST 

199 

42,2740 

02347 

0 

ECADR 

DELVTPF 

58 

VEL3 

CP3 

245P 

REF 

1 

42,2  74  1 

C2302 

1 

ECADR 

ovt.cs 

59 

VEL3 

DP  2 

2459 

ref 

2 

LAST 

31  6 

42,2742 

02304 

1 

ECADR 

DVLGS  +2 

59 

VEL3 

CP3 

2 4 60 

RFF 

*3 

LAST 

316 

42,2743 

02  306 

0 

ECADR 

rVLCS  +4 

59 

VFL2 

CP2 

2461 

RFF 

2 

L AST 

120. 

42,2744 

022  62 

0 

ECADR 

VHCRI Z 

6t' 

VE13 

CP  2 

2462 

FEF 

3 

LAST 

148 

42 ,2745 

03473 

1 

ECADR 

HCOTD  ISP 

60 

VE12 

CP3 

2463 

FEE 

1 

42,2746 

03774 

c 

ECADR 

HCALCl 

60 

CCRP  ALT 

DP  1 

2464 

REF 

2 

LAST 

148 

42,2747 

02475 

1 

ECADR 

T TFOI SP 

61 

RIR/SEC 

M/S 

24  6 5 

RFF 

12 

LAST 

315 

42,2750 

03453 

0 

ECADR 

TTDGC 

6 1 

MI  (M/ SEC 

R/S 

2466 

REF 

2 

LAST 

122 

42,2751 

02616 

1 

ECADR 

CLTCFFLA 

61 

FCS7 

DP4 

2467 

RFF 

2 

LAST 

148 

42,2752 

034  71 

ECADR 

abvel 

62 

VEL3 

CP3 

2468 

RFF 

12 

LAST 

316 

42,2753 

03453 

0 

ECADR 

TTDGC 

62 

MIN/S8C 

M/S 

246'a 

REF 

*a 

LAST 

3 15 

42,2754 

C3507 

0 

ECADR 

DVTOTAL 

62 

VEL3 

DP2 

2470 

RFF 

3 

LAST 

316 

42,2755 

0347  1 

0 , 

ECADR 

AeVEL 

62 

YEL2 

CP3 

2471 

RFF 

4 

LAST 

3 16 

42,2756 

0 3 4 7 3 

1 

ECACF 

HCCTC ISF 

63 

VEL2 

DP2 

2472 

REF 

2 

LAST 

316 

42,2757 

G 3 7 7 4 

c 

ECADR 

HCALC  1 

63 

CCNF  alt 

DPI 

2473 

R'^F 

5 

LAST 

15  1 

42 ,2760: 

03666 

L 

ECADR 

FUNNYCS  F 

64 

21  NT 

21  NT 

2474 

RFF 

5 

LAST 

316 

42,2761 

C3473 

1 

ECADR 

HCCTDISF 

64 

VEL3 

0P2 

2475 

REF 

2 

LAST 

148 

42,2762 

03534 

0 

ECADR 

HCALC 

64 

CORP  ALT 

DPI 

2476 

REF 

2 

LAST 

2C8 

42  ,2  763 

00013 

0 

EDACF 

S ARPT IME 

65 

EMS  (MIXED  CNLV  TC  KEEP  CCDE 

65)  HMS 

2477 

REF 

3 

LAST 

3 16 

<^2  , 2 764 

00013 

0 

ECACF 

SARPTIRE 

65 

EMS 

ERIS 

2478 

REF 

4 

LAST 

316. 

42 ,2765 

000  13 

n 

ECADR 

SARPT  TRIE 

65 

HRS 

EMS 

2479 

REF 

3 

LAST 

278 

42,2  766 

02206 

1 

ECACF 

RSTACK  +6 

66 

lANCING  RACAP  ALT 

DP  1 

2480 

42,2767 

oooao 

1 

CCT 

0 

66 

LR  FCSniCN 

LPPCS 

2481 

42  ,2  770 

00006 

1 

CCT 

0 

66 

SPARE  CCRPCNENT 

2482 

REF 

4 

LA  ST 

316 

42 ,2771 

02200 

1 

ECADF 

RSTACK 

67 

LANCING  RADAR  VELX 

DP  1 

2483 

REF 

5 

LAST 

316 

42 ,2772 

0 2RO2 

0 

ECADR 

RSTACK  +2 

67 

LANDING  radar  vELY 

CPI 

248^ 

RFF 

6 

LAST 

316 

42,2773 

022 

0 

ECADF 

RSTACK  +4 

67 

LANCING  radar  vELZ 

DPI 

2485 

REF 

2 

LAST 

12’ 

42,2774 

026  16 

1 

ECADF 

PARGECSP 

68 

FCS7 

DP4 

2486 

REF 

3 

LAST 

316 

42 ,2775 

03475 

1 

ECADR 

TTFDI  SP 

68 

RIN/SFC 

M/S 

2487 

RFF 

2 

LAST 

201 

42,2776 

03664 

c 

ECADR 

DEI.TAE 

68 

CCRP  ALT 

DP  1 

GAP;  ASSEMBLE  REVISICN  1 l6  C"  AGC  PRCG^A-^  LUMNAFY  BV  ^flSA  2021112-071 1S:C9  ALG.  11,1969  LP  >-DN  A ID , OS  9 PAGE  317 


L 

PINB«LL 

NC'JN  tables 

LSFR'S  FAGF  NC.  16 

EO  S4 

2AE8 

PFF 

1 

42 , 2777 

02640 

1 

fCACR 

OLANCZ 

69 

CCNF  ALT 

CPI 

2A8C 

P.EF 

1 

42. 2000 

C2636 

C 

FCACP 

OLANCY 

69 

CCRP  ALT 

OP  1 

2 A no 

PFF 

1 

42, 3001 

02  6 34 

1 

ECAOR 

OLANOX 

69 

CCNF  ALT 

CPI 

2A91 

RFF 

o 

LAST 

246 

42,3002 

00  734 

1 

CCAC  R 

ACTCCOE 

7C 

OCTAL  ONLY 

CCT 

2A92 

P.EF 

4 

LAST 

317 

42,3C:3 

0C735 

0 

FCADR 

ACTCCCE  +1 

70 

GCTAl  ONLY 

OCT 

2A93 

PEF 

5 

LAST 

317 

42,3  ). 14 

10  736 

P 

ECAOR 

ACTCODE  +2 

7C 

OCTAL  CNLY 

CCT 

?A9^ 

ocp 

6 

LAST 

31  ■( 

42.  ,3  005 

00734 

1 

ECAOR 

ACTCDCE 

71 

OCTAL  ONLY 

CCT 

2A95 

ccp 

7 

L AST 

3 17 

42,3006 

00  73  5 

c 

ECACR 

ACTCCOE  +1 

71 

OCTAL  CNLY 

OCT 

2AC^ 

PEF 

8 

LAST 

31  7 

42,3007 

00  736 

c 

ECAOR 

ACTCODE  +2 

7 1 

OCTAL  CNLY 

CCT 

2A97 

PEF 

“a 

LAST 

30C 

42,3010 

00035 

1 

ECAOR 

CCUT 

72 

360-CEU  CEG 

26C-C0L 

2AC8 

PFF 

3 

LAST 

199 

42,3011 

100  3 6 

1 

ECAOR 

COLS 

72 

COL  CEG 

ecu 

2A99 

42,3012 

000 IJ 

1 

CC.T 

0 

72 

SPARF  CFRPCNEN7 

2 5nn 

PEF 

2 

LAST 

103 

42,3013 

0 1 106 

1 

ECAOR 

TANG 

73 

360-CCU  CEG 

26r-CDU 

25  n 

REF 

3 

LAST 

317 

42,301* 

01107 

0 

ECAOR 

TANG  +1 

73 

COL  OEG 

ecu 

2 50  2 

42,3015 

0*100  1 

1 

CCT 

0 

73 

SPARE  CGRPCNENT 

2503 

REF 

14 

1 AST 

316 

42,3016 

024  53 

0 

ECACR 

TICGC 

74 

M N/SEC 

M/S 

250A 

REF 

2 

LAST 

12  1 

42 , 3i'17 

0 2 3 6 2 

1 

ECAOR 

YAI^ 

74 

DPCEG  <360) 

C P4 

2505 

PEF 

1 

42,3120 

02364 

1 

ECACR 

P ITCF 

74 

CPCEG  (360  ) 

0P4 

2 506 

REF 

3 

LAST 

199 

42,  3‘-21 

03  = 77 

1 

ECAOR 

OIFFALT 

75 

FCS4 

0P2 

2507 

REF 

2 

LAST 

118 

42,302? 

02252 

0 

ECACR 

T 1TPT2 

75 

MI N/SEC 

2508 

OFF 

1 

42,3022 

C2  2 54 

c 

ECACR 

T2TCT3 

75 

MN/SEC 

M/S 

2509 

rff 

3 

1 AST 

20  1 

42, 3024 

02276 

0 

ECAOR 

ZOOTD 

76 

VEL  3 

CF2 

2510 

REF 

2 

LAST 

I2C 

42,3025 

02272 

1 

ECACR 

RCCTC 

76 

VEL3 

CP2 

2511 

PRF 

2 

LAST 

152 

42,3026 

03642 

1 

FCACR 

XPANGE 

76 

PCS  4 

CP3 

251? 

FEF 

15 

LAST 

317 

42 , 3027 

0345.3 

0 

ECACR 

TTOGC 

77 

MI N/SEC 

M/S 

2513 

PFF 

2 

LAST 

12C 

42,3030 

C231C 

1 

ECACR 

YCCT 

77 

VEL  2 

DP2 

2514 

42,3031 

00000 

1 

OCT 

0 

77 

SPARE  CCMFCNENT 

2515 

RFF 

4 

LAST 

197 

42,3032 

0133.) 

0 

ECACR 

DMRRANGE 

78 

RR  RANGE 

RR  range 

2516 

REF 

2 

1 AST 

107 

42,3033 

013  31 

1 

ECACR 

DNRPCCT 

78 

RR  RANGE  PATE 

RR  RANGE  RATE 

2517 

FEF 

1 

42,3034 

'112  7 1 

1 

ECAOR 

TTOTIG 

78 

MIN/SEC 

M/S 

2518 

RFF 

2 

LAST 

261 

42 , 3C35 

01235 

1 

ECACR 

CUPSCF 

79 

COL  CEG 

ecu 

2519 

REF 

2 

LAST 

26  1 

42,3036 

01237 

0 

FCADR 

SPIRAL 

79 

COU  CEG 

ecu 

2520 

OFF 

1 

42 ,3  J37 

01241 

1 - 

ECACR 

PPSCOCF 

79 

RHCLF 

APTF 

2521 

REF 

2 

LAST 

145 

42,304C 

03733 

c 

ECACR 

DATAGCCC 

80 

WHCLE 

ARTH 

2522 

OFF 

! 

42 , 3*14  1 

0 3 7 3 4 

1 

ECAOR 

OWEGAO 

80 

CPCEG  (360  ) 

DP* 

2 523 

42 , 3042 

OCOJ.) 

1 

CCT 

0 

80 

SPARE  CCMPCNENT 

2524 

OFF 

2 

LAST 

14C 

42,3043 

T3433 

0 

ECACR 

CELVLVC 

81 

VEL3 

DP? 

2525 

PEF 

3 

t AST 

317 

42 , 3044 

03435 

0 

ECAOR 

OELVLVC  +2 

81 

VEL  3 

CP3 

2526 

REF 

4 

LAST 

31  7 

42 ,3C45 

03437 

1 

ECACR 

OELVLVC  +4 

81 

VEL  3 

CP3 

2527 

PFF 

C 

LAST 

3 17 

4 2,  ■’0  4 6 

03  4 33 

0 

ECACR 

OELVLVC 

82 

VEL  3 

CP  2 

2528 

REF 

6 

LAST 

317  ■ 

42  ,3047 

034  35 

0 

ECAOR 

OEI  VLVC  +2 

82 

VEL2 

CF3 

2529 

PEF 

7 

LAST 

3 17 

4 2, 30 5 C 

03437 

1 

ECACR 

DFLVLVC  +4 

82 

VEL2 

DP2 

2530 

PFF 

1 

42,3051 

02622 

1 

ECAOR 

DEL  VI RU 

83 

VEL3 

0P2 

253! 

REF 

2 

1 AST 

3 1 7 

42,305? 

03624 

1 

ECACR 

DELVIMU  +2 

83 

VEL  2 

CF2 

2532 

REF 

3 

LAST 

317 

42,3053 

02626 

0 

ECACR 

DELVINU  +4 

83 

VEL3 

DP2 

2533 

RFF 

1 

42,3054 

02222 

1 

ECAOR 

DEL VOV 

84 

VEL3 

CP3 

2534 

RFF 

2 

LAST 

317 

42 , 3055 

02224 

1 

ECACR 

CFLVCV  +2 

84 

VEL2 

CP2 

2535 

OFF 

•a 

L AST 

317 

42, 3056 

02226 

0 

ECAOR 

OELVCV  +4 

34 

VEL3 

CP2 

2536 

RFF 

3 

LAST 

148 

42 , 8057 

0351'! 

0 

ECAOR 

VGBnOY 

85 

VEL  2 

CP3 

2537 

REF 

4 

LAST 

3 17 

42,3060 

02503 

1 

ECAOR 

VGBCCY  +2 

85 

VFL2 

0P2 

G^P:  ASSENBLE  PrviSION  116  C?  aCC  PRCGRAV  LUI^U^PY  BY  ^ASfl  20211  12-071 


IStCS  AUG.  11, 1969  LFMO^AID.Cgq  PAGE  318 


L PTNB/SLL  KCUN  TABLFS 


LSFF'S  F4GE  NC.  17  EO  SA 


2538 

REF 

5 

FAST 

317 

42,3061 

03505 

1 

ECADR 

VGSOOy  ♦•4 

85 

VEL3 

CP3 

2539 

PPF 

8 

LAST 

317 

42 , 2C62 

0 3 4 3 3 

C 

ECACP 

CFLVLVC 

86 

VEL3 

DP2 

2 5^^'? 

REF 

9 

LAST 

318 

42,3063 

03435 

C 

FCAOR 

OELVLVC  •t-2 

86 

VEL3 

CP2 

2541 

REF 

1C 

LART 

318 

42,3064 

03437 

1 

ECACP 

CElVLvr  +4 

86 

VEL3 

CF3 

2542 

REF 

3 

LAST 

246 

42 , 3C65 

01344 

0 

ECACP 

AZ 

87 

CCL  CEG 

CCL 

2543 

REF 

1 

42 , 3066 

01345 

1 

ECADR 

EL 

87 

CDL  DEG 

ecu 

2544 

42  ,3C67 

0000  0 

1 

CCT 

0 

87 

SPARE  CCNPCNENT 

2545 

REF 

n 

1 AST 

252 

42, 3 : 73 

02706 

1 

ECACP 

STARAC 

88 

FPAC 

FRAC 

2546 

RFF 

11 

LAST 

318 

42,3071 

02  710 

C! 

ECADR 

SIARAC  +2 

88 

FRAG 

FRAC 

2547 

REF 

12 

LAST 

318 

42, 3C72 

02712 

1 

ECACR 

STARAC  +4 

88 

FRAC 

FRAC 

2 54B 

REE 

2 

LAST 

124 

42, 2073 

0 2 706 

1 

ECADR 

LANOLAT 

89 

CFCEG  (90  ) 

DP2 

2 54  9 

REF 

2 

LAST 

124 

42,3074 

02  710 

n 

ECACR 

LANDLCNG 

89 

CPrEG(90) 

CP2 

2550 

REF 

1 

42, ?075 

C2712 

1 

ECACR 

LAADALT 

89 

RCS5 

DPI 

2551 

RFF 

8 

LAST 

316 

42 ,3076 

0 2 210 

1 

ECADR 

RANGE 

90 

PGS5 

CPI 

2552 

REF 

4 

LAST 

316 

42 , 3077 

02202 

0 

ECACR 

PRATF 

90 

VEL  3 

CP3 

2553 

OFF 

4 

1 AST 

316 

42,3100 

02204 

0 

ECACP 

RTHETA 

90 

CFCEC  (360 ) 

CP4 

2554 

RFF 

1 

42 ,3101 

03715 

1 

ECACR 

P21ALT 

9 1 

RGS4 

CP3 

2 555 

REF 

2 

LAST 

149 

42,  ’10  2 

0 3 71  1 

c 

ECACP 

P21 VEL 

9 1 

VEL2 

DP4 

2556 

REF 

2 

LAST 

149 

42, 3103 

037  13 

1 

ECADR 

P 2 ! G A R 

91 

CPCEG (36C ) 

DP4 

2557 

42,3104 

00  000 

1 

DCT 

00000 

92 

SPARE 

2558 

42,3105 

CCCCIO 

1 

CCT 

00000 

92 

2559 

42,3106 

000.)0 

1 

CCT 

OCOOC 

92 

2560 

RFF 

6 

LAST 

274 

42 ,3107 

02737 

0 

ECACR 

CGC 

93 

CPCEG(90 ) 

CPS 

2561 

REF 

7 

LAST 

318 

42,3  1 10 

02  74  1 

1 

ECACR 

OGC  +2 

93 

CPCEG  (90 ) 

CP3 

2 562 

REF 

8 

LAST 

318 

42  ,31 11 

02  743 

0 

ECADR 

OGC  ^■4 

93 

DPCEG(9C) 

C P3 

2563 

42, ’112 

CCCCIO 

1 

CCT 

OCOOO 

94 

SPARE 

2564 

42,3113 

00000 

1 

CCT 

000  TO 

94 

2565 

42 ,3114 

000  V) 

1 

OCT 

OOOno 

94 

2566 

42,3115 

ccooo 

1 

CCT 

0 

95 

SPARE 

2567 

42,3116 

OOT  J ) 

1 

CCT 

0 

95 

SPARF 

i>56e 

42,311? 

coooo 

1 

CCT 

n 

95 

SPAR  E 

2569 

42, 3120 

coooo 

1 

CCT 

0 

96 

SPARE 

257C 

42,3121 

00000 

1 

OCT 

0 

96 

SPARE 

257  1 

42,3122 

OOGCO 

1 

CCT 

0 

96 

SPARF 

2 572 

rff 

10 

LAST 

3 15 

42,3123 

01C44 

c 

ECADR 

DSPTEM 

97 

WHCLE 

ARTE 

2573 

RFF 

11 

LAST 

3 18 

42,3124 

01045 

1 

ECACR 

DSPTERl 

97 

WHCLE 

APTh 

2574 

REF 

12 

L A ST 

318 

42,3125 

C1G46 

1 

ECADR 

DSPTEM  +2 

97 

WFCLE 

ARTh 

2 575 

p-tp 

4 

LAST 

30  6 

42,3126 

0 1047 

0 

ECADR 

OSPTEf/2 

98 

kHCLE 

APTE 

2576 

REF 

5 

LAST 

318 

42,3127 

Cl  15  1 

0 

ECACR 

DSPTEM2  +1 

98 

FRAC 

FRAC 

2577 

RFF 

6 

L AST 

3 1 £ 

42,  3 13-, 

■Ur51 

1 

ECACP 

0SPTER2  *Z 

98 

VvECLF 

ARTE 

2578 

R = F 

2 

LAST 

299 

42 ,3131 

T?2  10 

1 

ECACR 

WWPOS 

99 

PCS  9 

DF3 

2579 

RFF 

1 

42, 31’2 

02202 

G 

ECACP 

y»livVEL 

99 

VEL4 

OP  2 

2580 

REF 

1 

42,3133 

’■22)4 

0 

ECADR 

WA8I AS 

99 

RACIAAS 

CF4 

R26Cf 

■=ND 

OF 

lEADCTAe 

A 2 800 

AN 

SF  FCUTINES 

2801 

42, 3134 

16351 

1 

RUTMXTAB  OCT 

1 6351 

40 

M/S,  CP3,  CF3 

2802 

42 ,3135 

00142 

0 

CCT 

00142 

41 

ecu,  ARTF 

gap;  ASSFNBLF  revision  116  CF  f'GC  PRCC^AN  LUyiN/iFY  EY  NASA  20211  12-C71 


19:C?  ALiG.  1 1 , 1 9 t 9 LE  ^^G  N A I D . 099  PAGE  31S 


L FI^BALl  KTUN  T « ei  FS 


LSFP'S  PAGE  AC.  18  EC  SA 


28CB 

2804 

28T5 

42 .3136 

42.3137 
42,3140 

16347 
165  12 
22347 

0 

0 

1 

OCT 

CCT 

CCT 

16347 

16512 

22347 

42 

43 

44 

0P3  , 
CP  4, 
CP3  , 

CP3  , 
CP4, 
CP3, 

CF3 

DF3 

M/S 

2EC6 

42,3141 

24443 

1 

ncT 

24443 

45 

fiRTH 

, M/S 

, DP4 

2807 

42,3142 

CCOOC 

1 

CCT 

000  )0 

46 

CCT 

2808 

42, 3143 

0C553 

1 

OCT 

0C553 

47 

ARIThl,  ARITH 

2809 

42,3144 

0C143 

1 

CCT 

00143 

48 

ARTE, 

, ARTH 

2810 

42,3145 

C6347 

1 

CCT 

06347 

49 

CP3  , 

CP3  , 

ARTE 

2811 

42,3146 

00000 

1 

OCT 

0 

5C 

SPARE 

2812 

42,3147 

00  512 

1 

CCT 

00512 

51 

CP4, 

DP4 

2813 

42,3150 

00C12 

1 

CC  T 

0C012 

52 

CF4 

2814 

42,3151 

000)0 

1 

CCT 

00000 

c -a 

SPARE 

2815 

42, 3152 

24344 

1 

CCT 

24344 

54 

CPI, 

CP3  , 

CP4 

2816 

42,3153 

24503 

1 

CCT 

2^503 

55 

ARTE  . 

, 0P4 

, CF4 

2817 

42,3154 

00512 

1 

CCT 

OC512 

56 

CP  4 , 

CP4 

2818 

42,3155 

00000 

1 

CCT 

0 

57 

SPARE 

2819 

42,3156 

16  34  7 

0 

OCT 

16347 

58 

DPS  , 

CP3  , 

CF3 

2820 

42,3157 

16347 

r 

CCT 

1 6347 

59 

CP  3 , 

CP2, 

CP3 

2821 

42,3160 

1034  7 

c 

CCT 

10347 

60 

CP3  , 

CF3, 

CFl 

2822 

42,3161 

24451 

1 

OCT 

24451 

6 1 

M/S, 

M/S  , 

0P4 

2823 

42,3162 

16447 

1 

CCT 

16447 

62 

CP3, 

M/S, 

CP3 

2824 

42 ,3163 

10347 

0 

CCT 

1C347 

63 

DP3  , 

CP3  , 

CFl 

2825 

42,3164 

10354 

1 

CCT 

10354 

64 

2INT, 

, DP3 

, DPI 

2826 

42,3165 

2C4  10 

C 

CCT 

20410 

65 

EMS  , 

EMS  , 

EM$ 

2 827 

42,3166 

00  304 

0 

OCT 

00304 

66 

DP  ! , 

LRPCS 

2828 

42,3167 

1C2C4 

r 

CCT 

1 J204 

67 

DP  1 , 

CPI, 

CPI 

2829 

42,3170 

10452 

c 

CCT 

1 0452 

68 

CP4  , 

M/S  , 

CFl 

2830 

42,3171 

1C204 

0 

ncT 

10204 

69 

CP  1, 

CP  1 , 

CPI 

2831 

42,3172 

CCCOO 

1 

CCT 

0 

70 

CCT, 

CCT, 

CCT 

2832 

42,3173 

00000 

1 

OCT 

0 

71 

CCT  , 

CCT  , 

CCT 

28  33 

42,31 74 

00115 

1 

CCT 

00115 

72 

360-CDU  , 

CDU 

2834 

42,3175 

00115 

1 

CCT 

OCll  5 

73 

360-CCU  , 

ecu 

2835 

42,3176 

2451  1 

1 

OCT 

2451  1 

74N/S,  DF4,CF4 

2836 

42,3177 

22447 

c 

CCT 

22447 

75 

CP3  , 

M/S  , 

M/S 

2837 

42, 3200 

16  34  7 

0 • 

CCT 

16347 

76 

CP3  , 

CP3  , 

CF3 

2838 

42,3201 

00351 

0 

OCT 

00351 

77 

M/S  , 

CP  3 

2839 

4 2 , 3 2 J 2 

22  756 

c 

CCT 

22756 

78 

RR  RANGE, 

RR  RANCE  RATE,  M/S 

2 840 

42, 3233 

06  10  2 

1 

CCT 

06102 

79 

GDC  , 

COL  , 

ARTH 

2841 

42 , 3 204 

00503 

1 

CCT 

00  503 

80 

AR  TE, 

, OP  4 

2842 

42, 3205 

16  3 4 7 

0 

CCT 

1 6347 

81 

CP3  , 

CP3  , 

CF3 

2843 

42 , 3206 

16347 

0 

OCT 

1 6 347 

82 

DP3, 

CP3  , 

CP3 

2844 

42, 3207 

16  347 

c 

CCT 

16347 

83 

CP3, 

CP3, 

CP3 

’ 2 845 

42, 3210 

16347 

c 

CCT 

1 6347 

84 

CP3  , 

CP3  , 

CF3 

2 846 

42, ’211 

16347 

0 

OCT 

16347 

85 

CP3, 

CP3  , 

CP3 

2847 

42,3212 

16347 

0 

CCT 

16347 

86 

CP3, 

CP3, 

CP3 

2848 

42,3213 

00  10  2 

1 

CCT 

00102 

87 

CDL  , 

CDL 

2849 

42,3214 

02  041 

0 

CCT 

02041 

88 

FR  AC 

FOR 

PACE 

2850 

42,321= 

1 C 3 4 7 

c 

CCT 

1C347 

89 

CP3  , 

CP3  , 

CFl 

2851 

42,3216 

24344 

1 

OCT 

24344 

90 

DP  1 , 

CP3  , 

CF4 

2852 

42,3217 

245C7 

c 

CCT 

24507 

9 1 

EPS, 

CPA, 

CF4 

GAP:  ASSENBLE  REVISION  116  CF  AC-C  PRCGB/!i^  LUNIK<!iRY  BY  NASA  20211  12-ng 


I9:CS  AUG.  11,1969  LENO^AID.Oq9  p/>GE  32C 


L 


■pINPALL  NTUN  T/iEL  ES 


LSER'S  PAGE  NC.  19 


EO  S4 


2853 

42  t 3220 

on  000 

1 

CCT 

ocooo 

92 

SPARE 

285A 

42,3221 

1634? 

C 

CCT 

16347 

93 

CP3,  CP3,  CP3 

2855 

42,3222 

00  000 

1 

OCT 

OCOOO 

94 

SPARE 

2 E56 

42,3223 

OCOO  } 

1 

GCT 

0 

95 

SPARE 

2857 

42, 3224 

OP  000 

1 

CCT 

0 

96 

SPARE 

2858 

42,3225 

06143 

1 

CCT 

C6143 

97 

ARTH,  ARTH,  APTH 

2859 

42,3226 

06C43 

0 

CCT 

0 6043 

98 

ARTI-,  FRAC,  ARTH 

2860 

42, 3227 

24247 

0 

CCT 

24247 

99 

CP3,  CP2,  CP4 

R2E70  PNG  CF  RLTMXTAB 


2 671 


RPF 


LAST  293 


3C, 2000 


SBANK=  LCWSUFER 


oEVISION  116  CF  A^C  PPHGR^M  LUMINAPV  ?\  NASA  20211  12-^71 


I9;0q  flUG.  11  ,1969  LEMGN  IC  .099  PAGE  321 


G4P: 

L LEW  GECweTRY 


LSER»  S PAGE  NC.  1 EO  S ? 


GOO  1 . 

22, 204 1 

BANK 

23 

nooioi 

ROF 

1 

13,2000 

SETLCC 

LEMGEOM 

000102 

13.207C 

BANK 

OOOIE 

RFF 

A 

LAST 

32C 

30,2000 

SBANK= 

LCViSLPER 

0002 

REF 

3 

LAST 

124 

E5  , lo42 

EBANK= 

XSM 

R05C0 

THESE  TV,0  ROUTINES  CCWPUTF 

THE  ACTUAL  STATE  VECTOR  FCR  LW,CSR  BY  ACCING 

R0501 

R05C2 

R0503 

THE  rCNir  R,V  ANP  THE  OF V I AT  I CNS R , V 
wETERS  B-29  AND  Wt:TFRS/rSEC  B-7  ANE 
P-CTFER  , V-CTFER  FOR  OCFNLTNK.  THE 

. TFE  STATE  VECTORS  ARE  CCNVERTEC  TC 
STCREC  APPPCPRIATELY  IN  PN,VN  OR 
RCLTINES  NANES  APE  SNItGFEC  IN  TFE 

R05')4 

CTFER  VEHICLES  CCFFUTFR. 

R0505 

INPUT 

Ri)50ft 

R05061 

R05062 

STATE  VECTOR  IN  TEMPORARY 
IF  STATE  VECTOR  IS  SCALED 
SRT  X2  TO  +2 

STORAGE 
PCS  E27 

AREA 

ANC  V EL  65 

R0SO63 

Rr5064 

IF  STATE  VECTOR  IS  SCALED 
SET  X2  TO  0 

PCS  B29 

AND  VEL  B7 

RO50  7 
RO900 
PO509 

OUTPUT 

PIT)  IN  RN  , V(T  ) IK  VN  , T 
OR 

IN  p I ft  TME 

R 1910 

R(T  ) IN  r-qtffR,  V(t  ) TN 

v-cther 

( T IS  DEFINED  BY  T-OTHER ) 

051  C6 

REF 

1 

CUUNTX 

t J/GFOM 

0511 

13, 2C7C 

4 2 4 14 

1 SV0WN2 

BCF 

RVC 

SW=1=AVETCMIC  GOING  W-MATRIX  INTEG. 

05112 

PEF 

1 

13,2'71 

04756 

1 

A VFMIDSF 

0 5112 

13,2072 

26073 

1 

+ 1 

05114 

13,2C73 

52775 

1 

VLCAC 

VSL* 

0512 

R'^F 

2 

LAST 

1 1 1 

13,P074 

01521 

0 

TOELTAV 

0513 

13 , 2075 

576  )5 

0 

0 -7  ,2 

0514 

13,2076 

53655 

1 

VAD 

VSL* 

0515 

RTF 

2 

LAST 

1 1 1 

13,2077 

01535 

0 

RCV 

05lft 

12, 2 IOC 

57576 

1 

0 ,2 

0517 

PEF 

4 

LAST 

19t 

13, 2101 

25220 

0 

STCVL 

RN 

0518 

REF 

2 

LAST 

1 1 1 

13,2102 

'J1527 

0 

TNUV 

0519 

13,2103 

5 2 2 5 7 

1 

VSL* 

VAC 

052C 

13 ,21T4 

576  12 

1 

0-4,2 

0521 

REF 

2 

LAST 

1 1 1 

13,2105 

01543 

1 

vcv 

1522 

13,2106 

7 7 6 5 7 

<5 

VSL* 

0523 

13,2107 

57576 

1 

0,2 

0 5 24 

PF:F 

4 

LAST 

196 

13, 21  10 

1 5226 

c 

STCDL 

VN 

0525 

REF 

? 

LAST 

30  7 

13,2111 

015  17 

0 

TFT 

0526 

REF 

2 

LAST 

196 

13,2112 

01234 

0 

STCRE 

P IPT  IWE 

0527 

13,2113 

7 7 6 16 

0 

RVC 

GAP!  />SSFMBIE  RFVISION  116  OF  AGC  PRCGRA'^  LUMN/>PV  B > ^A£A  20?lLI2-n7I 


19:09  AUG.  11,1969  LEMONAIC.0Q9  PAGE  322 


L LFI^  GEC^'ETRY 


LSFP' S PAGE  NC.  2 E5  S3 


0528 

0529 

0530 

REF 

3 

LAST 

321 

13.2114 

13.2115 

13.2116 

53775 

01521 

57605 

1 SVCV,M 
0 
0 

VLC  AC 

VSl 

TOELTAV 
0 -7,2 

0531 

13,2117 

c u ^ c c 

1 

LAD 

YSL* 

0532 

PEE 

3 

LAS-r 

321 

13, 2120 

01535 

0 

RC  V 

C53  3 

13,2121 

57576 

1 

0,2 

0534 

REF 

5 

LAST 

195 

13,2122 

2572C 

0 

STCVL 

R-ETHER 

0535 

REF 

3 

LAST 

321 

13,2123 

01527 

0 

TNUV 

0536 

13,2124 

53  25  7 

1 

VS  L=!' 

VAC 

3537 

13,2125 

57602 

1 

0 -4,2 

0538 

pep 

3 

LAST 

321 

13,2126 

J1543 

1 

vcv 

0539 

13,2127 

7 7 6 5 7 

0 

VSL=!= 

354v3 

13, 2 130 

57  576 

1 

0 ,2 

054] 

REF 

5 

LAST 

195 

13,2131 

01  72  6 

0 

STORE 

V-OTHCR 

0542 

13,2132 

7761  6 

0 

RVG 

GAP 


fSSE^eLE  REVISION  116  CP  AGC  PRCGRAM  LU'^IMAFv  B V NASA  2C21112-C71 


L<;:0q  AUG.  Iltl96q  LE^ONAIC.099  PAGE  323 


L 

LFR  ■ GECRETRY 

LSER' S 

PAGE  NC.  2 

E5  S3 

P06A9 

THE  FOLLCKING  PGLTINF  TAKES  A HALF  LMT 

TARGET  VECTCR  REFEFREC  TC  NAV  EASE 

CCCRCINATES  ANC 

EINCS  RCTH 

POb'^l  Gt^'8AL  CRIEMTATIONS  AT  WMCI-  Tf-E  RR  RIGHT  SIGHT  THF  TARGET.  THF  GIMRAL  ANGLES  C C PR  E S PC  NC I NG  TC  THE  PRESENT  HCCE 

R0653  ARE  LEFT  TM  RPDFA  AN'C  thcSF  kHICH  WCULC  BE  USPC  AFTER  A RERCCE  IN  RCCER.  THIS  P.CLTINE  ASSURES  RCPE  1 IS  TRLNNICN 


R1655  ANGLE  L=SS  '^HAN  RO  DEGS  IN  ABS  VALU^  IaITH  ARBITRARY  SHAFT,  KITH  A C CP  R E S PC  N C I NG  CEFIMTICN  FPP  RQCE  2.  RGCE 
P.06‘57  SELECTICN  AND  LIRIT  CHECKING  APE  CCNE  ELSEWHERE. 


RT6B8 

the  MODF  1 

cnNFTGURATIOM  IS 

CALCLLATED 

FRER  THF  VECTOR  ANC  THEN  RCCE  2 IS  FCLNC  USING  THE  RELATIONS 

R0660 

S (2  1 

= 180 

4 s n ) 

P0661 

( 2) 

= 1 EC 

- T(  1 ) 

R06610  1 

THF 

VECTOR 

ARRIVES  IN  RPAC 

WHERE 

TPG^i'SRNfi  CR 

^ SMN  E* 

WILL  HAVE 

LEFT  IT. 

C662 

13,2133 

00041 

1 RRANGLES 

STORE 

320 

C6625 

12.213A 

57“45 

1 

CLCAD 

OCCRP 

SINCE  WE  WILL  F iNC  THE  MOCE  1 SHAFT 

0663 

13,2135 

OC043 

0 

3 40 

ANGLE  LATER,  KE  CAN  FINC  THE  RCCE  1 

066A 

13,2136 

67401 

0 

SETPC 

AS  IN 

TPLNNION  BY  SIVPLY  TAKING  THE  APCSIN 

CF 

0666 

13,2137 

CCOCl 

0 

0 

THF  Y CCRFCNENT,  THF  ASIN  GIVING  AN 

0 666 

13 ,2140 

44206 

0 

PUSH 

BDSU 

ANSWER  WHOSE  ABS  VAL  IS  LESS  THAN  90 

CEG 

C667 

RFF 

1 

13,2141 

2 400  5 

1 

LCCPHAL  F 

)668 

13,2  142 

14C"5 

1 

STOOL 

4 

RCCE  2 TRUNMCN  TC  *■ . 

C66  9 

REF 

3 

LAST 

249 

13,2143 

24007 

0 

L06ZFRCS 

0670 

13, 2148 

24C43 

c 

STCVL 

340 

UNIT  THE  PRCJECTICN  OF  the  VECTOR 

0671 

13, 2145 

0004  1 

1 

320 

IN  THE  X-Z  plane 

0672 

13,2146 

41056 

1 

UNIT 

Bcve 

IF  OVERFLOW  , TARGET  VFCTrR  IS  ALONG  Y 

0673 

FEF 

1 

13,2147 

52^32 

0 

LLNOE  SCH 

CALL  FCR  RANEUVER  UNLESS  CN  LUNAR  SLPF 

067A 

13,2150 

14  J41 

1 

STOOL 

320 

PRCJFCTICN  VECTOR. 

0675 

12,2151 

OCC41 

1 

32C 

0676 

13,2152 

44  142 

0 

SRI 

STO 

0677 

REF 

1 

13,2153 

00051 . 

0 

S2 

0678 

REF 

2 

LAST 

30  I 

13,2154 

14023 

0 

STCDL 

S TNTH 

USE  APCTPIG  SINCE  SHAFT  CCULD  BE  ARP. 

0679 

13,2155 

00045 

0 

3 60 

0680 

13,2156 

77742 

0 

SRI 

0681 

REF 

3 

LAST 

30  1 

13,2157 

3402  1 

0 

STCA  1 L 

CCSTH 

06E? 

PEF 

3 

1 AST 

30  1 

13,2160 

47322 

1 

ARCTR  IG 

GAP:  A SSEN8LE  PEVISIPN  116  CF  AGC  FRrGRAM  LUMINARY  BY  NASA  2Q21I12-C71 


1S;G9  AUG.  1L,1969  LFNCAArD.0q9  PAGE  324 


L GETMETRY 


USER'S  page  no.  a E5  S3 


0683 
06  E4 
0685 

REF 

2' 

L ART 

323 

13.2161 

13.2162 

13.2163 

'^3  206 
240'35 
24007 

1 

1 

0 

PLSH 

STrVL 

DAD 

LOOPHALF 

6 

NCCE 

1 shaft  TC  2. 

0686 

13, 2164 

00005 

1 

4 

0687 

13,2165 

77634 

0 

RTB 

FIND 

ROTE  2 ecu  ANGLES. 

0688 

REF 

1 

13, 2166 

21636 

1 

2 V1STC2S 

1685 

REE 

2 

1 AST 

103 

13,2167 

25111 

1 

STOVL 

MGDEB 

0650 

13,2170 

00001 

0 

n 

0691 

13,2171 

77634 

0 

RTB 

REDE 

1 ANGLES  TC  RODE  A. 

C692 

REF 

2 

LAST 

324 

13,2172 

21636 

1 

2V1ST02S 

06=3 

REF 

1 

13,217^ 

Cl  1C7 

c 

STCPE 

RCDEA 

0694 

13,2174 

77776 

1 

EXIT 

0695 

REF 

26 

LAST 

211 

13,2175 

4 0111 

n 

CS 

RACMCFES 

SWAP 

ROCEA  AND  RCOEB  IF  pR  IN  "CCE  2. 

■169  6 

REF 

1 

13,2176 

7 4740 

1 

RASK 

ANTENEIT 

0 69  7 

REF 

93 

LAST 

306 

13  ,2177 

10  O'-n 

0 

res 

A 

0698 

13 ,2200 

1 2214 

1 

TCF 

+ 4 

0699 

REF 

2 

LAST 

324 

13, 22i  1 

53  • 1C7 

1 

DXCH 

MCDEA 

C7Cr 

REF 

3 

1 AST 

324 

13,2212 

53'  111 

0 

CXCF 

RCDEB 

070  1 

REF 

Q 

LAST 

324 

13,2202 

53 ' 1C7 

1 

CXCH 

MECEA 

0702 

PEP 

10 

LAST 

300 

13,22  >4 

0 6 )4  2 

1 

TC 

I NTPRET 

0703 

13,2205 

7 7650 

1 

, GCTC 

3704  REE  2 LAST  323  13,?2C6  0G051  0 S2 


GAP:  fSSE^eLP  PFVISIPN  116  CF  AGC  FRCGRA**  LUMIMARY  BV  NASA  2C21112-n?l 


lS;Cq  ALC.  11,1969  LF^C^/IC.099  PACE  32 


L GFC^'ETRY 


LSFR'S  PAGE  NFI.  5 E5  S3 


P370‘5 
RO  T)  6 
P07'^7 

C-IVFN  PR  TRUNMION  AMO  SHAFT  (T,Si 
LIAE  CF  SIGHT  IN  NAV  BASE  AXES. 
-SIN( T) ,CnS( S)COS! T I ) IS  IFFT  IN 

1 IN  1 ANGNB  ,+ 1 ,FUC  THE 
THE  HALF  UNIT  VECTOR, 
NPAC  AND  32C. 

ASSOC  lATEC 
.5 ( S IN ( S ICOS (T ) , 

07072 

07C7A 

REF  1 23,2000 

23,2041 

SFTLCC 

BANK 

I AFLIGHI 

07076  PFF  1 CFLAO*  $$/GECP 


0708 

0709 
0700  1 

PPF 

R'=F 

4 LAST 

5 LAST 

202 

250 

23, 2041 
23, 2C42 
23, 2'43 

47135 
03753 
2 1 5 7 7 

0 

n 

1 

RRNB 

SLCAO 

RTB 

TANGNE 

CCLLCGIC 

C71  r 

23,2044 

41401 

1 

SETPQ 

PUSH 

TRUNMCN  angle  TC  0 

071  1 

23,2045 

MO03  1 

0 

0 

0712 

23,2046 

5 7 c c ^ 

C 

SIN 

DCCHP 

0713 

23 ,20i47 

14043 

0 

STOOL 

340 

Y COMPONENT 

0714 

23,2050 

41546 

c 

CCS 

PUSH 

.5  CCS  (T  ) TO  0 

0718 

23,2051 

47  135 

0 

SLOAD 

RTB 

0716 

REF 

5 LAST 

325 

23 ,2052 

03754 

1 

TANGNE  -tl 

0717 

R'^F 

6 1 AST 

3 ? 5 

23, 2053 

2 15  7 7 

1 

CCLLCGIC 

0 71  e 

23  ,R.)54 

71406 

0 

RRNB  1 

PUSH 

COS 

SHAFT  4NGLE  TC  2 

0719 

23,2055 

72405 

C 

CYF 

SLl 

072' 

23,2056 

OCOO  1 

0 

0 

C721 

2 3 ,205  7 

1 4045 

0 

STOOL 

360 

Z COMPONENT 

072? 

23,206C 

4 1356 

1 

SIN 

DNP 

0723 

23,2061 

7 7 752 

1 

SLl 

0724 

23 ,2C62 

24041 

1 

STCVL 

32D 

072  5 

23,2'?63 

00C4  1 

1 

320 

0726 

23,2-364 

776  16 

0 

RVQ 

R0727 

THIS 

FNTRY  TO 

RPNB 

REQUIRES 

THE  TPUNNICN 

ANC  SHAFT  ANGLES  IN  »-PAC 

ANC  HFAC  +1  PESPFCTIvELY 

0729 

23,2  165 

14025 

0 

RRN8MPAC 

STCDL 

20D 

SAVE  SHAFT  CCL  IN  21 . 

072S1 

REF 

43  1 AST 

3or 

23,2066 

0015  5 

0 

WPAC 

SET  MODE  TC  OP.  (THF  FPFCFEOING  STCRE 

A;17292 

NAY  BE  CP , TP  OR  VECTCF . ) 

0730 

23,2067 

40234 

■3 

RTR 

SETPD 

0731 

REF 

7 LAST 

325 

23 ,2070 

21577 

1 

CCULCGTC 

073? 

23,2071 

3000  1 

0 

0 

0733 

23 , 2072 

7 3 406 

1 

PUSH 

SIN 

TPLNMCN  ANGLE  TC  C 

0734 

23 , 2073 

77676 

c 

rccNF 

073  5 

23, 2074 

14C43 

c 

STCDL 

34D 

Y CCNFCNENT 

0736 

23  , ?v>75 

41546 

0 

COS 

PUSH 

.5CCS(T)  TO  L 

0737 

23,2076 

47135 

c 

SLCAC 

RTB 

PICK  UP  CCU'S. 

0738 

23,  2', 77 

00026 

0 

2 ID 

0739 

REF 

8 LAST 

3 2^ 

23,210r 

21577 

1 

CCULCGIC 

0 740 

23,  21'il 

7 7 6 5C 

1 

GCTC 

0741 

REF 

1 

23,2102 

46054 

1 

RPNB  1 

gap: 

A«;SEN8LE  REVISION  116  OF  AGC  PROGRAM  LUMINARY  BY  NASA  2C21112-C71 

1S:09  AUG.  11 

,1969 

LENCNAID.099  RAGE  326 

L 

LEM  geometry 

USER  • 

S PAGE 

NO.  6 E5  S3 

GAP 


fSSE^BLE  PEVISTON  116  CF  ^GC  PRCGRAM  LU^MNAPV  B ^r  NASA  2C21112-C71 


1<;;C9  y>UG.  11  ,1969  LEMCN/!  1C  .Qpq  FOCF 3H 


IM  Crt'PENSATTnN  PACKAGE 


LSEP'S  PAGE  NO.  1 EC  S3 


OO^'l  07,2661  PANK  7 

COOini  REF  1 06,2000  SETLCC  1 N'LCOMP 

Q0Q1C2 ^ 06,32  71 BANK 


1002 

PE  F 

1 

E3, 1460 

EBAM<  = 

NEDX 

CKO 

REF 

1 

COUNT  ={ 

5 1/ICOMP 

0112 

p CF 

1 

F6,327  1 

3 3 53  7 

C 

1 /PIPA 

CAF 

LGCOMP 

SAVE  EPANK  CF  CALLING  PROGRAM 

0113 

REF 

8 

LAST 

295 

06,3272 

56  CC3 

1 

XCH 

EBAN'K 

01  1 A 

9EF 

1 

06,3273 

54  163 

1 

TS 

MCDE 

0115 

RFF 

1 

C6, ^274 

11'477 

r 

CCS 

GCCVFSW 

EYFASS  IF  GCOMPSW  NEGATIVE 

0116 

06,3275 

1 3 300 

0 

TCF 

+ 2 

0117 

C6,3276 

1 3300 

0 

TCF 

+ 2 

0118 

REF 

1 

C6, 3277 

1 3361 

1 

TCF 

I RIGl 

RETURN 

0119 

REF 

4 

LAST 

255 

06 , 3300 

3 475  1 

c 

1/PIPAl 

CAF 

FOUR 

PIPAZ,  FIFAV,  FIFAX 

0120 

REF 

9 

LAST 

123 

06,3301 

£4  132 

c 

TS 

PLF  42 

0121 

RFF 

10 

LAST 

327 

06,3332 

50  132 

1 

INDEX 

BLF  42 

0122 

prp 

1 

06,3303 

3 1453 

1 

CA 

P IPASCF 

(P.P.M.)  X 2(-9) 

0123 

06 ,3304 

0 C0C6 

1 

EXTEND 

0124 

R'^F 

1 1 

LAST 

327 

06,3305 

5 C132 

1 

INDE  > 

BLF  42 

3125 

REF 

1 

06,3306 

7 0324 

0 

NF 

DELVX 

(PP)  X 2(414)  NON  (PIPA  PUSES)  X 2(45) 

1126 

REF 

30 

L AST 

30  6 

C6, 33C7 

64  002 

1 

TS 

C 

SAVE  NAJCR  FART 

G127 

REF 

26 

LAST 

294 

06 ,3310 

3 .1001 

0 

CA 

L 

MINCR  FART 

0128 

06,3311 

0 0006 

1 

EXTEND 

0129 

RFF 

33 

LAST 

282 

06,3312 

1 4 74  6 

1 

NP 

BI  T6 

SCALE  2(49)  SFIFT  RIGHT  9 

0130 

REF 

12 

LAST 

3 27 

06,3313 

50  132 

1 

INDEX 

BUF  42 

0131 

PFF 

2 

LAST 

327 

06, 3314 

c ^ 3 2 5 

1 

TS 

DELVX  41 

FPACTICNAL  FIFA  PULSES  SCALED  2(414) 

0132 

■^EF 

31 

LAST 

327 

06,3315 

3 0002 

0 

CA 

0 

NAJCR  PART 

0133 

06,3316 

0 0006 

1 

EXTEND 

0134 

REF 

34 

1 AST 

327 

C6, ’3  17 

7 4746 

1 . 

NF 

BIT6 

SCALE  2 (49  ) SHIFT  RIGHT  9 

0135 

REF 

13 

LAST 

327 

06 , 3320 

50  13  2 

1 

INDEX 

BLF  42 

0136 

OFF 

o 

LAST 

32  7 

C6,3321 

20  325 

1 

CAS 

DELVX 

(P  IFA  I ) 4 (PIFAI  1 (SFE  ) 

0137 

REF 

14 

LAST 

327 

06,^322 

£0  132 

1 

INDEX 

BLF  42 

0138 

RPF 

1 

06, 3323 

4 1452 

1 

cs 

P IPABIAS 

(PIPAPLLSES)/(CS)  X2(-3)  « 

0139 

06,3324 

C CC06 

1 

EXTEND 

0140 

PFF 

2 

LAST 

166 

06, 3325 

7 1C74 

1 

NP 

1 /PI FAOT 

(CS)  X 2(48)  NCN  (PIPA  PULSES)  X 2 ( 4 £ ) ■* 

0 14  1 

■16 ,3326 

C 0006 

1 

EXTEND 

014  2 

RFF 

35 

LAST 

3 27 

C6, 3327 

7 4746 

1 

. NP 

B 1 T6 

SC  ALF  2 ( 49  ) SHIFT  R IGHT  9 

0143 

RTF 

15 

LAST 

327 

06  ,3330 

50  13  2 

1 

INCEX 

BLF  42 

3144 

REF 

4 

LAST 

321 

C6.3331 

20  32  5 

1 

CAS 

DEL  VX 

(PIPAl)  4 (PIFAli(SFF)  - ( BIAS  ) (DELTAT ) 

0145 

ref 

16 

LAST 

327 

06,3332 

10  132 

0 

CCS 

BLF  42 

PIPAZ,  FIPAY,  FIPAX 

0146 

REF 

1 

■'6 , 3333 

6 7752 

0 

AD 

NEC- 1 

0147 

RFF 

1 

06,3334 

1 33F1 

1 

TCF 

1 /PI F "1  41 

r,AP;  ASSE^^BlE  RFvrSION  116  CF  AGC  FPCQR!\N  LUMIN/!PY  RV  ^ASA  2D2I1I2-071 


iq;09  AUG,  LEMnNAID.099  PAGE  326 


L IVL  COMPFMSAtjcn  package 


USER*  S PAGE  AC.  2 E3  S3 


fl  1A8 


06,3335  13  336  U 


AQCP 


LESS  lEAA  ZERC  IRPOSSIBLE 


<^SSe^'8LP  RTVISION  116  OF  AGC  PPCGRA^  LUVIN/iPV  BY  20211  12-071 


19:09  />UG.  11,1969  LFM^^^ID.0q9  PAGE  32S 


GAP: 


L IVL  CCI^PFN'S  ICN  F^TK^GF  LSEF'S  F/SGE  ^C.  3 E3  S3 


0148  1 

PEF  ■ 

2 

L<1ST 

327 

06,3336 

55 

•477 

0 

I PIGCCPF 

TS 

GfOMPSW 

IN'ClCATE  CCf'MAMCS  2 PULSES  OR  LESS. 

01482 

REF 

17 

LAST 

32  7 

G6, 3337 

54 

12C 

1 

T S 

PLF 

lACEX  CCUNTFP  . IRIGX,  IRIGY,  IRIGZ. 

01483 

REF 

1 

06 ,3340 

0 

3364 

0 

TC 

IRIGX 

compensate  acceleraticn  terms 

0148  4 

REF 

2 

LAST 

327 

06,334 1 

4 

146C 

1 

cs 

NEOX 

(GVPC  FLLSESl/lCS)  X 2(-5) 

01488 

REF 

1 

06,3342 

0 

3462 

1 

TC 

DRIF  TSL8 

-( NBDX)  ( CELTAT  ) (GYRC  PLLSES)  X 2(  + 14) 

0 1486 

REF 

1 

06 ,3343 

0 

3401 

1 

TC 

IRTGY 

CCMPENSATE  ACCELERATICA  TERMS 

01487 

PEF 

1 

06,2344 

4 

146  1 

1 

CS 

NBOY 

(GYPC  PULSES  ) / (CS  1 X 2 (-5  ) 

0148F 

RTF 

2 

1 AST 

329 

06,3345 

0 

3462 

1 

TC 

DR  IRTSUB 

-( NBOY) (CELTATl  (GYRC  PLLSES)  X 2(+14) 

01489 

REF 

1 

06,3346 

0 

2416 

1 

TC 

IPIGZ 

CCMFFASATE  ACCELERATION  TERMS 

0149 

RFF 

1 

06, 3347 

3 

1462 

0 

CA 

NBDZ 

(GYRC  PLl SES  ) / (CS  1 X 2 (-5  1 

1149  1 

REF 

3 

LAST 

329 

06,3350 

0 

3462 

1 

TC 

0PIFTSU8 

+ ( NBDZ  ) (CELIAT  ) (GYRC  PLLSES)  X 2(+14) 

01492 

PEF 

3 

LAST 

329 

06, 2351 

1 1 

•47  7 

r 

CCS 

GCOPPSl* 

APE  GYPC  CCMMANCS  GREATER  TFAN  2 PUISES 

01493 

06,3352 

1 

3354 

1 

TC  F 

+ 2 

YES  SENC  CUT  GYPC  TORCLIFG  CCMMANCS. 

01494 

PPF 

2 

LAST 

327 

06,2352 

1 

33  61 

1 

TO  F 

IP  IGl 

NC  FETLRN 

01495 

REF 

1 

06, 2354 

■a 

503  1 

0 

CA 

PRI021 

FPIC  GREATER  TFAN  SERVICEF 

C 1496 

REF 

4 

LAST 

26C 

06 , 3355 

j 

5072 

1 

TC 

N'CVAC 

SENC  CUT  GVRC  ICRCLING  CCMMANCS. 

11497 

PEF 

3 

LAST 

3 2 9 

E3,  1460 

FRA^K= 

ABCX 

01498 

REF 

1 

06 , 3356 

0 

3515 

c 

2C  ADR 

1/GYRO 

01496 

REF 

1 

06,3357 

14063 

1 

01499 

06, 3360 

0 

0003 

1 

RFL  I M 

0150 

REF 

2 

LAST 

327 

06,3361 

3 

C163 

0 

IP  IGl 

CA 

•1QDF 

RESTORE  CALLERS  EBANK 

01501 

REF 

9 

LAST 

227 

06,3362 

54 

CC3 

0 

TS 

EBANK 

015”2 

RFF 

2 

LAST 

244 

06, 2263 

1 

46  21’ 

c 

KF 

SWRETLRN 

GAP;  fSSF^eLE  REVISION  116  CF  ACC  PRCC-R^.M  LUMINARY  BV  NASA  ;C21I12-Q'?1 


I9:C9  AUG.  11  LE^C^AIr.099  PAGE  330 


L TML  CC^'PE^'SATI  ON  PACKAGE 


LSFR'S  PAGE  NO.  A E3  £3 


0151 

C6, 2364 

C 

CCC6 

1 

IPIGK 

EXTFFC 

11511 

P C p 

44 

t AST 

325 

06 ,3365 

22 

156 

0 

GXCF 

MR AC  +2 

SAVF  C 

01512 

06,3366 

0 

0,)''6 

1 

fxtffo 

0152 

PEF 

5 

LAST 

327 

06,-367 

L 

C325 

1 

CCS 

OELVX 

(FIFA  PUIS  ES  ) X 2 (4l4  1 

0153 

REF 

45 

LAST 

330 

i)6 ,3370 

52 

155 

1 

CXCF 

iMPAC 

0154 

REF 

1 

6 , 2 3 7 1 

■3 

1463 

1 

CA 

ACI  AX 

(GYRC  FLiLSES  )/(PIPA  PLLSE)  X 2(-6l 

4 

115  5 

REF 

1 

06, 3372 

0 

3433 

0 

TC 

GCOMPSU0 

-(ACIAX)  (PIFAX)  (GYRC  PUSES)  X 

2 ( + 14  ) 

0156 

06,3373 

c 

0006 

1 

EXTENC 

0 157 

RPF 

1 

06,2374 

4 

C327 

C 

CCS 

DEI  VV 

(FIFA  PULSES  ) X 2 ( + 14  ) 

0158 

REF 

46 

LAST 

330 

16  ,3375 

52 

155 

1 

CXCF 

MPAC 

01  ‘^5 

REF 

1 

06,3376 

4 

1466 

0 

CS 

A C S R A X 

(GYRC  PULSES  1 /( PI  PA  PULSE)  X 2(-6) 

4 

0160 

RPF 

2 

LAST 

330 

06,3377 

0 

?A23 

0 

TC 

GCONPSUR 

+ ( ACS P AX  ) ( F IPAY  ) (GYRC  PULSES)  X 

2(+14) 

AOl 6C3 

EXTEND 

A0160A 

CCS 

DFLVZ 

(FIFA  PULSES  ) X 2(  + 14  ) 

A01605 

DXCH 

MPAC 

AO  1606 

CA 

ACGAX 

(GYRO  PLLSES  ) /(PIPA  PLLSE)  X 2(-6l 

4 

' A01607 

TC 

GCCMFSbR 

-(ACCAX)  (FIFAZ  ) (GYRC  PLLSES)  X 

2( +14  ) 

0161 

RPF 

47 

LAST 

330 

06,3400 

.) 

0156 

c 

TC 

MPAC  +2 

0163 

06 ,2  4'.'  1 

c 

00C6 

1 

IPIGY 

EXTEND 

01631 

RFF 

48 

LAST 

330 

06, 3402 

22 

156 

c 

QXCH 

MPAC  +2 

SAVE  C 

01632 

06,3403 

c 

0006 

1 

extend 

U64 

REF 

2 

LAST 

*2  3 r 

06,3404 

4 

C327 

c 

CCS 

OELVY 

(FIPA  PULSES)  X 2(+14) 

1165 

R'7F 

49 

LAST 

33U 

i56,340  5 

52 

155 

1 

DXCH 

MPAC 

0 1 66 

RFF 

1 

06,3406 

3 

1464 

0 

CA 

AC  TAY 

(GYRO  PULSES)/(PIPA  PLLSE)  X 2(-6) 

« 

0167 

RFF 

3 

L AST 

33C 

T6, 34U7 

0 

3433 

0 

TC 

GCCMPSUB 

-(ACIAY)  (PIFAY  ) (GYRC  PUSES)  X 

2 ( + 14  ) 

0168 

U6 ,3410 

0 

0Q06 

1 

EXTEND 

0169 

REF 

1 

06,34  1 1 

4 

0 23  1 

1 

CCS 

DFL  VZ 

(FIFA  PULSES)  X 2(+14) 

0170 

KEF 

50 

LAST 

330 

06,3412 

52 

155 

1 

DXCH 

MPAC 

0171 

REF 

1 

06 ,3413 

4 

1467 

1 

CS 

ACSPAY 

(GYRO  PLLSE S ) / ( PI  PA  PLLSE)  X 2(-6) 

4 

0172 

REF 

4 

LAST 

33F 

06,3414 

0 

3433 

0 

TC 

GCCMPSUe 

+ (ACSRAY  )(P1PAZ)  (GYRO  PLLSES)  X 

2( + 14) 

A01723 

EXTEND 

A0172'i 

CCS 

DELVX 

5f 

(PIPA  PLLSES)  X 2(+14) 

AO  172 5 

CXCH 

MFAC 

44* 

All  72 6 

CA 

ADOAY 

4 =f  4 

(GYRC  PLLSES)/(FIFA  PLLSE)  X 2(-6) 

4 

A01727 

TC 

GCDMPSUe 

4 44 

-(ACCAY)  (PIFAX)  (GYRO  PLLSES)  X 

2(+14) 

0173 

RFF 

51 

L AFT 

330 

•)6, 3415 

0 

F 156 

c 

TC 

MPAC  +2 

0175 

06 , 3416 

0 

0006 

1 

IR  IGZ 

EXTEND 

0175  1 

RFF 

52 

LAST 

330 

06,3417 

22 

156 

Q 

CXCH 

MPAC  +2 

SAVE  G 

01752 

06 , 3420 

0 

0006 

1 

EXTEND 

0176 

R'=F 

3 

LAST 

33( 

06,3421 

4 

0327 

0 

CCS 

CEL  VY 

(PIPA  PULSES)  X 2(+14) 

0177 

RPF 

5 3 

LAST 

33f 

06, 3422 

52 

155 

1 

DXCH 

MPAC 

0178 

REF 

1 

06,3423 

3 

1470 

0 

CA 

ACSRAZ 

(GYRO  PULSES)  /(PIPA  PLLSE)  X 2(-6) 

4 

r,«P:  /^S<i''rNBLF  REVISION  116  AGC  PRCGRA'^  LUMINARY  ’!'(  NAS^  20211  12-^71 


1S;C<~  AUG.  Ilfl969  lFrCNAID.0q9  FACE  331 


L I^'L  CGMPFNSATION  PACKftGF  LSFP'S  PAGE  NO.  5 E3  S3 


0179 

REF 

5 

LAST 

330 

'■'6 ,7424 

0 

3433 

C 

1C 

GC0MPSU8 

- ( ACS F AZ  ) ( F IPAY  ) (GYPC  PLLSES) 

X 

21+14) 

Cl  80 

06,3425 

0 

00T6 

1 

EXTEND 

0181 

REF 

2 

LAST 

33C 

06,2426 

4 

0331 

1 

CCS 

DELVZ 

(PIPA  FULSFS  ) X 21  + 14  ) 

0182 

REF 

84 

LAST 

330 

06,3427 

52  155 

1 

nxcH 

MPAC 

C183 

RFF 

1 

06,3430 

3 

1465 

1 

CA 

ACT  AZ 

(GYRO  PLLSES) /(PIPA  PLLSE)  X 21 

-6) 

♦ 

■)18A 

REF 

6 

L AST 

33  1 

06,3431 

0 

3433 

0 

TC 

GCCNFSUe 

-lACIAZ)  (PIFAZ)  (GYRC  PLLSFS) 

X 

21+14  ) 

A01882 

extend 

* 

A01P88 

CCS 

DEI  VX 

If  >!  ^ 

(PIPA  PULSE)  X 21+14) 

AO  184 5 

DXCH 

MPAC 

AOl 64fc 

CS 

ACOAZ 

(GYRO  PLLSFS)  /(PIPA  PLLSE)  X 21 

-6) 

A01847 

TC 

GCCMPSUe 

+ (ArCAZ)  (PIPAX)  (GYRO  PLLSES  ) 

X 

21+14) 

0185 

REF 

55 

LAST 

33  1 

06,3432 

0 

0 156 

0 

TC 

NFAC  +2 

19;0<;  /^UG.  LEMQN/I IC  .099  FftGE  332 


GAP:  ASSFNBLE  RFVISIDN'  116  CF  AGC  FRCGRAi^  LUMINAPY  PV  N'ASA  2C2H12-071 


L 

IML' 

compfnsation  package 

USER'S  PAGE  NO.  6 E2  S3 

0199 

RFF 

56 

LAST 

33  1 

06,3933 

56  159 

1 

GCnMPSLB  XCF 

VPAC 

ALIA  CP  ACSPA  COEFFICIENT  ARRIVES  IN  A 

020P 

06,3939 

0 C006 

1 

EXTEND 

C(RPAC)  = (PTPA  PULSES)  X 2(+19) 

0291 

PFF 

57 

LAST 

^3  2 

C6,3935 

7 C 159 

0 

NP 

RPAC 

(GYRC  PULSES )/ (PI  FA  PULSE)  X 2(-6)  ^ 

0292 

RFF 

18 

LAST 

98 

06  ,3936 

52  123 

0 

rxcF 

veuF 

NCR  = (GYRC  PULSES)  X 2(+£)  * 

9203 

R FF 

58 

LAST 

332 

06,3937 

2 015  5 

0 

CA 

RIFAC  +1 

►'INCP  PART  PIPA  PULSES 

0209 

06, 3990 

0 C006 

1 

EXTEND 

0205 

REF 

59 

LAST 

332 

06,3991 

7 0159 

0 

KP 

MPAC 

ADJA  OR  ADSRA 

0206 

REF 

27 

LAST 

321 

06,3992 

59  CCl 

1 

TS 

L 

0207 

RFF 

3? 

LAST 

299 

06, 3993 

3 9755 

1 

CAF 

ZERO 

0208 

REF 

19 

LAST 

332 

06 ,3999 

20  123 

0 

LAS 

V EOF 

NOR  = (GYRO  PLLSES)  X 2(  + 6)  => 

0209 

REF 

20 

LAST 

332 

06,3995 

2 0122 

0 

CA 

veuF 

PARTIAL  RESULT  - RAJCR 

0210 

06 ,3996 

0 0016 

1 

EXTEND 

0211 

REF 

16 

LAST 

296 

06,3997 

7 9793 

1 

RP 

e IT9 

SCALE  2(-(6)  SHIFT  RIGHT  6 * 

0212 

REF 

18 

LAST 

329 

06,3950 

50  120 

0 

INDEX 

BLF 

RESULT  = (GYRC  PULSES)  X 2(4l9) 

0213 

R'^F 

3 

LAST 

1 1 1 

06  ,395  1 

21 '972 

0 

CAS 

GCORIP 

HKADTA)  (PIPAI  ) CR  H I ( A C SR  A ) ( F 1 P A I ) 

3219 

rff 

21 

LAST 

332 

C6,3952 

2 0 122 

1 

CA 

VEUF  +1 

PARTIAL  RESULT  - MINOR 

0218 

06,3953 

0 100  6 

1 

extend 

0 216 

REF 

17 

1 AST 

332 

06,3959 

7 9793 

1 

RP 

E ITq 

SCALE  2(46)  SHIFT  RIGHT  6 * 

0217 

REF 

28 

LAST 

332 

06,3955 

59  OC  1 

1 

IS 

L 

0218 

RFF 

33 

LAST 

332 

06,3956 

2 A7  55 

1 

CAF 

ZERO 

0219 

REF 

19 

LAST 

332 

06,3951 

5C  130 

c 

INDEX 

BLF 

RESULT  = (GYPC  PULSES)  X 2(41/) 

0220 

RFF 

9 

LAST 

332 

06, 3960 

21 ' 972 

0 

DAS 

GCCHP 

(ACTA)  (PIPAI)  CR  ( ADSRA  ) (P  IPA  I ) 

022  1 

RFF 

32 

LAST 

321 

C6 ,3961 

C 0002 

0 

tc 

C 

G'VP:  RPVISTPN  116  AGC  FRCGFAM  LUMIN/PY  PY  ^ASA  2n21112-Q7L 19:09  AUG.  1 1 ♦ 1 9 ^ LE  NON  A 10 ,099  PAGE  333 


L T^u  CCf'PENS/STinN  P/'CKAGE  LSEF'S  P/GE  NC.  7 E3  S3 


>'22? 

06 ,3462 

0 00:i6 

1 

CP  IFTSUe 

EXTENC 

0223 

RPF 

20 

L4ST 

332 

06,3463 

22  131 

1 

GXCF 

BLF  +1 

0224 

06,3464 

0 0006 

1 

EXTEND 

C(A)  = NFO  (GYRO  PULSES)/(CS)  X 2(-5) 

0225 

RFF 

3 

LAST 

327 

06,3465 

7 1074 

1 

NP 

1/PI PADT 

(CS)  X 2(+6)  NOW  (GYRC  FLLSES)  X 2(+3) 

0226 

REF 

60 

LAST 

332 

06,3466 

22  155 

C 

LXCH 

«FAC  +1 

SAVE  FCF  fractional  CORPENSATICN 

0227 

06 , 3467 

0 0 )')6 

1 

EXTEND 

022fi 

prrp 

19 

LAST 

254 

06 ,34  7( 

7 4750 

0 

NP 

e IT4 

SCALE  2(  ■»!  1 ) SHT  FT  P IGHl  1 1 

0229 

REF 

21 

LAST 

3^3 

06, 3471 

SC  130 

c 

INDEX 

BLF 

0230 

REF 

5 

LAST 

332 

06,3472 

21 ' 472 

0 

CAS 

GCDMP 

HI (NBC  1 (CELTAT)  (GVRC  PLLSES)  X 2(  + 14) 

0231 

REF 

6 1 

LAST 

3 3 3 

C6, 3473 

3 C 1 5 5 

r 

CA 

RFAC  +1 

NCW  RlNCf  PART 

0232 

06, 3474 

0 0006 

1 

FXTENO 

0233 

REP 

2C 

LAST 

3 3 3 

06,3475 

7 4 750 

0 

RP 

P IT4 

SCALt  2(  -H  1 ) SHIRT  RIGHT  1 1 

023-=^ 

RFF 

29 

LAST 

332 

06,3476 

54  CCl 

1 

TS 

L 

0 23  5 

REF 

34 

1 AST 

332 

16,3477 

3 ^ 7 ? 5 

1 

OAF 

1 EPQ 

0236 

REF 

22 

LAST 

333 

06,3500 

50  130 

0 

INDEX 

BLF 

ACC  IN  FRACTICNAL  COMPENSATION 

)237 

RPF 

6 

L AST 

333 

06, 35'i  1 

21*472 

0 

DAS 

GCCRP 

(NBC)  (CELTAT  ) (GYRC  PLLSES)  X 2(  + 14) 

C23R 

REF 

12 

LAST 

305 

06 , 35)2 

3 4 752 

0 

CPFTSLB2 

CAF 

Two 

PIPAX,  PIPAV,  PIPAZ 

0239 

REF 

23 

LAST 

333 

06,3503 

6 0130 

c 

AD 

BLF 

0240 

REF 

24 

LAST 

333 

06,3504 

56  130 

<1 

xr  h 

BLF 

0241 

REF 

94 

LAST 

324 

06 ,3505 

50  03  ) 

1 

INDEX 

A 

0242 

REF 

7 

LAST 

3 3 3 

66,3506 

11*471 

0 

CCS 

GCCRF 

ARE  GYRC  CCRRANCS  1 PULSR  CP  GREATER 

0243 

06 ,3537 

1 3511 

0 

TCF 

+ 2 

YES 

0 24  4 

REF 

25 

LAST 

3 3 3 

C 6 , 3 5 1 C 

0 0131 

1 

TC 

BLF  +1 

NC 

0245 

REF 

1 

06,3511 

7 3 56  1 

1 

RASK 

CCRPCHK 

CFC  -1 

0246 

REF 

95 

LAST 

333 

06 ,3512 

10  003 

0 

CCS 

A 

ARE  GYRC  commands  GREATER  THAN  2 PULSES 

1247 

REF 

4 

LAST 

329 

06,351’ 

55*477 

0 

7S 

GCCRFSW 

YES  - SET  GCOMFSW  POSITIVE 

0248 

RFF 

26 

LAST 

333 

06,3514 

0 0 13  1 

1 

TC 

BLF  +1 

NO 

G flP;  ASSEN6LF  R^VISinN  116  CF  AGC  PRCGR^*^  Lt'MINflRV  8V  NASA  202  1 1 1P-071 


iq;Cq  /iLG.  11,1969  LF^Oh/i  ID  .09q  F fiC-E  33^ 


L IVL  CCMPENSATION  package  LSFR'S  page  no.  e E3  S3 


1249 

PFF 

5 

LAST 

327 

06,3515 

3 475  1 

r 

1 /GYRC 

CAF 

FCUR 

PIPAZ,  pipay,  fipax 

C250 

PFF 

27 

LAST 

333 

16 ,3516 

54  130 

1 

TS 

BLF 

1251 

PEF 

28 

LAST 

334 

06,3517 

5C  130 

0 

INCFK 

PLF 

SCALE  GYpn  CCPMANCS  FOR  IPLPLLSE 

1252 

REF 

8 

LAST 

333 

06, 3521 

3 1472 

1 

CA 

GCCMP  +1 

FRACTICNAL  PULSES 

0253 

06,3521 

0 0106 

1 

EXTEND 

1254 

RPf 

21 

LAST 

2 PC 

G6, 3522 

7 9 744 

r 

PF 

BIT8 

SF IFT  P ICHT  7 

02  55 

PFF 

29 

LAST 

334 

06, 3523 

50  130 

0 

IN'DE  X 

BLF 

0256 

PEF 

9 

LAST 

334 

06,3524 

55' 472 

0 

TS 

GCOMP  +1 

FRACTIONAL  PULSES  SCALED 

1257 

REF 

35 

LAST 

333 

06,3525 

3 4 7 55 

1 

CAF 

ZERC 

SET  GCCPP  = 0 FCP  CAS  INSTRUCTION 

0256 

R8F 

30 

LAST 

334 

•16,3526 

50  130 

0 

INDEX 

BLF 

0259 

REF 

10 

LAST 

334 

06,3527 

57' 471 

1 

Xf  F 

GCCP!F 

GYRC  PULSES 

0260 

06, 3530 

0 0106 

1 

EXTEND 

0261 

REF 

22 

LAST 

334 

06,3531 

7 4 744 

0 

PP 

BITS 

SHIFT  RIGHT  7 

0262 

REF 

31 

LAST 

3 ^ < 

C6, ^532 

51  130 

0 

INDEX 

BLF 

0263 

PEF 

1 1 

LAST 

33  6 

06,2533 

21 ' 47? 

0 

DAS 

GCFMP 

ACC  TFESF  TC  FRACTIONAL  FLLS5S  ABOVE 

0264 

PEF 

32 

LAST 

334 

C 6 ,3534 

10  130 

1 

CCS 

euF 

PIPAZ,  PIPAY,  PIPAX 

0265 

PFF 

2 

LAST 

327 

06, 3535 

6 7752 

0 

AO 

NFGl 

0266 

PEF 

2 

LAST 

329 

06,3536 

1 3516 

1 

TCF 

1/GYRC  +1 

0267 

REF 

12 

LAST 

334 

C6, 3537 

C1471 

1 

LGCCWP 

ECACP 

GCFPF 

LESS  THAN  ZERC  IMPOSSIBLE 

0268 

REF 

2 

LAST 

327 

06, 3540 

•3  2 5 7 

0 

CAF 

LGCOPF 

0269 

REF 

58 

L AS7 

30  1 

06,3541 

0 4615 

1 

TC 

B ANKCAl L 

0270 

REF 

2 

LAST 

274 

06,3542 

17315 

0 

CACR 

I PUPULSE 

CALL  GYRC  TCPCUING  ROUTIMF 

1271 

PEF 

59 

LAST 

334 

06,3543 

0 4616 

1 

TC 

B AMKCALL 

1272 

PEF 

6 

LAST 

274 

06,3544 

17710 

1 

CACF 

IPUSTALL 

WAIT  FGP  PULSES  TC  GET  CUT 

0273 

REF 

24 

LAST 

30C 

06,3545 

1 5 15  5 

1 

7CF 

ENPQF  JOB 

TFPFCPAPY 

0274 

PFF 

6 

LAST 

334 

06,3546 

3 4751 

0 

G COMP  1 

CAF 

FOUR 

PIPAZ,  PIPAY,  FIPAX 

0275 

fff 

- - 

LAST 

334 

06,3547 

54  12C 

1 

IS 

BLF 

12  76 

PFF 

34 

LAST 

334 

06,3550 

5C.  130 

0 

INDEX 

BLF 

RESCALF 

0277 

PEF 

12 

LAST 

336 

06,3551 

3 1472 

1 

CA 

GCCMp  fl 

0278 

06,3552 

C CCC6 

1 

EXTEND 

0279 

PFF 

23 

LAST 

336 

06, 3553 

7 4744 

0 

PP 

BITS 

SHIFT  PINCF  FART  LEFT  7 - PAJCP  PART  = 0 

0280 

REF 

•a  c; 

LAST 

336 

06 ,3554 

50  131 

0 

INDEX 

BUF 

0281 

REF 

14 

L AST 

33  A 

C6,3555 

23*472 

1 

LXCH 

GCCPP  +1 

BITS  8-19  CF  PINCP  PART  WERE  = C 

0282 

REF 

36 

LAST 

334 

06 ,3556 

11  131 

1 

CCS' 

BLF 

PIPAZ  , PIPAY,  PIPAX 

1283 

PFF 

3 

LAST 

33^ 

06,3557 

6 7 752 

c 

AC 

NECl 

0284 

PPF 

1 

06, 3560 

1 3547 

c 

ICE 

GCCMPl  -H 

0285 

06,3561 

77776 

1 

CCMPCFK 

DEC 

- 1 

LFSS  THAN  ZERC  IPIPOSSIBLE 

0286 

REF 

2 5 

LAST 

334 

C6, 3562 

1 5155 

1 

1CF 

FNDCF JOE 

G&P 


aSSP^^BLE  PPyiSION  116  AGC  FPCGRAP  LUMNflKY  BV  ^flSA  2021112-U71 


19:09  AUG.  11,1969  LE^ON  A IP  . CG  ■;  PAGE  335 


L TMIJ  CnMPFNSATION  PACKAGE  USEE'S  PAGE  NC.  9 E3  S3 


0?87 

RFF 

5 

LAST 

333 

06,3563 

11'477 

0 

N’ECONLY 

CCS 

GCPMPSW 

BYPASS  TF  GCCPPSV<  NEGATIVE 

)288 

06, ’564 

1 3567 

1 

TCF 

+ 3 

0289 

06,3565 

1 3567 

1 

TCF 

+ 2. 

0290 

RFF 

2d 

lAST 

334 

06,3566 

1 5155 

1 

TCF 

ENFOF JDE 

029005 

06, 3567 

0 0 00  4 

0 

INHINT 

02901 

RCF 

6 

LAST 

230 

06 ,3570 

10  076 

1 

CCS 

FLAGWP02 

FREREAD  T’PLFT  M/iy  CCINCICE 

0290’ 

REF 

27 

LAST 

336 

06,3571 

1 5155 

1 

ICF 

ENCCF jne 

02903 

REF 

28 

LAST 

33F 

06,3=72 

1 5155 

1 

ICF 

ENOCF  jce 

0290A 

06,3573 

1 3574 

c 

TO  F 

+ 1 

02905 

REF 

3 

LAST 

296 

06, 3574 

3 C 1C4 

1 

CA 

F LAGkFDB 

IF  SURFACE  FLAG  IS  SET,  SET  TFM 1 

02906 

RFF 

74 

LAST 

334 

(16, 35  75 

7 4744 

0 

MASK 

BITS 

PCSITIVF  SC  THAT  THE  ACCEIERATICN 

TERPS 

02907 

RFF 

4 

LAST 

96 

06,3576 

54  141 

1 

TS 

TERl 

VvILL  BE  COPPENSATEO. 

02908 

06,3577 

c roc6 

1 

EXTEND 

C291 

06 , 3600 

1 3 60  3 

0 

ezF 

+ 3 

ARE  WE  CN  THE  SLPFACE 

0292 

RFF 

Id 

LAST 

296 

06, 3601 

C 4674 

c 

TO 

I 6NKCALL 

CN  THE  SLRFACE 

02'525 

REF 

1 

■06, 36'»2 

7754  1 

1 

CADR 

PIPASR  +3 

PEAT  FIPAS,  BLT  CC  NOT  SCALE  TFEP 

0293 

REF 

2 

LAST 

Idd 

C6,36C3 

3 0025 

a 

CA 

T IPCl 

(CS  ) X 2( +14  ) 

0294 

RFF 

4 

LAST 

333 

C6, 36.1^ 

57’C74 

c 

XCH 

1 /PI  FACT 

FPEVICUS  T IPE 

0295 

06 ,3605 

0 000  3 

I 

RFLI NT 

0296 

06,3606 

4 0000 

0 

CCR 

0297 

RFF 

5 

LAST 

33  5 

C6, 36:i7 

6 1074 

c 

AO 

1 /FI  FACT 

PRESENT  TIPE  - PPEVICLS  t]mE 

0298 

RTF 

1 

06,3610 

6 4736 

1 

NFC2 

AC 

HAL  F 

CORRECT  FOR  PCSSI9LF  TIPFl  TICK 

0299 

REF 

2 

LAST 

335 

C6 , 36  1 1 

6 4736 

1 

AC 

HAl  F 

0300 

REF 

30 

1 AST 

333 

06, 3612 

56  COl 

0 

XC  h 

L 

IF  TIPEl  CIC  ACT  TICK,  REPCVE  RESULTING 

C301 

REF 

31 

LAST 

335 

06,3613 

56  001 

0 

XCH 

1 

OVERFLOW. 

'330  2 

06,3614 

C CCC6 

1 

A,'eD3 

EXTEND 

C(A)  = celt  AT  (CS)  X 2(  + 14) 

0303 

REF 

IB 

LAST 

255 

06, 3615 

7 474? 

0’ 

ftp 

BI  TIO 

SHIFT  RIGHT  5 

0304 

REF 

22 

LAST 

332 

R6,3616 

52  125 

0 

CXCF 

veUF  +2 

0 30  4 1 

REF 

36 

LAST 

334 

06,3617 

3 4 755 

1 

CA 

ZFFC 

03042 

RFF 

6 

LAST 

33  5 

06,3620 

55*477 

0 

TS 

GCOMPSU 

INDICATF  CCPPANOS  2 PLtSES  CR  LESS 

03042 

RFF 

’7 

LAST 

334 

C6 , ’62 1 

54  13^ 

1 

TS 

PLF 

INDEX  X,  Y,  Z. 

03044 

OFF 

5 

LAST 

335 

06, 3622 

10  14  1 

1 

cr  S 

TEMl 

IF  SURFACE  FLAG  IS  SET, 

03C45 

RFF 

2 

1 AST 

3 2 9' 

06, 3623 

0 3364 

0 

TC 

I RI  GX 

CCPPENSATE  ACCELERATICN  TEPPS. 

03.05 

06,3624 

C C0C6 

1 

EXTEND 

0306 

RFF 

23 

LAST 

335 

06,3625 

3 0125 

1 

DCA 

VELF  +2 

0307 

RFF 

62 

LAST 

333 

06 ,3626 

52  155 

1 

CXCh 

MPAC 

DELTA!  NCW  SCALED  (CS)  X 2(+19) 

331  1 

RFF 

4 

LAST 

3 29 

06, 3627 

4 1460 

G 

cs 

NBDX 

(GYPC  FLLSES)/(CS)  X 2(-5) 

0312 

REF 

1 

06,3630 

0 3652 

0 

TC 

F EIASSU3 

-(NBDX)  (CELTAT)  (GYRC  PLLSES)  X 

2 ( + 14  ) 

03121 

R FF 

6 

LAST 

335 

C6,3631 

10  141 

1 

CCS 

TFMl 

IF  SURFACE  FLAG  IS  SFT, 

03122 

per 

2 

LAST 

329 

06, 3632 

0 3401 

1 

TC 

1 RIGV 

COPPENSATE  ACCELERATI CN  TERPS. 

GAP 


fSSP^PLF  REVISION  116  CP  ACC  PRCGRAM  LUMINAPV  NASA  2C211]2-n71 


19;CG  fUG.  11,1969  LEMCNMC.099  PACE  336 


L CC^'PENSATION  P4CKi\GF 


LSFR'S  PAGE  NO.  10  E2  S3 


0313 

06, 3623 

C 

CCC6 

1 

EXTENC 

03  1 A 

PEE 

2A 

LAS"^ 

335 

06 ,3634 

4 

0125 

0 

CCS 

V8LF  +2 

0315 

REE 

6 3 

LAST 

335 

C6 ,3635 

52 

155 

1 

CXCF 

MPAC 

DELTAT  SCALED  (CS)  X 2(+19) 

0316 

REF 

2 

LAST 

329 

06,3636 

0 

1-^6  1 

C 

CA 

NBDY 

(GYRC  FUSES  )/  (CS  ) X 2 (-5  ) 

031  7 

REF 

2 

LAST 

335 

06 ,3637 

r> 

3652 

0 

TC 

FBIASSIJB 

-(NBDY) (CELTAT)  (GYRC  PLLSES)  X 2(+14) 

03171 

REP 

7 

LAST 

3 3 5 

C6, 364C 

10 

14  1 

1 

CCS 

TENl 

IF  SUFFACF  flag  IS  SET, 

03172 

REF 

2 

LAST 

329 

06, 3641 

0 

3416 

1 

TC 

I RIGZ 

CCMPENSATE  ACCELFRATICN  TERf'S 

03!  8 

06,3642 

0 

0006 

1 

EXTENC 

0319 

REF 

25 

1 AST 

33  6 

06, 364T 

4 

C 125 

0 

CCS 

VBLF  +2 

0320 

REF 

64 

LAST 

336 

06  ,3644 

52 

155 

1 

CXCF 

MPAC 

DELTAT  scaled  (CS)  X 2(+19) 

0321 

REF 

2 

LAST 

32  c 

G6 ,3645 

4 

14  62 

1 

CS 

NBC  Z 

{ GYPC  PULSES) / (CS)  X 2 (-5 ) 

0322 

REF 

3 

LAST 

336 

06, 3646 

0 

3652 

0 

TC 

FBTASSUB 

+ (NBCZ)  (CELTAT)  (GYRC  PLLSES)  X 2(  + 14) 

0323 

RPP 

7 

LAST 

335 

06 , 3647 

11 

•477 

0 

CCS 

GCOMPSw 

ARE  GYRC  COMMANDS  GREATER  THAN  2 PULSES 

J324 

REF 

■3 

LAST 

33A 

06, 365C 

1 

3515 

1 

TC  F 

1 /GY  PC 

YES 

0325 

REF 

29 

LAST 

335 

06,3651 

1 

5155 

1 

TCF 

ENOOF JOB 

NC 
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03?6 

3327 

REF 

DPP 

33 

38 

LAST 

LAST 

332 

335 

06, 3652 
L6.3653 

56  CL2 
54  131 

0 

0 

FPIASSLB  XCE 
TS 

C 

euF  +1 

0328 

REF 

3A 

LAST 

337 

C6, 3654 

3 0002 

c 

CA 

c 

N8C  SCALFC  (GYRC  PULSES)/(CS)  X 

2(-5  ) 

1329 

06,3655 

0 0006 

1 

EXTEND 

03  30 

PFF 

65 

LAST 

336 

06,3656 

7 0154 

0 

PP 

PPAC 

CELTAT  SCALED  (CS)  X 2(+lS) 

0331 

P.FF 

39 

LAST 

337 

U6, 3657 

50  130 

0 

INDEX 

BLF 

0332 

REF 

15 

LAST 

334 

06,3660 

21 • 472 

0 

CAS 

GCOMP 

HI (MBC ) ( CELTAT ) (GYRC  PLLSFSl 

X 2 ( + 14  ) 

0333 

REF 

•3  C 

LAST 

337 

06,366 1 

3 PC02 

c 

GA 

C 

NCw  ffecticn'Al  part 

0334 

06 , 3662 

0 0006 

1 

EXTEND 

0335 

REF 

66 

LAST 

337 

06 , 3663 

7 0155 

1 

NF 

MPAC  +1 

0336 

REF 

32 

1 AST 

335 

06, 3664 

54  nci 

1 

IS 

L 

0337 

PFF 

37 

1 AST 

335 

06,3665 

3 4755 

1 

CAP 

ZERO 

C33R 

REF 

40 

LAST 

337 

06, 3666 

5C  130 

c 

INDEX 

BLF 

0330 

REF 

16 

LAST 

337 

06, 3667 

21  '472 

0 

DAS 

GCEMR 

(NBC)  CELTAT)  (GYRC  PLLSES) 

X 2( +1*  ) 

0340 

PFF 

1 

06,3670 

1 3502 

1 

TCF 

DPFTSUB2 

GFECK  RAGNIILCE  CF  CONFFNSATICN 

0341 

REF 

60 

LAST 

334 

06,3671 

r 4616 

1 

LASTBIAS 

TG 

BANKC  AL  L 

0341  1 

P'=F 

1 

06,3672 

17271 

0 

CACR 

P IPUSEl 

0341  2 

REF 

8 

LAST 

336 

06,3673 

1 1 ' 477 

C 

CCS 

GCOMPSW 

0342 

06, 3674 

1 3677 

C 

TC  F 

+ 3 

0343 

06,3675 

1 3677 

0 

TCF 

+ 2 

0344 

RFF 

3(1 

LAST 

336 

06,3676 

1 5155 

1 

TCF 

ENDCF JC8 

0344  1 

P'^F 

4 

LAST 

335 

06 , 3677 

3 010  4 

1 

CA 

FLAGWRD8 

IF  SURFACE  FLAG  IS  SET,  SET  TE^l 

03442 

REF 

“3 

LAST 

298 

06,3700 

7 4744 

n 

PASK 

SURFFETT 

POSITIVE  SC  THAT  THE  ACCFLERATICN  TERMS 

03443 

RFF 

8 

L AST 

336 

06,37  1 1 

54  141 

1 

TS 

TEPl 

UlL  EE  CCMPENSATEC. 

0345 

PEP 

1 

06,3702 

3 772  1 

1 

CAF 

PRT031 

2 SBCCNOS  SCALED  (CS)  X 2(+8) 

0346 

REF 

6 

LAST 

2 3^ 

C 6 , 3 7 9 3 

57 ' C74 

c 

XCF 

1 ZPT  FACT 

034  7 

06, 37  7R 

4 0000 

c 

CCP! 

Q34F 

REF 

3 

LAST 

321 

06 ,3715 

6 1234 

n 

AO 

PIPTIME  +1 

0349 

REF 

1 

06,3  706 

1 3610 

1 

TCF 

NPC2 

0350 

PFF 

3 

LAST 

334 

36,37  '7 

3 3537 

0 

GCOMP  ZER 

CAF 

LGCOMP 

RCLTINE  TC  ZERC  GCCMF  EEFCRE  FIRST 

035  1 

RFF 

10 

LAST 

32  9 

^6,3710 

56  003 

1 

XCH 

EEANK 

GALL  TC  1/PIPA 

03S2 

REF 

0 

LAST 

329 

06,3711 

54  163 

1 

IS 

PCCE 

0^53 

REF 

38 

LAST 

337 

06,3712 

3 4755 

1 

CAP 

ZERO 

0354 

REF 

9 

LAST 

337 

G6, 3713 

55'477 

c 

TS 

GCCPPSW 

0355 

RFF 

17 

LAST 

33  7 

06, 3714 

55*471 

c 

TS 

GCr  NP 

0356 

REF 

18 

LAST 

337 

06,3715 

55' 472 

0 

TS 

GCCPP  +1 

0357 

REF 

19 

LAST 

33  7 

C6, 3716 

55 ' 473 

1 

TS 

GCCPF  +2 

0358 

REF 

20 

1 AST 

337 

06,3717 

55*474 

0 

TS 

GCOMP  +3 

0359 

REF 

21 

LAST 

33  7 

C6, 3720 

55*475 

1 

TS 

GCCMP  +4 
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0360 

REF 

22  LAST 

337 

06,3721 

55'A76  1 

TS 

GCPNiP  +5 

0361 

REF 

3 LAST 

32  S 

C6.3722 

1 3361  1 

TCF 

I FIGl 

PESTCPE  EEANK  ANC  RFTLRN 

gap: 

ASSFNBLR  RCVISIOK  116  CP  ACC  FPCGRAm  LUMINARY  SY  NASA  2021112-C71 

19:C9  ALG.  11,1969 

LEMCNA1C.099  PAGE  329 

L 

P6 '■ 

LSER'S  PAGE 

NO.  1 EC  S3 

POO  in 
POO  11 
R0012 

CUEROLTINF  NAME:  VE9C.ALL 

MCr  NT:  0 CATE;  9 JAN  1966 

Mnp  by:  digital  DEV^L  GRCUP  ICC  SRCTICN;  R63 

R0013 

FUNCticnAL  CESCRIPTICN: 

R0014 
POO  15 

CALLEC  8V  VEPR  89  ENTER  CURING  PO'l.  PRIG  10  USEC.  CALCULATES  AND 
DISPLAYS  FINAL  FDAI  BALL  ANGLES  TG  PCTNT  LM  +Y  CR  +Z  AXIS  AT  CS^. 

R0016 

R0017 

1.  KEY  IN  V 89  F CNLY  IF  IN  FPOG  00.  IF  NOT  IN  FOG,  OFEPATCP  FRROR 
FXIT  R63,  OTHFRV,ISE  CCNTINU^. 

ANC 

POPIB 
ROf  1 9 

2.  IF  IN  POO,  CO  IMU  STATUS  CHECK  ROUTINE  (RC2P0TH).  IF  I ML  CN  AND 
CRIENTATICN  KNCWN  TC  LGC,  CCNTINUE. 

ITS 

R002n 

Rn021 

R0022 

3.  FLASF  DISPLAY  V OA  N 06.  P2  INCICAIES  khlCF  SPACFCPAFT  AXIS  IS  TC 
PE  FCINTFC  AT  09^.  INITIAL  CFCICE  IS  PREFERRED  ( +Z ) AXIS  (R2=l). 
ASTRONAUT  CAN  CHAIGE  TC  (+X)  AXIS  ( R2  NCT  = 1 ) EY  V 2 2 F 2 E . CONTINUE 

R0023 

AFTER  keying  in  RRCCEED. 

R002.A 

4.  8CIF  VEHICLE  STATE  VFCTCPS  UFCATEC  EY  CONIC  ECS. 

POC25 

ROC26 

5.  HALF  MAGNITUDE  LM T LCS  VECTOR  (IN  STABLE  NEMBEP  CCCRCINATES)  ANC 
HALF  MAGNITUCE  UNIT  SPACECRAFT  AXIS  VECTOR  (IN  BODY  CCCRDINAIES) 

RCC27 

PREPARED  F(^R  VECPCINT. 

R0028 

6.  GIMPAL  angles  FRrM  VfCRPINT  TRANSFCRYEC  INTO  FCAI  BALL  ANGLES  EY 

R0n?9 

BALLANGS.  flash  riSPLAY  V D6  N 18  ANC  AWA  I^^  RESPONSE. 

P0030 

7.  RFCYCLF  - RETURN  TC  STEP  4. 

R0031 

R0032 

TERX'INATF  - FX  IT  P63. 

FPCCFEC  - RESET  3AXTSFLG  ANC  CALL  P6DL FM  FOR  ATTITUCF  MAMFLVER. 

ROO’^ 

GALLING  SFOLFNCE:  V 69  f. 

R0039 

P0035 

SUFROUTINFS  CALLFC:  CHKPCOF,  ROFEOTF,  GOXDSPF,  CSMCCNIC,  LEMCOMC, 

VEFPriNT,  BALLANGS,  R6ULFM. 

R0036 

NCFYAL  FXIT  MPCFS:  TC  FNCFXT 

R0037 

ALARMS:  1.  OPERATCR  ERROR  IF  NCT  IN  POO. 

R0038 

R0039 

2.  PROGRAM  ALARM  IF  TMl  IS  CFF. 

3.  program  A(  AI  M IF  IMU  DPIENTATinN  IS  LNKNCRN. 

RCC9C 

CLTFLI:  NONF 

P009] 

ERASABLE  INITIALIZATION  PEQL'IREC:  NONE 

RO'1^2 


CEER15;:  OPTIONI,  +1,  tcfci,  PCINTvSM,  SCAXIS,  CPt-I,  CTHETA,  CPSI 
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0044 

pep 

4 

LAST 

285 

F4, 1606 

EBANK= 

RGNE 

0046 

32 , 221 7 

RANK 

32 

0046 

RFF 

1 

26,2000 

SETLCC 

BAlivLANGS 

CC47 

26,2322 

RANK 

0048 

REF 

1 

COUNT=l 

* t/R63 

004Q 

REF 

61 

LAST 

337 

26, 2022 

0 46  16 

1 

V89CALL 

3C 

BANKO  all 

IPL  S3ATLS  CFECK.  RETURNS  IF  ORIENTATION 

0050 

REF 

1 

26,2023 

11236 

0 

CACP 

R02BCTH 

KNOWN.  ALARMS  IF  NOT. 

:)05i 

REF 

3 

LAST 

2 c c 

2 6, 2 C 2 4 

3 6250 

G 

OAF 

THPFE 

ALLOW  ASTRONAUT  TO  SELECT  CESIRED 

0052 

REF 

8 

L AST 

30  6 

26,2325 

55*050 

1 

TS 

OFTTONX 

TRACKING  ATTITUDE  AXIS. 

0053 

REF 

15 

LAST 

305 

26,2026 

3 4753 

1 

CAF 

ONE 

0054 

RFF 

9 

LAST 

340 

26,2027 

55*051 

C 

3S 

OPTICAX  +1 

005  5 

RFF 

1 

26,2030 

3 2117 

1 

CAF 

VB04N  12 

V 04  N 12 

0056 

REF 

62 

LAST 

^4F 

26,2031 

C 4616 

1 

3C 

RAAKCALL 

0057 

REF 

2 

LAST 

226 

26, 2:)3  2 

23477 

1 

CADR 

GCFLA  SH 

QC58 

REF 

26 

LAST 

30  1 

26,2033 

Q 5472 

0 

TO 

EM'EXT 

terminate 

J059 

26,2034 

0 2036 

c 

30 

+ 2 

FPCCEEF 

0060 

26,2035 

0 2030 

0 

TO 

-5 

CATA  IN.  CTTTCM-H  = 1 FOR  2 AXIS 

006  1 

REF 

1 1 

LAST 

324 

26 , 2036 

0 604  2 

1 

V89RECL 

30 

I NT  PR  FT 

= 2 FOP  X AXIS 

0062 

26, 2C37 

43  2 34 

RTB 

DAD 

00  63 

RFF 

2 

LAST 

208 

26 ,2  140 

21574 

1 

LOAOT IME 

REAC  PRESENT  TIRE 

00635 

REF 

1 

26, 204  1 

14122 

n P 1 N I N 

0064 

RFF 

1 

26, 2042 

Q22C5 

1 

STORE 

TSTAR382 

SA\/F  tire  for  lerccmc  fall 

0C65 

RFF 

4 

LAST 

237 

2 6 , 2.',)4  3 

34)41 

3 

STOALL 

TDEC  1 

STORE  IIRE  FOR  CSMOONIC  CALL 

•0066 

RFF 

1 

26,2044 

2 7 0 6 7 

0 

CSNCCMC 

OSR  STATE  VECTCF  UPCATE 

0067 

26, 2-3  4 5 

77775 

1 

VLOAC 

CSROOMC  LEF3  R VECTOR  IN  RATT 

0C68 

RFF 

1 

?6,2C46 

00  301 

0 

RATT 

006C 

REF 

c 

L AST 

34C 

26,2047 

162C7 

!3 

STOOL 

PONE 

SAVE  FOR  LINE  CF  STGH3  (LOS)  COMPUTATION 

CC70 

RFF 

2 

LAST 

340 

26 , 2 350 

r)2?:3  5 

1 

TSTAFT82 

0071 

REF 

C 

LAS'r 

3 46 

26,205  1 

34041 

0 

STOALL 

TCEf  1 

STORF  TIME  FOR  LFRCONIC  CALL 

0072 

REF 

1 

26,2052 

27  101 

1 

LERCOM  C 

LER  STATE  VECTOR  LPOATE 

0073 

26 , 2353 

52375 

1 

VLCAD 

VSU 

eSM  PCSI3I0N  - LER  PGSI3TCN  = LOS 

Oi)74 

RFF 

6 

LAST 

34E 

26,2054 

C2  2F  7 

G 

RCF  E 

LOS  VECTOR  LFFT  IN  MPAC 

0075 

RFF 

■2 

LAST 

34<', 

26,2-55 

Ooo-j  1 

0 

RATT 

0076 

26,2056 

47121 

0 

NXV 

RTR 

(REFSR.MA3  X LOS).  TRANSFORRS  LOS  FPOR 

3077 

REF 

6 

LAST 

2 10 

26, 2':i5  7 

0 1734 

i 

REF  SPRAT 

R8FEREN0E  COCRO  TO  ST  A F RIEME  COORD  . 

0C771 

RFF 

1 

26,2060 

21727 

0 

NORMUNI 3 

CC78 

REF 

2 

LAST 

1 53 

26, 206  1 

0 3 7 7 3 

1 

STORE 

FOINTVSP 

STCPF  LOS  FOP  VECP0IN3  CALL 

0079 

26, 2052 

77776 

1 

Exit 

CC8<" 

RFF 

10 

LAST 

34C 

26 , 2063 

4 1051 

n 

os 

OPTIONX  -t-l 

1 FOP  Z AXIS.  2 FOR  X AXIS. 

008  1 

REF 

16 

LAST 

34C 

26,2064 

6 4 753 

1 

AD 

ONE 

0082 

26,2065 

0 '1006 

1 

FXTEAD 

QCF3 

RFF 

1 

26 ,2066 

1 2113 

1 

ezF 

AL  INE  7 

0084 

REF 

12 

LAST 

34C 

2 6 , 2 Of  6 7 

0 6042 

1 

ALT  NFX 

TO 

I NTPRET 

X AXIS  alignrent 

0C85 

26,2070 

77775 

1 

VLCAC 

0C66 

RFF 

4 

LAST 

30C 

26,2071 

06522 

1 

UMTX 

PFAC  (.5,  0,  C) 

GAP 
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0087 

0088 
0089 

P£F 

P TF 
PEF 

11 

1 

1 

1 AST 

251 

26,2072 
26, 2C73 
26,  2-174 

37765 
56C4C 
0.:  32  2 

1 

C 

1 

V89CALL1  STCALL 
STGRE 

SCAX!  S 

VECPCINT 

CPHI 

STCRE  selectee  ALIGAPEAT  7XIS 

PUTS  EESIRFC  GIM  ANG  (CG,1G,PGI  IN  TPPAC 

STCRE  GINEAL  ANGLES  FCP  BALLANGS  CALL. 

CC9C 

26,2C75 

77776 

1 

EXIT 

00905 

rff 

63 

LAST 

3A0 

26,2076 

0 4616 

1 

TC 

BANKCALL 

0091 

PEF 

1 

26, 2 ■'77 

54272 

1 

CAOR 

BALLANGS 

FLTS  DESIRED  BALL  ANGLES  IN  FCAIX,Y,2 

0092 

P.EF 

1 

26,2100 

3 2120 

0 

CAF 

VB06M8 

V 06  N 18 

0093 

REP 

6A 

LAST 

3A  1 

26,2101 

0 46  16 

1 

TC 

bankcall 

NCUN  18  REFERS  TC  FDA1X,Y,Z 

CC9A 

REF 

3 

LAST 

340 

26,2102 

2047  7 

1 

CACR 

GOFLASH 

0C95 

PEF 

21 

LAST 

3AP 

26,2103 

0 5472 

0 

TC 

ENCEXT 

TERRINAT  E 

0096 

26, 2104 

0 2106 

1 

TC 

+ 2 

PPCCF  EC 

CC97 

R = F 

1 

26, 2 ns 

0 203b 

0 

TC 

V89RECL 

RECYCLE 

0098 

REF 

30 

LAST 

299 

26,2106 

0 5516 

c 

TC 

DCWNF  LAG 

RESET  3 AXIS  FLAG 

0099 

REF 

2 

LAST 

230 

26,2107 

00124 

0 

AORE  S 

3AXI SFLG 

RESET  BIT6  FLAG  IvCRD  5 

0100 

REF 

65 

LAST 

3A  1 

26, ’lie 

0 4616 

1 

TC 

BAAKCALL 

PFRFORRS  LER  NANFLVEP  TC  ALIGN  SELECTEE 

om 

REF 

1 

26,2111 

54  123 

c 

CAOR 

R6CLEA 

SPACECRAFT  AX  IS  T C CSM  . 

0102 

REF 

28 

LAST 

34) 

26,2112 

1 5472 

1 

TCF 

ENDEXT 

TEPMNATF  R63 

0103 

PRp 

13  LAST 

34G 

26,2113 

C 6C42 

1 ALINEZ 

TC 

INTPPFT 

2 AXIS  ALIGNMENT 

■)1''4 

26,2114 

52175 

0 

VLOAO 

GCTC 

C1C5 

REF 

4 LAST 

300 

26,2115 

06516 

0 

UNITZ 

READ  ( C , C , .51 

0 106 

PEF 

1 

26,2116 

54072 

0 

V89CAL  LI 

0107 

26,2117 

01014 

0 

VB04N  12 

VN 

412 

0108 

26,2120 

01422 

1 

V806M8 

VN 

0618 

GAP! 
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L 

ATTITLCE  maneuver  ROLTTNE 

USER'S  PAGE 

NO. 

1 

EC  S3 

PDOmI 

ELCCK  2 

LGC  ATTITUDE 

MANEUVER  ROUTINE-KALCMANU 

RCC02 
P JDD3 

MOD  2 
PROGRAM 

DATF 

DESCRIPTION 

5/1/67  EY  CCN  KEENF 

ROC04 
R0006 
P )ODB 

KALCMANU  IS  A RCUTINE  FFICF  GENERATES  COMMANDS  FOR  THE  LM  DAP  TO  CHANGE  THE  ATTITUDE  CF  TFE 
DUPING  EPEE  FALL.  IT  IS  DESIGNEC  TC  MANFUVER  THE  SPACECRAFT  FROM  ITS  INITIAL  ORIENTATION  TO  SCME 
ORIENTATION  SFECIFIEC  BY  the  FRCGPAM  WHICH  CALLS  KALCMANU,  AVriOING  GIMBAL  LOCK  IN  THE  FPCCESS. 

S FACECFAFT 
DESIRED 
IN  TFE 

POOIO  wnr  2 VEPSTCN,  This  TESTREC  attituce  is  specififc  by  a set  of  three  connakded  col  angles  STCREC  as  2S  ccnflenent 
R0012  SINGLE  PRECISION  ANGLES  IN  THE  THREE  CCNSECUTIVF  LCCATICNS,  CPHI,  CTHETA,  CFSI,  V»HEPE 


POOIA  CPFT  = CORRANEEC  CUTER  CTMPAL  ANGLE 

R0015  CTHETA  = CCVn^noEO  INNFR  GTNEAL  ANGLE 

R0<T16 CPSI  ^ CQR'^^ANCEC  MICCL^  GIYBAL  ANGLE 


PIC17  when  PCINTING  a SPACECRAFT  AXIS  (F.I.  X,  Y,  Z,  ThE  AOT,  THRLST  AXIS,  ETC)  THE  SLPFCLTINE  VECPCINT  NAY  BE 

POniQ  USED  TO  GENERATE  THIS  SIT  OF  CESIPEC  C CU  ANGLES  (SEE  CESCPIPTION  IN  R 60  ) 

R0021  with  TFIS  information  KALCMAMJ  DETERMINES  TFE  DTREC.TICN  CF  THE  SINGLE  ECLIVALEM  FCTATICN  (CCF  ALSO  U)  AND  TEE 
P0023  MAGNITLOE  OF  THF  PCTATICN  (A«/)  TC  BRING  TFE  S/C  FRGM  ITS  INITIAL  ORIENTATION  TC  ITS  FINAL  QRIENTATICN. 

RU025  THIS  DIRECTION  REMAINS  F I XFQ  gpTH  IN  INERTIAL  CCCRDINATES  AND  IN  CrNNANCEC  S/G  AXES  TFRQUGHCUT  TFE 

R0027 

RCC28  ‘'ANELVER.  ONCE  CCF  AND  AN  FAYE  BEEN  CETFRMNED,  KALCNANU  theN  EXAMINES  TFE  MANELVER  TC  SEE  IF  IT  FILL  BPING 

R )0  3Q ;; 

RG1031  the  S/C  THRCUGF  GINPAL  ICCK.  IF  SC,  CCF  AN'P  AM  ARE  REAGJLSTED  SO  TFAT  THE  S/C  FILL  JLST  SKIM  TFE  GIMBAL 
R0O3T  LOCK  ZCNE  ANO  ALIGN’  THE  X-AXiS.  IN  GENERAL  A FINAL  YAFI  ABOUT  X FILL  BE  NECESSARY  TC  COwpLFTE  THE  MANELVER. 

Rjias  NEFOLESS  TO  SAY,  NFITFEF  THE  INITIAL  NOR  TFE  FINAL  QRIENTATICN  CAN  EE  IN  GIMBAL  LOCK.  

RCC37 

R0038  FOR  PROPER  ATTITUDE  CCNTROL  THE  CIGITAL  AUTCPILCT  MUST  BE  GIVEN  AN  ATTITUDE  REFERENCE  FFICF  IT  CAN  TRACK. 

P.004'1  KALCMANU  COES  THIS  BY  GENERATING  A PEFEREMCE  CF  DESIRED  GIMBAL  ANGLES  (CDLXC,  CELYC,  CDUZC)  WHICH  APE  UPEATSC 

R0042  EVERY  CNE  SECOND  DURING  THE  MANEUVER.  TC  ACHIEVE  A SMCGTFEP  SECUENCE  OF  CCMIMANCS  BETFEFN  SUCCESSIVE  UPDATES, 

RI104A  the  program  Al SO  GENERATES  A SET  CF  INCREMENTAL  CCU  ANGLES  (CELCCCL)  TC  EE  ACCEC  TC  CDU  DESIREE  BY  TFE  CIGITAL 

RD046  AUTCPILCT.  KALCMANU  Al.SG  CALCULATES  THE  COMPCNENT  MANEUVER  RATES  (CMEGAFD,  OMEGAQD,  CMEGARD),  WHICH  CAN 

R0048 

PTDAP  RE  DETEPMINEC  SIMPLY  BY  MULTIPLYING  COF  BY  SCME  SCALAR  (ARATE)  C C P R E S P C N D I N G TC  THE  CESIFEC  RCTATICNAL  PATE. 

R0031 

ROC52  ALTCMATIC  m£medverS  5PE  TIMEC  FITF  TFE  HELP  CF  FAITLIST  SC  THAT  AFTER  A SPECIFIFC  INTERVAL  TFE  Y ANC  Z 

R)0S4  CrSIREO  RATES  APE  SET  TC  ZERO  ANC  TF^  DESIRED  CDU  ANGLES  (COUYO,  CDLZD)  APE  SET  ECUAL  TC  TFE  FINAL  CESIPFC  CCU 

RG^EO  ANGLES  (CTHETA,  CFSI).  IF  ANY  YAF  REMAINS  CUE  TC  GIMBAL  LOCK  AVOICANCF,  TFE  FINAL  YAf  MANELVER  IS 

POOSa  CAICULATFC  AND  TFE  CESIPEO  YAF  RATE  SET  TC  SCmF  FIXFC  VALLE  (PCILPATE  = + CR  - 2 CEGFEES  PER  SEC). 

ROOfiO  IN  THIS  CASE  ONLY  AN  INCREMENTAL  CCUX  ANGLE  (CELFRQLL)  IS  SUPPLIED  TO  THE  DAP.  AT  THE  END  CF  THF  YAF 

RD062  maneuver  OR  IN  THE  EVENT  THAT  THERE  FAS  NC  ^INAL  YAW,  CCUXC  IS  SET  EQLAL  TC  CPFI  AND  THE  X-AXIS  CESIREC 

R0064  RATE  SET  TQ  ZERO.  THUS,  UFCN  C''MPLETIQN  OF  TFE  MANEUVER  THE  S/C  FiLl  FINISH  UP  IN  A LIMIT  CYCLE  ABOUT  TFE 

RCOfcH  desired  FINAL  GIM»AL  ANGLES. 


RD067  PROGRAM  ICGIC  El r F 

ROOf-fi  KALCMANU  IS  CALLED  AS  A HGF  PRIORITY  JOB  HITH  ENTRY  POINTS  AT  KALCMAN3  AND  VECPCINT.  IT  FI  Prf  PICKS 

R0070  LR  THE  CURRENT  CDL  ANGCS  TC  BE  USED  AS  THE  BASIS  FCP  ALL  COM  PUT  A T 1 CN  S INVCLVING  THE  INITIAL  S/C  CRIFNTATICN. 
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PQ072 

RQ074 

Rn:)76 

IT  THPN  DETERMINES  TEE  CIRECTICN  COSINE  MATRIC-S  RELATING  BOTE  THE  INITIAL  AND  FINAL  S/C  CRIENTATICN  TC  STAELE 

^ ^ if 

MEMBFR  axes  (MIS,  NFS).  IT  ALSO  COMPUTES  THE  MATRIX  REIATING  FINAL  S/C  AXES  TC  INITIAL  S/C  AXES  (Nfl).  TEE 

Ra078 

R0080 

R0081 

ANGLE  CF  ROTATION  (AN)  IS  TEEN  EXTRACTED  FROM  THIS  MATRIX,  AND  TESTS  ARE  MADE  TO  OETFRvinp  if 
A)  AM  LESS  THAN  ,25  CFGFEES  (MINANG) 

R.)08  2 

B)  AM  GREATER  THAN  170  CEGREES  (NAXANG) 

R.>083 

IF  AM  less  THAN  .25  DEGREFS,  NC  CCMPLICA'fEC  AUTCNATIC  MANEUVER  INC-  IS  NECESSARY.  THEREFCRE  WF  CAN  SIMPLY 

R0085 
R0C87 
R008  8 

SET  CPL  DFSIRFO  FCUAL  tc  TEE  FINAL  C CU  CESIREC  ANCLES  AND  TERMINATE  THE  JCB. 

IF  AM  IS  GRFATER  than  .25  OFGR=ES  8UT  LESS  THAN  17G  CEGRPES,  THE  AXES  CF  TEE  SINGLE  EQUIVALENT  RCTATION 

R009O 

RCC91 

R0093 

(CCF)  IS  FXTRACTFD  FRCM  thf  SKFVv  symmetric  CCMFCNENTS  CF  NFI.  >i  >! 

IF  AM  GREATER  TEAM  170  DEGREES  AN  ALTERNATE  METHOD  EMPLOYING  THE  SYMMETRIC  FART  CF  MFI  (MFISYM)  IS  USEC 

RCC95 

P0096 

TC  DETERMINE  COF, 

R0097 

R0099 

R-n^u 

THE  PRCGPAM  then  CHECKS  TO  SEE  I THE  MANEUVER  AS  COMPUTED  WILL  BRING  THE  S /C  TEIRCUGH  GIMEAL  LCCK.  IF 
SO,  A NEW  MANEUVER  IS  CALCULATED  WEIGH  WILL  JLST  SKIM  TEE  GIMRAL  LCCK  ZCNE  AND  ALIGN  TEE  S/C  X-AXIS.  THIS 
METHCD  assures  teat  TEe  ADOITIONAL  maneuvering  tc  AVCID  GIMBAL  LOCK  WILL  8E  KEPT  TC  A MINIMUM.  SINCE  A FINAL 

RQ103 
R 1105 

P AXIS  YAW  WILL  BE  NECESSARY,  A SWITCH  IS  RESET  (STATE  SWITCH  31)  TC  ALLOW  FDR  TE=  CCMPLTATION  CF  THIS  FINAL 
YAW  „ 

ROl  J6 
Rni^8 
ROl  1 1 

AS  STATED  PPEVICUSLY  KALCMA.MJ  GENERATES  A SEQUENCE  OF  DESIRED  GIMBAL  ANGLES  WHICH  APE  UPCATEC  EVERY 
SFCOND.  THIS  IS  ACCGMPl  ISHEO  BY  A SMALL  PCTATICN  CF  TEE  CESIFEC  S/(  FRAME  ABCLT  TEE  VECTCR  CCF.  TEE  NEW 

P0112 

DESIRED  REPFPF-MCE  MATRIX  IS  THEN, 

R0113 

>|c  ' ^ 

poll  4 
P0115 

MIS  = MIS  del 

N+1  N 

ROl  16 
Rni7 
R0119 

X> 

WHERE  CEL  IS  THF  MATRIX  CORRESPONDING  TO  THIS  SMALL  RCTATION.  THE  NEW  CDL  ANGLES  C«N  THFN  bE  EXTRACTEC 
* 

PO  120 

FRCM  M IS. 

R0121 

AT  THE  BFGINNING  OF  THE  MANEUVEP  TEE  AUTCPILOT  DESIRED  RATES  (GMEGAPD,  nMEGAQD,  C^EGARO)  AND  TEE 

R n 2 3 
R012  5 
ROl  2 7 

MANEUVER  timings  ARE  FSTABLISEED,  CN  THE  FIRST  PASS  AND  GN  ALL  SUBSEQUENT  UPCAT£S  TEF  GDU  DESIRED 
ANGLES  ARE  LOACrc  WITH  TEF  APPROPRIATE  VALUES  AND  thc  INCREMENTAL  CCL  ANGLES  APE  CCMFLTEC.  TEE  ACC  CLCCKS 
(TIMEl  AND  TTME2)  ARE  THAN  CHECKED  TO  SEE  IF  TEE  MANEUVER  WILL  TERMINATE  BEFORE  THE  NEXT  LPDATE.  IF 

R0129 
R0131 
P 0 1 3 3 

NOT,  KALCMANU  CALLS  FOR  ANOTHER  UPDATE  (RLN  AS  A JOB  WITH  PPICRITY  TBC)  IN  ONE  SFCCND.  ANY  DELAYS  IN  THIS 
CALLING  SEQUENCE  APE  AUT CM AT  I C ALL V COMPENSATED  IN  CALLING  FOR  THE  NEXT  LPDATE. 

R3134 
ROl  36 

IF  IT  IS  FOUND  THAT  TH>=  MANEUVER  IS  TC  TERMINATE  BEFCPE  THE  NEXT  UPCATE  A RCUTINE  IS  CALLED  (AS  A WAIT- 
LIST TASK)  TO  STOP  TEE  MANEUVER  AT  the  AopROPRIATE  TIME  AS  EXPLAINEC  ABOVE. 

R0138 
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RC13S 

CALLING  SEOUFMCE 

R0140 

IN  ORDER  TP  PFRFCRR 

A KALCMANU  SUPERVISED  MANEUVER,  THE  CORRANCED  GIMBAL  ANGLES 

RUST  BE 

PRF-CCMPUTED  AND 

RT14? 
00  IAA 
RT1A6 

STCREC  IN  LOCATICNS  CPHI,  CTHFTA,  CP'I.  THE  USER:S  PROGRAM  RUST  THEN  CLEAR  STATE  SWITCH  NO 
ATTITUDE  MANEUVER  RCLTITF  TC  RFRFCRR  ANY  FINAL  F-AXIS  YAW  INCURRED  EY  AVOIDING  GIMPAL  LCCK. 
THFN  INITIATFO  P,Y  ESTARLISHING  THE  oGLLCWING  EXFCLTIVE  JOP 

33  TC  ALLOW  THE 
THE  MANEUVER  IS 

ROl  A7 
R01A8 

❖ 

CAF  PRIC  XX 

P0149 
RO  150 
R0151 

INHINT 

TC  FI  NO  VAC 

POL  5 2 
RC153 

2CA0R  KALCMAN3 

RELINT 

RT154  THE  USER:S  PROGPAR'  MAy  EITHER  CONTINUE  OR  W'UT  FCR  THE  TFPHINATICN  CF  THE  RANEUVER.  IF  THE  USER  NISHES  TO 
R0156  WAIT,  h’--  RAY  PUT  HIS  JCB  TC  SLEEP  WITH  THE  RCLLCWING  INSTRUCTIONS 


P0157 

1 

TC 

BAN  KCALL 

R015R 

L +1 

CADR 

ATT'TALL 

RQ159 

L + 2 

( BAD 

RETURN) 

R0160 

1.  + 3 

( Gccn 

P'^TLPN  1 

R0161 

UPON 

CCRiPLET  ICN  OF 

THE  MANEUVER,  THE  PROGRAM  WILL  BE  AWAKENED  AT  L+3  IF  THE  MANEUVER  WAS  GCRFLETEC 

R0163  SUrCE ''FULLY,  CP  AT  1+2  IF  THE  RANEUVEP  WAS  APCPTFC.  THIS  ABORT  WCULC  OCCUR  TF  THE  INITIAL  OR  FINAL  ATTITUDE 
R0165  WA'  IN  GIR8AL  LCCK. 


P T166 
P0L68 
R0169 

**«NrlA  bFNE**«  it  I'  ASSURED  that  thE  DFSIRED  MANEUVERING  RATE  (G.5,  2,  5,  1C,  OEG/SEC)  HAS  FEEN  SELECTED  EY 

KEYBOARD  ENTRY  PRIOR  TO  THE  EXECUTION  CF  KALCMANU. 

IT  IS  ALSO  ASSURED  THAT  THE  AUTCRILCT  IS  IN  THE  ALTC  RODE.  IF  THE  RCDE  SWITCH  IS  CHANGED  DUPING  THE 

RD171 

R0173 

RD175 

MANEUVER,  KALCMANU  Will  TFRRINATE  VIA  GOODENC  WITHIN  1 SECOND  SC  THAT  P6C  MAY  RFCUFST  A TRIM  OF  THE  S/C  ATTITUDE 
THIS  IS  the  only  means  fhp  manually  terminating  A KALORANU  SUPERVISED  RANEUVFR. 

SUPPFLTINES 

R0176 

R0178 

WERE 

KALORANU  LSFS  A NUMBER  OF  INTERPRETIVE  SUBROUTINES  WHICH  MAY  EE  OF  GENERAL  INTFREST.  SINCE  THESE  RCLTINES 
PROGRAMMFC  exclusively  FCR  KALCMANU,  THEY  ARE  NOT,  AS  YET,  GENERALLY  AVAIUAEUE  FCR  USE  BY  CTHER  PRCGRARS. 

RO  180 
RO  18  1 
ROIB? 

W >M  3 

R01F3 
RO  18  5 

DOWN 

THI'  SLBPCIJTTNE  RULTIPLIFS  TWC  3X3  MATRICES  ANC  LEAVES  THE  RESULT  IN  THE  FIRST  IE  LOCATICNS  GF  THE  PUSH 
LIST,  I.F., 

R01R6  (R  R H ) 

R 0 1 R 7 ( C 1 ? ) 

RTIRR  * { ) ■ >!<  ^ 

R0189  R = (H  M M ) = R1  X M2 

R01°n 1 3 4 5 ) 


R 


R0191 
RO  19? 


{ 

( R 


) 

N ) 
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R019  3 

(6  7 8 ) 

RO  19^ 

PQ196 
RO  198 
RC199 

INDEX  REGISTER  XI  MLST  BE  LCaOED  iftlTh  THF  CCEPLENEM  CF  THE  STARTING  AEDRFSS  FOR  Ml,  AMD  >2  MLST 
LOADED  H7H  THE  CCMPLEMFAT  CF  THE  STARTING  ACCRESS  FOR  M2.  the  RCLTINE  LSES  THE  FIRST  2C  LCGATICKS 

BE 

CF  THE  PLSH 

R0201 

R02P3 

RQ205 

GOWN  LIST.  the  pIRST  ElFMENT  OF  THE  MATRIX  APPEARS  IM  FDC.  PUSH  UP  FCR  M . 

8 

PO206 
R0  2O7 

TRANSPOS 

R02C8 

R0210 

R0211 

THIS  ROUTINE  TRANSPCSES  A 3X3  MATRIX  AKC  LEAVES  THE  RESULT  IN  THE  PUSH  DOWN  LIST,  I.E., 
* * T 

R021  2 

M = Ml 

R0213 

INDEX  REGISTER  XI  MUST  fCNTAIN  THE  COMPLEMENT  CF  THE  STARTING  ADDRESS  FOR  Ml.  PLSH  UP  FCR  THE  FIRST 

ANC  SUE- 

R 0 2 1 5 
P0216 
R0  218 

SECIJEM  CCMPOMENT?  OF  Mo  This  SLB^GLTINE  AL5C  L5ES  ThF  FIRST  20  LCCiiTIC^S  OF  ThE  FUSh  fCWN  LIST, 

R02  19 
P0220 

CDL  TO  DCM 

R0221 

R0223 

R0225 

THIS  SLBPOUTINE  CCKVRRTS  THREE  CDU  ANGLES  IN  T(MPAC)  TO  A DIRECTION  COSINE  MATRIX  (SCALED  BY  2) 
THE  CORRESPONDING  S /C  ORIFNTATIONS  TO  THE  STABLE  MEMBER  FRAME.  THE  FCPMULAS  FCP  THIS  CONVERSION  ARF 

RELATi NG 

P.0226 

R3227 

M = crsY  CCSZ 

0 

R022e 

RQ229 

M = -COSY  SINZ  CCSX  4’  SINY  SINX 

1 

R023'i 

R0231 

M = COSY  STNZ  SINX  + SINY  COSX 

2 

R0232 

R0233 

M = SINZ 

• 3 

R023A 

R3235 

M = CCSZ  CCSX 

A 

R0236 

P0237 

M = -CCSZ  SINX 

c 

R0238 

RC239 

M = -SINY  COSZ 

6 

R02A0  M = RINY  SIMZ  CCSX  + COSY  SIAX 

R02A1  7 
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R'»2A?  M = -SINV  SINZ  SINX  + CCSV  CCS> 

R1243  8 


pn2A^ 

P02^8 

R02A6 

UHFRF  X 

Y 
Z 

= 

OUTER 

INNER 

MirCLE 

GIMBAL  ANGLE 
GIMBAL  angle 
GIMBAL  ANGLE 

Pn247 

TH‘^  INTEPPPETAT 

ICN  CF 

THIS  MflTRTX  IS  AS  FCLLCHS 

P024R 
P 0250 
R0251 

IF  A , A , A REPRESENT  THE  COMPONENTS  OF  A VECTOR 
X Y Z 

STAPLE  MEMBER  AXES  (B  , 8 , B I ARE 

IN  S/C  AXES 

THEN  THE  CCMFCNENTS  CF  THE  SAME  VFCTCP  IN 

R1252 

X Y 

Z 

R0253 

(B  ) 

( A ) 

R925^ 
R 0 2 5 5 
R 0 2 5 f 

( X ) 
( ) 
( ) 

( X ) 
( ) 
( ) 

R0287 

RC25E 

P0259 

(B  ) 
( Y) 
( ) 

= M 

( A ) 
1 Y ) 

( ) 

R026n 
R vT  2 M 

( B ) 
( Z) 

( A ) 
( Z ) 

R0  262 
RC2EA 
R0266 

THE  SUBROUTINE  HILL  STORE  THIS  MATRIX  IN  SECUENTIAL 
ORFIGRAM.  TO  DO  THIS  THE  CALLING  PRCGRAM  MIST  FiPST  LCAC 

LCCATTONS  CF 
X2  HITh  THE 

ERASABLE  MEMCPY  AS  SPECIFIED  BY  THE  CALLING 

* 

CCMPLEMENT  CF  THD  STARTING  ADDRESS  ECR  M. 

R0268 

RC269 

R0271 

INTERNALLY 
REGISTER  X2. 

, THE 

RCUTINE  LSES  THE  FIPST  16  LCCAT]cNS 

CP  THE  PUSH 

DOWN  LIST,  ALSO  STEP  REGISTER  SI  AND  INDEX 

RQ272 rCN  TC  CHU 

R0273  

R927A  >!< 

R0276  THIS  ROUTINE  EXTRAOTS  THE  COL  ANGLES  FROM  A DIRECTION  CCSINE  MATRIX  (M  SCAIEO  BY  2)  RELATING  S/C  AXIS  TC 

R 0278  XT' 

RJ28n  STAPL''  MFM8FR  AXES.  xi  MI.ST  CONTAIN  THE  CCNFIENENT  CE  THE  STARTING  ACCRESS  FCR  N,  THE  SUBROLTINE  LEAVES  THE 

R02R?  CORR^^FCN'DING  GIMSAL  ANGLER  IN  VIMPAQ  as  COUELF  PRECISION  l;S  COMPLEMENT  ANGLES  SCALED  BY  2RI.  THE  FCPMLLAS 

P02PX,  for  this  conversicn  are 

R0289  Z = ARCS  IN  (M  ) 

R0286  T ^ ~ 

R0287  Y = ARCSIN  (-m  /CCSZ) 

R0288  6 

R02P9  IF  M I c NEGATIVE,  Y IS  PEFIACEO  BY  PI  SGN  Y - Y 


R0290 
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ATTITUCE  PAAFIJVEP  ROUTINE 

LSEP'  S P/!GE  NO.  6 

EO 

S3 

R0291 

X = ARCSIN  (-P 

/CCSZ  ) 

RO  29  2 

5 

R0293 

TF  P IS  NEGATIVE  X IS  PEFLACEC  BY  PI  SGN  X - X 

R02  = A 

A 

R9295 

TEIS  ROUTINE  COES  NOT 

SET  THE  RUSH 

DOWN  POINTER,  BLT  LSE 

S THE  NEXT  8 LCCATICNS  CF  THE  PUSH  ECWN  LIST 

ANC 

R9297 

RETURNS  THE  POINTER  TC  ITS 

CRIGINAL  SETTING.  THIS  PROCEOURE 

ALLOWS  THE  CALLER  TC  STORE  THE  MATRIX 

AT  THE 

TEE  CF 

P0299 

THE  PUSH  OOV^N  LI  ST. 

R030O 

CELCCPP 

R9  30  1 

R039  2 

R03  13 

THIS  RCLTINE  CCPPUTES 

THE  EIRECTICN 

CCS  INE  MATRI X (DEL ) 

RELATING  CN 

Pn30A 

- 

R 13- '6 

IS  POTATEE  VvITH  RESPECT  TC 

THE  FIRST  8Y 

AN  ANGLE  , A , ABOUT  A 

LNIT  VECTCP,  L.  THE  ECPNULA  FCR  THIS 

MATRIX 

IS 

R9308 

R03C  9 

4 X 

--  T 

R0319 

EEL  = I CCSA  + 

UU  ( 1-CQSA  ) 

+ V SINA 

R0311 

X 

R0  312 

WHERE  * (1  0 

C ) 

R0313 

I = (0  1 

0 ) 

R031A 

( 0 Cl 

1 ) 

R931  5 

2 

RQ316 

(U 

u u 

U U ) 

Rn31  7 

( X 

X Y ’ 

X Z ) 

R031  8 

( 

) 

R0319 

— T ( 

2 

) 

R0320 

UU  = (U  L 

L 

L U 1 

P0321 

( Y X 

Y 

Y Z ) 

RC322 

( 

) 

R9323 

( 

2 > 

P032A 

(U  L 

U U 

U ) 

R0325 

( 7 X 

Z Y 

Z ) 

RT326 

(0 

-U 

L ) 

R0327 

( 

1 

Y ) 

R0328 

^ ( 

) 

R0329 

V = ( u 

0 

-L  ) 

R0330  X ( Z X ) 

P0331  ( ) 

R0332 (-U  U C ) 


RC333 


( Y 


X 


) 
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R0335  L = DMT  RCT/TICN  VECTOR  RESCLVEC  INTO  S /C  fXES 

P0336 f = POTMION  angle 


RJ337  * 

R033R THE  I N TFR  PRE  T AT  I C N CF  CEl  IS  fS  FCLLCVvS 


R033'5  IF  fi  , A , A RFPP.FSFNT  THE  CON'orNENT  OF  A VECTOR  IN  THE  RCTATEC  FRAPE,  ThEN  TFE  CCPFCNFNTS  CF  TFE  SAME 

RC3A1 X Y I 

P03A2  VICTOR  IN  THF  ORIGINAl  5 /C  AXES  (F  , E , E ) APE 
R0343  t '1  I 


R03AA  (fi  ) (A  ) 

R03A5  (X)  IX) 

R'.~)3A6 ( ) * ( ) 

RC’A7  (E  ) = DEL  (A  ) 

RCI3AR  ( Y)  ( V) 

R03A9 ( ) ( ) 

Rn350  (B  ) (A  ) 

RDSBl  (7)  ( Z) 


RD352  IMF  ROLTIN'R  NTLL  STCRE  THIS  MATRIX  (SCALEC  UNITY)  IN  SEQUENTIAL  LCCATICNS  CF  ERASABLE  MEMORY  BEGINNING  VsITF 

R')3BA 

ROBSA'  THE  LOCATION  OAILEQ  CEL.  IN  CRQFR  7Q  OSE  yfq  ROUTINE,  THE  CALLING  PROGRAM  MLST  FIRST  STORE  I lA  HALF  LMT 

P0358  noLBLE  PRECISTON  VFOTOR)  TN  THE  SET  OF  ERASABLE  LCCATICNS  BEGINNING  WITH  THF  ADDRESS  CALLED  COF.  THE  ANGLE,  A, 

P0360  MOST  THEN  BF  LOARFO  INTO  D(MPAC). 


Pn361  INTEPNALIY,  the  FPOOPAM  ALSO  USES  TEC  FIRST  10  LCCATICNS  OF  THE  PLSH  CONN  LIST, 

o J363 


PD364  REACCCDK 

R0365 


R0366  THIS  BASIC  LANGUAGE  SUBPCLTINF  LOADS  T(MRAC)  UITH  THE  THREE  COL  ANGLES. 

R )368 


R0369  SIGNmfAC 

R,137f1  ^ 

PD371  THIS  IS  A BASIC  LANGUAGE  SUBROUTINE  WHICH  LIMITS  THE  MAGNITUDE  OF  D ( M FAC  ) TO  + OR  - OFCSMAX  ON  CVEPFLCW. 

R037’  - — _ ^ 


RI374  PROGRAM  STCRAGE  ALLOCATION 


RQ37B 

1 1 

F T XEC 

Vf  ^ C R Y 

K)5S  WCROS 

RD376 

2 1 

FRASABLF  MEMORY 

<38 

RG377 

3 ) 

STATF 

SW  ITCHFS 

*3 
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P0378 

4 ) 

FLAGS 

1 

RQ379 

jrp  PRICPTTIES 

R0380 

1 ) 

KALG  MA 

TEC 

P')381 

2 ) 

ONE  SECOND  UPDATE 

TBD 

R 0 3 B2 

SLMMARY  OF 

STATE  SWITCHES  AND 

FLAGWCFCS 

USED  BY  KALCMANU. 

RT383 

R.T384 

STATC 

SHTCF  NO. 

FLAGWRO  2 
BIT  NO. 

SETTING 

MEANING 

R0365 

RD386 

R036F 

5r 

31 

lA 

C 

1 

MANEUVER  WENT  THROUGH  GINPAL  LCCK 
maneuver  CIO  NCT  GO  THROUGH  GIMBAL  LOCK 

R039n 

R0391 

R0392 

32 

13 

0 

CCNTINUe  LIPCATF  PROCESS 

RD393 

1 

START  UPDATE  PRCCESS 

RD394 

33 

12 

0 

PERFORM  FINAL  P-A>IS  TAW  IF  REQUIRED 

R0396 
RT398 
R0  399 

34 

11 

1 

0 

IGNCRE  ANY  FINAL  P-AXIS  YAW 
SIGNAL  END  OF  KALCMANU 

P0400 

1 

KALCMANU  IN  PROCESS  USER  '^UST  SET  SWITCH  BEFORE  INITIATING 

P0402  * internal  TC  KALC.MANu 


R0AC3  5LGGPSTTONS  FCR  FRCGPAN  TMEGPiTICN 


P04-'14 THE  FOLLOWING  VARIABLES  SHOULD  BE  ASSIGNED  TC  LNSHTCH  ERASAPLE 


R04'15 
POAfJt 
R34  '7 
ROAre 
ROADS 
ROAln 
RORll 
RD412 
ROAI3 


CRH  I 
GTHETA 
r o<;  ] 

FCINTVSM  +5 
SCAVIS  +5 
DEL  CCDU 
GEL  CCCLI 
CRl OCOL2 
RAT  E INC X 


R T4I A THE  FOLLO^tlNG  SUBROLTINES  MAY  BE  PUT  IN  A CIFFERENT  BANK 


R0415 


MXM3 
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TRANSFCS 
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ATT 

ITU'DE 

panfuvep 

RCUTIRC 
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GA2  0 

15.2C5C 

BANK 

1 5 

V+21 

REF 

1 

22,2000 

SETLCC 

KALCPCNl 

0A22 

22 ,2004 

BANK 

0423 

PFF 

3 

last 

287 

E6,  1676 

EEAN  K = 

BCCU 

P.0424 

the 

three 

CESIREO  i 

CDU  ANGLES 

PUST  8E 

STQRFC  AS 

SINGLE  PRECISION  TV,CS 

COVPLEVEAT  angles  in  THE  TFPEF  SUCCESSIVE 

P 1 4 2 6 

LOCATIONS 

, CPHI 

, CTHETA , CPS! 

• 

0427 

pt^F 

1 

COLNT* 

SF/KALC 

a4-’6 

RPF 

14 

LAST 

34  1 

22 ,2004 

0 6042 

1 

KALCNAN3  TC 

I N^PPET 

PICK  LP  THF  CURRENT  COL  ANGLES  ANC 

)4?9 

22 , 20^5 

77634 

0 

PTB 

CCMFUTE  TEE  MATRIX  FRCV  INITIAL  S/C 

0430 

REF 

1 

22, 20- '6 

44403 

0 

READCOLK 

AXES  TC  FINAL  S/C  AXES 

043! 

PFF 

4 

LAST 

35? 

22 ,2007 

03277 

0 

STCRE 

PCCU 

STORE  INITIAL  S /C  ANGLES 

0437 

22, 2 UO 

C 2^  C Q C 

c 

SLCAC 

ABS 

CHECK  THE  VAGMTUCP  OF  THE  CESIREC 

0436 

REF 

1 

22 , 2.'  1 1 

00  3 24 

1 

CPSI 

VICCLE  GIVEAL  ANGLE 

0439 

22,2012 

5K25 

1 

rsL 

BFL 

0440 

PER 

1 

22, 2 '13 

C44G3 

1 

LCCKANGL 

!■=  GREATER  TFAN  70  CEG  AECRT  MANEUVER 

0441 

REF 

1 

22 , 2014 

44724 

0 

TCCPACF 

0442 

22,  ?a5 

72364 

c 

AXC  ,2 

T LCAD 

- 

0443 

PEF 

4 

LAST 

137 

22, 2016 

03246 

1 

M I S 

0444 

REF 

A 

LAST 

352 

22  ,2C17 

03277 

0 

BCCU 

0445 

22,2020 

77624 

1 

CALL 

CONFUTE  THE  T R A NS FCRM AT  I C N FROV  INITIAL 

0446 

REF 

1 

22,2021 

44410 

1 

CCUTOOCM 

S/C  AXES  TC  STABLE  VFVEER  AXES 

0447 

22,2022 

72364 

0 

AXC  ,2 

T LCAC 

044  8 

PFF 

4 

1 AST 

117 

22, 2023 

02230 

1 

MFS 

PREPARE  TC  CALCULATE  ARRAY  VFS 

044  9 

RFC 

2 

LAST 

34  1 

22,2024 

00  32  2 

1 

CFHl 

0450 

22,2025 

7 7 6 2 4 

1 

CALL 

0451 

REF 

2 

LAST 

352 

22, 2C26 

444  10 

1 

CDLTCnCM 

04  52 

22 ,202  7 

45160 

1 

SECAC 

AXC  , 1 

call 

VTS  ANC  VFS  ARRAYS  CALCLLATED  $2 

0453 

RFF 

5 

LAST 

352 

22, 2C3G 

P 3 2 4 6 

1 

VI  S 

0454 

RRF 

1 

22,2031 

44326 

0 

TRANSOQS 

0455 

22 , 2032 

4 5 575 

1 

\,  L C A D 

STACR 

J456 

RCF 

12 

L ''ST 

136 

22,  2"'33 

5C457 

1 

STOVL 

T VI S +120 

0457 

22 ,2034 

77626 

0 

STACB 

0458 

PEF 

13 

LAST 

352 

22,2035 

5C465 

0 

STCVL 

TMS  +6 

0459 

22, 2036 

77626 

0 

STAOR 

0460 

REF 

14 

1 AST 

352 

22 ,2037 

74473 

1 

STCRE 

T MS 

THIS  = TRANSPCSEI  MS)  SCALED  EY  2 

0461 

■ 22,2040 

75  16C 

1 

AXC  , 1 

Axr  ,2 

0462 

REP 

15 

LAST 

352 

2? ,2041 

03313 

1 

TV  I S 

0463 

REF 

e. 

LAST 

3*^2 

22 ,2042 

0223  ) 

1 

MFS 

0464 

22, 2043 

7 76  24 

1 

CALL 

0465 

REF 

1 

22,2044 

44312 

1 

NXV3 

0466 

22, 2045 

^ c c c 

1 

VLC  AC 

STAOR 

0467 

PEF 

1 

22,2046 

51532 

1 

STCVL 

VFI  +120 

0468 

2?  ,2047 

77626 

0 

STACR 

0469 

REF 

2 

LAST 

352 

22, 2C5C 

51540 

1 

STCVL 

VFI  +6 

C47C 

22 , 2051 

77626 

0 

STACR 

0471 

REF 

■a 

LAST 

352 

22 , 2C52 

7 5546 

1 

STCRE 

VFT 

VFI  = THIS  ^FS  (SCALED  BY  4) 

0472 

22, 2T53 

4500  1 

1 

SFTPD 

CALL 

TRANSFCSF  VFI  IN  FC  LIST 
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0A73 

22,2054 

0CC23 

C 

18C 

0474 

PFF 

1 

22,28-55 

4423  5 

1 

TRASPSFO 

C475 

22 , 2 156 

45575 

1 

VLCAC 

STAOR 

0476 

R8F 

1 

2 2, 2C  5 7 

5C457 

1 

STCVl 

TFFI  -H2C 

0477 

22, 2060 

77626 

0 

STAOR 

04  7 8 

REF 

2 

LAST 

353 

22 ,2C61 

5C465 

0 

STCVL 

TNFI  -»6 

0479 

22,2062 

77626 

c 

STACR 

0480 

PFF 

3 

LAST 

353 

22,2063 

74473 

1 

STORE 

TRFI 

TRFI  = TPANSFCSE  (MED  SCALEC  EY  4 

R0481 

R04R2 

CAICULATE 

CCFSKEW  AKC 

MFTSYNi 

RC483 

0484 

22, 2064 

45  34  5 

1 

CLC  AC 

nsu 

0485 

REF 

4 

L AST 

353 

22, 2065 

03  3F  6 

1 

TRFI  +2 

0486 

RFF 

4 

LAST 

352 

22,2066 

02233 

1 

RFI  +2 

0487 

22.2867 

^ C -2  p C 

1 

FOOL 

DSU 

CALCULATE  CCF  SCALEC  BY  2/SIN(AM) 

048  6 

RFF 

5 

LAST 

353 

22 ,2.170 

0 2 2 3 5 

1 

MF  I +4 

0489 

REF 

5 

LAST 

353 

22,2871 

03310 

0 

TRFI  -^4 

0490 

22, 2 '72 

4 5 225 

1 

POOL 

DSL 

0491 

PFF 

6 

LAST 

353 

22 ,2 073 

03  316 

0 

TMFI  +100 

0492 

REF 

6 

LAST 

22, 2C74 

C2243 

c 

RFi  +10C 

0493 

22, 2075 

7 7666 

1 

VDEF 

0494 

REF 

C 

LAST 

137 

22,2076 

03326 

0 

STCPE 

CCFSKEW 

EQLALS  RFISKEW 

R049  5 

R0496 

CALCULATE 

AN  , 

ANC  FRCC 

FEE  ArcOPCING  TC 

ITS  MAGNITUCE 

R0497 

0498 

22, 2077 

43  24  5 

1 

OLCAD 

DAD 

0499 

RFF 

7 

LAST 

353 

22,2100 

02231 

0 

MFI 

0 50n 

PEF 

8 

LAST 

353 

22,2101 

02251 

c 

YFl  +16C 

0501 

22,2  102 

43225 

0 

DSU 

DAD 

0 50  2 

REF 

2 

LAST 

37 

22,2103 

06514 

1- 

CP 1/4TF 

05  >3 

REF 

9 

LAST 

c "2 

22,21"4 

C224  1 

1 

RFI  +80 

0 5,04 

RFF 

2 

LAST 

136 

22,2105 

03234 

0 

STORE 

cam 

CAR  = (RFIO+RFI4+NEI8-l)/2  EALF  SCALE 

0 505 

22,2106 

77  726 

1 

APCCCS 

0506 

PEF 

1 

2 2,  2 1'7 

02  2 3 6 

1 

STORE 

A 8 

AN  = ARCCCS ( CAR  ) (AR  SCALEC  EY  2) 

0507 

22,2110 

5 1025 

1 

DSU 

BPL 

0508 

RFF 

1 

22,2111 

04  263 

c 

MLAAG 

05  09 

REF 

1 

22,2112 

44117 

0 

CHFCKMA  X 

C51C 

22,2113 

77751 

1 

TLCAC 

RtANEUVFR  LESS  THAN  .25  DEGREES 

0511 

off 

3 

LAST 

352 

22,2114 

OC3  22 

1 

C PHI 

GC  DIRECTLY  I NTC  ATTITUCE  FCLC 

0512 

REF 

6 

LAST 

196 

22,2115 

37236 

1 

STCALL 

CCLXO 

ABOLT  CCRRANDEC  ANGLES 

05  13 

RFF 

1 

22 ,2116 

44  74  2 

0 

TCCBAC I 

STOP  rate  AMD  EXIT 

0514 

22, 2117 

^ C -2  ^ C 

1 

CFECKRAX  OLCAD 

DSL 

0515 

RFF 

2 

LAST 

353 

22,2120 

03335 

1 

AM 

0516 

RFF 

1 

22,2121 

0 4 2 6 5 

c 

M AX ANG 

0517 

22,2122 

77244 

0 

BPL 

VLCAD 

0518 

REF 

1 

22,2123 

44  131 

1 

ALT  CALC 

UNIT 

0519 

RFF 

6 

LAST 

353 

22,2124 

02226 

c 

CCFSKEW 

CCFSKEW 

0528 

22,2125 

77656 

1 

CM  IT 

0521 

RFF 

1 

22  ,2  126 

0 2 2 71 

c 

STCPE 

CCF 

CCF  IS  TFF  RIAMEUVER  AXIS 
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0522 

22,2127 

77650 

1 

GOTO 

SEE  IF  YANEUVER  GCES  T|-PU  GIYEAL 

LCCK 

0523 

PEE 

1 

22,2120 

4 4 7 4 4 

C 

LCCSK  IPT 

052A 

22,2131 

5 3 3 7 5 

0 

ALTCALC 

VUCAD 

VAO 

IF  AY  GREATER  THAN  17)  CEGREES 

C525 

REF 

10 

LAST 

353 

22,2132 

0223  1 

0 

MFI 

T526 

REF 

7 

LAST 

3 C “3 

22,2133 

C33G4 

0 

TRFI 

0527 

22,2134 

77762 

1 

VSR  1 

0528 

REF 

1 

22,2135 

27304 

0 

STEVL 

ME  ISYM 

0529 

RPF 

1 1 

LAST 

354 

22,2136 

02  23  7 

0 

RFI  +6 

C53P 

22,2137 

74455 

0 

VAC 

VSR  1 

0531 

REF 

8 

LAST 

3 54 

22  , 2 140 

0331  2 

1 

TRFI  +6 

053? 

REF 

2 

LAST 

354 

22,2141 

2 7 3 1 2 

1 

STCVL 

MFISYN  +6 

0533 

REF 

12 

LAST 

354 

22,214? 

02245 

0 

MFI  +120 

0534 

22,2143 

74455 

r 

VAC 

VSRl 

0535 

REF 

q 

LAST 

354 

22,2144 

03320 

rv 

TRFI  +12D 

0536 

REF 

*3 

LAST 

354 

22,2145 

03  32  J 

0 

STCRE 

MFISYN'  +12C 

YIF  ISYY=  ( YF  I +TMF  I ) /2  SCALED  BY  4 

R0537 

R0538 

R0539 

CAUCULATF 

COF 

P0540 

0541 

22 ,2146 

70545 

1 

CLCAC 

SRI 

0542 

REF 

3 

LAST 

3 5 3 

22,2147 

C3334 

0 

CAY 

0543 

22, 2150 

4 5 32  5 

1 

POOL 

DSU 

FCC  CAY 

J 4 

0 54  4 

REF 

1 

22,2151 

06522 

1 

DPFALF 

0545 

RFF 

4 

LAST 

354 

22, 2152 

03234 

0 

CAY 

0546 

22, 2153 

65204 

1 

BOVS 

PDDU 

PD2  1 - CAY 

J2 

0547 

REF 

1 

22,2154 

21713 

1 

S IGNYPAC 

0548 

REF 

4 

LAST 

354 

22,2155 

03224 

1 

YFISYY  +16C 

0549 

22,2156 

56225 

1 

csu 

OOV 

055C 

22,2157 

000  n 

c 

0 

0551 

22,2160 

0C003 

1 

2 

0552 

22 ,2161 

65366 

1 

SORT 

POOL 

COFZ  = SGRTIMFI SYY8-CAY)/1-CAY) 

0553 

REF 

5 

LAST 

3 5^ 

22,2162 

C3314 

1 

YFISYY  +8C 

i 

ROOT  2 

0554 

22,2163 

56225 

1 

DSU 

DDV 

0555 

22,2164 

00  301 

0 

n 

3556 

22,2165 

00003 

1 

2 

0557 

22 ,2166 

6 5366 

1 

SORT 

POOL 

COPY  = SCRT ( YF I SYY4-C AY )/( 1-CAY ) 

JFCCT2 

0558 

REF 

6 

L AST 

354 

22 ,2167 

0 3304 

0 

MFISYM 

05  5 9 

. 22, 2170 

56  2 2 5 

1 

DSU 

DDV 

0560 

22.2171 

00  301 

0 

0 

0561 

22,2172 

? P 0 r 3 

1 

2 

0562 

22,2173 

55566 

1 

SORT 

VDEF 

COFX  = SCRT(YFISYY-CAY)/(1-C«Y) 

$FCCT  2 

0563 

22,2174 

77656 

1 

UNIT 

0564 

REF 

2 

LAST 

3 5 3 

22,2175 

C2  2 7 1 

0 

STCRE 

C CF 

RC565 

P0566 

CETERM  IME 

LARGEST 

CEF  AND  ADJUST  ACCrRCINGLV 

R0567 

056  8 

22 ,2176 

45345 

1 

CCFMAXGE 

CLOAC 

DSL' 

0569 

REF 

0 

LAST 

354 

22,2177 

C327  1 

0 

CCF 

0570 

REF 

4 

LAST 

354 

22, 2200 

03273 

1 

CCF  +2 

0571 

22 ,2201 

71240 

1 

ENN 

CLCAC 

COFY  G CCC> 

GAP 


^SSF^'PLF  PPyiSTON  116  CP  / GC  PPrGRAV  LU^>INAFY  PV  NA?A  2)21112-071 


19tCC  AUG.  H.196S  LEMQNAID.Cqq  PAGE  355 


L ATTITLCE  MANFUVFR  POLTI^'r 


LSFP'SPAGENO.  13  EE  S3 


057? 

0573 

057A 

PEF  ■ 
RTF 

1 

C 

LAST 

354 

22, 2 2'' 2 

22.2203 

22.2204 

4421  1 
03271 
5CC25 

o o 

CSL 

CC^'P!? 

CCF 

0575 

pep 

6 

LAST 

355 

22,2205 

03275 

1 

CCF  +4 

0576 

REF 

1 

22, 2206 

44766 

c 

RFTHCC3 

CCFZ  C CCFX 

CR  COFY 

0577 

22, 2?  >7 

7 7 6 5 0 

1 

GOTC 

0576 

Rpp 

1 

2? , 2210 

44747 

0 

METHCDl 

CCFX  G CCFY 

CR  CCFZ 

1579 

22,2211 

45345 

1 

CCPPl 2 

CLOAC 

esu 

0580 

REF 

7 

LAST 

22.2212 

03273 

1 

C CF  +2 

15  61 

REF 

6 

LAST 

355 

22  ,2213 

C3275 

1 

CCF  +4 

058? 

22,2214 

7764C 

0 

6RN 

0563 

RFF 

2 

LAST 

355 

22,2215 

44266 

0 

METHC03 

CCFZ  G CCFY 

CP  CCFX 

0564 

22,2216 

51145 

c 

ivrTHCC2 

CLCAC 

BPL 

CCFY  RAX 

0585 

RFF 

7 

LAST 

2 5 2 

22, 2217 

C3230 

1 

CCFSK'^l^  +2 

LY 

0586 

PFF 

1 

22,2720 

44774 

0 

U2PCS 

0587 

22,2221 

57575 

1 

\/LC  AD 

VCCRF 

0588 

REF 

9 

LAST 

355 

22,2222 

03271 

0 

r CF 

0589 

REF 

10 

LAST 

3 5 5 

22,2223 

032  71 

0 

STFRE 

CCF 

0590 

22,2224 

5 1145 

n 

L2P0S 

CLCAC 

BFl 

0591 

REF 

7 

LAST 

354 

22,2225 

0 3^06 

1 

HFISYM  +2 

LX  LY 

05^2 

RFF 

1 

2? , 2226 

44232 

1 

CKL'21 

0593 

22, 2227 

5 7 5 4 5 

1 

DLCAD 

DC0A''F 

SIGN  CF  LX 

CFFCSITE 

TC 

UY 

0594 

RFF 

11 

LAST 

355 

22,2230 

03271 

0 

COF 

0595 

RFF 

12 

LAST 

355 

22,2231 

C 3 2 7 1 

c 

STCFE 

CCF 

0596 

22,2232 

51145 

0 

0KU21 

DLOAO 

BFL 

0597 

R = F 

8 

1 AST 

3 55 

22,2233 

03316 

0 

^^FISY^'  +10C 

UY  LZ 

J598 

REF 

2 

LAST 

354 

22,2234 

44  744 

c 

LCCSKIRT 

0599 

22,2235 

57545 

1 

CLOAC 

OCOMP 

SIGN  CF  LZ 

CFFCSI TE 

TC 

LY 

0600 

RFF 

1 3 

LAST 

2 5 5 
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POVL’X 

0653 

22,2316 

77776 

1 

0,2 

0 6 54 

22,2317 

0000  7 

0 

6,1 

0655 

22,2320 

62703 

1 

VXF*-'' 

PDVL=X 

0656 

22,2321 

77776 

1 

0,2 

0657 

22,2222 

con  5 

0 

12D  ,1 

065  8 

22,2323 

41503 

1 

PLSH 

0655 

22,2324 

77776 

1 

o 

0660 

22, 2325 

776  16 

0 

PVC 

R0661 

FETURN' 

WITH  M 1 XM 

12  IN  PD  LIST 

R0662 

0663 

22, 2326 

766C1 

1 

TRAN  SPO  5 

SETPD 

VLCAO« 

TFANSFCS  TRANSFCSES  A 

3X3  MATRIX 

066^ 

22,2327 

OOO'U 

0 

0 

AND  LEAVES  RESULT  IN 

FD  LIST 

0665 

22,2330 

COCCI 

n 

0,1 

RATRIX  AECRESS  IN  XR 1 

0666 

22.233 1 

62713 

c 

PDVL=!‘ 

PDVL* 

0667 

22,2332 

00007 

) 

6,  1 

0668 

22,2333 

000  15 

c 

12D,1 

0669 

22 ,2334 

77606 

1 

PUSH 

NATRI X IN  FO 

0 6 7C 

22  ,2335 

77776 

1 

TFNSPSPE 

EX  IT 

ENTER  WITH  MATRIX  AT 

C IN  PD  LIST 

0671 

REF  9 

LAST 

299 

22,2336 

50  120 

1 ' 

INDEX 

F IXLCC 

06  72 

22 ,2337 

52  013 

1 

CXC  H 

12 

3673 

REF  10 

LAST 

357 

22,2340 

50  120 

1 

INDEX 

F IX  LfC 

0674 

22,2341 

52  017 

0 

DXCH 

16 

0675 

REF  1 1 

LAST 

357 

22,2342 

50  120 

1 

INDEX 

F IXLCC 

0676 

22,2343 

52  0 13 

1 

DXCH 

12 

0677 

RFF  12 

LAST 

357 

22,2344 

50  127 

1 

INDEX 

F IXLCC 

C678 

22 , 2345 

52  7 1 5 

1 

CXCH 

14 

0679 

REF  13 

1 AST 

357 

22, 2346 

5C  120 

I 

INDEX 

FI XLCC 

0680 

22,2347 

52  0)5 

n 

CXCH 

4 

0681 

REF  14 

LAST 

3 57 

22,2350 

50  120 

1 

INDEX 

" IXl CC 

0682 

22, 2351 

52  "15 

1 

CXCH 

14 

0663 

REF  15 

1 AST 

357 

22,2352 

50  127 

1 

INDEX 

F IXLCC 

0684 

22,2353 

52  003 

c 

CXCH 

2 

0685 

RFF  16 

LAST 

357 

22,2354 

50  12‘J 

1 

INDEX 

F IXLCC 

0686 

22 , 2355 

52  0')7 

1 

CXCH 

6 

0687  REF  17  LAST  357  2?, 2356  50  12C  1 INDE>  PIXLCC 

0688  22,2357  52  303  0 CXCF  2 


GAP;  /iSSENBLF  PFVISTON  116  CF  ACC  PRCGRAi^  LUNIN^RY  RV  N‘/>SA  20211  12-C71 


1<;:CG  AUG.  11,1969  LENCAAIC.OGq  FAG  E 3 5 8 


L attitlce  maneuver  RCLTINE 


USER'S  PAGE  NO.  16  E6  S3 


)6  89 
C69C 

REF 

15 

LAST  352 

22.2360 

22.2361 

0 6 0 5 2 
77616 

1 

0 

TC 

RVO 

I NTPRFT 

■7  691 

15, 2050 

BANK 

15 

C692 

REF 

2 

lAST  352 

22,2700 

SETLCC 

KALCMON 1 

0693 

22  ,7362 

BANK 

0694 

REF 

7 

LAST  357 

F6, 1676 

EBANK= 

PCCL 

0^95 

22 ,2362 

00013 

0 

M INANG 

2DEC 

0 .00069375 

0695 

22,2363 

1 3 563 

C 

0696 

22,2364 

17C70 

c 

maxang 

2DEC 

0.47222  2222 

0696 

22,2365 

35343 

1 

R7697 

GIMBAL  LCCK 

CONSTANTS 

P ,1698 

r = 

wr-A 

fCRRFSFCNCING  Tr  GIMBAL  LOCK 

= 

60  DEGREES 

R06C9 

LGL  = PUFFER  ANGLE  { 

7C  AVCIC 

C IV  IS  ICNS 

BY  ZEFC! 

= 2 CEGREFS 

0700 

22, 2366 

1 5 666 

c 

sr 

2DEC 

.433015 

= S TN  (C  ) 

12 

07Cn 

22,2367 

2)55  3 

0 

0701 

22 ,2370 

33555 

1 

K3S1 

2CEC 

.86603 

= SIMD) 

$ 1 

0771 

22, 2371 

01  106 

1 

07C2 

22  ,2372 

6 7 7 7 7 

1 

K4 

2CEC 

- .25 

= -CfJS(D) 

$2 

7772 

22,2373 

7 7 7 7 7 

c 

07C3 

22,2374 

C40C0 

0 

K4S0 

2DEC 

.125 

= CGS(C)CCS(D) 

$2 

0703 

,72,2  3 75 

GCOO  ) 

1 

7 77  A 

22,2376 

C0216 

1 

SNGLCC 

2DEC 

.008725 

= S IN (NGL )CCS (C  ) 

12 

0704 

22,2377 

36323 

0 

07C5 

22 , 2400 

1 7773 

1 

CLGL 

2DEC 

.499695 

CCS  (NGL  ) 

$2 

0705 

22, 2 5 '1 

00057 

c 

0706 

22 , 2472 

15344 

1 

l.CCKANGL 

TEC 

.388889 

= 70  DEGREES 

R7777 

TMTERPRETIVF  SUBRCUT 

INE  TC  RFAC  THE  C 

n 

L ANGLES 

07.7  8 

REF 

5 

LAST  254 

22, 2403 

3 ) 0 3 4 

C) 

RF ADCnUK 

CA 

CDUZ 

LEAD  T(MFAC)  NITH 

CDU  ANGLES 

0709 

REF 

67 

LAST  337 

22,2404 

54  156 

1 

TS 

MFAC  +2 

0717 

22,2575 

C 0006 

1 

E XTENC 

7711 

PFF 

7 

LAST  376 

22 ,2476 

3 0033 

1 

CCA 

CDUX 

AND  CHANGE  ^CCE  TC 

trifle  fpeci 

SICN 

0712 

RFF 

1 

22,2577 

1 6 501 

1 

TCF 

TLCAC  +6 

0713 

22,2^10 

66  3 70 

0 

CCLTHDCM 

AXT  , 1 

SSP 

0714 

22  , 241  1 

OOOT3 

1 

OCT 

3 

0715  RFF  1 

22,2512 

0CC51 

0 

SI 

0716 

22,2513 

00001 

0 

CCT 

1 

SET  XRl  , SI  , AND  FD  ^CF  LCCF 

0717 

22  ,2415 

00010 

0 

STCPE 

7 

0718 

22,2515 

7760  1 

0 

SETFD 

071  9 

22 ,2516 

00071 

0 

0 

0720 

22 ,2517 

57133 

0 

LCCPS IN 

S 1 C A C * 

PTB 

o'72i  2?,2A20  cans  G icna 

C722  R>-'F  P I AST  32  5 22.242  1 21577  1 CCULOGIC 


GftP: 

ASSENBLF  REVISION 

116  CF  ACC  PRFGRAV  LUMNAFY 

SY  NASA  20211  12-C 71 

19;C9  ALC.  11,1969  LE8CNAIC.099  FACE  359 

L 

ATTITLCE  MANEUVER  PCUTirP 

USfF*  S PAGE  NO.  17  E6  S3 

T7?^ 

22,2*22 

GOO  13  0 

STORE 

ICD 

LCAC  FC  NITF  C S IN (PE  I ) 

07?* 

22,2*23 

65356  1 

SIN 

POOL 

2 CDS! PHI  ) 

•J725 

22,2*?* 

rci-n  0 

1 jn 

* SIN(THFTA) 

07?6 

22,2*25 

*15*6  0 

COS 

PUSH 

6 CCS(THETA) 

07?7 

22  ,2*26 

71300  1 

T IX  , 1 

PLCAO 

e SI M PSI  ) 

0778 

PEE  1 

22,2*27 

***17  n 

LCCFSIN 

10  CCS  (PS  I ) 

C7?<3 

22,2*30 

00037  0 

6 

07^0 

22 , 2*31 

72*05  C 

CNF 

SLl 

0731 

22,2*32 

00013  G 

lOD 

C132 

22,2*33 

13001  1 

STORE 

3,2 

C0  = C0S(TFETA)CC1S(  PSI  ) 

0733 

22,2*3* 

*13*5  0 

CLCAC 

CNP 

073* 

22,2*35 

CC005  1 

* 

0735 

22,2*36 

OOOOl  0 

0 

0736 

22,2*37 

*1325  0 

POOL 

DNF 

( FC6  S IN  (TFET  A )SIN  ( PH  I ) 1 

0737 

22 ,2**0 

00007  0 

6 

0738 

22 , 2**  1 

00111  1 

8C 

0739 

22,  2**2 

72*05  C 

DMP 

SLl 

C7*r 

22 , 2**3 

03  10  3 1 

2 

0 7*1 

22,2*** 

72*21  0 

PDSL 

SLl 

07*2 

22, 2**5 

0CQ15  0 

120 

07*-’ 

22 ,2**6 

10C03  0 

STCRE 

2,2 

C 1=-CCS  (THETA  )SIN(  PS  nCCS(FHI) 

07** 

22, 2**7 

* 1 3*5  C 

CLCAC 

DNP 

07*5 

22,2*53 

00003  1 

2 

07*6 

22,2*51 

03035  1 

* 

07*7 

22, 2*52 

*1325  C 

POOL 

DMP 

(FC7  CCS  (PHDSINKTHFTA  ) ) 9CALFC  * 

C7*8 

22,2*53 

30C17  0 

6 

07*9 

22, 2*5* 

OOOll  1 

8C 

0750 

22,2*55 

72*05  0 

DNP 

SI  1 

0751 

22,2*56 

OOOOl  0 

0 

075? 

22,2*57 

72*15  1 

CAC 

SLl 

0753 

22,2*60 

00017  1 

1*0 

075* 

22 , 2*6  1 

10305  C 

STCRE 

* ,2 

C2=C0S  (THETA  )SIN(PS  I)  SIN(PHI  ) 

0755 

22,2*62 

777*5  1 

OLCAD 

0756 

22 , 2*63 

00311  r 

8C 

0757 

22,2*6* 

1CCC7  1 

STCRE 

6 ,2 

C3  = S1N  (FSn 

0758 

22,2*65 

777*5  1 

OLCAD 

0759 

22,2*66 

000  13  -'I 

ICC 

J760 

22,2*6  7 

72*05  C 

DPP 

SLl 

0761 

22,2*70 

0 1)03  1 

2 

0762 

22  ,2*71 

10311  0 

STORE 

8C  ,2 

C*=CCS  (PS  1 )CCS (PHI) 

0763 

22,2*72 

*13*5  0 

OLOAO 

DYP 

0 76* 

22,2*73 

30313  0 

ion 

0765 

22,2*7* 

CCCQl  C 

0 

0766 

22,2*75 

72*76  1 

DCOPP 

SLl 

0767 

22,2*76 

10013  1 

STORE 

IOC,  2 

C5=-CCS(PSI)SIN(PH!) 

0768 

22,2*77 

*13*5  0 

OLCAD 

np  F 

0769 

22 ,2500 

00005  1 

* 

0 7 70 

22 ,2531 

03013  C 

U3D 

0771 

22, 250? 

72*76  1 

DCOWP 

SLl 

0772 

22 , 2533 

11115  1 

STORE 

120,2 

C6  = -S  IN( IHETA )CnS(PSI ) 

GAP : 

ASSFNBLF  PEVISICN  116  CF  ACC  PRCGRAW  LUMINARY 

RY  NASA  202 

1 1 12-C7 1 

19:CR  ALG.  11,1969  LERCNAIC.099  PAGE  360 

L 

ATTITLCE  MANEUVER 

RCLTI NR 

USER'S  PAGE  NO.  18  E6  S3 

0773 

22, 2504 

77745 

1 

DLOAD 

C774 

22 , 2505 

72405 

0 

CMP 

SL  1 

(PUSH  LP  71 

0775 

22,2506 

OCOll 

1 

80 

0776 

22,2507 

41325 

0 

POOL 

OMP 

(FC7  CCS( PHI  ) SIN (THET A IS  IN  (PS  I ) 1 SCALE4 

0777 

22  ,2510 

TO  VT7 

■ ) 

6 

0778 

22,2511 

COCCI 

0 

0 

0779 

22,2512 

724  15 

1 

CAC 

SLl 

( PUSH  LP  71 

.0780 

22, 2513 

77626 

0 

STACR 

C7=C0S  (PH  ns  IN  (THETA!  SIN(  PS  I ) 

0781 

22,2514 

6 1760 

1 

STORE 

140,2 

+ CCS  (THET A IS  IN (PH  I 1 

0782 

22,2515 

77745 

1 

CLOAD 

0733 

22,2516 

72405 

c 

CMP 

■SLl 

(PUSH  UP  61 

0784 

22,2517 

TOO  1 1 

1 

80 

0785 

22,2520 

41325 

0 

FCCL 

DMP 

(PD6  SIMTHETA)SIN(PHI  ISIMFSI)  1 SCALE4 

0786 

22,2521 

0000  7 

0 

6 

0787 

22,2522 

000(13 

1 

2 

0788 

22 , 2523 

72425 

1 

CSL 

SLl 

(PUSH  UP  6 ) 

0789 

22, 2574 

77626 

0 

STAOR 

C79C 

22 , 2525 

67756 

1 

STORE 

160,2 

ce=-s in(thetaisin(phi  isin(psii 

' 0791 

22, 2526 

77616 

0 

PVQ 

+ COS  (THETA)COS(PHI  ) 

R0792 

CALCUIATICN  GF  THE 

^'ATRTX  cel. 

RT793  * * --T  7 

R..)794  CEl.  = (,  ICMA7R  IX  )COS  ( a )+UU  ( 1-COS  (A  ) ) +UX  S IN  ( a ) SCALED  1 


R0795 

RQ796  L>HERE  LISA  LMT  V^CTPP  (OF  SCAIEC  2)  ALCNC  THF  A X IS  CF  RCTATICK. 

R079B  A IS  Tl-F  ANGI.9  CF  ROTATION  (CP  SCALED  2) 

RC799 


R0800 

UPON  '=NTPY 

THE  starting  ACCRESS  CF 

L IS  CCF, 

AND  A IS  IN  NFAC 

0801 

0807 

22, 2527 
22,2530 

41401 
OCQ  11 

1 D'ELCnwp  setpd 
0 

PUSH 

0 

MPAC 

CCNTAINS  THE  ANGLE  A 

0803 

22,2531 

6 5 3 56 

1 

SIN 

PDDL 

PEO  = 

S IN ( A 1 

0 80^ 

22 ,2532 

41546 

0 

COS 

PUSH 

P02  = 

CCS( Al 

0805 

22 , 2533 

653)2 

0 

SR2 

PC  CL 

PC2  = 

CCS ( A 1 

J £ 

0806 

22, 2534 

4 1 C 2 1 

1 

BDSL 

BCVB 

C8C7 

RFF  '2 

LAST  354 

22 , 2535 

06522 

1 

DPHALF 

0808 

REF  2 

LAST  354 

22,2536 

21713 

1 

SIGNNPAC 

0809 

22, 2537 

77725 

1 

POOL 

PC4  = 

1-rcs (A  1 

R 08  10 

CCNPLTF 

THE  CIAGCNAL 

CCMPCNFNTS 

; CF  CEL 

0811 

RFF  27 

LAST  356 

22,2540 

0327  1 

0 

CCF 

0812 

22 ,2541 

41316 

n 

CSO 

DMP 

0613 

22 ,2542 

000  0 5 

1 

4 

0814 

22,2543 

524  1 5 

0 

DAD 

SL3 

C815 

22 ,2544 

00003 

1 

2 

0816 

22,2545 

77604 

0 

Eove 

0817 

REF  3 

LAST  360 

22,2546 

21713 

1 

SIGNMFAC 

r, /^p 


RgylSION  lU  CF  AGC  program  luminary  BV  NASA  2C2111^-C71 


19:C9  4UG.  11,1969  LEVGNO IC  .099  PAGE  361 


I ftTTIUCE  MANEUVER  PCUTINE  LSFP'S  PAGE  NO.  19  E6  S3 


.0818 

REF 

1 

22,2567 

16231  C 

STCCl 

KEL 

UX 

UX  (1-COS  (A  ) ) +COS( A ) 

! 1 

081  9 

OFF 

28 

LAST 

360 

22,2550 

■T3  27  3 1 

OOF  +2 

0 820 

22,2551 

61316  0 

CSC 

CNF 

0821 

22,2552 

00005  1 

6 

0822 

22,2553 

52615  0 

CAC 

SL3 

0823 
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NEW  G EU  ANGLFS 

0027 

22,3031 

774  14 

Q 

BCNCLR 

EXIT 

0C28 

RFF 

2 

LAST 

365 

22,3032 

01215 

0 

CALCMAN2 

TO  2 9 

RFF 

1 

22,3033 

45  122 

1 

MANUSTAT 

TC  START  maneuver 

QC3T 

REF 

14 

LAST 

364 

22 ,3'T34 

3 4 752 

0 

CAF 

TWO 

4-C  CTHEPWISE 

0031 

I?  PF 

1 

22 ,3035 

55*261 

1 

I ACRCCCL 

TS 

SFNCX 

0032 

REF 

2 

LAST 

366 

22, 3036 

51*261 

c 

INDE  X 

SFNOX 

0C33 

RFF 

9 

LAST 

364 

22 ,3037 

3 1676 

1 

CA 

BCDU 

INITIAL  CDU  ANGLES 

0034 

22,3040 

0 0 006 

1 ’ 

EXTEND 

CR  PREVirUS  CESIREC  CCU  ANGLES 

0035 

RFF 

3 

LAST 

366 

22, 3441 

5 1261 

0 

INDE  X 

SFNOX 

0036 

REF 

■ 2 

LAST 

3 66 

22 ,3042 

21*703 

0 

NSU 

NCCU 

0037 

22, 3C43 

G 0006 

1 

EXTEND 

0C3P 

REF 

4 

LAST 

365 

22,2000 

SETLCr 

KALCMCMl 

0039 

2?  ,3044 

BANK 

0044 

RFF 

1 

2 2,  3-^‘  4 4 

7 3121 

1 

NP 

Dl/TAL 

0C41 

RFF 

97 

LAST 

366  ■ 

22  ,3</45 

10  100 

0 

CCS 

A 

CONVERT  TO  2S  COMPLEMENT 

0042 

P.i^F 

17 

LAST 

34C 

22,3146 

6 4753 

1 

■ AD 

CNE 

0043 

22,3047 

1 3;'.  5 1 

1 

TCF 

*■  2 

0044 

22,3050 

4 CO' 10 

0 

CCN 

0045 

RFF 

A 

LAST 

366 

22,3051 

51*261 

c 

INDE  X 

SFNOX 

CC46 

REF 

1 

2 2,3'-52 

55*640 

0 

TS 

OELOCOU 

ANGLE  INCREMENTS  TO  BE  ACCEC  TC 

0047 

PFF 

C 

LAST 

366 

22,3053 

51*261 

c 

I N r E X 

SFNOX 

CeUXD,  CCUYC,  CCUZC  EVEPY  TENTH  SECOND 

GAP 
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0CA8 

PFF 

3 

LAST 

366 

22,3054 

3 1703 

1 

CA 

NCDL 

BY  LER  DAP 

00A9 

REF 

t 

LAST 

366 

22,3C55 

51*261 

C 

INCEX 

SFNCX 

0050 

PEF 

10 

LAST 

366 

22, 3 )56 

57*676 

1 

>CH 

BCOU 

CC51 

PEF 

■ 7 

1 AST 

367 

22,3057 

51*261 

0 

INCEX 

SPNPX 

0052 

REF 

7 

LA  ST 

353 

22,3060 

5 5 * 6 3 5 

1 

TS 

CCUX  C 

0053 

PEF 

B 

LAST 

367 

22,3061 

11*261 

1 

CCS 

SPNDX 

005A 

PEF 

1 

22,3062 

1 3335 

0 

TCF 

INCPCCCU 

LPPP  FCP  THREE  AXES 

0055 

22,3063 

Q 000  3 

1 

PELINT 

ROO‘^6 

CCPPAPF 

PRESENT 

T IRF 

WITF  TIRE 

T C TERR  IN  ATE  R AN  EUVER 

0057 

RFF 

1 

22,3064 

C 3C75 

0 

TRANLCh'K 

TC 

TIRECFK 

0058 

REF 

1 

22,3065 

1 3170 

c 

TCF 

C C NTRAM 

0C59 

PTP 

I f 

LAST 

366 

22,3066 

3 4753 

1 

CAE 

CNF 

0060 

22,3067 

C PC04 

0 

RIAKUSTAL 

INHl NT 

ENC  RiAJCR  PART  CF  MANEUVER  WITHIN  1 SEC 

00  61 

RFF 

13 

LAST 

364 

22,3070 

C 5 20  3 

0 

TC 

WAITLIST 

LNCER  RAITLIST  CALL  TC  RARLSTCF 

0062 

REF 

2 

LAST 

366 

E6,170T 

EBANK= 

TTFMP 

0063 

PEF 

1 

22, 3"7  1 

032  13 

] 

2CA0R 

RANLSTGF 

0C63 

REF 

1 

22,3072 

44066 

1 

006A 

22,3073 

r CC03 

1 

PEL  IRT 

0065 

REF 

32 

1 AST 

364 

22, 3074 

1 5155 

1 

TCF 

ENooF jce 

0C66 

)067 

CC68 

ref 

PEF 

1 1 
3 

LAST 

LAST 

3C7 

367 

22.3075 

22. 3076 

22.3077 

C 0006 
4 0025 
53*710 

1 

1 

1 

T IRECHH 

EXTEND 

CCS 

CXCH 

TIRE2 

TTEMP 

0069 

22,3100 

C 000  6 

1 

EXTEND 

0070 

REF 

2 

LAST 

365 

22, 3 10  1 

2 17  3 4 

C 

DCA 

TR 

0071 

REF 

4 

LAST 

367 

22 ,3102 

21*710 

1 

CAS 

TTFMP 

007  2 

REF 

C 

LAST 

367 

22,3133 

11*707 

1 

CCS 

TTFRP 

0073 

PEE 

36 

LAST 

337 

22,3104 

C 0P02 

0 

TC 

Q 

0074 

22  ,3135 

1 3107 

0 

TCF 

+ 2 

007  5 

REE 

1 

22,3106 

1 3 117 

I 

TCF 

2 NDPETRN 

0C76 

REF 

6 

LAST 

367 

22 ,3107 

11*710 

1 

CCS 

TTERIP  +1 

0077 

REF 

37 

LAST 

3 6 7 

22 ,3 1 10 

0 000  2 

0 

TC 

C 

0078 

PEF 

1 

22,3111 

1 3113 

0 

TCF 

MANLCFF 

0079 

22,3112 

4 0010 

0 

CPM 

0080 

RFF 

1 

22,3112 

6 2166 

c 

PANLC^F 

AD 

CNFSEK  +1 

0081 

22,3114 

0 0006 

1 

EXTEND 

0082 

PEE 

2 

LAST 

367 

22,3115 

6 3117 

0 

eZRF 

2NCPETPN 

0083 

REF 

38 

LAST 

367 

22,3116 

24  00  2 

c 

INCP 

Q 

0084 

PEF 

39 

LAST 

367 

22  ,3117 

24  00  2 

0 

2NCRETRN 

INCR 

Q 

OC85 

REF 

40 

LAST 

367  ■ 

22,3120 

C 003  2 

0 

TC 

C 

0086 

22,3121 

03  146 

1 

DT  /TAL 

DEC 

. 1 

CC87 

22,3122 

77776 

1 

MANLSTAT 

EX  IT 

IN  ITI AL  IZAT ICN  RCL^INF 

0083 

22,312? 

C 0006 

1 

EXTEND 

FCR  ALTORiATIC  MANEUVERS 

0089 

REF 

12 

LAST 

367 

22,3124 

3 0025 

0 

DCA 

TIMF2 
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0090 

REP 

3 

LAST 

367 

22,3125 

21*734 

1 

CAS 

TN 

TN+TO  njneuVEP  CC^FLETICN  TINE 

OOP  1 

22,3126 

0 0006 

1 

EXTEKC 

0092 

REF 

2 

LA  ST 

367 

22,3127 

4 3 166 

1 

CCS 

(ONESFK 

0093 

REF 

4 

LAST 

368 

22,3130 

21*734 

1 

DAS 

TN 

(TN+TO  )-l 

0C94 

22,3131 

0 0004 

0 

INF  INT 

0095 

REF 

15 

LAST 

366 

22,3132 

3 4752 

c 

CAF 

TV.C 

0096 

PPF 

2 

LAST 

136 

22,3133 

55  *7 : 1 

1 

RATFB  ia  s 

TS 

KSPNDX 

0097 

22,3134 

6 0000 

1 

CCUBLE 

0093 

FFP 

2 

LAST 

136 

22,2135 

55  *7C2 

1 

TS 

K C F N C X 

009  9 

REF 

98 

LAST 

366 

22 ,3136 

50  )00 

1 

INDEX 

A 

OlOO 

REF 

2 

LA  ST 

36  5 

22,3137 

3 1725 

0 

CA 

PRATE 

OlOl 

REF 

3 

LAST 

368 

22,314^’ 

5 1 * 7 1 

0 

INDEX 

KSPNDX 

STCFE  NANEUVC-F  RATF  IN 

01  m2 

RFF 

4 

LAST 

196 

22,3141 

55*643 

0 

TS 

OMFGAPO 

CNEGAPn,  ONEGAQC,  GMEGARD 

0103 

22,2142 

C CCC6 

1 

EXTFNC 

010  9 

22,3143 

6 3145 

1 

BZNF 

+ 2 

CCPFUTE  ATTITLCE  ERRCP 

0105 

22,3144 

4 GOTO 

t) 

CCiv 

OFFSET  = ( W>  )A3S(  kX) /2AJX 

0106 

22,3145 

C CC06 

1 

EXTEND 

NFERE  AJX=  2-JET  ACCELEPATICN 

0107 

REF 

1 

22,3146 

7 3167 

0 

MP 

8 lASCALE 

= -1/16 

nice 

22  ,3147 

0 C006 

1 

extend 

0109 

REF 

3 

LAST 

368 

22, 3150 

5 1 7 ■'  2 

n 

IN'DFX 

KCPNDX 

011'^ 

REF 

3 

LAST 

368 

22,3151 

7 1725 

1 

MP 

3PATE 

0111 

22,3152 

C 0006 

1 

EXT F NO 

0112 

REF 

4 

LAST 

368 

22,3152 

5 17C1 

c 

TNDF  X 

K SPNDX 

0113 

Rff 

C 

LAST 

1 34 

22 ,3154 

11  * 53';) 

1 

CV 

IJACC 

=AJX  $ 90  DFG/SEC-SEC 

0114 

RFF 

c 

LAST 

368 

22,3155 

51  * 7C  1 

c 

INDEX 

KSPNDX 

0115 

REF 

1 

22,3156 

55*274 

0 

TS 

OELPEROR 

$ 18C  CEG 

0116 

REF 

6 

LAST 

368 

22,3157 

11*7)1 

1 

CCS 

KSPNCX 

0117 

RFF 

1 

22,3160 

1 3 133 

1 

TCF 

RATEBIAS 

01  2n 

REF 

3 

LAST 

335 

22 , 316  1 

3 0025 

0 

CA 

T IMEl 

0121 

REF 

3 

LAST 

368 

22,316? 

6 3166 

0 

AD 

CNFSFK  +1 

012? 

RFF 

1 

22,3163 

57  * 706 

1 

XCH 

NEXT  INF 

0123 

REF 

2 

LAST 

3(-l 

22 ,3164 

1 3 034 

1 

IFF 

INCRDCCU  -1 

0124 

22,3165 

ocooo 

1 

CKFSEK 

DEC 

0 

0125 

22  ,3166 

00  144 

0 

CEC 

ICO 

0126 

22,3167 

75777 

1 

El  ASCALE 

CCT 

75777 

= -1/16 

0127 

rff 

4 

LAST 

368 

22,3  17.' 

4 0025 

1 

CONTMANL 

cs 

TIMEl 

RFSET  FCF  NEXT  CCCU  UPCATE 

0128 

REF 

2 

LAST 

368 

22,3171 

6 1706 

1 

AC  ■ 

NEXTINE 

0129 

RFF 

99 

LAST 

368 

22,  ?>  1 72 

1C  00  0 

c 

CCS 

A 

0130 

REF 

19 

LAST 

367 

22,3173 

6 4753 

1 

AD 

ONE 

0 131 

RFF 

1 

22 ,3174 

1 3177 

1 

TCF 

NANUCALL 

0132 

RFF 

1 

22,3175 

6 F725 

1 

AC 

NEGNAX 

0133 

22,3176 

4 0000 

0 

COM 

0134 

22,3177 

C 0004 

0 

RANUCAL  L 

INF INT 

CALL  FCP  NEXT  UPCATE  VIA  V.AITLIST 

0135 

RFF 

14 

LAST 

367 

22, 3 2 'i*’ 

C 520  3 

c 

TC 

V<AT  TLT  ST 

P136 

REF 

7 

LAST 

36  7 

F6 , 17  17 

EBANK= 

TTFMP 

0137 

RFF 

1 

?2,32..a 

C3206 

0 

2CACP 

UFCTCALL 

0137 

REF 

1 

22,  32. !2 

44066 

1 
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ni38 

0139 

OlAP 

REF 

REP 

RFF 

4 

3 

33 

LAST 
L AST 
LAST 

3£E 
36P 
3f  7 

52.3203 

22. 3204 

22.3205 

3 3166 
27' 706 
1 5155 

C 

0 

1 

CAE 

AOS 

TCF 

CNESEK  +1 
NEXTI PE 
ENCCFJOe 

INCRENENT  TIRE  FOR  NEXT  UPCATE 

0141 

REF 

1 

22,3206 

3 7 7 1 7 

1 

LPCTCALL  CAE 

PRI C26 

SATELLITE  FPCGRAP  TC  CALL  FCP  LPCATE 

0142 

REF 

13 

LAST 

300 

22 ,3207 

0 510  5 

0 

TC 

F INDVAC 

GF  STEERING  CCPMANOS 

0143 

REF 

8 

LAST 

366 

E6,17C7 

FBANH= 

TTFPF 

0144 

RFF 

1 

22, 3210 

03003 

1 

2CADR 

NFVtDELHI 

0144 

REF 

1 

22,3211 

44066 

1 

0149 

RFF 

C 

LAST 

283 

22,3212 

r 526  1 

1 

TC 

TASKCVER 
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P'1146 

PEL'''  IN  E 

FOR  TFR 

►'TNATING  AUTCMATIC  MANEUVERS 

01A7 

Rcp 

39 

LAST 

33  7 

22,3213 

3 4755 

L 

N ANUSTQP 

CAF 

ZERO 

ZERO  PANEUVEP  RATES 

T148 

REF 

1 

22,3214 

55' 642 

1 

TS 

DELDCCU2 

0149 

REF 

1 

22,3215 

55  ' 645 

0 

TS 

OMEGARO 

0150 

REF 

1 

22,3216 

55 ' 276 

1 

TS 

DEI  REPOP 

3151 

PEF 

1 

22,3217 

55'64  1 

1 

TS 

CELDCCLl 

0152 

REF 

1 

22,3220 

55*644 

1 

TS 

OMFGAGD 

0153 

”98 

1 

22,3221 

55'275 

1 

TS 

CEL  CFPOP 

0154 

PFF 

2 

1 AST 

352 

22,3222 

3 0 3 23 

C 

CA 

CFSI 

SET  OESIFEC  GI^EAL  ANGLES  TC 

0155 

REF 

1 

22  ,7223 

55' 637 

0 

TS 

CDUZO 

DESIRED  FINAL  GIP8AL  ANGLES 

0156 

REF 

1 

22,3224 

3 C322 

1 

CA 

CTHFTA 

0157 

REF 

1 

22,3225 

55  '636 

1 

TS 

COL  YD 

0158 

REF 

4 

LAST 

353 

22,3226 

3 032  1 

1 

ENDPCLL 

C A 

CPE  I 

NC  FINAL  VAl* 

0159 

RFF 

8 

LAST 

36  7 

22,3227 

5 5 *6^5 

1 

T S 

CDLXD 

0160 

REF 

40 

LAST 

370 

22,3270 

3 4755 

1 

CAF 

Z RRQ 

0161 

REF 

P 

LA  ST 

36  t 

22  ,3  23  1 

55' 643 

c 

TS 

C P t G A P C 

I.F.  PANEUVER  CIC  NCT  GO  THRL 

0162 

REF 

2 

LAST 

366 

22,3232 

5 5 • 640 

0 

TS 

OELDCDU 

GIPEAL  LCCK  CPIGINALLY 

C163 

REF 

2 

LAST 

368 

22,3233 

55 ' 274 

0 

TS 

OELPEROR 

0164 

9EF 

1 

22, 3234 

3 13C6 

c 

GCCOV  SNL 

CA 

ATTPRir 

PESTCPE  USTRS  PRIO 

0165 

REF 

2 

LAST 

233 

22,3235 

54  063 

0 

TS 

NEWPR  TO 

0166 

RFP 

41 

LAST 

370 

22,3236 

3 4755 

1 

CA 

ZERC 

ZERO  ATTCACR 

0167 

REF 

3 

LAST 

223 

22,3237 

5 3 * 3 r 5 

1 

C XCH 

ATTCACR 

0168 

REF 

2 

LAST 

233 

22,3240 

0 511.6 

1 

TC 

SPVAC 

RETURN  TC  USER 

0169 

RFF 

6 

LA  ST 

369 

22,3241 

C 526  1 

1 

TC 

TASKCVEP 
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REF 

A LAST  321 

EF  , 1E42 
33,2045 

T - • 

E8ANK= 

BANK 

XS^ 
3 3 

REF 

I 

04,2000 
C4, 2560 

SETLCC 

BANK 

E/PROG 

PEE  1 COUNT=f  tt/P07 

SPECIAL  FRCGRAPS  TC  EASE  THE  PANCS  CF  EPASAEIF  ^E»^nRV  FPCGPAMS. 

E/EKCALL  FOR  DOING  8ANKCALLS  ^ROM  AND  RETURNING  fC  FPASABLF. 


R00C8 

Roon 

THIS  RCUTINE  IS  CAI.LABLE 
IS  NOT  POSSIBLE. 

FPCR  ERAS  A EL  E OR  FIXED 

. LIKE  BANKCALL,  HOWE\/ER,  SNITCHING  BETNEEN  S3  AND  S4 

ROOl  1 

THE  CALL  ING  SECUENCF  IS: 

A0012 

Tf 

EANKCALL 

AOOI  3 
ACC14 
A0015 

CADR 

CACR 

RETURN 

F /BKCALL 

RCUTINE  NHERE  YCL  RANT  TC  GC  IN  FIXED. 

HERF  FRCP  DISPLAY  TFPMNATE,  EAD  STALL  OR  TC  Q. 

A00I6  RETURN  MERE  FRCW  DISPLAY  PPCCEEC  tP  CCCD  PETUPN  FPCM  STALL. 

A0017  RETURN  HERF  FRCM  DISPLAY  ENTER  CR  RECYCLE. 


R00I8  This  ROUTINE  RFCIJIRES  TWO  ERASABLFS  (EPUF2,  +1)  IN  UNSVvITCEED  khlCh  ARE  UNShARFC  BY  INTERRUPTS  AND 

R)0?0  CTHER  ENENCPY  FRCGPAmf. 


R0021 

A + L 

ARF 

PRESEKYEC 

THRCUGF 

BANKCALL  AND 

F/BKCALL. 

0022 

REF 

3 

LAST 

245 

04,2560 

52  134 

O' 

F /RKCAL 1 

DXCH 

BLF2 

SAVF  A,L  AND  GET  CP  RETURN. 

0C23 

RFF 

1 

04,2561 

53 ' 167 

1 

CXCF 

EBUF2 

SAVE  CP  RETLRN. 

0024 

REF 

2 

t AST 

371 

04,2562 

25*166 

1 

INCR 

EFUF2 

RETURN  +1  BFCALSE  DPUELE  CACR. 

002  5 

RFF 

in 

LAST 

155 

04,2563 

3 0006 

1 

CA 

BBANK 

0C26 

REF 

3 

LAST 

305 

04,2564 

7 5012 

0 

NAS  K 

LCWIO 

GET  CLRRENT  FBANK.  ('BANK  'CNECAY  ) 

0027 

RPF 

Q 

1 AST 

371 

04 ,2565 

27*  167 

1 

ADS 

EPUF2  +1 

FCPM  BECDN.  (WAS  FBANK) 

0028 

REF 

4 

LAST 

371 

04,2566 

51*166 

1 

NDX 

EBUF2 

0029 

04  ,2  567 

2*  777? 

0 

CA 

0 -1 

GET  CACR  OF  RCUTINE. 

0030 

REF 

2 

LAST 

218 

04,2570 

0 4622 

c 

TC 

SRCALL 

GC  TD  RCUTINE,  SETTING  G TC  SWRETURN 

ACC31 

AND  RESTCRING  A + 1. 

0032 

04,2571 

0 2 575 

1 

TC 

+ 4 

TX  C,  V34,  CP  BAD  STALL  RETLRN. 

0033 

04,2572 

0 2574 

t 

TC 

+ 2 

FRCCEED  CR  GCCC  STALL  RETLRN. 

0C34 

REF 

5 

LAST 

371 

04,2573 

25*166 

1 

INCR 

EBUF2 

ENTER  CR  RECYCLE  RETLRN. 

0035 

REF 

6 

LAST 

371 

C4, 2574 

25*  166 

1 

INCR 

EBUF2 

0036 

RFF 

7 

1 AST 

371 

04,2575 

53*167 

1 

F/SH  ITCH 

DXCH 

EBUF2 

0037 

04,2576 

52  006 

0 

DTCP 

GAP:  ASSE^BLP' REVISION  116  CF  AGC  PSCC-R/iN  LUMNflf'Y  5Y  ^^S4  20211  12-071 


ISiC-;  AUG,  ll.iq^c  LEyPNAID.CPS  PAGE  372 


L SYSTF»^  TEST  STANCAPr  LEAD  INS  USER'S  PAGE  AC.  2 EE  S3 


POO  3 8 

F/CALL 

FCF 

CALLING  A 

F IXEn 

MFPGRY  INTERPRETIVE 

SLBRnUTINE  FRCP 

ERASABLE  AND  RETLRMNG  TC  ERASAELE. 

ROOAG 

THE  i 

CALLING 

SFCLFNCe 

IS. . . 

AOOAl 

RTR 

AOCA? 

E/CALL 

A00A3 

CACR 

RCUT INF 

THE  INTERPRETIVE  SUBROLTINF  YOL 

WANT  . 

AO  04  4 

RETURNS  HERR  IN  I NT R R F c FT  1 VF  . 

CC45 

PEF 

1 

04,2577 

22  164 

1 F/CALL 

LXCH 

LCC 

ACRES  -1  PF  CADR. 

0046 

REF 

3 3 

LAST 

33  7 

04, 260f 

EC  OCl 

C 

INDE  X 

L 

0047 

RFF 

34 

LAST 

37? 

C4  , ?6'il 

3 000  1 

0 

CA 

L 

CACR  IN  A. 

0048 

P FF 

3 5 

L A ST 

372 

04 ,2612 

74  00  1 

0 

I NCR 

L 

0049 

REF 

36 

LAST 

372 

04, 2603 

2 4 roi 

c 

I NCR 

L 

RETURN  ACRES  IN  L. 

0C5C 

RFF 

8 

LAST 

371 

04 ,2616 

53'  167 

1 

rxcH 

EBUF2 

STCP.F  CACR  AND  RFTURN. 

00  51 

P F F 

17 

LAST 

366 

04,2605 

0 6CA2 

1 

TC 

I NTPPET 

005? 

04, 2606 

77624 

1 

CALL 

0053 

RFF 

c 

LAST 

372 

04,2607 

01166 

1 

EBUF2 

INCIPECTLY  EXECUTE  ROUTINE.  IT 

NLST 

0054 

04, 2610 

77776 

1 

EXIT 

LEAVE  VIA  RVC  CR  ECUIV/LENT. 

CC55 

PFF 

10 

LAST 

372 

04,2611 

23'  167 

0 

LXCH 

EEUF2  +1 

PICK  LF  RETURN. 

0056 

REF 

18 

LAST 

37? 

C4 , 26  12 

1 60  44 

0 

TCF 

INTPRET  +2 

SET  LCC  AND  RETURN  TO  CALLER. 
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A006  1 

INHI  M 

A906? 

• 

AD063 

• 

ATOAA 

CA 

IvAKEADR 

ACCPESS  CF  SLEEPING  JCE 

A0065 

TC 

IBNKCALL 

A0C66 

CACR 

E/JOEIfAK 

A0067 

• 

RETURNS  HERE 

AGC68 

• 

A0069 

• 

A007n 

RELINT 

IF  VOL  DID  AN  INFINT. 

0071 

33 ,20A5 

BANK 

33 

0072 

PEE 

2 

LAST 

371 

CA,2000 

SETLCC 

E/FPCG 

CC73 

0A.2613 

BANK 

007A 

REF 

2 

LAST 

371  TC 

373:  27  27*  CCUNT* 

J T/P07 

0075 

REF 

1 

0A,2613  0 5137  1 

E/JOBVAK  TC 

JCBWAKE 

ARRIVE  IKTF  acres  IN  A. 

CC76 

PEE 

17 

LAST 

255 

C4.261A  A A7AI  C 

CS 

B IT  1 1 

0077 

REF 

1 

0 A, 2615  5C  C6A  C 

NOX 

L CCCT  P 

0'T7fl 

R = F 

2 

LAST 

372 

0A,2616  26  16A  0 

AOS 

LCC 

KNCCK  FIXED  PEPCPV  BIT  CUT  CF  ACRES. 

007  9 

REF 

1 

04,2617  0 0072  1 

TC 

RUPTPEG3 

RETURN 
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R00C4  MCCNO.-  ZERO 

PQO'TS  FUACTICNAL  CESCRTFTICN 
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Roons 

CFERATING  procecupes 

(TYPICALLY)  SEP 

STG 

N-EMO  68 

5.THFCRETTCAL  REF.E-1973 

0CG9 

33,2f'45 

8ANK 

33 

OOin 

PEF 

2 

LAST 

44 

37,2000 

SFTLCC 

I RL2 

OCl  1 

37,2002 

BANK 

0012 

REF 

2 

LAST 

12  E 

E5 , 14  16 

EBANK= 

PCSTTCN 

00121 

RFF 

2 1. 

AST 

44  TO 

44: 

2 

2* 

CnLM=!' 

SI/PC7 

00122 

RFF 

1 

3^  , 2 )02 

0 5311 

1 

RECO 

TC 

MEWMOCEX 

00124 

37,2CG3 

0CC07 

Q 

NN 

07 

' 0021 

PEF 

1 

37,2004 

0 23  2 5 

1 

gfoirutt 

TC 

I MUZEPR 

0022 

RFf 

42 

LAST 

37C 

37,2005 

3 4755 

1 

TRUBACK 

CA 

ZFRC 

on  2 3 

R c F 

2 

LAST 

1 2F 

37,2C0£ 

C K # ^ 1 ^ 

0 

TS 

NCXCTP 

0024 

RFF 

1 

37,2007 

55  '440 

1 

TS 

TCRONCX 

0025 

PEF 

2 

LAST 

374 

37, 2010 

55*4^1 

0 

TS 

TCPGNCX  +1 

002  5 1 

REF 

1 

37, 20  1 1 

55 ' 576 

c 

TS 

nVFLOUC  K 

0026 

RTF 

1 

37,2012 

3 4361 

1 

N EPOS  PL 

CA 

DEC  17 

0027 

RFF 

1 

37, 2 ) 13 

55 ' 571 

1 

TS 

ZFRCNCX 

0028 

PEF 

1 

37,2014 

3 2476 

) 

CA 

XNBADR 

0029 

RFF 

1 

37,2015 

0 2367 

1 

TC 

zeroing 

0030 

REF 

•a 

LAST 

335 

37, 2C  16 

3 4 736 

1 ' 

CA 

HALF 

0031 

RFF 

1 

37 ,2  ' 17 

55'664 

0 

TS 

XNB 

003  2 

REF 

19 

LAST 

372 

37,2020 

0 60  4 2 

1 

GL'PSS 

TC 

INTPRET 

0033 

37, 2021 

62  545 

1 

L ATAZCHK 

DLCAD 

SL2 

0034 

rtf 

2 

LAST 

128 

37,2022 

0 2 4;)  3 

1 

LATITUDE 

0035 

REF 

13 

LAST 

3 18 

37,2023 

1 5C4  6 

1 

STCDL 

DSFTEM  +1 

0036 

RFF 

2 

LAST 

128 

37, 2P24 

02401 

0 

AZIMUTH 

0037 

37,2025 

77434 

1 

PTB 

EXIT 

0038 

RFF 

1 

37,2026 

21615 

c 

1 STC2S 

0039 

ref 

68 

LAST 

358 

37,2027 

56  154 

1 

XCF 

MPAC 

0C40 

REF 

14 

LAST 

374 

37, 2C3C 

55'044 

1 

TS 

CSPTEMl 

0041 

RFF 

1 

37, 27  31 

3 2472 

0 

CAF 

VN0641 

0C42 

RFF 

69 

LAST 

366 

37,2032 

0 4616 

1 

TC 

BAMKCALL 

0043 

REF 

4 

LAST 

341 

37, 2033 

2G477 

1 

CACR 

GCFLASH 

0044 

PEF 

1 

37,2034 

0 2270 

0 

TC 

E NDTF  ST  1 

0045 

31  ,Z"35 

■1  2037 

I 

TC 

+ 2 

0046 

37,2036 

C 2C21 

1 

TC 

-5 

G^P 
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0047 

REF 

20 

LAST 

374 

37,2037 

0 6042 

1 

TC 

! NTPPET 

0048 

37,2040 

4 7 13  8 

C 

SLC  AD 

PTP 

CC49 

REE 

15 

LAST 

3 74 

37,2  14  1 

01.145 

1 

DSDTEF'l 

0C5O 

REF 

10 

LAST 

35  8 

37,2042 

218  7 7 

1 

CCULCC-IC 

0081 

REF 

3 

LAS-^ 

374 

37, 2043 

0240  1 

c 

5TCRF 

AZ' MLTH 

0C52 

37,2  144 

60535 

1 

SLCAC 

SR2 

0083 

RE<= 

16 

LAST 

378 

37, 2C45 

01046 

1 

DSFTEM  +1 

0084 

REF 

3 

LAST 

374 

37,2046 

0 2 403 

1 

STCRE 

LATI  TlfAF 

0088 

37,2047 

57546 

1 

CCS 

CCCMP 

J086 

37,2050 

77752 

1 

SLl 

CC87 

REF 

1 

37,2081 

16437 

0 

STOCL 

WANG  I 

008E 

REF 

4 

LAST 

378 

37,2052 

024)3 

1 

LATITLDE 

0059 

37,2152 

72  886 

1 

SIN 

SLl 

0C6C 

REF 

1 

37,2054 

16435 

1 

STODL 

W ANGO 

0061 

P FF 

4 

LAST 

378 

37,2058 

0240! 

0 

AZIMUTH 

0062 

37,2056 

73406 

1 

PUSH 

SIN 

0063 

RCF 

1 

37,2057 

02675 

1 

STCRE 

YNP  +2 

0064 

REF 

1 

37,206'' 

16  70  5 

1 

STCDl 

ZNB  +4 

CC68 

37,2061 

77746 

1 

COS 

0066 

R = F 

2 

LAST 

378 

37,2062 

0 2 6 7 7 

c 

STCRE 

YNP  +4 

0067 

37, 2063 

77676 

c 

DC  C M F 

CC68 

RFF 

2 

LAST 

375 

37 , 2064 

36  7 )3 

0 

PCSGRBL 

STCALL 

ZNB  +2 

0069 

RFF 

1 

37,2065 

47355 

1 

CALCGA 

0070 

37,2066 

77776 

1 

EXIT 

0071 

RFF 

70 

LAST 

374 

37,2067 

0 4616 

1 

TC 

BANKCALL 

0072 

REF 

7 

LAST 

268 

37,2070 

167  72 

1 

CACR 

INLCCARS 

0073 

REF 

35 

LAST 

294 

37,2071 

3 4736 

1 

CAF 

B IT  14 

IF  BITIA  SEl,  GINBAL  LCCK 

0074 

°EF 

9 

LAST 

231 

37,2072 

7 00  7 7 

c 

NASK 

FLAGWP03 

0078 

37,2073 

0 0006 

1 

EXTEND 

CC76 

37,2074 

1 2 0 76 

0 

B7.F 

+ 2 

0077 

REF 

3 

LAST 

374 

37,2075 

28' 414 

1 

I NCR 

NCXCTR 

+ 1 IF 

IN  GI'^BAL  LCCK,OTFFRWISE  0 

0078 

PPF 

31 

LAST 

34  1 

37, 2076 

0 5516 

0 

TC 

OCWNFLAG 

0079 

RFF 

2 

LAST 

230 

37,2077 

00056 

1 

ACRES 

GLCKFA IL 

RESET 

GIMBAL  LCCK  FLAG 

0080 

REF 

1 

37, 21CC 

0 2 3 1 5 

1 

TC 

I MLSLLLG 

0C81 

REF 

4 

1 AST 

375 

37 , 210  1 

1 1 ' 4 .1 4 

n 

CCS 

NCXCTR 

IF  CNE 

GC  AND  CC  A FIFA  TEST  CNLY 

0082 

REF 

1 

37, 2102 

0 2126 

c 

TC 

PIPACHK 

AL  IGN 

AND  MEASURE  VERTICAL  PIPA  RATE 

0084 

P'^F 

1 

37,2103 

0 2320 

1 

TC 

F 1 M NLDO 

CC85 

37,2104 

0 ■).!  16 

1 

EXTEND 

•J0881 

REF 

1 

37,2105 

3 1575 

1 

CCA 

PERFCLAY 

00882 

REF 

1 

37,2106 

0 5273 

0 

TC. 

LCNGCALL 

CFLAY 

WFILE  SLSPENSICN  STABILIZES 

0C8525 

REF 

■3 

LAST 

374 

E5,1416 

EBANK= 

POST  TON 

00883 

REF 

1 

37,2107 

02  1 1 3 

0 

2CACR 

GCESTIMS 

0C853 

RFF 

1 

37,2110 

76065 

0 

00884 

PPF 

1 

37,2111 

3 2116 

c 

CA 

ESTICACR 

0038  8 

REF 

1 

37, 2112 

0 5 133 

n 

TC 

JCBSLEEP 

00  88  6 

RFF 

2 

LAST 

375 

37,2113 

3 2116 

0 

G0EST  IMS 

CA 

<^ST  ICAOR 

0085  7 

REF 

2 

LAST 

373 

37,2114 

0 513  7 

1 

TC 

JCEWAKE 

00858 

REF 

7 

LAST 

370 

37,2115 

0 5261 

1 

TC 

TASKCVER 

00  88  9 

REF 

1 

37,2116 

76500 

0 

ESTICACR 

CACR 

ESTIMS 

0086 

RFF 

43 

I.AST 

374 

37, 2117 

3 475  5 

1 

TCROLF 

CA 

ZFPQ 

GAP; 
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0087 

RFF 

7 

LAST 

318 

37,2120 

55'047 

1 

TS 

CSPTEM2 

0088 

RFF 

1 

37, 2121 

3 150  4 

1 

CA 

DRIFTI 

0C89 

REF 

8 

LAST 

376 

37,2122 

55 ' T5u 

1 

TS 

DSPTEM2  +1 

0C9r 

REF 

LAST 

375 

37,2123 

51 ' 416 

C 

INOEX 

PCSI TON 

onoi 

REF 

2 

LAST 

128 

37,2124 

55*420 

1 

TS 

SCUTHDR  -1 

nC92 

REF 

1 

37,2125 

9 2457 

0 

TC 

SHOW 

0093 

REF 

5 

LAST 

375 

37,2126 

51*414 

1 PIPACHK 

INDEX 

NDXCTR 

PIPA  TEST 

0094 

37,2127 

0 213) 

1 

TC 

*-  1 

0C95 

REF 

1 

37,2130 

0 2447 

1 

TC 

FARTHF* 

0096 

RFF 

2 

L AS'^ 

374 

37, 2131 

3 4361 

1 

CA 

DECl  7 

ALIGN  PIP  CCUNTFP  TO  CVEFFLGW  17  TIMES 

CC97 

REF 

1 

37,2132 

55*476 

1 

TS 

OATAPL  +4 

IN  THE  ALLCTED  TIME  INTERVAL 

0C98 

REF 

1 

37,2132 

3 2474 

1 

CA 

CEC58 

0099 

REF 

2 

LAST 

128 

37, 2134 

55*412 

0 

TS 

LENGTHCT 

OlOC 

REF 

20 

LAST 

368 

37,2135 

3 475  3 

1 

CA 

ONE 

oni 

RFF 

1 

37,2136 

C C 1 C SJ 

c 

TS 

RESULTCT 

010? 

REF 

44 

LAST 

375 

37,2137 

3 4755 

1 

CA 

zero 

0103 

REF 

2 

LAST 

128 

37,2140 

1 

UT 

4^ 

UT 

0 

INTEX 

PIP  INDEX 

0104 

REF 

2 

LAST 

30  6 

37, 214  1 

54  C3? 

1 

TS 

PI  PAX 

0105 

REF 

2 

LAST 

376 

37,2142 

55*472 

0 

TS 

DATAPL 

0106 

REF 

1 

37 , 2 143 

0 2 232 

1 

TC 

CFECKG 

0107 

37, 2144 

C CG04 

c 

INHINT 

0108 

REF 

16 

LAST 

368 

37  , 2145 

3 4752 

0 

CAF 

Two 

0109 

RFF 

1 

37,2146 

C 5173 

1 

TC 

TWIDDLF 

01  1'^ 

REF 

5 

LAST 

371 

E5,  1642 

FBANK= 

X 

0111 

Rcp 

1 

37,2147 

02151 

0 

ACRES 

PIPATASK 

0112 

REF 

34 

L AST 

^ 

37,2150 

0 5155 

c 

TC 

ENCCF JCB 

0113 

37,2151 

0 000  6 

1 

PIPATASK 

EXTENC 

0114 

RFF 

0 

LA  ST 

376 

37,2152 

27*412 

0 

C I M 

LENGTFCT 

0115 

RFF 

4 

LAST 

376 

37,2153 

3 1412 

1 

CA 

lfngthot 

C116 

37,2194 

G 0006 

1 

EXT  F NO 

T117 

rff 

1 

37,2155 

6 2161 

0 

BZMF 

START  F I F 

OUR 

RFF 

19 

LAST 

335 

37,2156 

3 4 74  2 

1 

CAF 

BITIO 

0119 

REF 

2 

LAST 

376 

37,2157 

0 5173 

1 

TC 

TWIDDLE 

0120 

REF 

6 

LAST 

376 

F5,  1642 

EBANK= 

X SM 

0121 

REF 

■ 2 

t AST 

376 

37 ,2  160 

02151 

0 

ACRES 

P IPATASK 

0122 

RFf 

2 

LAST 

269 

37,216  1 

3 4736 

1 

STARTPIF 

CAF 

PFI020 

0123 

REF 

14 

L AST 

369 

37,2162 

G 5 105 

0 

TC 

F I NO  VAC 

0124 

REF 

7 

LAST 

376 

F5  , 1642 

ERANK= 

XSM 

0125 

REF 

1 

37,2163 

C 2 1 6 6 

1 

2CADP 

PI  F JCEP 

0125 

■ RCR  , 

1 

37,2164 

■ 76065 

0 

0126 

REF 

8 

LAST 

375 

37,2165 

0 5261 

1 

TC 

TASKCVEP 

0127 

REF 

6 

LAST 

376 

37,2  166 

51*414 

1 

PI  PJCBB 

INDEX 

NCXCTR 

0128 

37,2167 

0 2 170 

0 

TC 

+ 1 

0129 

RFF 

2 

LAST 

376 

37,217C 

D 2447 

1 

TC 

FARTFR# 

013'‘ 

REF 

5 

LAST 

376 

37,2171 

3 1412 

1 

CA 

lengthot 
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37,2172 

C CCC6 

1 

EXT  FAC 

0132 

37,2173 

6 2175 

0 

BZNF 

+ 2 

0133 

RKF 

35 

LAST 

376 

37,2174 

0 5155 

(1 

TC 

EADOFJO0 

113A 

FPF 

7 

LAST 

26  1 

37, 2175 

3 4 7 56 

1 

CA 

FIVE 

3135 

RTF 

2 

LAST 

376 

37,2176 

55  ' 537 

0 

TS 

RESULTCT 

0136 

P.FF 

2 

LAST 

376 

37,2177 

0 2 33  2 

1 

TO 

CFECKG 

0137 

REF 

3 

LAST 

376 

37, 2200 

11‘472 

1 

CC  S 

DAT  API.  +1 

0138 

37,2201 

0 220  5 

1 

TC 

+ 4 

013<5 

REF 

1 

37,2202 

0 5 67  5 

0 

TC 

CCSHOIE 

0140 

REF 

4 

LAST 

377 

37,2203 

4 1476 

1 

CS 

DATAPL  +4 

0 141 

REF 

5 

LAST 

377 

37,2204 

55*476 

1 

TS 

CATA.PL  +4 

0142 

37,2215 

C C006 

1 

EXTEAD 

0143 

REF 

6 

LAST 

377 

37,2206 

4 1473 

1 

CCS 

OATAPL 

0144 

RFF 

7 

LAST 

377 

37,2207 

21*477 

0 

CAS 

DATAPL  +4 

0 14  6 

RFF 

21 

LAST 

375 

37,2210 

0 6042 

1 

TC 

I ATPRE7 

0146 

37,2211 

4 5 3 4 5 

1 

CLCAC 

DSU 

0147 

RFF 

P 

LAST 

377 

37,2212 

02  50  1 

1 

CATAPL  +6 

0148 

RFF 

9 

LAST 

377 

37,2213 

0 2 4 7 5 

0 

DATAPL  +2 

0146 

37,2214 

45044 

0 

EPL 

CAL  L 

0 150 

RFF 

1 

37,2215 

762  1 7 

1 

AIAGCTA 

0151 

REF 

1 

37,2216 

76275 

0 

CVFRFFT  X 

, 0152 

37,2217 

56325 

0 

A INGCTN 

PCCL 

CCV 

■)153 

REF 

10 

L AST 

377 

37,2220 

0 2 4 7 7 

1 

DATAPL  +4 

0154 

37,2221 

47075 

0 

CMPR 

RTP 

0155 

REF 

1 

37,2222 

3 7056 

c 

CEC585 

CEC585  HAS  EEFN  PEDEFIAEC  FOR 

LEW 

0156 

REF 

1 

37,2223 

21613 

0 

SGAAGREE 

0157 

REF 

9 

LAST 

376 

37,2224 

010  50 

0 

STORE 

CSPTEM2 

0158 

37,2225 

77776 

1 

EXIT 

0159 

REF 

7 

LAST 

376 

37,2226 

11*414 

0 

CCS 

NDXCTR 

0160 

REF 

1 

37,2227 

0 23  U 

1 

TC 

CCAAL ICN 

TAKE  OLATPCPR  GUT  CF  GIRBAi. 

LCCK 
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DLOAD 

Cl  88 

37,2766 

7 7746 

1 
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0 

TCF 

+ 2 

0 29  4 

REF 

1 

37, 30C2 

C 3GC5 

1 

TC 

SETUFERl 

0295 

FEF 

9 

LAST 

378 

37,3003 

3 0 032 

0 

CA 

CCUX 

0 2 96 

REF 

3 

LAST 

376 

37,3004 

55' 414 

0 

TS 

LCSVEC  +l 

FOR 

TROLBLESFCGTING  VO  PCSNS  2t4 
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L IMU  PEPPHRMfiMCF  TESTS  A 


USER'S  PAGE  MO.  7 E5  S3 


0297 

REF 

25 

LAST 

3 86 

37,3005 

0 606  2 

1 

SFTLIPERI  TC 

INTPPFT 

0298 

37,3006 

65345 

0 

F.LCAC 

POOL 

ANGLES  FRCM  DRIFT  TEST  ONLY 

0299 

REF 

1 

37,3007 

02473 

0 

AAGZ 

C3C0 

PFF 

1 

37,3  HO 

02477 

1 

ANGY 

0301 

37,3011 

55525 

c 

FFCL 

VCEF 

0302 

RFF 

2 

LAST 

388 

37,3012 

02  51  1 

1 

ANGX 

C3C3 

37 ,3'.H3 

74276 

1 

VCOMP 

VXSC 

0304 

R FF 

2 

LAST 

3PE 

37, 3014 

37110 

r 

GECPC-FJ 

0309 

37,3015 

74521 

1 

w XV 

VSR  1 

0306 

REF 

15 

LAST 

386 

37,3016 

02  64  3 

1 

XSR 

0307 

REF 

11 

LAST 

382 

37,3017 

0 2 740 

r 

STORE 

CGC 

C3C8 

37,3020 

77776 

1 

EXIT 

03C9 

REF 

1 

37,3021 

3 2475 

C 

CA 

OGCPL 

0310 

REF 

77 

LAST 

386 

37,3022 

0 4 6 16 

1 

TC 

BANKC  all 

0311 

REF 

3 

LAST 

334 

37 , 3123 

17315 

0 

CACR 

I YUPULSE 

031? 

PFF 

-a 

LAST 

38  1 

37,3024 

C 2315 

1 

TC 

I K.SL  LLG 

0313 

RFF 

7 

LAST 

388 

37,3025 

1 1 '441 

1 

GF0STRT4  CCS 

thronox 

ONLY  FCSITIVE  IF  U VERTICAL  CRIFT  TEST 

0314 

pep 

1 

37,3026 

0 2263 

1 

TC 

VALMIS 

0315 

REF 

26 

LAST 

389 

37,3027 

C 6C42 

1 

TC 

IRTPRET 

- 03151 

37 , 3030 

77624 

1 

CALL 

031‘^2 

ref 

2 

LAST 

384 

37,3031 

7 6 401 

c 

fpthrvse 

03153 

37,3032 

77  7 76 

1 

EXIT 

0316 

REF 

1 

37 , 3033 

0 2117 

1 

TC 

TCROUF 

0317 

0318 

0319 

REF 

REF 

RFF 

9 

8 

4 

LAST 

LAST 

LAST 

38F 
389 
37  7 

37.3034 

37.3035 

37 . 3036 

55' 412 
11 '440 
0 2447 

c 

1 

1 

SLEEP  IE 

TS 

CCS 

TC 

LENGTFCT 

TORQNDX 

EARTFR* 

TEST 

ARE 

NCT  OV ER-CECRENENT  LENGTHOT 
WE  CCING  VEPTDRIFT 

0320 

REF 

36 

LAST 

377 

37,3037 

0 5 155 

0 

TC 

ENDCF JCE 

0321 

RFF 

1 

37,3040 

3 5014 

1 

SCMEERRR 

CA 

EBANK5 

0321  1 

RFF 

12 

LAST 

388 

37,304  1 

54  CC3 

c 

TS 

EEANK 

03212 

REF 

22 

LAST 

385 

37,3042 

3 4753 

1 

CA 

ONE 

032  13 

P''F 

“a 

LAST 

385 

37,3043 

55' 576 

0 

TS 

OVFLCWCK 

STOP 

ALLCOP  FRCM 

CALLING  ITSELF 

03214 

REF 

20 

LAST 

364 

37,3044 

n 5 56  7 

0 

TC 

ALARY 

0322 

37,3045 

01601 

0 

QCT 

1 600 

0323 

REF 

5 

LAST 

382 

37,3046 

0 2 270 

0 

TC 

ENDTESTl 

0324 

PFF 

1 

37,3047 

3 3054 

0 

SCYFR  R2 

CAF 

0CT1601 

0325 

REF 

2- 

LAST 

181 

37,3050 

0 5734 

1 

TC 

VAPALARM 

0330 

OPF 

0 ^ 

LAST 

378 

37,305  1 

0 5516 

c 

TC 

CCVvNFL  AG 

0331 

REF 

4 

t AST 

378 

37, 3052 

OCOC? 

c 

ADRE  S 

I PLSE 

0332 

REF 

37 

LAST 

389 

37,3053 

0 5155 

0 

TC 

END0FJ08 

0333 

37, 3054 

01601 

1 

aCTl 6C1 

CCT 

0 1 60 1 

0334 

37,3055 

06  200 

0 

DEC585 

nr  T 

C62CC 

3200 

34-14  CPCER 

IS  IMPORT  ANT 

0335 

37,3056 

00100 

1 

SCHZERCS 

2CEC 

.00000000 

0335 

37,3057 

ccoco 

1 
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L I^U  FPPFCRI^ANCF  ‘^’ESTS  A 


LSER' S RAGE  AC.  8 E5  S3 


0336 

37.3G6C 

00000 

1 

2REC 

.00000000 

3336 

37,3061 

00000 

1 

0337 

37,3062 

OOOOCi 

1 

OCT 

OCCOG 

0338 

37  ,3C6? 

oonou 

1 ONECPF 

CCT 

00000 

CPCER  TS  IA«PCRTANT 

Q339 

37, ’06A 

OCOC  1 

(; 

CCT 

ocaol 

03A'’ 

37,0065 

C0004 

0 

IMVAL 

CCT 

4 

0 341 

37,3066 

CCCC2 

C 

CCT 

2 

0342 

37,3067 

00220 

1 

CEC 

1 44 

0343 

37,3C7C 

77776 

1 

CEC 

-1 

0344 

37,3071 

3573C 

c 

SCLPL Y 

2DEC 

. 935C5870 

INITIAL 

GAINS  ECP  PIP  OUTPUTS 

0344 

37,3072 

10035 

1 

0345 

37,3C73 

10317 

c 

2rec 

,26266423 

INIT  lAL 

GAlNS/4  FGR  ERECTION  ANGLES 

0345 

37,  3074 

17550 

1 

C346 

37,3075 

00115 

1 

77CECYL 

EEC 

77 

0347 

REF 

4 LAST  386 

37,3076 

T 1 4 4 3 

C 

ALYXYZ 

GENACP 

ALXIS  -1 

0348 

37,3077 

04133 

1 

P IPASC 

2DEC 

. 13055869 

0348 

37,3100 

C2265 

1 

0349 

3 7, 3 1C  1 

57223 

C 

VFLSC 

2DEC 

-.52223476 

512/980.402 

C349 

37,3102 

6645  1 

1 

0350 

37,3103 

05427 

0 

At  SK 

2DEC 

. 17329931 

SSWAY  VEL  gain  X 

980.4C2/4C96 

0350 

37, 3104 

12577 

1 

C351 

37,3105 

77567 

0 

2CEC 

-.00835370 

SS^>AY  ACCEL  GAIN 

X 980.402/4096 

>0351 

37, 31C6 

44202 

1 

03  52 

37, 3107 

24276 

1 

georgej 

2DEC 

.63661977 

0352 

3 7 , 3 1 1 C 

14066 

1 

0353 

37,2111 

23C73 

1 

GECRGEK 

2DEC 

. 59737013 

C353 

37,3112 

11773 

1 
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L PTNIBALL  GAME  3UTTCNS  AND  1 IGHTS 


USER'S  PAGE  NO.  1 EC  S3 


POOni  F.PCGPAN  AAME  - KEYECARE  AND  DISPLAY  PROGRAM 

RQ0n2  MOD  NO  - A DATE  - 27  APRIL  1967  ASSEMBLY  - FINCANCE  REV  18 

R00'>3  MOP  PY  - FILENE 

ROOUA  LCG  SEPTICN  - PINBALL  GAME  PUTTCNS  AND  LIGHTS 

P,00n9  FUNCTIONAL  DESCRIPTICN- 


RTTin  Ti-c  KEYPPAPC  AND  EISPLAY  SYSTI^M  PROGRAM  OPERATES  LKOER  EXECUTIVE 

RCCll  CCNTRCL  ANC  PROCESSES  INFCPMATIQN  EXCHANGEE  BETVvEEN  TEE  AGC  AND  THE 

RO012  COMPUTER  OPERATOR.  TH>^  INPUTS  TC  THE  PROGRAM  ARE  FROM  THE  KEYBOARD, 
R0O13  FRCM  INTERNAL  FPCGFAMS,  AND  FRCM  TEE  UPLINK. 

ROriA THE  LANGUAGE  OF  C C M MUM  C AT  I CN  ^^ITE  TEE  FRCGRAM  IS  A FAIR  OF  WORDS 

R0015  KNCWN  AS  VERB  AND  NOUN.  EACH  OF  THESE  IS  REPRESENTED  BY  A 2 CHARACTER 
R0016  DECIMAL  NUMBER.  TEE  VERP  CCDE  TNCTC»TFS  WEAt  ACTION  IS  TO  BE  TAKEN,  THE 
P.Oni7  NOUN  CODE  INDICATES  TO  V.HAT  THIS  ACTICN  IS  AFFLIED..  NCUNS  USUALLY 
R0018  REFER  TO  A GROUP  CF  ERASABLE  REGISTERS. 

R002G  yPPRS  ARE  GROUPED  INTC  DISPLAYS,  LCADS,  MCNITCRS  (DISPLAYS  TEAT  ARE 
R0021  UPDATED  ONCE  PER  SFCOND),  SPECIAL  FUNCTIONS,  AND  EXTENDED  VFPBSITHESE 
R:K)22  are  OUTSIDE  OF  TEE  DCMATN  OF  PINBAUL  AND  CAN  BE  FCUND  UNDER  LOG  SECTION 

R0023  tEXTENOED  VERBS:). 

R002A  A LIST  OF  VERBS  AND  NOUNS  IS  GIVEN  IN  LCG  SECTICN  :ASSEMBLY  AND 
RCC25  CPERATTCN  I N for M AT  I C N : . 


RCC26  CALLING  SFQLENCES- 


RnCl27  KEYBOARD: 

RCC28  EACH  DEPRESSION  CF  A KEYECARD  BUTTON  ACTIVATES  INTERRUPT  KEYRUPT  1 

RT029  AND  PLACES  TEE  5 BIT  KEY  CODE  INTC  CHANNFL  1^.  KEYRUFTl  PLACES  THE  KEY 
RJ03!i  CCDE  tnto  mfaC,  ENTERS  AN  EXECUTIVE  REQUEST  FOR  TEE  KEYBOARD  AND  DISPLAY 

RQC31  program  ;CHARIN:),  AND  EXECUTES  A RESUME. 


R)D32  UPLINK: 

POn33  EACH  WORD  RECEIVED  BY  THF  UPLINK  ACTIVATES  INTERRUPT  UPRUPT  NHICE 

RPn3A  PLACES  THE  5 PIT  KEY  CODE  INTC  MPAC,  ENTERS  AN  EXECUTIVE  REQUEST  FOR  THE 

ROnsB  K'^YBOARC  AND  DISPLAY  PROGRAM  (AT:CHARIN:)  ANC  EXECUTES  A RESUME. 

RCC36  INTfrnai  PRCGRAMS: 

RDD37  INTERNAL  PRCGRAMS  CALL  PINBALL  AT  :NVSLB:  ViITH  THE  DFSTREC  VERB/NCUN 

Rnn3fi  CGDE  IN  A (LOW  7 BITS  FTP  NCUN,  NEXT  7 BIT'S  FOR  VERB).  DETAILS 

POC39  DESCRIBED  ON  REMARKS  GARBS  JUST  BEFCRF  ;NVSUB:  ANC  :NVSBWAIT;  (SEE 

RODAD  .SYMECL  TABLE  for  PAGE  NUMBERS). 


R0CA5  NCFMAL  EXIT  MO CES- 

RD0A6 IF  PINBALL  WAS  CALLED  BY  EXTERNAL  ACTION,  THERE  ARE  FOUR  EXITS: 

RQ0A6r‘5  1)  AIL  BUT  (2),  (3),  AND  (A)  EXIT  DIRECTLY  TC  ENOCEJER. 

R0CA61  2)  EXTENDED  VERBS  GC  TC  THE  EXTENCEC  VERB  FAN  AS  PART  CF  THE 


GAP:  ASSE^’BLE  eEVISION  116  CF  ACC  FRCGPAW  LUMINARY  BY  NASA  2021  1 12--C71  19:C9 
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L 

PINBALL  GAME  BUTTONS  AND  LIGHTS 

USER'S  PAGE 

NO.  2 

EC  S3 

R00A615 
R on  A 6 2 
R00463 

PINBALL  EXECUTIVE  JCE  WITH  PRIORITY  30000.  IT  IS  THE 
RESPCASIBILITY  OF  THE  EXTENDED  VERB  CALLEC  TC  EVENTUALLY 
CHANGE  PRIORITY  (IF  NECESSARY)  AND  EC  AN  ENDCFJOB. 

ROOAF^S 

ROOA6A 

R00465 

AISC  PINBALL  IS  A NCVAC  JOB.  EEANK  SET  FOR  COMNON. 

3)  VERB  37.  CHANGE  CF  frogRAM  (MAJOR  NCDE)  CALLS  :V37:  IN  THE 
SFRVTCF  ROUTINFS  AS  PART  OF  THE  PINBALL  EXEC  JCB  ViITH  FRIG 

Rn0466 

P00467 

R0046R 

300nn.  THE  NEW  FFCGFAN  CODE  (MAJCP  MODE)  IS  LEFT  IN  A. 

4)  key  release  BLTTCN  calls  :PINBRNCH:  IN  THE  DISPLAY  INTERFACE 
ROUTINES  AS  PART  CF  THE  PINBALL  EXEC  JOB  WITH  PRIG  3CCCf  IF 

RCC469 

THE  KFY  RELEASE  LIGHT  IS  CFE  AND  :CACRSTrF:  IS  NOT  +e:. 

■50047 

IF  PINBALL  WAS  CALLED  BY  INTERNAL  FRCGRAMS,  EXIT  i^PCM  PINBALL  IS  BACK 

R0C48 

R0049 

TC  calling  ROUTINE.  CETAII.S  EESCRIBEE  IN  REMARKS  CARDS  JLST  BEFORE 
:NVSUe:  AND  :NVSBHAIT:  (SEE  SYMBOL  TABLE  FCR  PAGE  NUMBERS). 

ROOSO 

ALARM!  CR  ABCRT  FX]T  MCDES- 

RC051 

R0052 

R0O53 

EXTERNAL  INITIATION; 

IF  S^Mie  IMPROPER  SEQUENCE  CF  KEY  CEDES  IS  DETECTED,  THE  CPERATCR 
ERROR  LIFHT  IS  Tl'RNED  ON  AND  EXIT  IS  TO  -.FNDOFJfiB;. 

R0054 

R0055 

INTERNAL  RRCGRAM  IMTIATICN: 

IF  AN  ILLEGAL  V/N  COMBINATION  IS  ATTEMPTED,  AN  ABCRT  IS  CALSED 

RCC56 
R0056 1 
R00562 

(WITH  OCTAL  01501  ). 

IF  A SECOND  attempt  IS  MADE  TC  GC  TC  SLEEP  IN  PINBALL,  AN  ABCRT  IS 
CALSED  (WITH  OCTAL  01206).  THERE  ARE  TWO  WAYS  TC  GO  TC  SLEEP  IN  PINEALL: 

R0r563 

R0056A 

1)  EN'OIDIE  CR  CATAWAIT. 

2)  NVSBWATT,  PRENVBSY,  CR  NVSLBLSY. 

P0057 

R005P 

CCNDITTCNS  LEADING  TC  THE  ABOVE  ARE  DESCRIBED  IN  FORTHCGMING  MI7/IL 
E-REPCPT  DESCPieiNG  KEYBCARD  AND  DISPIAY  CPERATICN  FCR  27B. 

R3059 

OUTPUT- 

PCC6F 

R0061 

R0062 

INFCRMATTCN  TC  PE  SENT  TC  THE  DISPLAY  PANEL  IS  LEFT  IN  THE  :DSPTAB: 
BUFFERS  REGISTERS  (UNDER  EX'"C  CCNTRCL).  :CSPCLT;  (A  FART  QF  T4RUPT) 
HANDLES  THE  PLACING  CF  THE  :OSPTAB:  INFCRMATTCN  INTO  CLTPLT  CHANNEL  10 

RCC63 

IN  IMEPRLPT. 

R0064 

ERASABLE  INITIALIZATION- 

R0a6  5 

FRFSH  start  ANC  RESTART  INITIALIZE  THE  NECESSARY  F REGISTERS  fqr 

R 0066 
R0067 
RCC6B 

PINBALL  IN  tSTARTSUB:.  REGISTERS  ARE:  LSPTAB  BUFFER,  CACRSTCR, 

RFCRFT,  CLPASS,  OSPLCCK,  MONSAV^:,  MONSAVFl,  VERBREG,  NCLNREG,  DSPLTST, 
CSPCCLNT,  NCUT. 

R0069 


& COMPLETE  LIST  OF  ALL  THE  "RASABLES  (BGTF  RESERVED  ANT  TELPCRARIES)  FCR 
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L 

PIN8ALL  GAME  PUTTCNS  AND  LIGHTS 

USER'S  FACE  NO.  3 ED  S3 

RCC7C 

FIN6AL.L  IS  GIVEN  EFLCW. 

ROOT  1 

THE  FCLLCWING  arc  QF  GENERAL  INTEREST- 

R0.17P 

PFNARKS  CARES  PRECEDE  the  REFERlMCFC  SYMBOL  DEFIMITiaN).  SEE  SYMBOL 

R0073 

TABLF  TC  FIND  AF-PRCPRIATE  PAGE  NLMBERS. 

R0H74 

NVSUe  CALLING  PCINT  POP  INTERNAL  LSF  OF  PINBALL. 

R0C75 

P0076 

R0077 

OF  related  INTEREST  NVSEWAIT 

NVSUBUSY 

PRFMVBSY 

ROC  9 3 
R008R 

ENOIOLE  RCLTINE  FOR  INTERNAL  PPCGBAMS  WISHING  TC  GC  TC  SLEEP  WHILE 

awaiting  OPERATORS  RESPONSE. 

ROC851 

R00852 

OSFNN  RCUTINE  BY  WHICH  AN  INTERNAL  PPCGPAM  MAY  DISPLAY  A DECIMAL 

PROGRAM  CCDE  (MAJCP  MCOE)  IN  THE  FRCGRAM  (pAJCF  MODE)  LIGHTS. 

R00852? 
R 0C8827 

(CSPMM  COES  NCT  DISPLAY  DIRECTLY  BLT  ENTERS  EXEC  PECLEST 
FOP  nSFMMJB  WITH  PRIC  3O0O0  AND  RETURNS  To  CALLER.) 

R00853 

RUOfl54 

BLANKSUB  ROUTINE  BY  WHICH  AN  INTERNAL  PRCGPAM  MAY  BLANK  ANY 

CCMBINATION  OF  THE  DISPLAY  REGISTERS  Rl,  P2,  R3. 

ROCPS^ 

R00856 

JAMTERM  POLTINES  3Y  WHICH  AN  INTERNAL  PPCGPAM  MAY  FEPFOFM  THE 

JAvpROC  TERMINATE  (V  3A ) OR  PROCEED  (V  33)  FLNCTICN. 

RCC86 

MCNITCR  VERBS  FCR  FFPICCIC  ( 1 PEP  SEC)  DISPLAY. 

R00861 

PLEASE  PERFORM,  PLFASE  MARK  SITLATIONS 

R J08A2 
R0C86 3 
R0086A 

REMARK^  DESCRIBING  HOW  AN  INTERNAL  RCLTINF  SHCULO  HANDLE 
THESE  SITLATICNS  CAN  EE  FCUNC  JUST  BEFCRE  ;NVSUE:  (SEE 

SYMBOL  table  FCR  PAGE  NLMBER). 

R0C87 

R0088 

THE  NCUN  TABLE  FORMAT  IS  CFSCRIEEC  CN  A PAGE  OF  REMARKS  CARDS  JLST 
BEFORE  tDSPABC:  (SEE  SYMBCL  TABLE  FCR  PAGE  MMEEP). 

R0089 

R0C891 

THE  NOUN  TABLES  THEMSELVES  ARE  FOUND  IN  LCG  SECTICN  .-PINBALL  NCLN 
TABLES  :. 

R t099 

FOR  FURTHER  DFTAILS  ABOUT  OPERATICN  OF  THF  KEVBCARD  AND  DISPLAY  SYSTFM 

R0091 

80092 

FRCGRAM,  SEE  the  MISSION  PLAN  AND/OR  M IT/ IL  F-2I2S 
DESCRIBING  keyboard  ANC  DISPLAY  CFE°ATICN  FCP  278. 

RJ150 

THE  FCLLCWING  QUOTATION  IS  FRCVIOEC  THROUGH  THE  COURTESY  CF  THE  ALTHCRS. 

R0151 

R0152 

::IT  WIIL  BF  FPCVFC  TC  THY  FACE  THAT  THOU  HAST  MEM  ABOUT  THEE  THAT 
LSLALLY  TALK  OF  A NCUN  AND  A V^RP,  ANC  SUCH  APCMINABIF  WCPDS  AS  NC 
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L PINBALL  GAMF  BUTTONS  AND  LIGHTS  USLR'S  PAGE  NO.  4 EO  S3 

ROl  53  CHFI'IIAN  FAR  CAN  ENCUP-E  TC  HEAP.::  ^ “ 

RT154 ^ HENRY  6,  ACT  2,  SCENE  4 


R0155  the  FCLLOWING  ASSTGNVENTS  FOR  PINBALL  ARE  NACE  ELSEWHERE 


R0156  RESERYEC  FOR  PINBALL  EXFCLTIVF  ACTION 


ROl  57 

RQ15F 

R :)159 

RC!16n 

R0161 

R9  162 

R9163 

R3164 

R9165 

R0166 

R0167 

R0168 

R016S 

R017'I 

RC17] 

R3172 

RG173 

RG174 

Rv)175 

RQ176 

R0177 

R017R 

ROUS 

P C1795 

PI  180 

R018I 

R0182 

R0183 

PCIB4 

R9185 

RH  186 

R3  1 07 

F318P 

ROl  £S 

R0I9G 

RHISI 


CSPCOUNT  ERASE 

OECBRNCH  ’^RASE 

VERBRFG  EPASF 
NGLNREG  FRASF 

XREG FRASE 

YRFG  ERASE 

ZREG  FPASE 

XPEGLP  FRASE 

YPEGLP  ERASE 
HI  = YREGLC 


ZREGLF  ERASE 
LCIFMCLT  = ZREGLP 


DISPLAY  position  INDICATOR 

tCEC,  - CFC,  CCT  INCICATOR 

VERB  CODE 
NCLN  COCt 

PI  INFLT  BUFFEP 

R2  INPLT  PUFFER 

R3  INPUT  BUFFER 

LC  FART  OF  XREG  (FCP  EEC  CCNV  ONLY) 

LC  PART  OF  YRFG  (FOR  DEC  CCNV  ONLY) 

TEYP  FOR  CISPLAY  CF  HRS,  NIM,  SEC 

PLST  = LCTEPCLT-1. 

LC  PART  OF  ZREG  (FOR  DEC  CCNV  ONLY) 
TFwp  for  CISPLAY  CF  HRS,  PIN,  SEC 
POST  = HITEPCLT+1, 


WCCRFG  ERASE 
DSFLOCK  ERASE 
RPGRET  FRASF 

lcadstat  erase 

CLPASS  ERASE 

NOLT FRASE 

NCLNCADR  ERASE 
MONSAVE  FRASE 
PCNSAVEl  ERASE 
PIOMSAVEZ  FRASF 
CSFTAE  ERASE 
CADRSTCP  FRASE 
NVCTFW  ERASE 

NVBNKTE'^  ERASE 


VERBSAVE  ERASE 
DSPLIST  ERASE 
EXTVB^ACT  PEASE 
DSPTEPl  ERASE 
CSPTEM2  FRASF 


PCCF  CCCE 

KEYBCARD/SUBRCUTINE  CALL  INTERLOCK 

RETURN  REGISTER  FCP  LCAD 

STATUS  INriCATCP  FOR  LOADTST 

PASS  INOICATCR  CLFAP 

ACTIVITY  COUNTER  FOR  DSPTAB 

PACHINE  CACR  FCR  NOUN 

NZV  CODE  FCR  PCMTCR.  (=  PCNSAVEl-1) 

NCUNCACR  FOR  M CN  I TOR ( P A T B S ) =P0NSAVF  +1 

NVPCNOFT  CPTICNS' 

+ 13D  1C, 01  SPLAY  PANEL  BUFFER  . 1 1-13  ,C  RELAYS 

ENCICLE  storage 

NVSLB  STORAGE  FCR  CALLING  ADDRESS 
MIST  = NVBNKTEP-1 

NVSUE  storage  fCR  CALLING  BANK 

PLST  = NVCTEP+1 
NFECEC  FCR  RECYCLE 

^^AITING  REG  FCR  CSF  SYST  INTERNAL  USE 
EXTENDED  VERB  ACTIVITY  INTERLOCK 
+2  buffer  STCRAGF  area  1 (POSTLY  FOR  TIPF) 

+2  BUFFER  STCRAGE  AREA  2 (POSTLY  FCR  CFG) 


END  CF  FPASAELES  RESFRVEC  FCR  PINBALL  EXECUTIVE  ACTION 


R019P 


TEPPOPARIES  FOR  PINBALL  EXECUTIVE  ACTION 


GAP:  REVISION  116  CF  FPCGR/iN  LUMNfFY  gY  N.flS^  202  11  12-071 


l^iCS  AUG.  11. 1969  LEKQNAID.CSq  FftGE  3<;5 


« 


L PI^B4LL  G4ME  BUTTOMS  AMT  L1GHT5;  LSEP'S  PAGE  NC.  5 EO  S3 


ROl'53  CSEXI"^  = IM815+  RETURN  FOR  OSPIN 

R019A  FXITPM  = !NTB1‘=+  RETURN  FCP  SCALE  FACTCR  FCLTINE  SELECT 

P0195  PLANK^ET  = T NT B 1 5 <■ RETURN  FOR  2PLANK 


RCISE  NRDRF7  = INTBIT15  RETURN  FOP  5ELANK 

R0197  tvDRET  TNTP  I TIS RETURN  FCP  DSFIaE 

R0198  C^CRET  = INTBTTIE  RETURN  FOR  PLTCOP(DEC  ICAD) 

P0  199  2 1/22R‘=G  = INT6ni5  TF^F  FCR  CFAFIN 


P02')0  IJPCATR<=T  = POLISH  RETURN  FCR  UFCATNN,  UFCATVB 

R02:i  CHAR  = PCLISF  TENF  FCR  CHARTN 

R0202  ERCNT  PCLI  SH CCUNTEF  FCR  RPRCR  LIGHT  RESET 

R'T2n3  FECCUNT  = POLISH  CGUNTFR  FOR  SCALING  AND  DISPLAY  (DEC) 

R0204  SGNON  VPUF TEYP  FCP  CN 

R0205  NCUNTEY  = VBUF  CCLNTER  FOP.  PIXNCLN  FETCH 

R02O6  CIRTEN  = VBUF  COUNTER  FOR  OCTAL  DISPLAY  VERBS 

RG207  CECTEN  VBUF CCUNTER  OQR  FETCH  (DEC  CISPLAY  VERES) 


RO20I8  SGNOFF  = VBUF  +1  TENF  FCR  + ,-  CN 

R02C9  N VTF»^P  VBUF  -f  1 TEPP  FCR  NVSUS  

R0210  SFTEMPl  = VBUF  +1  STORAGE  FCP  SF  CCNST  HI  P AR T ( = S F T E N P 2- 1 ) 

RT211  HITENIN'  = VBUF  +I  TEMP  FCR  LOAD  OF  HRS,  MN,  SEC 

R0212 MUST  = LOTEM  IN-1  . 

R0213  CODE  = VBUF  +2  FOc;  nSFIN 

R0214  SFTFMF2  = VBUF  i2  STORAGE  FOR  SF  CONST  LC  P A P T ( = SF TE M P 1+ 1 ) 

R02I5  LOTEMN  = VPUF  *2 TFNP  FCP  LCAC  CF  HPS,  MN,  SEC 

RT216  MUST  = HITEMN  + 1 . 

R0217  MTXTE^'P  = VBUF  ■*  3 FCP  MIXNOUN  FATA 

R021B  SIGNRET  = VBUF  +3 RETURN  FCP  CN 


R0219  AL'C  MlxTEMP+1  = VBUF+A,  MIXTEMF+2  = VBUF+S. 


R0220  FMTRET  = DOTING  FxiT  FPCM  ENTER 

R0221  WCCN^  COTRFT CHAR  CCUNTER  FOR  FSFlvC 

RT222  INREL  = CCTRET  INPUT  BUFFER  SELECTOR  ( X,Y,Z,  REG  ) 

R0223  CSPMMTE-M  = MATING  DSPCCUNT  SAVE  FCR  CSFMM 

P022A  MixBR  = MATING  INCICATQR  FOR  MIXED  CR  NORMAL  NCLN 

R0225  Tfm ERASE EXEC  oFme 

R0226  rSRFU  = TFMll  RFL  ADDRESS  FCR  DSPIN 

R0227  TEIX2 rpASE EXEC  TEMP 

R0228  DSMAG  = TEM2  MAGNITUDE  STCRE  FCP  DSPIN 

RT229  ICADDTfm  = tEM2  mixNCUN  INDIRECT  ADDRESS  STORAGE 


RC23C  TFM8  ERASF  EXFC  TFMp 

P0231  count  = TFM3  FCR  OSPIN 
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RC232  7ERA  ■ ERASE  FXFC  TERR 

R0233  LSTPTR  = TFR4  LIST  FCINTEP  FCR  GPABLSV 

R3234  PELRET  T FR4 RETURN  '^OR  RELDSP 

R0235  FREERET  = TFR4  FSTUPK  FOR  FREFCSF 

RT236  ESPwnRFT  = TFM4  RETURN  FQP  OSFSIGN 

R0237  SEPSCRET  = T ER4 RETURN  FOR  SEPSEC 

R023B  SFPMNRFT  = fFR4  RETURN  FCR  SEPRIN 


R-I230  TFM5 ERASE EXEC  TEMP 

R0240  NCLNAOn  = TFN9  TENF  STORAGE  FOR  NOUN  AECRESS 


RT241 
R.0242 
R0243 
R'.)2  44 
R0245 
R0246 
R 1247 
R0248 
R0249 
RQ2  50 


NNAOTEM  erase TERP  FCR  NCUN  ACDPESS  TABLE  ENTRY 

NNTYFTER  ERASE  TEMP  FOR  NOUN  TYPE  TABLE  ENTRY 

lOADlTEN  FRASF  "p  F N F FCR  INCIR  ACRESS  TABLE  ENT  RY  ( N IXN'N  ) 

MLST  IDAD2TEP-1,  = rCA.D3TER-2. 

ICAC2TEN  ERASE  TEMP  '^Cfi  TNCIR  ACRESS  TABLE  ENTRYIMXNN') 

NLST  = IDAClTER+l,  = ICAn3TEM-l. 

ICAC3TFM  ERASE  TEMP  FOR  IMDIR  ADRESS  TARLF  ENTRY(MXNN) 

MUST  = 1CAC1TEM42,  = ICA02TEM+1.' 

RUTMXTEM  ERASF  TEMP  FOP  SF  RCUT  TABLE  ENTPY(MXNN  CNLY) 

ENC  CF  TEMPCPAPIES  FCR  PINBALL  EXECUTIVE  ACTICN 


R02501 

AOOITIONAL  TEMPORARIES  FCR  PINBALL  EXFCUTIVE  ACTICN 

P )25'A2 
R025G3 

MFAC,  thru  MPAC  +6 
BLF,  +1,  +2 

R025C4 
P 1250  6 
P 025C  7 

BUF2,  +1,  +2 

MPTEMF 

AODRViD 

R02509 

END  OF  ADDITIONAL  TEMPS  ECR  PINEALL  EXEC  ACTICN 

R0251 

RESERVEC  FOR  PINBALL  INTERRUPT 

ACT  TON 

R0252 

DSPCNT  FRASF 

counter  FCR  CSFCUT 

R0253 

AC254 

R0255 

UFLOCK  ERASE 

ENC  OF  ERASABI  ES  RESFRVFC  FCR 

BITl  = UPLINK  interlock 
PINBALL  INTERRUPT  ACTICN 

(ACTIVATED  BY 

RECEPTION  OF  A BAD  MESSAGE  IN  L°LINK) 

R0296  TFNFCPAPIES  FOR  PINBALL  INTERRUPT  ACTION 


R0257  KFYTF^'Pl  = LAITEXIT  TEMP  FCR  KEYRUPT,  UPRUPT 

R0258  CSRUPTEM  ^ WA  ITExiT TpMP  FCR  CSPCLT 

R0259  KEYTFNF2  = RLPTAGN  TEMP  FCR  KEYRUPT,  UPRUPT 

R026C  ENC  OF  TEMPORARIES  FCR  PINBALL  INTERRUPT  ACTICN 
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GAME  BUTTONS  AND  LIGHTS 

USER'S  PAGE  NG. 

7 

EO  S3 

P02E1 

the  INPUT  CrOES  ASSUMED  FCR  THE  KEYBCAPC  ARE, 

R0262 

r 

inooo 

R0263 

1 

00 00  I 

R C26A 

s 

01001 

R7265 

VERB 

loom 

R0266 

EPPCP  REsnoio 

PC267 

KEY  PLSE 

UOOl 

80268 

+ 

11010 

P0269 

- 

11011 

R0270 

enter 

lllCO 

R0271 

CLEAR 

I 1 110 

PC272 

NCLN 

11111 

P0273  OUTPUT  FORMAT  FOR  DISPLAV  PANFL,  SET  OtTO  TO  A A A A SC C C CCD CDPC . 

R027A-  A-S  SFLECT  A RELAYWTPC.  THIS  CETERMI'^ES  WI-ICI-  PAIR  OF  CHARACTERS  APE 
P0275  ENERGIZED. 

P0276  P FOR  SPECIAL  REIAVS  SUCH  AS  SIGNS  ETC. 

Pn27  7 C-':  5 BIT  RELAY  CODE  FOR  LEFT  CFAR  CF  PAIR  SFLECTEC  BY  RELAYI^QRD 

R0278  C-S  E BIT  RELAY  CCOE  FTP  RIGHTCHAP  CF  PAIR  SELECTED  EV  PELAYUOPC. 


R027P  THE  PANEL  APPEARS  AS  FCLLCWS, 

P028C)  Nini  yo2  (MAJOR  yQCE) 

P02PI  VCl  VD2  (VERB)  ND 1 ND2  (NCLN) 

R1282  Riri  P1C2  PID3  PITA  R1C5  (Rl) 

P'7283  R201  R2C2  R2C3  P2CA  R2C5  (R2) 

R'728A  P3C1  R3E.2  R3C3  R3DA  R3D5  (R3) 


R02F5  EACH  CF  Tf-ESF  IS  GIVEN  A DSPCCUNT  NUMBER  FOR  USE  WITHIN  COMPUTATION  ONLY 

P0266  MDl  2S  R2D1  11 ALL  APE  CCTAL 


ROROT 

MD2 

2A 

R2D2 

1C 

R0288 

VOl 

23 

P2D3 

7 

P0289 

VC2 

2 2 

20A 

6 

R0290 

NCI 

21 

R2D5 

5 

R02<;i 

NO  2 

20 

P3D1 

A 

P0292 

P IG  1 

16 

R3C2 

3 

P.;J293 

RC29A 

R0295 

P1C2 
R 1C3 
RICA 

15 

U 

13 

R3C3  2 

R3nA  1 

P 305  0 

R0296 

R1C5 

12 

R0297 

THFPE 

IS  AN 

11  RFGISTFP  table 

(DSPTAB)  FCP 

THE  DISPLAY  PANEL. 

P0298 

CSFTAP 

RFLAYWD  PITH 

BITS 

10-6 

BITS  5-1 

R C299 
R0  300 
R0301 

PFLADC 

10 

<5 

1011 

1010 

MDl 

VCl 

( 25  ) 
( 23  ) 

MD2  (2A) 
V02  (22) 

R02G12 

80303 

e 

7 

lOCl 

1000 

NDl 

(21  ) 

NC2  (20) 
RlCl  (16) 
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FINPALL  GAMF  PUtTCNS  AM:  LIGHTS 


LSFP' S PAGF  HC. 


EO  S3 


P.0304 

6 

.Clll 

+ R 1 

R1C2 

(15) 

FI  C3 

(14  ) 

P03  05 

5 

Olio 

-R1 

R 1D4 

(13) 

R1C5 

( 12) 

R0304 

4 

OlOl 

+ R2 

R2C1 

(11  ) 

R2C2 

( 10  ) 

R0307 

3 

0100 

-R2 

R2C3 

( 7 ) 

P2C4 

(6  ) 

R0308 

2 

00  11 

R2CE 

( 5 ) 

R3C1 

( 4 ) 

RC3CS 

1 

on  10 

+ P3 

R3C2 

(3  ) 

P3C3 

(2  ) 

R0310 

0 

000  1 

-R3 

R304 

( 1 ) 

P3C5 

(0  ) 

R031 1 

0000  NC 

RFL  AYWCPC 

R n 3 1 2 

THE  5 

BIT  nUTPLT 

RFLA't  C CDF  S 

APE  : 

R0313 

BLANK 

000  00 

P0314 

C 

10101 

R0315 

1 

00011 

R0316 

2 

11001 

RC21  7 

•a 

non 

R0318 

4 

01111 

R0319 


line 


RC320  6 
R0321  7 
R9322  e 
P0323  9 


nice 
1001 1 
11101 
1 1 1 1 1 


R03231  CUTPLT  FITS  USEF  FY  FTKBALL: 

R03232  Kt=Y  RELEASE  LIGHT  - BIT  3 OF  CHANNEL  11 
R03233  VFRB/NCUN  FLASH  - PIT  6 OF  CHANHEL  11 
R0323A  CFFPATCP  ERROR  LIGHT  - PIT  7 OF  CHANNEL  11 
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P032A  start  CF  EXECUTIVE  SECTICN  CF  PINEALL 


0325 

032501 

C325C2 

PEE 

2 

1 AST 

3CC 

AC  ,2077 
AO, 2000 
AO  ,2  J77 

PANK 

SETLCC 

BANK 

AO 

PINBALLl 

0325E 

RFF 

1 

CCUNT’!' 

J J /P  IN 

0330 

REF 

23 

1 AST 

389 

AO, 2i  77 

3 A75  3 

1 

CHAR  IN 

CAF 

CNF 

BLCCK  CISFLAY  SYST 

0331 

RFF 

2 

LAST 

223 

AO, 2100 

57' 01 1 

0 

xr  H 

nSPLCCK 

hake  CSP  SYST  BUSY,  BLT  SAVE  CLC 

T33? 

REF 

1 

AO, 2 1 11 

5 A 115 

0 

TS 

2 1/22REG 

C(CSPLCCK)  FCP  ERROR  LIGHT  RESET. 

03321 

REF 

2 

LAST 

223 

All,  21  >2 

11  'OA  1 

1 

CCS 

C ADRSTOR 

ALL  KEYS  EXCEPT  ER  TUR^  CA  KP  LITE  IF 

03322 

AO ,2103 

0 2 105 

1 

TC 

P2 

CACRSTOR  IS  FULL.  THIS  REMINDS  OPERATCR 

03323 

REF 

1 

AO , 2 lOA 

3 2 112 

1 

TC 

CHARIN2 

TC  RE-ESTAELISh  A FLASHING  DISPLAY 

0332A 

RFF 

1 

AO, 2 10 5 

A 2156 

0 

CS 

ELPCODE  1 

t^HICH  HE  HAF  C8SCLRED  KITH  DISPLAYS  CF 

0332  5 

PEF 

7^ 

LAST 

368 

AO  , 2 1 -'6 

6 C15A 

1 

AC 

NFAC 

HIS  CluN  (SEE  REMARKS  PRECEDING  ROLTINE 

03326 

AO, 2107 

0 CCC6 

1 

EXTFNO 

VBRELCSF ) . 

0 3 3 2 7 

REF 

2 

LAST 

399 

AO, 2110 

I 2112 

0 

BZF 

CHAR  TN2 

T3328 

R^F 

1 

AO, 2111 

0 A37A 

0 

TC 

RELOSFCN 

EJ333 

RFF 

75 

1 AST 

399 

AO,  21 12 

56  15A 

1 

CHAR  IN2 

XCH 

NFAC 

033A 

RFF 

1 

AO, 2113 

5A  117 

1 

TS 

CHAP 

0335 

REF 

102 

LAST 

385 

AO, 2 1 lA 

50  CCO 

1 

INDE  X 

A 

^336 

AO, 2115 

0 2116 

0 

TC 

+ 1 

INPUT  CCCE  FUNCTICA 

0337 

RFF 

1 

AO, 2 ! 16 

0 3A7) 

1 

TC 

CHAR  ALR  1“ 

0 

0333 

PEF 

1 

AO , 2 1 1 7 

0 2 17  5 

r 

TC 

NLM 

1 

C339 

RFF 

2 

LAST 

399 

AO, 2120 

1 2 1/5 

0 

TC 

NUM 

2 

)34ii 

RFF 

o 

LAST 

399 

AO, 2121 

1 2175 

C 

TC 

NUM 

3 

03AI 

PEF 

A 

LAST 

399 

AO, 2122 

0 

2175 

0 

TC 

NLM 

A 

T3A2 

RFF 

C 

LAST 

399 

AO  ,2123 

0 

2175 

n 

TC 

NUM 

5 

03A3 

REF 

6 

LAST 

3 <;  c 

A0,212A 

0 

2 175 

0 

TC 

NLM 

6 

C3AA 

RFF 

7 

LAST 

399 

AO  ,2125 

0 

2175 

0 

TC 

NUM 

7 

03A5 

R£F 

1 

AC, 2126 

0 

2161 

f 

TC 

89TFST 

10 

8 

03A6 

REF 

2 

LAST 

399 

AO, 2127 

r 

2161 

c 

TC 

89TEST 

1 1 

9 

Q3A7 

RFF 

2 

LAST 

399 

AO, 2130 

0 

3A7  ( 

1 

TC 

CHARALRM 

12 

0 3A8 

RFF 

3 

LAST 

399 

AO, 2 131 

0 

3A70 

1 

TC 

charalrm 

13 

03A9 

RFF 

A 

LAST 

39  c 

AO, 2132 

0 

3 A 70 

1 

TC 

CHARALRM 

lA 

0350 

REF 

LAST 

399 

AO  ,21  13 

0 

3470 

1 

TC 

CHARALRM 

15 

0351 

REF 

6 

L AST 

399 

AO, 2 136 

0 

3A70 

1 

TC 

CHARALRM 

16 

035? 

REF 

7 

LAST 

399 

AT, 2135 

0 

3A70 

1 

TC 

CHARALRM 

17 

0 3 53 

RFF 

8 

LAST 

3 c c 

AO, 2136 

0 

2173 

0 

TC 

NUMI  ■ -2 

20 

0 

0356 

REF 

1 

AO, 21 37 

0 

2 3 5A 

1 

TC 

VERB 

21 

VFRE 

0355 

REF 

1 

AO  , 2 1 AO 

0 

36A6 

0 

TC 

ERROR 

2 2 

ERRCP  LIGHT  reset 

T356 

RFF 

8 

LAST 

39c 

AO, 2 lA  1 

0 

3A7C 

1 

TC 

CHARALRM 

23 

0357 

RFF 

9 

LAST 

399 

A),21A2  . 

0 

3A70 

1 

TC 

CHARALRM 

2A 

0358 

RFF 

10 

LAST 

399 

A 1 , 2 1 A 3 

0 

3A70 

1 

TC 

CHARALRM 

25 

0359 

RFF 

1 1 

LAST 

39c 

AO, 2 lAA 

0 

3A70 

1 

TC 

CHARALRM 

26 

C360 

RFF 

12 

1 AST 

399 

AO  , 2 165 

0 

3A70 

1 

TC 

CHARALRM 

27 

0361 

REF 

1?> 

LAST 

399 

60,2166 

0 

3A7  J 

1 

TC 

CHARALRM 

30 

0362 

REF 

I 

A", 2 1A7 

0 

3'2A 

1 

TC 

VBREl DSF 

31 

KEY  RELEASE 

C363 

Rff 

1 

AM, 2150 

0 

2A  ) 7 

0 

TC 

PGSGN 

32 

+ 

G4P 
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P INBALL 

GAME 

BUTTONS 

; AND  LIG 

HTS 

USER'S 

PAGE  NO.  10 

EC  S4 

0364 

RFF 

1' 

41,2151 

r 2 2 74 

C 

TC 

NEGSGN 

33 

- 

0365 

rff 

1 

41,2152 

j 2 15  7 

0 

TC 

enter JMo 

24 

ENTER 

0366 

OFF 

14 

LAST 

399 

40,2153 

C 347C 

1 

TC 

CHARALRM 

35 

T367 

REF 

1 

40,2154 

T 2467 

0 

TC 

CLEAR 

36 

CLEAR 

0368 

REF 

1 

40,2155 

0 2 370 

1 

TC 

NCUN 

37 

MCUN 

03685 

40,2156 

000  2 2 

1 

ELPCOCE  1 

CCT 

2 2 

036F 

RFF 

17 

LAST 

300 

40  ,2157 

0 4635 

0 

ENTER JMF 

TC 

PCSTJLMP 

0 370 

RFP 

1 

40,216C 

62002 

1 

CACR 

enter 

)371 

R P F 

3 

LAST 

222 

40,2161 

10  7 76 

Q 

E 9 T E S T 

CC  S 

OSPCCLNT 

0 37  2 

4C,2162 

0 2 166 

1 

TC 

+ 4 

-f 

0373 

4v',  2 16  2 

C 2166 

1 

TC 

+ 3 

+0 

1374 

ref 

08 

LAST 

389 

40,2164 

0 5155 

0 

TC 

ENTOFJCB 

- 

eiOCK  CATA 

IN  IF  DSFCCUNT 

IS  - CF  -0 

0375 

REF 

39 

LAST 

400 

40,2165 

0 5 15  5 

0 

TC 

ENCOFJCB 

-0 

1376 

RFF 

4 

LAST 

340 

4'  , 2 166 

2 6250 

c 

CAF 

THREE 

0377 

RFF 

1 

4.)  ,2167 

7 0777 

1 

MASK 

OECBRNCH 

0378 

REF 

n? 

LAST 

399 

4 0 , 2 1 7 C 

10  000 

c 

cr  s 

A 

0379 

REF 

9 

LAST 

399 

4 1,2171 

0 2175 

c 

TC 

NUN 

I F 

CECBRNCH 

IS  +,  8 CR  9 CK 

03  80 

REF 

1 5 

LA  ST 

4CC 

40,2172 

0 3470 

1 

TC 

CHAP  ALPi' 

IF 

CECBPNCh 

IS  +0,  REJECT  e 

CP  9 

R0381  NUM  ''SSFMPLES  QCT^L  3 BITS  AT  A TIME.  FOR  CECIMAL  IT  CCNVERTS  INCGMNG 
R0382  InCFO  as  A FRACTITN,  KFEP1^G  RESULTS  TO  CP. 

R0383  OCTAL  RESULTS  ARE  LEFT  IN  XRFG,  YREG,  CP  ZREG.  FI  PART  CF  CEC  IN  XPFG, 
Rn38A  YRFG,  ZREG.  TF'F  LCV'I  PARTS  IN  XREGLP>  VPEGLP,  CR  ZRFGLP) 

R0385  OECBRNCH  IS  LFFT  AT  +0  FCR  CCT,  +1  FCP  + CEC,  <2  FCF  - CEC. 

R0386  IF  CSFCOLNT  WAS  LFFT  NC  YCRF  DATA  IS  ACCFPTEC. 


0387 

PFF 

54 

LAST 

385 

4'7 ,2173 

3 4755 

1 

CAF 

Z ERQ 

0388 

REF 

2 

LAST 

399 

40,2174 

54  117 

1 

TS 

CHAR 

7389 

PFF 

4 

LAST 

400 

41,2175 

10  7 76 

C NLM 
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IF  LCW2  FITS  CF  EECBRNCH  NOT=  0, 

S IGN 

0565 

REF 

44 

LAST 

40  3 

4 ) , 2452 

0 

5155 

0 

TC 

ENDOFjnB 

FCR  THIS  WCRD  ALREADY  IN.  REJECT 

• 

0566 

REF 

1 

40,2453 

4 

4317 

1 

CS 

RlCl 

0567 

REF 

1 

40,2454 

0 

2462 

0 

TC 

SGNTSTl 

0568 

REF 

1 

40,2455 

4 

4320 

0 

CS 

R2C  1 

0569 

REF 

2 

LAST 

40^ 

40,2456 

o 

2462 

0 

TC 

SGNTSTl 

0570 

PFF 

1 

49 , 2457 

4 

432  1 

1 

CS 

R 3D  1 

0571 

REF 

3 

LAST 

404 

4C,?46C 

9 

2462 

9 

TC 

SGNTSTl 

0572 

RFF 

45 

LAST 

40  4 

40,2461 

0 

c I 5 c 

0 

TC 

ENDPF JCB 

NC  HATCH  FCUNC.  SIGN  ILLEGAL 

057:^ 

REF 

12 

LAST 

493 

49,2462 

6 

0776  ■ 

1 

SGNTSTl 

AD 

PSPCOLNT 

0574 

40,2463 

f' 

C006 

1 

EXTEND 

95  75 

4.9,  2464 

1 

2 4 6 6 

0 

BZF 

+ 2 

NATCH  FCLNC 

C576 

REF 

47 

LAST 

404 

40,2465 

0 

0902 

0 

TC 

C 

9 577 

PFF 

44 

LAST 

404 

4 ),  2466 

0 

CCCl 

c 

TC 

L 

SIGN  LEGAL 

R0578 

CLEAR  81 ANKS 

WHICH  PI , R2,  P3 

IS 

CURR 

ENT 

CR  LAST 

TO  BE 

DI  SPLAYFDI PFRTINE 

R0579 

NT 

XRFG, 

i YREG, 

ZREG  IS 

CLEARED) 

. SUCCESSIVE  CLEARS 

TAKE 

CARF  OF  EACH  RX 

R0580 

. L/ 

RC  UNTIL  R1  IS  CCNE.  THEN 

NO 

FLRTHER 

ACTION 

R05B1 

THE 

SINGLE  CrHPCNFNT 

LOAD  VERES 

ALLCW 

! CNLY  THE  SINGLE 

RC  THAT  IS 

R9582 

APPROPRIATE  TO  BF  CLEAREDo 

R0583 

CLFASS 

+ 0 

PASSO, 

CAN  BE  BACKEC  UP 

R9584 

+ NZ 

H I P A S S 

, CAN  BE 

BACKED  UF 

PT585  -MZ  PASSO,  CANNOT  BE  BACKEC  UP 


r,ftP:  fSSFKBIF  RFVTSIOM  116  OP  ^ GC  PRCGRAV  LUN'INAtiV  P'y  ^ ^ S ft  20?1132-^7l 


Lq;09  aUG.  11,1969  LPNCNAlD.fioq  PAGE  ^C5 


L PI^PaLI-  PUTTCNS  A^^  LIGETS  LSER'S  PAGE  AC.  15  EO 


0566 

0587 

0568 

PEE 

PPF 

12 

29 

LAST 

LAST 

4F4 
40  4 

40,2467 

40. 2470 

40.2471 

1C  776 
6 4753 
<3  2473 

C 

1 

0 

clear 

CCS 

AD 

TC 

CSPCCLNT 
ONE 
+ 2 

058° 

REF 

30 

lAST 

4F5 

4 J , 2472 

6 4 7 53 

1 

AD 

CNE 

0590 

REF 

1.08 

LAST 

4 '.14 

40,2473 

50  300 

1 

INDE  X 

A 

DO  NOT  CFANGF  QSPCCLNT  PECAUSE  MAY  LATER 

0591 

RFF 

2 

LAST 

402 

40,2474 

3 2330 

0 

CAP 

INRELTAE 

fail  LEGALTST. 

0592 

REF 

12 

LAST 

404 

40, 2475 

54  137 

c 

IS 

I NPFL 

MUST  SET  INPEL,  EVEN  FCP  LIPASS. 

0593 

REF 

6 

L AST 

40  3 

4"'  , 2476 

1 1 ' 314 

1 

CCS 

CLPASS 

059A 

RFF 

1 

40,2477 

0 2 50  5 

c 

TC 

C 1 PAShl 

4 

0595 

40, 2500 

0 2 50  2 

1 

TC 

+ ? 

+0  IF  CLPASS  IS  +'J  CR  -,  IT  IS  PASSO 

C596 

4 3,2  5.11 

0 2502 

1 

TC 

+ 1 

- 

0597 

REF 

13 

LAST 

40S 

40,2502 

3 C137 

1 

CA 

I NREL 

0598 

REF 

1 

4 ),  2503 

3 2 52  7 

0 

TC 

LEGAL  TST 

0599 

REF 

1 

40,2504 

0 2522 

0 

TC 

C L E A R 1 

0600 

REF 

14 

LAST 

40*= 

40, 2505 

10  137 

0 

CLRASHI 

CCS 

I NPFL 

0601 

REF 

15 

LAST 

405 

40,25  16 

54  137 

0 

TS 

TNPFL 

06C2 

REF 

2 

LAST 

405 

40,2507 

C 2 527 

c 

TC 

LEGALTST 

J6')3 

REF 

1 

40,2510 

3 2 57  7 

0 

CAF 

DCLBLK  +2 

+3  TC  - NUMBER.  BACKS  CATA  REQUESTS. 

06C4 

REF 

3 

1 AST 

403 

43,2511 

2 7 ' 0 1 2 

1 

ACS 

RFORET 

0605 

REF 

16 

LAST 

405 

40,2512 

2 0127 

1 

CA 

T NREL 

06  06 

REF 

1 

40,2513 

54  125 

0 

TS 

MI  XTE'^P 

TFMP  STCPAGE  FCR  INRFL 

' 0607 

40,2514 

0 0006 

1 

EXTEND 

060  8 

REF 

7 

LAST 

403 

40,2515 

27  '000 

1 

DIP 

VEPBFEG 

CECRFMENT  VERP  AND  RE-CISFLAV 

C6C9 

RRF 

78 

LAST  . 

389 

40  ,2  516 

'3  4616 

1 

TC 

BANKC ALL 

061C 

REF 

1 

40,25  17 

62  242 

0 

CACR 

UFCATVP 

0611 

REF 

2 

1 AST 

40  6 

4 1,  2 520 

2 0125 

1 

CA 

MI  XTFNP 

0612 

RTF 

17 

LAST 

405 

40,2521 

54  137 

0 

TS 

INRFL 

RESTORE  INREL 

3613 

REF 

1 

40,2522 

Q 2525 

1 

CLFARl 

TC 

CLP5 

0614 

RFF 

7 

1 AST 

40  5 

40,2523 

25 '014 

0 

I NT.  R 

CLPASS 

ONLY  IF  CLPASS  IS  + OR  +0, 

06  15 

REF 

46 

LAST 

404 

40,2524 

0 5155 

0 

TC 

ENCOFJOP 

SET  FOR  FIGFER  PASS. 

3616 

REF 

48 

LAST 

404 

40,2525 

22  C02 

c 

FLP5 

LXCH 

C 

LSES  5ELANK  EUT  AVCICS  ITS  TC  GETINREL 

0617 

RFF 

} 

40,2526 

■3  2540 

1 ’ 

TC 

5BLANK  +2 

0618 

REF 

2 

LAST 

231 

40,2527 

6 7 7 5 1 

c 

LFGALTST 

AC 

NEG2 

0619 

REF 

109 

LAST 

40  5 

43, 2530 

10  000 

0 

CC  s 

A 

Q62C 

RFF 

49 

LAST 

40  5 

4 3 ,253  1 

0 03  12 

0 

TC 

Q 

LEGAL  INRFL  G/  2 

062  1 

RFF 

3 

LAST 

402 

40,2522 

0 5 675 

c 

TC 

CCSHCLE 

0622 

REF 

47 

LAST 

40  5 

40,2533 

0 5155 

n 

TC 

FNDOF JOB 

ILLEGAL  INREL=  0,1 

0623 

RF.F 

SC 

LAST 

4C5 

40  ,2534 

0 C0C2 

0 

TC 

Q 

LEGAL  INREL  = 2 

R3624 

5-PLANK  PLANKS 

5 GEAR 

DISPLAY 

NORO 

IN 

R 1 , R2,  CR 

R3.  IT 

ALSr  ZFROES  XREG, 

R0625 

YREG 

,■  CR 

ZRFG. 

PLACE 

ANY  ■*  DSFCCUNT  NUMBER  FDR  PERTINENT 

RC  INTO  DSPCCLNT 

R0626 

CSPCCLMT 

IS  LFFT  SET 

TO  LEFT 

MCST 

DSP 

NLMP  FCR 

PC  JLST 

BLANKED. 

0627 

REF 

14 

LAST 

40  5 

40, 2 53  5 

54 

7 76 

C 

TS 

DSPCCLNT  NEECEC  FCR  ELANKSLB 

C628 

RFF 

5 1 

LAST 

AC*' 

43,2536 

22 

002 

0 5PLANK 

LXCH 

C 

3629 

RFF 

4 

1 AST 

434 

43,  2'i37 

0 2324 

0 

TC 

GETINREL 

3630 

RFF 

62 

LAST 

403 

43,2540 

3 A 7 5 5 

1 

CAF 

ZERO 

0631 

RFF 

18 

LAST 

405 

40,2541 

50 

137 

1 

INDEX 

INREL 

0632 

REE 

8 

L AST 

40  F 

43,2542 

5 C 1 

OCC 

1 

TS 

VFRBREG  ZFRC  X,  Y,  Z PEG. 
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0633 

REF 

19 

I AST 

405 

40,2543 

50  13  7 

1 

INDEX 

INREL 

0634 

RFF 

2 

t.  AST 

40  2 

43,2544 

55  *'^03 

1 

IS 

XRFGLF  • 

-2 

0635 

RF'^ 

4 

LAST 

404 

40,2545 

54  124 

1 

TS 

CnoF 

)636 

RFF 

20 

LAST 

406 

40,2546 

50  13  7 

1 

INDEX 

I NPFL 

ZERC  PERTINENT  DEC  COMP  BIT. 

063  7 

RFF 

18 

LAST 

40  3 

40,2547 

4 4745 

1 

CS 

BI  T7 

PROTECT  others 

06  3 8 

RFF 

8 

LAST 

404 

40,2550 

7 0777 

1 

NAS  K 

DECBPNCH 

A639 

REF 

1 

40, 2 55  1 

7 2600 

1 

MASK 

BPNCHCGN 

ZERC  LCW  2 eiTS. 

0640 

RFF 

9 

LAST 

4 16 

40,2552 

54  777 

1 

TS 

DECBRNCH 

0641 

RE>= 

21 

1 AST 

4C6 

40,2553 

50  137 

1 

INDEX 

INREL 

0642 

REF 

1 

43,2554 

3 2570 

1 

CAF 

SI NBLANK 

-2  blank  ISCLATEC  char  SEPARATELY 

0643 

RFF 

2 

LAST 

400 

40,2555 

54  143 

0 

TS 

CCUNT 

0644 

REF 

2 

LAST 

4GC 

40,2556 

0 3356 

1 

1C 

OSPIN 

0645 

REF 

22 

LAST 

40  6 

40,2557 

50  137 

1 

5 BLANK  1 

INDE  X 

I NRFL 

0646 

REF 

2 

LAST 

4C5 

40 , 256C 

3 2573 

1 

CAF 

CCIJBLK 

“ 2 

0647 

RFF 

15 

LAST 

405 

40,256  1 

54  776 

c 

IS 

nSFCCLNT 

0648 

F 

2 

LAST 

40  3 

4i‘i  ,2562 

0 2 601 

1 

TC 

2BLANK 

0649 

RFF 

18 

LAST 

403 

40, 2563 

4 4752 

1 

CS 

TND 

06  5 U 

REF 

16 

LAST 

406 

40, 2^64 

26  7 76 

0 

ADS 

D SPCCLNT 

0651 

REF 

3 

LAST 

406 

40,2565 

3 2 60  1 

1 

TC 

2BL  ANK 

0652 

REF 

23 

LAST 

40  6 

40, 2566 

50  137 

1 

INDEX 

I NRFL 

•0653 

REF 

2 

LAST 

40  4 

40, 2567 

3 431  5 

1 

CAF 

R IDl 

-2 

06  5 4 

RFF 

17 

LAST 

406 

40,2570 

54  776 

0 

TS 

DSFCCUNT 

SET  DSPCCUNT  TC  LEFT  MCST  DSP  NL^BER 

0655 

REF 

45 

LAST 

404 

40,2571 

C 000  1 

c 

TC 

L 

CF  REC.  JUST  BLANKED 

0656 

40,2572 

00016 

0 

s inblank 

CCT 

16 

DEC  1^ 

0657 

40,2573 

OC0C5 

1 

rci 

5 

0658 

40,2574 

0000  4 

0 

GC  1 

4 

0659 

40 , 2575 

00015 

0 

COUBLK 

OCT 

1 5 

DEC  1 3 

0660 

40, 2576 

00011 

1 

CCT 

1 1 

EEC  9 

0661 

43,2577 

00003 

1 

CCT 

3 

0662 

4C  ,2600 

77774 

0 

EPNCFCCN 

CCT 

77774 

R0663 

2BLANK  BLANKS 

Tkin  CHAR.  PLACE 

nsp  number 

CF  LEFT 

CHAR 

CF  THE  PAIR  INTC 

R0664 

C SPCC  LN  1 

. this 

NUPEEF 

’ IS  I.FFT 

IF  CSFCCUNT 

0665 

RFF 

18 

LAST 

40  6 

40,2631 

3 0776 

1 

2PLANK 

CA 

DSFCCLNT 

0666 

REF 

■ 1 

4-3,  2 60  2 

54  C21 

n 

TS 

SR 

0667 

REF 

1 

40,2603 

4 2614 

I 

CS 

BLANKCCN 

066  8 

40,2604 

C 0004 

0 

INhl  N1 

•0669 

REF- 

2. 

LAST 

406 

40 ,26  )5 

50  02  1 

1 

INDEX 

SR 

0670 

REF 

23 

LAST 

222 

4C,26C6 

57*322 

0 

XCH 

nSPTAE 

0671 

40, 2607 

C 000  6 

1 

EXTEND 

0672 

4-), 2610 

6 2612 

0 

8ZMF 

+ 2 

IF  OLD  CCNTENIS  -,  NOLI  CK 

0673 

RFF 

6 

LAST 

223 

43,2611 

25*015 

1 

INCR 

NCUT 

IF  CLC  CONTENTS  +,  +1  TO  NOUT 

0674 

4'3,  2612 

0 0003 

1 

RFLINT 

IF  -,NCLT  CK 

0675 

REF 

52 

LAST 

4C5 

4f',2613 

0 0002 

0 

TC 

C 

J676  ^0,261A  OArCO  C BLANKCCN  CC7  4000 
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P9677  FNTEP  PASS  0 IS  TEE  EXECLTE  FLNCTTCN.  HIGHER  CREEP  ENTERS  ARE  TC  LQAC 
R-1678  CATA.  the  sign  OH  REQRFT  DETERMINES  THE  PASS,  + FCR  PASS  0,-  FCR  HIGHEP 
P.Q679  PASSES. 


P 1660  MACHINE  CADR  TO  RE  SPECIFIED  (PCTES)  NCLNS  DESIRE  AN  ECACR  TC  PE  LCACEC 
R0681  NHFN  tSFD  WITH  LCAf  VERPS,  '■lONITOR  VER3S,  OR  DISPLAV  VERBS  (EXCEP"^ 

R0662  VERB  = FIXED  MEMCRY  CTSPLAY,  VHIGH  PECUIRES  AN  ECArR). 


'168  3 
G68301 

REF 

1 

41 , 2000 
41 ,2T^0 

6ANK 

SETLCC 

41 

PINBAt  L 2 

0683(2 
068  3 5 

RFF 

1 

41  ,2000 

BANK 

CCUNTX= 

$$/PIN 

0664 

REF 

1 

41 , 2000 

0 3552  G 

NVSUE6 

TC 

NVSUR  1 

STANDARD  LEAD  INS.  DCM  MCVE. 

0685 

Av0686 

REF 

1 

41 , 200  1 

0 2C01  C 

LCADl VI 

TC 

LCADLV 

ENG  STANCARC  LEAD  INS. 

0687 

REF 

63 

EAST 

4C5 

41 , 20,12 

3 

4755 

1 

ENTER 

CAF 

ZERC 

0688 

REF 

3 

LAST 

405 

41, 2003 

55'  -'14 

1 

TS 

C L P A S S 

0689 

REF 

2 

LAST 

403 

41 , 29 J4 

3 

4217 

1 

CAF 

ENCINST 

0690 

RFF 

2 

LAST 

403 

41 ,2015 

54 

136 

1 

TS 

ENTRET 

0691 

REF 

4 

LAST 

4D  5 

41,2006 

11 

'012 

1 

CC  S 

REGRET 

069? 

REF 

1 

41 ,2  ) »7 

0 

2 )35 

0 

TC 

EN^PASO 

IE  +,  PASS  C 

0693 

Rfr 

2 

LAST 

4P7 

41  ,20K 

0 

2C35 

C 

TC 

FNTFASO 

IF  4,  PASS  0 

0694 

4 1 , 20  1 1 

0 

2012 

c 

TC 

+ 1 

IF  -,  NCI  PASS  D 

0695 

PFF 

1 

41 ,2012 

3 

2033 

0 

entrash  1 

CAF 

MMADPEF 

0696 

REF 

C 

LAST 

407 

41, 2013 

6 

1C12 

( 

AD 

REGRET 

IF  L/  2 CHAR  IN  FCR  MM  CCCE,  ALARM 

060  7 

41,2114 

-1 

9006 

1 

EXTEND 

AND  RECYCLEICECIDE  AT  NMCHANG+1). 

0698 

RFF 

1 

41 ,2C1  5 

1 

2027 

1 

EZF 

ACCEPTWC 

0699 

REF 

9 

LAST 

404 

41,2016 

9 

6250’ 

c 

CAF 

THREE 

IF  CEC,  ALARM  IF  L/  5 CHAP  IN  FCR  CATA, 

070C 

REF 

m 

LAST 

406 

41,2117 

7 

0777 

1 

MASK 

DECBRNCH 

BUT  LEAVE  REGRET  - AND  FLASH  CN,  SC 

0701 

REF 

1 10 

LAST 

405 

41,202C 

10 

COO 

0 

CCS 

A 

CPERATCR  CAN  SLPPLY  MISSING  NUMERICAL 

0702 

41,2021 

0 

2023 

1 

TC 

+ 2 

CHARACTERS  ANC  CCNTINUE. 

0703 

REF 

9 

LAST 

407 

41,2022 

0 

2027 

0 

TC 

ACCEPTWC 

OCTAL.  ANY  NLY6ER  OF  CHAR  CK. 

0 704 

REF 

19 

1 AST 

406 

41,2023 

10 

776 

0 

CCS 

DSPCCLNT 

0 705 

REF 

1 

41,2124 

0 

2353 

0 

TC 

GOOSPALM 

LESS  THAN  5 CHAR  CECICSFCCLNT  IS  +) 

07C6 

PEF 

2 

LAST 

4 0 1 

41 , 2925 

0 

2353 

0 

TC 

GCrSPALM 

LESS  THAN  5 CHAR  CECICSPCCLNT  IS  +) 

0707 

41, 2026 

0 

2027 

0 

TC 

+ 1 

5 CHAP  IN  (CSFCCUNT  IS  -) 

C7C8 

REF 

6 

LAST 

407 

41 ,2027 

4 

1012 

1 

ACCEPTKC 

CS 

REGRET 

5 CHAR  IN  (DSPCOLNT  IS  -) 

0709 

REF 

7 

LAST 

40  7 

41,2030 

55 

'012 

1 

TS 

REGRET 

SET  REGRET  +. 

0710 

REF 

2 

1 AST 

275 

41,2031 

0 

4433 

1 

TC 

E LASHCFF 

0711 

REF 

8 

LAST 

407 

41 ,2032 

0 

1 0 1 2 

0 

TC 

REGRET 

9712 

REF 

3 

LAST 

407 

0 L 3 6 

ENTEXIT 

ENTRFT 

0713 


PFF 


1 


41  .RDTS  D3437  1 MMACPEF  ACRES  MVCHANG  +1 


ASSUMES  TC  PFCMM  AT  wwcHANG 
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L 

PI N8ALL 

GAME 

BUTTCA 

S ALD  L IGFTS 
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0714 

41, 2034 

0CC34 

r 

LCV.VERB 

OFC 

2 e 

LCkEP  VERB  TFAT  AVOIDS  NCLN  TEST. 

0715 

R<=F 

64 

LAST 

407 

41 ,3)35 

3 4755 

1 

FNTPASO 

CAP 

ZERO 

NOUN  VFRB  SLB  ENTERS  FERE 

0716 

RFF 

1 1 

LAST 

407 

41,2036 

54  777 

1 

TS 

DECPRNCH 

0717 

RFF 

3 

LA9T 

40  3 

41 , 2037 

4 4360 

1 

CS 

VC  1 

BLCCK  FLRTHFR  NLN  CHAR,  SC  THAT  STRAY 

0718 

RFF 

20 

LAST 

4C7 

41 ,234C 

54  776 

n 

TS 

nSPCCUNT 

CHAR  CO  NOT  GET  INTC  VERB  OR  NCLN  LTS. 

0719 

RPF 

9 

LAST 

405 

41,2041 

4 IQ'.IC 

1 

TESTVe 

CS 

VERBREG 

IF  VFRP  is  GZE  LCWVB,  skip  NCUN  TEST. 

072C 

RFF 

1 

41  ,2  142 

5 5 '040 

0 

TS 

VERBSAVE 

SAVE  VERP  FCP  FCSSIPLE  RECYCLE. 

0721 

REF 

1 

41,2043 

6 2C34 

1 

AC 

LCWVERE 

LCWVERE  - Ve 

072? 

41, 2044 

0 0006 

1 

EXTEND 

0723 

REF 

1 

41  ,2  145 

6 2133 

1 

BZMF 

VER8FAN 

VFRP  G/F  LCWVERB 

0724 

41 ,2046 

0 CC06 

1 

TESTNA 

EXTEND 

VFRP  LZ  LCWVERB 

0725 

RFF 

1 

41,2047 

3 2114 

1 

CCA 

LCPNNLCC 

SWITCH  BANKS  TC  NCLN  TABLE  READING 

0726 

REF 

3 

LAST 

306 

41 ,2050 

52  006 

0 

CXCF 

Z 

R.OLTINE. 

0727 

REF 

3 

LAST 

305 

41 , 235  1 

5C  14C 

1 

INDE  X 

MX6F 

0728 

41  ,2052 

0 2052 

1 

Tf 

+ C 

0729 

41  , 2053 

0 2055 

r 

TC 

+ Z 

NCRMAL 

073 

REF 

1 

4 1,  2054 

0 222  1 

1 

TC 

M XN'CLN 

MXEC 

0731 

REF 
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P9931  NOUN'  tables 

R0932  NGLN  CfCE  L/AO,  NCBNAL  NOUN  CASE.  NOUN  COOE  G/E  t MXED  NCLN  CASE. 

RQ933  FOR  MCPVAL  CASEt  NNADT/ie  CONTAINS  CNE ECACR FOR  EACH  NOUN. 

R0934  +0  INCICATES  MOLN  NOT  USFC.  - ENTRV  INDICATES  MACHINE  CADPIE  CP  F)  TC 

P0935  BE  SPECIFIED.  -1  INCICATES  CHANNEL  TC  EE  SPECIEIEC.  -C  INCICATES  AUGMENT 

RC936  OF  LAST  MACHIN'^  CADR  SUPPLIED. 


R0937  FTP  mixed  C«SF,  NNACTAB  CCNTAINS  CNE  INDIRECT  A CORE S S ( IDA DDRE L ) IN  ICH 
P093R  10  BITS,  AND  THE  CCMFCNFNT  CODE  NUMBER  IN  THE  HIGH  5 BITS. 


R093O  NNTYPTAR  IS  A PACKED  TABLE  CF  THE  FORM  M M M M M N N N N N F F F F F . 


RT9A-n  fcR  THF  NCPMAI  CASE,  M-S  ARE  THE  COMPONENT  CCDE  NUMBER. 
R09AI  N-S  are  the  SF  PCUTINE  CCDE  MJMBEF. 

PQOA2 P-S  ARF  THE  SF  CONSTANT  CCCE  NUMBER. 


R09A3  mtxEC  CASF,M-S  ARF  THE  SF  CCNSTANT3  CODE  NUMBER  3 COMPONENT  CASE 

R09AA  N-S  are  THF  SP  CCNSTANT2  CCCE  NUMBER 

P094S  F-S  ARE  the  SF  CCNSTANTl  CCCE  NUMBER 

R09AE  N-S  ARF  THE  SF  CCNSTANT2  CCCE  NUMBER  2 CCMPCNENT  CASE 

R09A7 P-S  ARE  THF  SF  CONSTANTI  CCDE  NUMBER 

R09A8  P-S  ARE  THE  SF  CCNSTANTl  CODE  NUMBER  1 COMPONENT  CASE 

R09A9  THERE  IS  ALSO  AN  INDIRECT  ADDRESS  T A B L E ( I C AC C T A E ) FCR  MIXEC  CASE  CNLY. 

R095C  EACH  entry  CONTAINS  CNE  ECADR.  lOACDREL  IS  THE  RELATIVE  ADDRESS  CF 

RCSFl  the  FIRST  OF  THESE  ENTRIES. 

R0952  there  is  ONp  ENTRY  IN  THIS  TABLE  FCR  EACH  CCMFCNENT  CF  A MIXEC  NCUN 

R0953  THEY  ARE  LISTFF  IN  CRCEP  CF  ASCENDING  K. 

R09SA  THEPP  IS  ALSC  A SCALE  FACTOR  RCUTINE  NUbEEF  TABLE!  PUTMXTAB  ) FCR  MlxEC 
R09B^  CASE  CNLY.  THERE  IS  CNE  ENTRY  RFP  MIXED  NCUN.  THE  FCPM  IS, 

RCCS6  CCCCGRRPRRSSSSS 

R0957  Q-S  ARF  THE  SF  ROUTINE  3 CCDE  M'MBER 3 CCMFCNENT  CASE 

R095B  P-S  APE  THE  SF  ROUTINE  2 CODE  NUMBER 

RCSB9  S-S  APE  THE  SF  POLTINF  1 CCCE  NUMEFR 

R0960  R-S  are  the  SF  ROUTINE  2 CODE  NUMBER 2 CCMFCNENT  CASE 

R0961  S-S  APE  THE  SF  RCUTINE  1 CODE  NUMBER 


R0962  IN  OCTAL  DISPLAY  AND  LOAD  (CCT  CR  DEC)  VFPPS,  EXCLUDE  USE  CF  VFRBS  V-HOSE 
P09B3  COMPONENT  NUMBER  IS  GREATER  THAN  THE  NUMBER  CF  COMPONENTS  IN  NCUN. 

R096A  (ALL  'MACHINE  ACCRESS  TC  BE  SPECIEIEC  NCUNS  ARE  2 COMPONENT.) 


R0967  IN  multi-component  LOAD  VERBS,  NO  MIXING  CF  OCTAL  ANC  CECIMAL  DATA 

R0968  COMPONENT  WORDS  IS  ALLCUIO.  ALARM  IF  VIOLATION. 

R0969  IN  DECIMAL  LCADS  CF  CATA,  5 NUMERICAL  CHARACTFRS  MUST  BE  KEYEC  IN 
R0970  BEFORE  EACH  FMTER.  IF  NOT,  ALARM. 
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R1899  MONITOR  COSEMT  TEST  fqr  MAT6S  SINCE  N\/SLB  CAN  HANDLE  INTERNAL  MATES  NCU 


1900 

PF  F 

1 

A1 , 3236 

SETLCC 

ENORLTI N 

19005 

REF 

3 

LAST 

A27  TC 

A33  : 

268  67CX 

COUNT* 

J $/P  IN 

1901 

REF 

1 

A1 , 3236 

A 32A5 

0 

MCNITCR 

CS 

B IT  15/1  A 

19C2 

RTF 

6 

LAST 

A3  2 

A1  ,3237 

7,  1016 

n 

MASK 

NCUNCADR 

19':' 3 

P,  FF 

186 

LAST 

A3  6 

A1  ,32AC 

5 A 1 5 *5 

1 

MCMT  1 

TS 

MFAC  +1 

TFMF  STCRAGE 

1903  1 

RFF 

7 

LAST 

A26 

Al, 32A  1 

A C136 

1 

CS 

ENTFXI  T 

19G32 

RFF 

A 

LAST 

AO  8 

A1  ,32A2 

6 A217 

1 

AD 

FNDINST 

19033 

PEF 

137 

LAST 

A3E 

A 1 , 32A3 

1C  CCC 

0 

COS 

A 

1903  A 

RHF 

1 

Al, ^2AA 

n 3253 

0 

TC 

MCM  T2 

19035 

Al ,32A5 

6000  1 

1 

BTT15/IA 

CCT 

60000 

19036 

PF.f= 

2 

LAST 

A3  9 

A1,32A6 

0 2253 

0 

TC 

MCM  T2 

1903  T 

RFF 

38 

LAST 

A16 

Al ,32A7 

3 A 736 

1 

CAF 

B I'^'IA 

EXTERNALLY  INITIATED  MCNITCR, 

1903E 

RFF 

187 

LA  ST 

A39 

Al ,3250 

26  155 

1 

ACS 

MPAC  +1 

SET  B IT  lA  FCP  MONSAVEl  . 

1903  PI 

RTF 

85 

LAST 

A37 

Al, 3251 

3 A755 

1 

CAF 

ZERO 

1903F2 

RFF 

1 

Al  ,’3252 

55'021 

1 

TS 

MCNSAVE2 

ZERO  NVMONCPT  OPTIONS 

190A 

REF 

3 

LAST 

233 

Al , 3253 

3 6077 

1 

MCM  T2 

CAF 

L CW7 

1905 

REF 

17 

LAST 

A 15 

A1,325A 

7 1000 

1 

MASK 

VERBPEG 

1906 

PEF 

A 

LAST 

A3  ! 

A 1 ,3255 

0 A331 

1 

TC 

L F FT  5 

190  7 

PEF 

5 

LAST 

AO  1 

61,3256 

5A  C22 

c 

TS 

0 YL 

190  P 

RFF 

6 

LAST 

A39 

A 1 , 3 2 5 7 

A 0022 

0 

CS 

C YL 

1909 

RFF 

7 

LAST 

A39 

Al ,3260 

56  022 

1 

XCH 

CYL 

191. 

RFF 

1 1 

LAST 

A27 

Al,3261 

6 1001 

1 

AO 

NCLNREG 

1911 

pep 

1P8 

(AST 

A39 

Al ,3262 

5A  15A 

0 

TS 

MP/'C 

TEMP  STORAGE 

1912 

OFF 

86 

LAST 

A39 

Al , 3263 

3 A755 

1 

CAF 

ZERC 

GAP:  ASSEMBLE  PFVISirNI  116  CF  /■  GC  cRCC^AV  LUMNOPY  EY  ^/iSA  20211  12-071 


19:09  AUG.  LEMONA  ir.ogq  PAGE 


L 

PINBALL 

GAME 

BUTTONS  AMO  LIGHTS 

LSEP'S  PAGE  NO.  50  EO  S4 

1913 

PEP 

3 

I.AFT 

399 

A1  , 326  4 

5 5 ' 1 1 1 

1 

TS 

DSPLOCK 

+0  INTC  CSPLOCK  SC  MCNITCR  CAN  RLN. 

191A 

PET 

A 

LAST 

AOe 

41,3265 

11  'C41 

1 

crs 

C ACPSTCR 

TURN  CFF  KR  LITE  IF  CACRSTOR  ANC  CSPLIST 

1915 

41,3266 

0 327U 

1 

TC 

+ 2 

ARE  BETH  Evftv.  (LITE  CEPES  CN  IF  NEW 

1916 

RFF 

1 

41,3267 

0 4502 

1 

TC 

RELCSFI 

NONITCR  IS  KEYED  IN  CVEP  CLD  PCNITCR.) 

1917 

41,3270 

0 CC04 

0 

INHINT 

191P 

PEE 

2 

LAST 

223 

41,3271 

11*317 

1 

CCS 

MCNSA VE 

1919 

4 1 , 3272 

C 3277 

c 

TC 

+ 5 

IF  PONSAVE  WAS  +,  NO  REQUEST 

19?n 

RFF 

A6 

LAST 

A38 

41,3273 

3 4753 

1 

CAF 

ONE 

IF  PCNSAVE  WAS  0,  REQUEST  MCNPEC 

1 921 

RFF 

15 

1 AST 

368 

41 ,3274 

C 5203 

0 

TC 

WAITLIST 

1922 

RFF 

39 

LA  ST 

A32 

C776 

E6ANK= 

osprcuNT 

1923 

RFF 

1 

41 ,3275 

033')3 

1 

2CADR 

MCN'REC 

1923 

REF 

1 

41,3276 

62101 

0 

192A 

PEF 

159 

LAST 

41,3277 

52  155 

1 

CXCH 

N FAC 

PLACE  PCMTCP  VERB  ANC  NCLN  INTO  MONSAVE 

1975 

RFF 

3 

LAST 

A 40 

41 ,33)0 

53*02J 

0 

CXCH 

MONSAVE 

ZERO  THE  KILL  wCNITCP  BIT 

1926 

41  ,330  1 

0 000  3 

1 

REL  INT 

SET  UP  fxTFRKAL  monitor  BIT 

192  7 

pRF 

A 

L AST 

AH7 

41,3302 

0 C136 

0 

TC 

ENTRET 

192B 

1929 

193'T 

R'=F 

PEF 

1 

2 

LAST 

223 

41 . 3303 

41.3304 
41,33  )5 

0 44  33 
11*920 
0 33  11 

1 

0 

1 

M CNR  EC 

TC 

CCS 

TC 

LCDSAMPT 

MCNSAVEl 

H4 

CALLEC  E>Y  WAITLIST 

TIME  IS  SNATCHED  IN  RUPT  FOR  NCUN  65 
IF  KILLER  BIT  = 0,  FNTEP  FECUESTS 

1931 

41 ,3306 

''  3 311 

1 

TC 

+ 3 

IF  KILLER  BIT  = 0,  FNTEP  PECLESTS 

1932 

RFF 

1 

41,3307 

0 3 3 2 2 

1 

TC 

KILLMCN 

IF  KILLEP  EIT  = 1,  NC  PECLESTS 

1933 

PFF 

2 

LAST 

440 

41  ,3310 

0 3322 

1 

TC 

K ILLMON 

IF  KILLEP  BIT  = 1,  NC  PECLESTS 

1934 

PFC 

1 

41,3311 

3 3 326 

c 

CAF 

PCNCEL 

1935 

REF 

16 

LAST 

440 

41,3312 

0 5 203 

0 

TC 

WAI TLIST 

ENTER  WAITLIST  PECUEST  FCP  MCNREC 

193  6 

RRF 

40 

LAST 

440 

C776 

£BANK= 

OSFCCUNT 

1937 

REF 

2 

LAST 

440 

41,3313 

C 2 3 0 3 

1 

2CACF 

MCNREC 

1 937 

41,3314 

621  '1 

0 

1938 

RFF 

2 

LAST 

159 

41  ,3315 

3 4355 

0 

CAF 

CHRPR  IC 

193° 

RRF 

C 

LAST 

? 2 9 

41,3316 

0 5972 

1 

TC 

NCVAC 

ENTER  EXEC  PECUEST  FGR  MONCC 

1940 

ppc 

41 

LAST 

44  0 

■nib 

EBANK= 

DSPCOLNT 

1941 

RFF 

1 

41,3317 

C 3 3 27 

1 

2C  ACF 

MCNDC 

1941 

PEF 

1 

41, 3320 

62  101 

0 

1 942 

RFF 

1 1 

LAST 

385 

41,332  1 

0 5261 

1 

TC 

TASKOVER 

1943 

REF 

87 

LAST 

439 

41,3322 

3 4755 

1 

KTLLMCN 

CAF 

ZFFC 

ZERO  NCNSAVE  ANC  TURN  KILLER  BIT  CFF 

1944 

RFF 

4 

LAST 

440 

41 , 3323 

55*017 

1 

TS 

MCMSAVE 

1945 

PFF 

Q 

LAST 

4 40 

41 ,3324 

55  * 020 

0 

TS 

MCNSAVEl 

TURN  CFF  KILL  MCMTCR  BIT. 

1946 

RTF 

12 

LAST 

44f 

4 1,  3325 

0 526  1 

1 

TC 

TASKCVER 

TURN  CFF  EXTERNAL  MCNITCR  BIT. 

1947 

41 ,2326 

00144 

0 

MCNCEL 

OCT 

144 

FCP  1 SFC  MCMTCR  INTERVALS 

1948 

1949 

REF 

4 

LAST 

4 40 

41,3327 
41 , 333c 

1 1 ' C2C 
0 3 3 34 

C MCNDC 
0 

CCS 

TC 

^'C^S/^VFl 
+ A 

CALLEC  EY 
IF  KI LLEF 

EXEC 

BIT  = 0,  CCNTINUE 

1 95'' 

41 ,3331 

0 3334 

Ti 

TC 

+3 

IF  KILLER 

BIT  = C,  CCMIME 

1951 

RFF 

48 

LAST 

40  5 

41 , 3332 

0 5155 

0 

TC 

ENDOF JCE 

IN  CASE  TE 

FPMINATF  CAME  SINCE 

LAST 

MGNREQ 

1 952 

REF 

49 

L AST 

440 

41,3333 

) 5155 

■> 

TC 

FNDOF JOB 

IN  CASE  TERMINATE  CAME  SINCE 

LAST 

MCNREC 

1953 

PFF 

4 

LAST 

44F 

41,3334 

11*011 

1 

CCS 

DSPLCCK 

1954 

REF 

1 

41, 3335 

0 3257 

TC 

MCNBLSY 

NVSUe  IS  BUSY 

GAP 
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1955 

RFF 

4 

LAST 

439 

41,3336 

3 6''77 

1 

CAF 

LCW7 

1956 

REF 

5 

LAST 

4 40 

41,3337 

7 10  17 

1 

PASK 

MCNSAVe 

1 95B 

arf 

1 

41 , 3340 

0 2 321 

\ 

TC 

IJPDATNN  -1 

PLACE  NCLN  INTC  NCUNREG  ANr  CISFLAY  IT 

1 96f 

RE  F 

1 

41,3341 

3 4 14  4 

1 

CAF 

MIP7 

1961 

REF 

6 

LAST 

44  1 

41,3342 

7 1017 

1 

MASK 

MCNSAVE 

CHANGE  MCNITCR  VERB  TC  CISPLAY  VERB 

1962 

REP 

1 

41,^343 

6 3355 

1 

An 

MCNREF 

-CFCIC,  START  INC-  IN  BITE 

1965 

REF 

1 

41,3344 

54  C23 

1 

TS 

ECCP 

RIGFT  7 

196A 

RFF 

2 

LAST 

441 

41 , 3345 

3 0023 

0 

CA 

EDOP 

1965 

REF 

18 

LAST 

439 

41 ,3346 

55 '000 

1 

TS 

VERBREG 

1966 

RFF 

1 

41,3347 

2 3 3 c ^ 

1 

CAF 

MCNBACK 

SET  RETURN  TC  FASTEVE  AFTER  CATA  CISPLAY 

1967 

RPF 

5 

1 AST 

440 

41 ,3350 

54  136 

1 

TS 

ENTRET 

196B 

REF 

2 

LAST 

^ 2 c 

41,3351 

4 3245 

c 

CS 

BIT15/14 

1969 

RFF 

5 

1 AST 

440 

41,3352 

7 1020 

0 

MASK 

MCN'SAVF  1 

FLT  ECACR  INTC  MpAC  *2.  INTMCTBS  WILL 

1970 

REF 

190 

LAST 

44C 

41 ,3353 

54  156 

1 

TS 

MPAC  +2 

CISPLAY  IT  AND  SET  NPLNCACR  , NCLNACC, 

1971 

RFF 

1 

41, 3354 

0 2046 

1 

FNONFNOC 

TC 

TESTNN 

EPANK  . 

1972 

4124 

BLOCK 

2 

1972C  1 

RPF 

1 

4000 

SETLCC 

FFTAC8 

197202 

4124 

BANK 

1972  ^ 

RFF 

1 

COUNT  * 

1 }/P  IN 

1973 

RFF 

2 

LAST 

44  1 

4 124 

2 4 144 

1 

PASTP\,8 

CAF 

MI  07 

1 97A 

RTF 

2 

LAST 

439 

412  5 

7 102! 

1 

MASK 

MCNSAVE 2 

NVMONCPT  PASTE  CFTICN 

19  75 

4126 

C 0006 

1 

EXTEND 

1976 

4127 

1 4 13  1 

1 

6ZF 

+ 2 

1977 

RFF 

1 

4130 

0 4 132 

0 

TC 

PASTFOPT 

PASTE  PLEASE  VERB  FCP  NVNCNCFT 

1978 

RFF 

7 

LAST 

44  1 

4 13  1 

3 1)17 

0 

CA 

MCNSAVE 

PASTE  MCMTCP  VERB  - PASTE  OPTION  IS  0 

19782 

RFF 

3 

LAST 

44  1 

4 132 

54  023 

1 

PASTFCPT 

TS 

FOCP 

RIGHT  7 

19  7 8 3 

RFF 

4 

LAST 

441 

4 133 

3 0023 

n 

CA 

ECOP 

PLACF  MONITOR  VERB  OR  CLEASE  VERB  INTC 

197832 

RFF 

91 

LAST 

434 

4134 

f 4616 

1 

TC 

BAN  KCALL 

VERBREG  ANC  CISPLAY  IT. 

197833 

REF 

7 

LAST 

428 

4 135 

62  34  1 

0 

CAPP 

UPDATVB  -1 

197635 

RFF 

88 

LAST 

44F 

4136 

3 4755 

1 

CAF 

ZERC 

ZERO  RECRET  SC  THAT  PASTEC  VERBS  CAN 

197838 

DCp 

10 

LAST 

412 

4 137 

55 '012 

1 

TS 

RECRET 

BE  EXFCUTEC  FY  CFEPATCR. 

1978A 

PP-F 

3 

LAST 

44  1 

4140 

3 1021 

0 

CA 

MCNSAVE2 

19785 

RFF 

1 

4 141 

0 4255 

1 

TC 

BLANKSUB 

FRCCESS  NVMONCPT  BLANK  OPTION  IF  ANY 

19786 

4 142 

0 4 143 

a 

TC 

+ 1 

1 9 7 E 7 

RFF 

50 

LAST 

440 

4143 

0 5155 

0 

ENCPAST  E 

TC 

ENnOFJOB 

1979 

4 144 

37600 

0 

1^107 

CCT 

3 7600 

I960 

REF 

1 

41 , 3355 

SETLCC. 

ENDMONDC  + 1 

19805 

RFF 

4 

LAST 

439  TG 

44  1 : 

79  749* 

COUNT* 

P IN 

1981 

41,3355 

75377 

0 

i^CNREF 

CCT 

75377 

-CFCIO,  STARTING  IN  BITS 

1982 

RFF 

1 

41  ,3356 

04  124 

1 

MONEACK 

ACRES 

PASTFVB 

1983 

REF 

2 

LAST 

399 

41,3357 

0 4374 

0 

MCNBL  SY 

TC 

PELDSPCN 

TURN  KFY  RELEASE  LIGHT 

1984 

REF 

51 

LAST 

44  1 

41,3360 

0 5155 

c 

TC 

ENDCF  JOB 
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P1985  CSPFMEM  IS  USED  TC  DIE'^lAY  (IN  CCTai)  ANY  FTYFC  REGISTER. 

R1986  IT  IS  US  = C UITE  N'CUN  = "aCETNE  CAOR  TO  SE  SPECIFIED.  THE  FCADP  CF  THE 

Rise?  DEStREO  LFCATICN  IS  THEN  FUNCHEC  IN.  IT  HANDLES  F/F  ( FCACR  AUDQ-77T7) 


R1987  1 FOP  EiN'KS  L/F  27,  THIS  IS  FNCLGH. 

R19872  FTP  B''NK?  G/E  30,  THE  THIRD  CCNfCNFNT  CF  HCUN  26  (PRIO,  ACRES,  SBCCM 
R 19873  MUST  BF  PPELDACFO  WITH  DESIRED  SUPERBANK  FITS  (PITS  5,6,7). 

R19874 V23N'26  SHPUIC  BE  USED. 


R19875  summary 

P19876  FOR  BANKS  L/E  27, V2  7 N C 1 E ( FC  AO  F ) E 


R19377 

FCF 

BANKS 

G/E 

30, 

V23N26E ( 

SUPERBIT':  ; 

IE  V27NC  1E(  FC.ADR  ) E 

1988 

REF 

1 1 

LAST 

926 

91,3361 

3 9317 

0 

DSPFN  EP 

CAF 

RlCl 

TF  F/F,  CATACALL  LSES 

BANK  C2 

CP  C3. 

1989 

REF 

92 

(.AST 

99C 

91,3362 

59  lie 

C 

TS 

OSFCCLM 

1989  1 

PEF 

17 

LAST 

375 

91  ,3363 

3 1096 

1 

CA 

OSPTEMl  +2 

SLPFRBANK  BITS  WEPF  FPEiCACEC 

INTC 

198c>2 

REF 

58 

LAST 

930 

91 ,3369 

5 9 00  1 

1 

TS 

L 

3RC  rCPFCNENT  CF  NOUN 

26. 

1990 

PEF 

7 

1 AST 

939 

91 , 3365 

3 1016 

1 

CA 

NCLNCADR 

CPIGINAL  FCACP  LCACEC 

STILL  IN 

NCUNCACR . 

1991 

PEF 

1 

91 ,3366 

U 9651 

1 

TC 

SUPDAC AL 

CALL  WITH  FCACR  IN  A, 

SLPERBITS  IN  L. 

1992 

REF 

2 

LAST 

91  5 

9 1 ,3367 

0 3371 

1 

TC 

OSFPCTWC 

1993 

REF 

52 

LAST 

99  1 

91 , 337C 

0 5155 

0 

ENCSPF 

TC 

ENDCP JCB 

GAP;  ASSF^'Bl':  PEVISIPN  116  CF  FRCGPAN  LUMN/>t-Y  EV  N/iSA  20211  12-')71 
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P1594 

V,CPC 

CISFLAY 

PQJT  lAES 

1995 

PFF 

A 

LAS'f 

435 

40,3234 

SETLCC 

TESTCFUF  +4 

19955 

RFF 

5 

LAST 

433  TO 

436  : 

12C  605* 

CCL'AT* 

$$/FIN 

1996 

RFF 

1C3 

LAST 

438 

AT  ,3234 

56  C02 

P CSFSIGN 

XC  F 

Q 

1997 

PFF 

1 

40.3235 

5 4 14  4 

1 

TS 

DSPWCRFT 

1 998 

RFF 

191 

L AST 

44  1 

4 ' , 3 2 3 6 

1C  154 

C 

CCS 

YFAC 

1999 

40 ,3237 

0 3247 

n 

TC 

+ 8D 

2000 

40, 324C 

C 3247 

c 

TC 

+ 7 

2001 

REF 

47 

LAST 

440 

40,3241 

6 4753 

1 

AP 

ONE 

2002 

REF 

192 

LAST 

44  3 

40,3242 

54  154 

0 

TS 

HFAC 

200  3 

RFF 

2 

LAST 

4C'2 

40,2243 

0 243  3 

1 

TC 

-CA 

2C04 

RTF 

193 

LAST 

443 

40,3244 

4 0155 

1 

CS 

MPAC  +1 

2C05 

RFF 

194 

LAST 

44  3 

40,3245 

5 A 1^5 

1 

TS 

fAFAC  +1 

2006, 

RFF 

2 

LAST 

443 

40, 3246 

C ClAA 

Q 

TC 

DSPL^DRET 

2CC7  REF  3 LAST  A22  AO, 3247  0 2A13  0 TC  +ON' 

2008  PFF  3 LAST  AA3  40,3250  C ClAA  C TC  CSPWCRET 


2000 

40,3251 

0 0006 

1 

DSPRND 

EXTEND 

RCUND  BY  5 EXP-6 

2010 

RFF 

1 

40,3252 

3 3315 

0 

CCA 

CECRCUNC  -1 

201 1 

PFF 

195 

LAST 

443 

40,3253 

20  155 

1 

CAS 

MFAC 

2012 

4 1,3254 

0 0006 

1 

EXTEND 

2C1  3 

40,3255 

1 3261 

0 

BZF 

+ 4 

201  4 

40,3256 

C 0C06 

1 

EXTEND 

2C15 

REF 

1 

40 ,3257 

3 4733 

1 

CCA 

OPQSHAX 

2016 

REF 

196 

LAST 

to 

40, 326C 

52  15  = 

1 

CXCH 

Y FAC 

2017 

RFF 

104 

LAST 

443 

40,3261 

0 C002 

c 

TC 

C 

R 2018 

CSFDECViC 

CONVERTS  C( 

NFAC,  NPAC+1)  INTC 

A SIGN  ANC  5 CHAR  CEC  IMAL 

R2019 

START  lAC 

IN  LOC  SPECIFIED  IN 

DSPCCLNT. 

IT  ROLNOS 

BY  = EXP-6. 

2020 

REF 

105 

LAST 

44  3 

40 ,3262 

56  002 

0 

CSPCECWC 

XCF 

0 

2021 

REF 

1 

40,3263 

56  115 

0 

TS 

I.CRET 

2022 

REF 

1 

40,3264 

1 3 234 

1 

TC 

DSPSIGN 

2C23 

REF 

1 

4' 1 ,326  5 

1 3251 

1 

TC 

DSPRND 

2024 

RFF 

7 

LAST 

334 

40, 3266 

2 4 7 51 

c 

CAF 

FCUR 

2025 

RTF 

1 

40,3267 

54  137 

0 

CSPCCl^Dl 

TS 

WDCNT 

2026 

R'^F 

1 

4;i  ,3270 

3 4363 

0 

CAF 

B INCCN 

2027 

PFF 

5 

LAST 

436 

4C,3271 

C 7312 

0 

TC 

ShCPT^F 

2C2  8 

PFF 

1 97 

1 AST 

443 

41,3272 

50  15<!, 

1 

TRACE  1 

INDEX 

MPAC 

2029 

■REF 

3 

LAST 

4 0C 

40,3273 

3 4066 

0 

CAF 

RELTAP 

2030 

REF 

5 

L AST 

4 3 1 

40, 3274 

7 4346 

c 

PASK 

LCU5 

2031 

R'=F 

6 

LAST 

424 

40,3275 

54  124 

1 

TS 

CODE 

2032 

RFF 

89 

LAST 

44  1 

am, 3 2 76 

3 47  = 5 

1 

CAF 

ZFPC 

2033 

RFF 

198 

LAST 

443 

40,3277 

56  156 

0 

XC  H 

MPAC  +2 

2034 

REF 

199 

LAST 

44  3 

40 , 3300 

56  155 

n 

XCF 

MRAC  +1 

2035 

RFF 

200 

LAST 

44  3 

40,33''  1 

^ ^ 15^ 

0 

TS 

M FAC 

2G36 

REF 

43 

LAST 

442 

4'i,  3302 

56  776 

1 

XCF 

nSPCOLNT 

20^7 

PFF 

4 

LAST 

42  4 

40 , 330  3 

54  143 

0 

TPACEI S 

TS 

COUNT 

2038 

REF 

138 

LAST 

439 

40, 3304 

10  COO 

0 

CC  S 

A 

CECREFENT  CSFCCUNT  EXCEPT  AT  40 
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2C39 

P^E 

44 

LA  ST 

443 

40 ,3305 

54  776 

C 

TS 

CSFCCLNT 

20AC 

PSF 

4 

LAST 

424 

4'A,  ’3  ■ 6 

0 2256 

1 

TC 

DSPI  N 

2CA1 

R = F 

2 

LAST 

44  3 

40,3307 

10  137 

0 

CCS 

wIDCN'T 

20A2 

REF 

1 

40,3310 

0 2267 

1 

TC 

DSFCCNDI 

2043 

REF 

7 

LAST 

429 

4^3311 

4 4 3 60 

1 

CS 

VDl 

2044 

REF 

45 

LAST 

444 

40,3312 

54  776 

c 

TS 

DSPCCUNT 

2045 

REF 

2 

LAST 

44  3 

43, 2313 

0 0115 

1 

TC 

NCRET 

2C46 

40,3314 

00100 

I 

OCT 

ccooc 

2C47 

40,33  15 

02476 

0 

CECRCUNE  CCT 

02476 

R2C4R 

CSFCECNR 

CONVERTS  C( 

VFAC,MFAC+1)  INTO 

A SIGN  AND  5 CHAR 

DEC! NAL 

R2C^9 

«TART  ING 

IN  LCC 

SFECIFirO  IN 

CSFCCL'NT 

• 

IT  CCES  NOT  ROUND 

2050 

REF 

106 

LAST 

442 

40,3316 

56  C02 

0 

OSPDECNR  XCF 

C 

2051 

REF 

3 

LAST 

444 

40,3317 

54  115 

0 

TS 

WDRET 

2052 

REF 

2 

LAST 

443 

40,332C 

0 3 2 34 

1 

TC 

DSPS  IGN 

2053 

RFF 

2 

L AST 

444 

40,3321 

0 3266 

r 

TC 

DSPDCkDl  -1 

R2054 

OSPOC  ?NR 

CONVERTS  C.( 

MPAC,MFAC+1)  INTC 

A SIGN  AND  2 ChAR 

DEC  IMAL 

P2C55 

STAR 

T ING 

IN  LCC 

SPECIFIED  IN 

CSFCCLN'T 

• 

IT  COES  NOT  RCLND 

2056 

2C57 

REF 

FEE 

107 

4 

LAST 

LAST 

444 

44Z, 

4 3,  3322 
40,3323 

56  002 
54  115 

n 

0 

DSPDC2NR  XCH 
TS 

Q 

WCRFT 

2058 

REF 

*3 

LAST 

444 

40,3324 

0 3234 

1 

TC 

DSP  SIGN 

2C59 

RPF 

48 

LAST 

443 

411,3325 

3 4753 

1 

CAF 

ONE 

206C 

REF 

3 

LAST 

444 

40, 3326 

0 3267 

1 

TC 

CSFCCNDl 

- 

R2061 

CSF2CEC 

CCNVFPTS  r(MFAC)  AND 

C (MPAC  U ) 

INTO  A SIGN  AND 

10  CHAR  DECIMAL 

R2C62 

206? 

STARTING 
REF  1C8 
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LAST 

438 

4146 

4 1040 

0 

CS  VERBSAVE 

GET  CFICIAAL  VERB  THAT  WAS  EXECUTEC 

2229 

FFF 

11 

LAST 

44  1 

4147 

55'012 

1 

TS  RRQRET 

SET  FCP  EATFASC 

2230 

REF 

92 

LAST 

44  1 

4150 

0 4616 

1 

TC  PANKCALL 

PUTS  CfilGINAL  VERB 

INTC  VEREREG  AAC 

2231 

REF 

R 

L AST 

44  1 

4 15  1 

62  34  1 

0 

CADR  UPPATVB  -1 

cisplays  it  ia  verb 

L IGHTS. 

2232 

RTF 

29 

LAST 

445 

4152 

0 4635 

0 

TC  PCSTJUMP 

2233 

RFF 

2 

LAST 

400 

4 153 

62C02 

1 EADALY 

CACR  EATER 

R2234 

YYCHAAG  USES 

NCUN  CISPLAY  UNTIL 

ENTER.  THEN 

IT  USES  MODE  CTSP. 

R2235 

IT  GOES  TO  YODRCUT  WITH  THE  AEW 

Y 

Y C C C E I A 

A,  PUT  ACT  CISPLAYFC  IN 

R2236 

YIM  L IGHTS. 

R2237 

IT  CEYAACS  2 

AUYFPICAL  characters 

PF  PUNCFEC 

IN  FCR  NEW  YIY  COCE. 

R2P38  IF  NOT,  IT  PFCYCl ES. 
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2239 

2239E 

REF 

RFF 

1 

6 

LAST 

41,3436 
445  TO  446: 

37  7 

9 6* 

SETLCC 

GCLNT^ 

DSP2BIT  +1CC 
$}/PIN 

2 2 AD 

REF 

1 

41, 3436 

0 3461 

0 

MNCHANG 

TC 

REQPP 

ENTFASFI  ASSURES  TFE  TC  RFCRN 

AT  RRCFANG 

A22A  1 

IF  THIS  ROVES  AT  ALL,  RLST  CHANGE 

A22A? 

RRIACPEF  AT  ENTFASFI. 

2243 

RCR 

23 

LAST 

377 

41,3437 

3 4 747 

1 

C AF 

BI  T5 

CCT20  = N02. 

2244 

REF 

51 

LAST 

446 

41 , 3440 

6 C776 

1 

AC 

CSPCCUNT 

CSPCOLNT  VUST  = -ND2. 

2245 

41,3441 

0 CJT6 

1 

EXTENO 

CFRANC  TFAT  2 NUN  CFAR  WERE  PUNCFEC  IN. 

224E 

41 ,3442 

1 3444 

1 

ez  F 

+ 2 

2247 

REF 

14 

LAST 

436 

41,3443 

0 4145 

0 

TG 

ALPCYCLE 

CSPCCUNT  NCT=  -ND2.  ALARR'  AND 

RECVCLE. 

2248 

RFF 

92 

LAST 

445 

41,3444 

3 4 755 

1 

CAP 

Z ERG 

CSPCCUNT  = -NE2. 

2249 

RFF 

12 

LAST 

439 

41 , 3445 

57' OUI 

1 

XCF 

NCUNREG 

2 25C 

REF 

203 

LAST 

445 

41 , 3446 

54  154 

r 

7S 

PFAC 

2251 

REF 

5 

LAST 

412 

41, 3447 

3 4361 

1 

CAF 

NDl 

2252 

REF 

52 

LAST 

449 

41 , 345C 

54  776 

n 

TS 

nSPCCLNT 

2253 

REF 

93 

LAST 

44  6 

41,3451 

P 4616 

1 

TC 

BANKCALL 

2254 

REF 

4 

LAST 

406 

41 ,3452 

606m  1 

0 

CACR 

2BLANK 

2255 

RFF 

IP 

LAST 

446 

41,3453 

4 436C 

1 

CS 

VCl 

ELCCK  NUN  CFAR  IN 

22  56 

REF 

53 

LAST 

449 

41,3454 

54  776 

c 

TS 

nSPCCLNT 

2257 

REF 

2C4 

LAST 

449 

41 ,3455 

3 0154 

1 

CA 

PPAC 

2258 

RFF 

30 

LAST 

446 

41,3456 

0 4635 

0 

1C 

PCST JUPF 

2259 

RTF 

1 

41 , 3457 

1014M 

1 

CAOR 

MODRCLTB 

GO  tfru  standard  LCC. 

2260 

REF 

2 

LAST 

2 c c 

04 ,204C 

FCCRCLTB 

V37 

2261 

RFF 

1 14 

LAST 

447 

41, 346P 

1 

rfqmm 

CS 

0 

2262 

RTF 

12 

LAST 

448 

41  ,346  1 

55'  '12 

1 

TS 

REQRFT 

2263 

REF 

6 

LAST 

445 

41,3462 

3 436  1 

1 

CAF 

NCI 

2264 

REF 

54 

LAST 

449 

41, 3463 

54  7 7 6 

c 

TS 

nSPCCLNT 

2265 

RTF 

53 

LAST 

44  5 

41 ,3464 

3 4'7  5 5 

1 

CAF 

ZERO 

2266 

RFF 

13 

LAST 

445 

41 , 3465 

55  'CC  1 

0 

TS 

NCLNREG 

2 26  7 

RFF 

94 

t AST 

449 

41 ,3466 

0 46  16 

1 

TC 

BANKCALL 

Hi 

2268 

ref 

5 

LAST 

445 

41 ,3467 

6 060  1 

0 

CACR 

2 plank 

2269 

RFF 

3 

LAST 

412 

41,3470 

0 4427 

1 

TC 

F LASHCN 

227G 

REF 

52 

LAST 

44  7 

41 ,3471 

3 4753 

1 

CAF 

ONE 

2271 

RFF 

18 

LAST 

436 

41 ,3472 

54  777 

1 

TS 

DECPPNCF 

SET  FCR  EEC 

2272 

RFF 

M 

LAST 

448 

41,3473 

0 Cl  36 

c 

TC 

ENTE  XI T 

R2273 

. VBRCE  XFC 

ENTERS  REQUEST  TG.  EXEC  1 

FCR 

ANY  ACCPESS  WITF 

■ ANY  PRIORITY. 

R2274 

IT  pnES 

FNOOFJOe  AFTER  ENTER  ING  REQUEST. 

DI SFLAY 

SVST  IS 

; PELEASFC. 

P2275 

IT  ASELNFS  ACUN  26  FA?  PFFA  FFELCACEC  !,( IT  F 

R 2276 

COAPGA'EA'T  1 pRIORTTVIBITR  10- 

14)  8IT1=Q 

FCR  NCLAG,  EITl 

=1  FCR  FINCVAC. 

R2277 

CnMPQAEAT  2 JCB  APRFS  (12  BIT 

) 

R 2276 

GGAPCAFAI  3 PECCA 

2279 

REF 

21 

L AST 

446 

41,3474 

2 4 75  3 

1 

VPRQEXEC 

CAF 

e ITl 

22  86 

PEE 

1 8 

1 AST 

442 

41 , 3475 

7 1044 

1 

PASK 

PSPTFMl 

2 28  1 

PEF 

145 

LAST 

44  7 

41,3476 

1C  COO 

0 

CCS 

A 

4 
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2232 

PEE 

1 

41 ,3477 

0 3 516 

0 

TC 

SETVAC 

IF  BIT  1 = 1,  FINDVAC 

2263 

OPF 

1 

41  ,3  5.30 

3 4351 

1 

CAF 

TCNCVAC 

IF  BITl  = 0,  NOVAC 

228^ 

PEE 

2T5 

LAST 

A49 

41 , 359  1 

54  154 

0 

RFOEVl 

TS 

MPAC 

TC  NCVAC  CF  TC  FINDVAC  INTO  MPAC 

2265 

REF 

22 

LAST 

449 

41  ,3  5')  2 

4 4753 

0 

CS 

B ITl 

2286 

prp 

19 

LAST 

449 

41,2502 

7 1C44 

1 

AASK 

DSFTE»'l 

2287 

REF 

206 

LAST 

4 50 

41,2  5 ;i4 

54  160 

1 

TS 

YFAC  +4 

PRIG  INTC  NFAC44  AS  A TEAF 

2288 

REF 

6 

LAST 

429 

41  ,35  J5 

0 4457 

0 

RFCUFSTC 

TC 

PELCSF 

2289 

RFF 

5 

LAST 

439 

41,3506 

3 42  17 

1 

CA 

ENDl NST 

2290 

REF 

2C7 

LAST 

450 

41  ,3  50  7 

54  157 

0 

TS 

MPAC  +3 

TC  ENCCF2GB  INTC  APAC+3 

2291 

41  ,3510 

0 000  6 

1 

EXTEND 

2292 

REF 

2>i 

1 AST 

450 

41,2511 

2 1046 

1 

CCA 

OSPTENl  +1 

JCE  ACRES  INTC  NFAC+1 

2293 

REF 

208 

LAST 

450 

41  ,3512 

52  156 

1 

CXCE 

MPAC  +1 

BBCQN  INTO  MPAC+2 

2 29A 

RFF 

209 

LAST 

45C 

41,2512 

3 C16C 

0 

CA 

RFAC 

FPIC  lA  A 

2295 

41, 2514 

0 0004 

0 

lA.HI  NT 

2296 

RFF 

210 

LAST 

45C 

41  ,3515 

0 0154 

1 

TC 

MFAC 

2297 

PFF 

1 

41,3516 

2 4354 

1 

SETVAC 

CAF 

TCFINCVC 

2298 

RPF 

1 

41,3517 

0 3 50  1 

0 

TC 

REOFX  1 

R2299  VRROUAIT  ENTERS  PEGCEST  TC  WAITLIST  FCR  AAV  ACCFESS  AITE  ANY  CELAY. 
R23')T  IT  COES  EAHC^JCE  AFTER  ENTERING  R EQU  EST  .0  I SP  L A Y SYST  IS  RELFASEC. 


R2301  IT  ASSLAES  ACUA'  26  HAS  BEEN  FRELCACEC  NITE 
R2302  COAFrAENT  1 DELAY  ( LGN  BITS) 

R23C3  CCAFCNENT  2 TASK  ACRES  1 L2  BIT) 


R 2304 

COMPONENT 

3.  BBCOA 

23'T5 

REF  1 

41, 3520 

3 42  52  1 VBRQViAIT 

CAF 

TC.WAI  T 

2396 

RFF  211 

LAST  450  41,3521 

54  154  0 

TS 

MPAC 

TC  WAITLIST  INTO  MPAC. 

2397 

RFF  21 

LAST  45C  41,2522 

2 1C  44  C 

CA 

DSPTEM 

TIME  CELfY 

2308 

RFF  1 

41,3522 

0 3504  C ENDRGV^T 

TC 

REQUESTC  -1 

R2309 

RECUE  STC 

V\ILL  PLT  TASK  ACRES 

INTC  NRAf+l,  PBCCA 

INTC 

MFAC+2, 

R231  T 

TC  ENCGFJOB  INTO  MPAC+3.  IT 

WILL  TAKE  TIME  DELAY 

CUT 

CF  yfAC+4  ANC 

R 2 3 1 1 

LEAVE  n 

IN  A,  INFINT  ANC  TC 

AFAC  . 

2212 

RFF 

2 

L-YFT 

448 

40,3476 

SFTICC 

NVSBEADL  +1 

2 312  5 

REF 

■7 

1 AST 

446  TO 

44  8: 

80  Itl* 

CCLAT’'.' 

$f /PIN 

2313 

RFF 

f 3 

LAST 

449 

40,3476 

3 4753  1 VEFRCf 

CAF 

CNE 

PPDCEEC 

WITFOLT  DATA 

2314 

pep 

2 

LAST 

429 

40,3477 

5 5 ' r 1 3 C 

TS 

L CADSTAT 

2315 

RFF 

? 

L AST 

44  8 

40,3500 

0 4204  0 

TC 

KILMONON 

TLRA  CA 

KILL 

MCAITCR  BIT 

2316 

RFF 

7 

LAST 

45C 

40,3501 

1 4457  -9 

T9 

RELCSP 

2317 

PFF- 

. 3 

LAST 

497 

40,2502 

0 4433  1 

TC 

F LASHCFF 

231  8 

REF 

2 

LAST 

429 

40,3593 

0 3612  1 

TC 

RECALTST 

SEE  I F 

THERE 

I S ANY  RFCAL  L FRCM  EACICLE 

2319 

RFF 

54 

LAST 

450 

40, 3 5 )4 

4 4T5  3 

C VBTERM 

CS 

CAE 

2329 

RFF 

2 

LAST 

410 

4 ' , 3 5 C 5 

0 34  7 7 

C 

TC 

VBFRCC  +1 

TERM  VERB  SETS  LCADSTAT  NEG 

< 
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R2320 1 

FPCCKFY 

PERFORMS  THE 

SAF-E  flnCTICN  AS 

VBPFCC.  IT  MUST 

BE  CALLEC  LNCER 

R23202 

FXBCUTIVE  r.CNTRCL,  WITM  ChPPRIO. 

232022 

pep 

19 

LAST 

AA  1 

AC  ,3  506 

A 1 ; 1 ) 

1 

PRCCKFY  CS 

V £R  PPEG 

CONT  ALLCW 

PROCEED  DURING  LCAC. 

232  '36 

PPF 

1 

A 1, 3507 

6 3 52  3 

C 

AD 

VBSP2  LD* 

CEC  22 

2320A 

AO  , 3 5 1 0 

0 0076 

1 

EXTEND 

232(1^2 

RFF 

IA6 

LAST 

AA9 

AO, 351 1 

2 6 CFO 

r 

CIM 

A 

2320A6 

A 1,3512 

0 00C6 

1 

EXTEND 

2320  ! 

REF 

18 

LAST 

AA  E 

AO  ,3513 

1 3A70 

0 

EZF 

CHARALPM 

232153 

RFF 

9A 

L AST 

AA9 

AO, 351A 

3 A755 

1 

PRCCKEYl  CAF 

ZERO 

SET  REQRET 

FCR  ENTER  PASS  0. 

23206 

RFF 

13 

LAST 

AA9 

AO  ,3515 

55 ' 7 1 2 

I 

TS 

RFCRET 

2 2 207 

R'^F 

11 

LAST 

AA9 

AO, 3516 

A A360 

1 

CS 

V Cl 

BLOCK  NUMERICAL  CHARACTERS,  SIGNS,  CLEAR 

232'is 

REF 

55 

LAST 

AAR 

AO, 3 517 

5 A 7 76 

c 

TS 

DSPCr.LNT 

2320« 

RFF 

3 

LAST 

A50 

AO  ,3520 

0 3A76 

1 

TC 

VBPRCC 

P2321 

VBRESEQ 

WAKFS 

END  IDLE 

AT  SAMF 

LINE  AS 

FINAL  FNTFR  CF  LCAD  (L+3). 

P2322 

(VAIN  LIRE  IS 

I NT  FNCEC 

AS  RFSPCNSE  TO 

INTERNALLY  INITIATED  FLASHING 

R2323 

OISPl.AVS  IN 

FNCTCLE. 

SHCULD 

NET  BE  USEC  WITH  lCAC  VERES, PLEASE  PERFORM 

f 

R2324 

CF 

PLFASF  mark  verbs 

BECAUSE 

THi^Y  ALREADY  USE  L + 2 IN'  ANOTHER  CCNTF>T.) 

232  5 

RFF 

95 

LAST 

A5  1 

AO  , 3 5 2 1 

A A75  5 

C 

VERESEC  CS 

ZERO 

MAKE  IT  LOCK  LIKE  DATA  IN. 

2326 

RFF 

LAST 

A51 

A ),  3 5 22 

0 2A77 

c 

TC 

VEFRCC  +1 

23265 

AO  , 3 5 2 3 

0CC26  C 

VBSP2LC*  DEC 

22 

VE22  = ELCAC 

R2327 

FLASH  IS  TLRNFC  OFF  BY  PPCCEFO 

W TTHCIJT 

CATA,  TERMINATE, 

RESFCUENCF, 

R2328  PNC  CF  LOAC. 
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P2329 

KEY  RELEASE  ROUTINE 

8233^* 

THIS  ROUTINE  ALWAYS  TURNS  Off  TEE  UFACT  LIGHT  AND  ALWAYS  CLEARS  OS 

PLOCK. 

R2331 

P2332 

TEE  EIGHFST  PRIORITY  FUNCTICN  CF  THE  KEY  RELEASE  BLTICN  IS  THF 
UNSUSFENCING  OF  A SUSPENDED  MONITOR  WHICH  WAS  EXTERNALLY  INITIATED 

• 

R2333 

P2334 

THIS  FLNCTICN  IS  ACCCMPLISHFr  BY  CLEARING  CSFLCCK  AND  TURNING  OFF 
THE  KEY  RELEASE  LIGHT  IF  ROTH  DSFLIRT  AND  CADRSTCR  ARE  EMPTY. 

R2335  IF  NT  SUCH  ^^^.ITCF  EXISTS,  TEEN  RELCSP  IS  EXECUTED  TC  CLEiP  CSPLOCK 
R2336  AND  TH!"  EXTERNAL  PCNITOR  BIT  (FREEING  TEE  DISPLAY  SYSTEP  FOR  INTERNAL 

P2337  USE),  TURN  OFF  TEE  KEY  RELEASE  LIGHT,  AND  E<AKE  LF  ANY  JCB  IN  CSFLIST. 


R233R  IN  ACCITICN  IF  THERE  IS  A JC8  IN  ENEICLE,  TEEN  CCNTROL  IS  TRANSFERRED 

R2339  TO  PTNPRNCH  (IN  DISPLAY  INTERFACE  RDUTINE)  TC  RE-EXECUTE  TEE  SERIES  OF 

R23391  NYSUB  CALLS  ETC.  TEAT  PPEC=DEC  TEE  ENCIDLE  CALL  STILL  AEAITING  RFSFCNSE. 
R23A0  this  F>^AILRE  IS  INTENDED  fcr  LSE  EH=N  TEE  CPFRATCF  EAS  BEEN  REQUESTED  TO 

R23A1  RESPOND  TO  SOME  INTERNAL  ACTTCN  THAT  USED  ENDIHLE,  BLT  HE  HAS  WRITTEN 

R2342  OVER  THE  INFQRYATICN  CN  THE  DISPLAY  PANEL  BY  SOHE  DISPLAYS  OF  HIS  CVN 
R23A3  INITIATION  WHICH  DC  NOT  SERVE  AS  RESFCNSES.  HITTING  KEY  RLSE  WILL 

R23A4  RE-ESTABLISH  TEE  DISPLAYS  '^C  THE  STATE  TH^Y  WERF  IN  BFFCRE  HE  OBSCLFFC 


R2345  then,  sc  THAT  HE  CAN  SEE  THE  WAITING  REQUEST.  THIS  WORKS  ONLY  FOR 
R2346  INTERNAL  PRPGRARS  THAT  URED  ENCIDLE  TEPCLGE  YARCARETS  DISPLAY 
R2347  SLBRCLTINES. 


2 34  8 

REF 

22 

LAST 

42*^ 

4'>,3524 

4 4751 

1 

VPRELCSP 

CS 

B IT3 

234P 

40,3525 

C C0C6 

1 

EXTEND 

235C 

RFF 

11 

LAST 

2 20 

40,3526 

03  m 

1 

WAND 

DSALMCUT 

TLRN  CEE  LFACT  LITE 

2351 

REF 

2 

LAST 

399 

40,3527 

10  115 

0 

CCS 

21/22PEG 

CLC  DSFLCCK 

2352 

REF 

41 

L AST 

446 

40, 3530 

3 4 7 3 6 

1 

CAE 

BIT14 

2353 

RFF 

6 

LAST 

44  1 

49 ,9531 

7 1020 

0 

MASK 

MENS AVF  1 

EXTERNAL  MONITOR  BIT  (EMB) 

2 3 54 

REF 

147 

LAST 

45  1 

43,3532 

1C  cro 

c 

CCS 

A 

2355 

REF 

1 

40,3539 

0 2542 

1 

TC 

UNSUSPEN 

CLC  DSFLCCK  AND  EMB  BCTF  1,  UNSUSFFNC. 

2356 

REF 

8 

LAST 

45C 

40,3534 

0 4 4 S 7 

0 

TSTLTS4 

TC 

RELCSF 

NOT  UNSUSPPND ING  EXTERNAL  MCMTCR, 

2357 

REF 

5 

LAST 

44C 

40,3535 

11  '041 

1 

cr  s 

CADRSTCR 

RELEASE  DISPLAY  SYSTEM  AND 

2356 

40 ,3  536 

0 3 540 

0 

TC 

+ 2 

DC  RE-ESTABLISH  IE  CADFSICP  IS  FULL. 

2359 

PEF 

54 

LAST 

44S 

40 ,353  7 

0 5 15  5 

0 

TC 

ENDCFJOe 

2360 

RFF 

31 

LAST 

449 

4n, 3540 

0 4635 

c 

TC 

PCST JLMF 

2361 

RFF 

4 

LAST 

299 

40  ,354  1 

21051 

0 

CACR 

P INBRNCF 

2362 

REF 

96 

LAST 

45  1 

40,3542 

3 4 7 5 5 

1 

LNSUSFEN 

CAF 

ZEPC 

external  MCMTOR  is  SUSPENDED, 

2363 

RFF 

5 

LAST 

440 

40,3543 

55  'Oil 

1 

TS 

D SFLCCK 

JLST  UNSUSFFNC  IT  BY  CLEARING  CSFLCCK. 

2364 

RFF 

6 

LAST 

452 

40,3544 

11'041 

1 

CCS 

CADRSTCR 

TLRN  KEY  RELEASE  LIGHT  CEE  IF  BCTH 

2365 

PEF 

55 

LAST 

452 

40,3545 

rj  K 1 c c 

c 

TC 

ENPOF JOB 

CADRSTCR  AND  CSFLIST  ARE  EMPTY. 

2366 

REF 

2 

LAST 

440 

40,3546 

0 4 50  2 

1 

TC 

R ELDSPl 

2366  1 

REF 

56 

1 AST 

452 

40,3547 

0 5155 

0 

TC 

ENDCE JOE 

2367 

40,3550 

ENCRELDS 

EQLALS 
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P236B 

R2369 

R237P 

NVSUB  IS  USFO  FOR  SUB  RFUTINE  CALLS  FROM  WITHIN  CCMPLTEP.  IT  CAN  BE 
USED  TC  CALL  TEE  CFMeiNATlCN.  CF  ANY  DISPLAY,  LOAD,  OR  MCNITCR  VERB 
TOGETHER  WITH  ANY  NCLN  AVAILABLE  TC  TEE  KEYBCARC. 

R237H I 
R237S  2 

PLACE  r VVVVVVVNNNNNNN  INTC  A. 

V-S  APE  THE  7 PIT  VERB  CODE.  N-S  APE  TEE  7 EIT  NCUM  CODE. 

R237I  2 
R23709 
R237:/E 

IF  NVSUB  IS  CALLED  WITH  THE  FCLLCWING  NEGATIVE  NUMBpRS  (RATHER  THAN  TEE 
VERB-NCUN  CnCF)  IN  A,  TEFN  TEE  DISPLAY  IS  BLANKED  AS  FCLLCwS" 

-4  FULL  BLANK,  -3  LEAVE  "CCE,  -2  LEAVE  MCCE  ANC  VERB,  -1  BLANK  R-S  ONLY 

R2371 

R2372 

NVSUB  CAN  BE  USFD  WITH  MACH  CADR  TC  BE  SPEC  BY  PLACING  TEE  CACP  INTC 
'^PAC  + 2 BEFORE  TEE  STANCARC  NVSUB  CALL. 

R2  373 
R237A 

NVSUB  RETURNS  TP  2+  CALIING  ICC  AFTER  PEPFCRMING  TASK,  IF  CISPLAY 
SYSTEM  IS  AVAILABLE,  THE  NEW  NOUN  AND  VERB  CODES  ARE  DISPLAYED. 

R2375 

R2376 

P2377 

IF  V:S  =0,  TEF  NEW  NCUN  CCCF  IS  CISPLAYEC  CNLYiRETUPN  WITE  NC  FURTHER 
ACTIONl.  IF  N-S  =C,  THF  NEWi  VERB  CCOE  IS  CISPLAYEC  CNLY(RETUPN  WITH  NC 
FUPTEFR  ACTICNI. 

R2378 

R2379 

IT  RETURNS  TO  1+  CALLING  LCC  WITECUT  PERFCPMING  TASK,  IF  CISPLAY 
SYSTEM  IS  BLOCKED  (NOTHING  IS  OISPLAYEO  IN  THIS  CASE). 

R238'’' 

R238I 

IT  DCES  TC  ABORT  (WITH  CCT  Ol5')l)  IF  IT  ENCPUNTEPS  A CISPLAY  PROGRAM 
ALARM!  rONCITION  BEFCPE  RETURN  TC  CALLER. 

R2382 

R23E3 

R23R4 

TEE  DISPLAY  SYSTEM  IS  BLCCKED  BY  THE  DEPRESSICN  OF  ANY 
KF',,  FXCFPT  FP.RCR  LIGHT  RESET 

IT  IS  RELfASED  BY  THE  KEY  RELEASE  BLTTCN,  ALL  FXTENCFC  VERBS, 

R2385 
R 2366 
R2387 

PRCCEEC  WITHOUT  LATA,  TERMINATE,  RESEQUENCE,  INITIALIZE  EXECUTIVE, 
RECALL  PART  OF  RECALTST  IF  FNCTCLE  WAS  USEC, 

VB  = RECLEST  EXECUTIVE,  VB  = REQUEST  WAITLIST, 

R2388  VCMTCR  S’^.r  UP. 


R2388  1 THE  OTSPLAY  ?Y£T'^f/  IS  ALSC  BLCCKED  BY  THE  EXTER^AL  ^CMTCP  PIT,  WUCI- 
P2388?  INCICATES  fiN  FXTEPNALLY  INTTIA-TEO  MGMITGR  IS  RUNNING  (SEE  NOMTCR) 

R238<5  A NYSUB  CALL  THAT  PASSES  DSFLCCK  ANC  THE  EXTERNAL  MON  ITCR  PIT  ENPS  CLC 
R23891  MONITOR. 

R2390  rSELCr.K  IS  THR  INTERLCCK  FOP  USE  KEYBnARP  AND  DISPLAY  SYSTEM  kEKE 
P23';i  LOCKS  CUT  INTERNAL  USE  kPENEVER  TE'^RE  IS  EXTERNAL  KEYBCARC  ACTION. 

823911  NVSUB  SEOULC  PE  USER  TNICE  IN  SIJCCESSICN  FCP  :FLEASE  PERFCRM:  SITUA1ICNS 
R23912  (SIYTLAPLY  FCR  PLEASE  PARK),  FIRST  PLACE  '"EE  COCEC  NUMBER  F(1R  NEAT 
P23912  ACTION  IS  OESIRED  CE  OPFRATCR  INTC  TeE  RFGISTEPS  FEFEFREC  TC  PY  TEE 
R239IA  :CEFCKLIST;  NOUN,  GC  Til  NVSUB  WITE  A CISPLAY  V^PB  ANC  TH«^  tCEEC.KLIST: 

R 2391  S NCUN.  GC  TC  NVSUB  AGAIN  WITE  THE  : PLEASE  FFR>=CRM:  VERE  ANC  ZEROS  IN  THF 
R23916  LOW  7 BITS.  THIS  :PASTES  UP:  TEE  iPLEASE  FFRFCPN:  VERB  INTC  TEE  VEP£ 
R23917  LIGHTS, 


R2391E  NV^CNCFT  IS  AN  ENTRY  SIMILAR  TC  NVSLP,  BUT  PEtUIPING  AN  AECITICNAL 
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R2391  El  PAPAVC7EP  jpj  jj  SHCULH  AT  USEC  OMLY  WITe  fl  MCNITOP  YEPE-NOLM  CODE  IN 
R 239  1 E2  A.  AFTER  EACH  MONITOR  OISPLAY  A =l=FLEASE*  VERB  WILL  BE  FASTEC  IN  THE  VERB 

R239183  LIGHTS  OR  CATA  WILL  BE  BLANKED  (OR  BOTH)  AGCORDING  TO  THE  CPTIONS 

P2391EA  SPECIFIED  IN  L.  IF  BITS  8-lA  CF  L ARE  CTHFP  THAN  2ERC,  THEN  THEY  WILL 
R2391  EE  BE  INTERPRETED  AS  A VERB  r.CD<^  AND  PASTED  IN  THE  VERB  LIGHTS.  (THIS  VERB 
R2391BF  CCCE  SHCULD  CESIGNATF  CNF  OF  THE  ^PLEASE*  VERBS.)  IF  BITS  1-3  OF  L ARE 
R2391  E7  OTHER  THAN  ZFPO  , THEN  THEY  WILL  BE  USEE  TC  BLANK  CATA  EY  BEING  FEC  TO 
R2391  8B  BLANKSLE.  IF  NVMONQPT  IS  LSED  WITH,  A VERB  CTHER  THAN  A NCNITCK  VFPB, 
P239189  THE  PARARFTFR  IN  L HAS  NO  EFFECT. 


R2392  NVSLB  IN  FIXFO-FIKED  PLACES  2+CALLING  LCC  INTC  NVCTEN,  TC  NVSLBEME  INTO 
R2393  fmtrft.  (THIS  WILL  RESTORE  CLC  CALLING  BANK  BITS) 
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A 
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449 
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2398 
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c c 
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4 163 
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1 

CAF 
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2399 

RFF 

1 16 
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45A 

4164 

6 C’02 

0 

N VSBCCM 

AD 

Q 

2 400 

REF 

1 

4165 
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1 

TS 

NVCTEY 

2+  CALLING  LOG  INTP  NVCTFM 

240R1 

REF 

4 
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1 XCH 
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450 
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RFF 
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0 
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RFF 

11 
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4 
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0 

TS 

N VBNKTFf/ 

2404  1 
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0 
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01  007 
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RFF 

1 
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C 2CCC 

r 

TC 

NVSUPB 

GC  TO  NVSUEl  THRU  STANCARC  LOG 

2406 

PC-F 

36 

t AST 

451 

■J776 

EBANK= 

DSPCCLNT 

24C? 

RFF 

2 

LAST 

407 

42  T1 

621  11 

0 

NVSBEENK 

EBCCN 

NVSUB  1 

2407  1 

REF 

2 

LAST 

4 5A 

4201 

PTNSLPBT 

= 

NVSBBENK 

CCNTAINS  THE  FIMEALL  SUFERBITS. 

2412 

REF 

2 

LAST 

454 

4202 

53*037 

0 

NVSUBEND 

DXCH 

NVQTFM 

NVBNKTEM  YtST  = NVCTEM+1 

24  13 

REF 

2 

LAST 

284 

4203 

0 5165 

0 

TC 

SUPCXCHZ 

CTCB  WITH  SUPF.RB1T  SWITCHING 

2414 

REF 

1 

41,3524 

SETLCC 

FNDRCWT  +1 

2414G5 

REF 

7 

LAST 

449  TO 

450  : 

54  852* 

COUNT* 

IT/PIN 

R2A1A12  BLANKCSP  BLANKS  DISPLAY  ACGORCING  TO  CPTICN  NLHBEP  IN  NVTFNP  AS  FCLLCWS 
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R Z « 1.  A 1 f 

-4 

FI  1 1 

BLANK 

, -? 

LFAVF  roCf 

, -2  LEAVE 

NCCE  ANC 

VERB,  • 

-1  BLANK  R-S 

ONLY 

2A1A19 

REF 

K 

LAST 

446 

41,3524 

6 4 757 

C 

Bl ANKDSF 

AO 

SEVEN 

7, 8,9, CP  10  (A  FAC  0,1,2,CR  3) 

241A22 

41 , 3525 

0 0104 

0 

INHINT 

2Al-!i25 

P.F9 

13 

LAST 

447 

41,3526 

54  124 

1 

TS 

rccE 

BLANK  SPECIFIEC  DSPTABS 

241429 

RFF 

20 

LAST 

25  ^ 

41,3527 

4 4 7 4 0 

1 

CS 

BI  T12 

241432 

pr.f 

14 

LAST 

455 

41 ,3530 

50  124 

0 

INCE> 

CODE 

241435 

REF 

2 1 

LAST 

44  7 

41,3531 

57'C22 

r 

XCF 

DSPTAB 

241439 

REF 

149 

LAST 

454 

41,3532 

10  OCC 

0 

CCS 

A 

2414^2 

RFF 

8 

1 AST 

447 

41,3533 

25' 015 

1 

INCR 

NCUT 

241445 

41,3534 

C 3535 

1 

TC 

+ 1 

241449 

RFF 

15 

LAST 

455 

41 , 3535 

10  124 

1 

CCS 

CODE 

241^52 

RFF 

1 

41,3536 

0 3526 

0 

TF 

BLANKCSF  +2 

241455 

41,3537 

C 000  3 

1 

RELINT 

24145<; 

REF 

2 

LAST 

454 

41 , 3540 

50  12  3 

1 

INDEX 

MVTEMP 

241462 

41 ,3541 

0 3546 

•0 

TC 

+ 5 

241465 

41,3542 

0 3 543 

c 

TC 

+ 1 

NVTEMF  FAS  -4  (NEVER  TCUCF  MCCREGl 

241469 

REF 

20 

1 AST 

45  1 

41 ,3543 

55 ' 000 

1 

TS 

VERBREG 

-3 

241472 

REF 

14 

LAST 

449 

41,3544 

c c 1 r ^ 1 

0 

TS 

NCUNRFG 

-2 

241475 

RFF 

12 

LAST 

429 

41, 3545 

55*01^ 

1 

TS 

C LPASS 

-1 

241479 

REF 

12 

LAST 

451 

41,3546 

4 4 3 60 

1 

CS 

VCl 

' 

241482 

REF 

57 

LAST 

454 

41,3547 

5 4 7 7 6 

c 

TS 

0 SrCCLNT 

241485 

REF 

4 

LAST 

450 

41 , 3 55.0 

0 4433 

1 

TC 

FLASFCFF 

PROTECT  AGAINST  INVISIELE  FLASF 

241489 

OFF 

1 . 

41  , 3551. 

0 3 5 74 

1 

TC 

ENTSFT  -2 

ZEROS  REGRET 

2415 

RFF 

2 

LAST 

5 5 

41,3552 

3 3 5 76 

c 

NV5LP  1 

CAE 

ENTSET 

IN  BANK 

2416 

rff 

6 

LAST 

441 

41  ,3553 

54  136 

1 

TS 

ENTPET 

SET  PETLRN  TO  NVSLBEND 

2416  1 

RFF 

•a 

LAST 

455 

4 1 , ’554 

1C  123 

c 

CCS 

N V T F N F 

WFAT  NCL« 

2416? 

41 , 3555 

0 3 56  1 

0 

TC 

+ 4 

NCFMAL  NVSUB  CALL  (EXECUTE  VN  CR  PASTE) 

2416? 

RFF 

19 

LAST 

4 16 

41  ,3556 

0 2353 

0 

TC 

GCOSFALM 

24164 

RFF 

2 

1 AST 

455 

41,3557 

0 3524 

1 

TC 

BLANKCSF 

BLANK  CISFLAY  AS  SPECIFIFC 

24165 

RFF 

20 

LAST 

455 

41 ,3560 

1 2’’ 5 3 

0 

TC 

GODSPALM 

2417 

RFF 

5 

LAST 

44  1 

41 , 3561 

3 6077 

1 

CAE 

LCH7 

241  8 

RFF 

4 

LAST 

455 

41,3562 

7 C 123 

0 

NASK 

NVTENF 

2419 

RCF 

212 

1 AST 

450 

41 ,3563 

54  L57 

0 

TS 

MPAC  +3 

TEMP  FOR  NCUN  (CANT  USE  MFAC.  CSPCECVN 

2420 

REF 

C 

LAST 

455 

41, ’564 

’ C 123 

1 

CA 

NVTENF 

LSES  MPAC  , M,  +2 

2422 

RFF 

5 

L AST 

44  1 

41 , 3565 

54  023 

1 

TS 

EDCP 

RIGHT  7 

2423 

REF 

6 

1 A ST 

455 

41 ,3566 

3 C02  3 

0 

CA 

ECCP 

2424 

RFF 

213 

LAST 

455 

41,3567 

54  16.0 

1 

TS 

RFAC  +4 

TEMP  FCR  VERB  (CANT  USE  MPAC+1.  CSPCECVN 

A242^ 

USES  MFAC,  +1,  +2). 

2426 

RFF 

2 14 

LAST 

455 

41 ,357C 

10  157 

0 

CCS 

MFAC  +3 

TEST  NCUN 

2427 

REF 

1 

4 1 , 3 57  1 

’ 3 57  7 

1 

TC 

NVSUB2 

IF  NCLN  NCT  +0,  GC  CN 

2428 

RFF 
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1 AST 

455 

41 ,3572 

’ 016) 

0 

CA 

MPAC  +4 

2479 

REF 

q 

LAST 

446 

41,3573 

C 234  1 

c 

TC 

UFOATVB  -1 

IF  NCUN  = +0,  CISPLAY  VERB  . THEN  RETURN 

24291 

RFF 

97 

LAST 

452 

41,3574 

3 4 7 55 

1 

CAF 
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ZERC  REGRET  SC  THAT  PASTFC  VERES  CAN 

24292 

REF 

14 

LAST 

45  1 

41,3575 

55*012 

1 

TS 

regret 

FE  EXECUTED  BY  CPERATCR. 

2430 

RFF 

2 

LAST 
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41 , ’576 

0 4202 

0 

ENTSET 

TC 

NVSL'BENC 

2431 

RFF 
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41,3577 
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1 

NVSUE2 

CCS 
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243? 
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0 
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+ 4 

IF  VERB  NOT  +C , GC  ON 
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2 17 
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41 , 36  '1 

’ C 1 5 7 

1 

CA 

MPAC  +3 
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EO  S4 

2A’4 

RFF 
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44  1 
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0 
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-1 

IF  VERB  = +0,  CISFLAY  NCUN.  THEN  BEURN 
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R2459  LnyinSTAT  +n  TNAC  T I VE  ( WA  I TI  NG  FTR  DATA).  SET  BY  ^VSle 
R246f  +1  FRCTEEC  NT  CATA.  SET  BY’S^ECIAL  VERB 

P 2 A A.  1 -1  TFRMNATE  SET  BY  SPECIAL  VEPE 

R2A62  -I  DATA  TN  SET  BY  END  OF  LCAC  RCLTUE 

R2463  OP  RESEQUENCE  SET  EY  VERB  32 
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L TC  ENCIOLF  (FIXED  FIXED) 

FPUTTNFS  that  REQUEST  LOADS  THROUGH  NVSUB  SHOLLC 

LSE  ENDIDLE  WHILE 
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waiting  for  the  pATA  TO  Bf  LCACEC.  ENCICLE  PUTS  CURRENT  JCP  TC  SLEEP. 
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R2A/4  FKOIPLF  ABORTS  (1>ITH  COCE  012C5  ) IF  A SECCNC  JOB  ATTEPPTS  Tp  GO  TC  SLEEP 
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CA 

L 

CCNT  SET  DSPLCCK  TC  1 SC  CAN 

USE 

2484 

REF 

4 

LAST 

3 71 

4213 

7 5C12 

0 

BASK 

L CW  10 

ENDIDLE  ViITH  NVSUB  INITIATED 

BCM  TOR. 

2485 

REF 

1 

42  14 

6 CC04 

0 

AD 

FBANK 

SANE  STRATEGY  FOR  CADR  AS  MAKECADR. 

2486 

RFF 

7 

LAST 

452 

42  15 

55'T41 

1 

TS 

C ADRSTOR 

2487 

RPF 

2 

LAST 

375 

4216 

0 5133 

0 

TC 

JCPSLEEP 

2488 

REF 

57 

LAST 

452 

4217 

C 5 1 5 

0 

ENDIN5T 

TC. 

ENDCFJCB 

2489 

REF 

8 

LAST 

457 

4220 

11 ' 041 

1 

ISCACR+C 

CCS 

C ADRSTpR 

ABCPTS  (CODE  C12C6) 

IF  CADRSTCP  NCT=  +C. 

2490 

RFF 

1 

4221 

0 4227 

1 

TC 

DSPABCPT 

RETURNS  IF  CACRSTCR 

= +0. 

2491 

RFF 

119 

LAST 

457 

4222 

0 0G02 

0 

TC 

0 

2492 

REF 

2 

LAST 

4 5 7 

4223 

0 4227 

1 

TC 

DSPABCRT 

2493 

fipp 

2 

LAST 

223 

4 2 24 

11*042 

1 

I ELI ST  + C 

CC  S 

0 SPL I ST 

ABCFTS  (CCCE  01206  ) 

IF  DSPL  1ST  NCT=  +0 . 

2494 

PFF 

3 

LAST 

457 

4225 

9 4227 

1 

TC 

USPABOPT 

RETURNS  IF  DSPLIST  ^ 

0 

0 

II 

2495 

pee 

120 

LAST 

4 57 

4226 

0 CC02 

c 

TC 

0 

2496 

PEE 

1 

4227 

0 5624 

1 

CSPABORT 

TC 

BAILOLT 

2497 

4230 

31206 

1 

CCT 

31206 

R2498 

J A MR  PM 

Al  LOWS 

PROGRAMS 

TC  PEPPCRM  THE 

TERM  NATE 

FLNCTICN. 

R 2499 

1 T 1 

DDES 

ENDCFJCB. 

2 500 

RRF 

■3 

LAST 

A 54 

4231 

3 4201 

-yr 

JANTERN 

CAE 

P INSUFBT 

2 5 '1 

4232 

0 0006 

1 

EXTEND 

2501  1 

REF 

6 

1 AST 

454 

4233 

01  C07 

1 

WRITE 

SUPERBNK 

25-'1  2 

pff 

2 

LAST 

21c 

42^4 

3 4242 

1 

CAE 

34CEC 

2 501  3 

PEF 

16 

LAST 

456 

4235 

55*012 

1 

TS 

RECRET 

LEAVE  ENTER  SET  FCR 

ENTFASS  ). 

2 50  2 

REF 

13 

1 AST 

455 

4236 

4 4360 

1 

cs 

V C 1 

2503 

REE 

58 

LAST  ■ 

^ 5 c 

4237 

54  776 

0 

T ' 

nSFCCLNT 

2504 

PFF 

32 

1 AST 

45  2 

4240 

0 4635 

0 

TC 

POSTJLMP 

2505 

REF 

2 

LAST 

4 10 

424  1 

6 1^4 

1 

CACR 

VBTEPM 

2 5C6 

4242 

0CC42 

1 

34CEC 

DEC 

34 

R2507 

R2508 

JAYDRCC  Al LEWS  PRCGPABS  TC  FEFFCRM  THE 
FUNCTinN.  IT  DOES  ENnCFJOB. 

PRCCEEC/PRCCEED 

WITHOUT  DATA 

2509 

REF  4 LAST  45?  4243  3 4201  0 

JAMPRCC  CAP 

P INSLPBT 
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2510 

25101 

25102 

REF 
' PFF 

7 

1 

1 AST 

657 

6266 

6265 

6266 

C CCC6 
01  ,30  7 
3 6256 

1 

1 

u 

EXTENC 
NR  ITE 
CAF 

SUPER8NK 

33DEC 

251  03 

R'-F 

17 

1 AST 

657 

6267 

55  "'12 

1 

IS 

REGRFT 

LEAVE  ENTER  SET  FCR  ENTFASSO. 

2511 

RFF’ 

16 

LAST 

657 

6250 

6 6360 

1 

CS 

VD  1 

2512 

PEF 

59 

LAST 

657 

625  1 

56  776 

c 

TS 

DSFCCLNT 

2513 

REF 

33 

LAST 

657 

6252 

0 6635 

c 

TC 

POST  JUMP 

2516 

REF 

5 

LAST 

65  1 

6253 

61676 

0 

CACR 

V EFRCC 

2515 

6256 

r>CC6  1 

1 

33CEC 

EEC 

33 

R2532 

plankslp 

BLANKS  ANY 

C^^'B1^AT1CN  CF  Rl, 

P 2 f P ^ • 

R 2533 

gall 

NITH  BLAN'KING  CODE  IN  A. 

P2536 

ei  T 1 

=1  BLANKS 

PI,  PIT?=1  PLANKS  R2,  BIT 

2=1  BLANK 

S F3. 

P2535 

AN  \ 

CCMBINATTON  OF  THESF  PITS 

IS  ACCFPTEC. 

R2536 

CSPCOUNT 

IS  RFSTCPED 

TO  STATE 

IT  NAS 

IN 

BEFORE  BLANKSLE 

WAS  EXECUTED. 

2538 

REF 

6 

1 AST 

655 

6255 

7 6757 

1 

8LANKSUB 

MASK 

seven 

2528  1 

REF 

6 

LA'^T 

655 

6256 

56  123 

0 

TS 

NVTFMP 

STORE  BLANKING  CODE  IN  NVTEMP. 

2539 

RFP 

62 

LAST 

656 

6257 

3 6736 

1 

CAF 

B I T16 

2 560 

PFF 

9 

LAST 

656 

6 260 

7 1020 

0 

MASK 

MCNSAVE 1 

external  mcmtcr  EIT 

2560  1 

RTF 

7 

LAST 

656 

626  1 

6 Kll 

0 

AD 

DSPLCCK 

2 56^2 

RFF 

15f) 

LAST 

655 

6262 

10  CCO 

c 

cc  s 

A 

2560:> 

RFF 

121 

LAST 

65  7 

6263 

0 0C02 

0 

TC. 

Q 

DSP  SVST  BLOCKED.  RET  TC  1+  CALLING 

LCC 

2 560  6 

R9F 

122 

LAST 

656 

6266 

26  CC2 

c 

INCR 

Q 

CSF  SVST  AVAILABLE 

A2561 

SET  RETLRN  FOR  2+  CALLING  LCC 

25611 

REF 

7 

LAST 

656 

6265 

10  123 

0 

CCS 

NVTEMP 

2561  2 

6266 

1 627C 

1 

TCP 

+ 2 

2561  2 

R-^F 

123 

LAST 

658 

6267 

0 00:32 

0 

Tf 

0 

NOTHING  TC  BLANK.  RET  TC  2 t CALLING 

LCC 

2562 

REF 

126 

LAST 

65F 

6 2 70 

22  CC2 

r 

LXCH 

Q 

SET  RETURN  FCR  2 + CALLING  LOG 

2 566 

PEF 

1 

627  1 

3 6 302 

1 

CAF 

BLNKBBNK 

2 565 

REF 

12 

LAST 

656 

6272 

56  006 

1 

XCH 

BBAMK 

2565  1 

6273 

C 0CG6 

1 

EXTEND 

25652 

REF 

8 

LAST 

656 

62  76 

06  007 

1 

ROR 

SUPERBNK 

SAVE  CLC  SUFEPBITS. 

2 566 

REF 

65 

LA'T 

615 

6275 

52  131 

0- 

CXCH 

PUF 

2 566  1 

REF 

■ 5 

LAST 

6 5 7 

6276 

3 62C1 

c 

CAF 

PI  NSLPBT 

2566? 

6277 

0 30  36 

1 

EXTEND 

25662 

REF 

9 

LAST 

65  6 

6300 

Cl  03  7 

1 

NiFITF 

SUPER ENK 

2567 

RFF 

1 

630  1 

0 3 5 50 

1 

TC 

B LNKSLBl 

2 568 

R9F 

60 

LAST 

65  6 

0776 

EBANK= 

DSPCOUNT 

2568  1 

RFF 

2 

LAST 

656 

6202 

6C  ICl 

1 

BLNKeENK 

eecc  N 

P L N K S L e 1 

2569 

6 313 

ENPBLFF 

EQUALS 

2550 

REF 

1 

60,3550 

SFTLCC 

ENCPELCS 

25505 

occt 

PFF 

8 LAST 

650  TO 

^ ^ - 

62  809* 

COUNT* 

$$/PIN 

2BBI  p'*F  61  1A9T  AE8  -AO, 3950  3 0776  1 BLNKSUSl  CA  DSPCOLNT  SAVE  CLP  DSFCCLNT  ECR  LATFF  RESTCPATICN 

25511  PEP  A6  LAST  656  60,3551  56  132  0 IS  PLF  +2 
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25512 

FEE 

23 

LAST 

650 

60  ,3552 

3 

6753 

1 

CAF 

BITl 

TEST  eiTl.  SEF  IF  PI  TC  EE  ELANKEC. 

2552 

P'"F 

1 

60,3553 

C 

3 5 72 

1 

TC 

TESTP  IT 

2553 

RFf 

12 

LAST 

662 

60,3556 

3 

6217 

c 

CAF 

RlDl 

? 5 

RFF 

6 

LAST 

62? 

60 ,3555 

0 

2535 

0 

TC 

5 B L A N K - 1 

2555 

REF 

25 

LAST 

636 

60,3556 

3 

6752 

0 

CAF 

BIT? 

TEST  eiT  2,  SEE  IF  R2  TO  BE  BLANKED. 

2556 

RTF 

2 

LAST 

659 

6.-),  3 55  7 

r 

3572 

1 

TC 

TESTBIT 

25*=7 

RFF 

c 

LA^T 

666 

60,3560 

3 

6320 

1 

CAF 

R2C1 

2558 

RFF 

5 

LAST 

659 

60,3561 

0 

2 5 3 5 

u 

TC 

5BL  ANK  -1 

2559 

RTF 

23 

LAST 

652 

60,3562 

3 

6751 

0 

CAF 

B IT3 

TEST  EIT2.  SEF  IF  R3  TC  BE  ELANKEC. 

2560 

RFF 

•3 

LAST 

659 

60, 3563 

0 

3 5 72 

1 

TC. 

TESTBIT 

2561 

RTF 

5 

last 

622 

A'l,  3 56  6 

3 

6 22  1 

r 

CAF 

R3D1 

2562 

RFF 

6 

LAST 

659 

60,3565 

0 

2 53  5 

(. 

TC 

5ELANK  -1 

2563 

REF 

67 

LAFT 

65F 

60, 3566 

3 

C132 

1 

CA 

BUF  +2 

RESTCRE  CSFCCLNT  TO  STATE  IT  FAC 

2566 

R = F 

62 

LAST 

65  8 

60, 3567 

56 

776 

c 

TS 

D SPCOLNT 

EEECRE  eiANKSUB. 

2565 

REF 

68 

LAST 

659 

60,3570 

52 

131 

0 

CXCF 

BUF 

CALL  L+2  directly. 

2566 

PEF 

3 

LAST 

6 5 6 

60,3571 

0 

5166 

c 

TC 

SLFDXCHZ  +1 

CTCB  MTF  SUFERBTT  SWITCHING 

2567 

RFF 

8 

LAST 

65R 

60,3572 

7 

0 123 

0 

TESTP  IT 

MASK 

NVTEMP 

NVTEMP  CCNTAINS  BLANKING  CCCE. 

2 568 

RFF 

151 

LAST 

65E 

6'0,3  5 72 

1C 

CCO 

0 

CCS 

A 

2569 

PFF 

125 

LAST 

656 

60,3576 

C 

000  2 

r 

TC 

Q 

IF  CURRENT  BIT  = I,  RETURN  TC  HI. 

257F 

REF 

126 

1 AST 

659 

6 1,3575 

SO 

00? 

0 

INDEX 

c 

IF  CURRENT  BIT  = C,  RETURN  TC  L+3. 

2571 

60,3576 

0 

0CC2 

c 

1C 

2 

2572 

60,3577 

ENCBSUP  1 

EQUALS 

R2572C5  DSPMM  DOES  MOT  OISPLAY  PCnPEG  DIPCCTLV.  I PUTS  IN  EXEC  RggUEST  WITH 
R257206  FPIO  3'7riGO  FOP  OSP^^'JB  AND  UPTURNS  TO  CALLFR. 

R2^72C7  PCDREG  CCNTATlijS  -0,  DSFNNJB  PLANkS  IFF  RQCE  LICFTS.  


R257?r<5  CSPWM  mlsT  BF  TM  BANK  27  CR  LCWFR,  SC  IT  CAN  BE  CALLFC  VIA  0ANKCALL. 


2572  1 
257215 
2572  17 

REF 

1 

17,2667 
06 ,2000 
•16, 2620 

BANK 

SETLCC 

BANK 

7 

P INBAl L6 

25721E 

REF 

1 

COUNT 

$ 1/PIN 

25722 

PEF 

127 

LAST 

659 

' 6 , 26  2F 

56  CC2 

f 

OSPYM 

XCH 

G 

25723 

RFF 

226 

LAST 

6 56 

06,2621 

56  156 

C 

TS 

MPAC 

2572  ^ 

06,2622 

C CC06 

0 

INHINT 

25725 

REF 

3 

LAST 

66C 

■06,2623 

3 6355 

C 

CAF 

CHRPR IC 

2 5726 

RTF 

6 

LAST 

640 

04,2626 

0 5072 

1 

TC 

MCVAC 

2 572  7 

PFF 

63 

LAST 

659 

0776 

EBANK= 

DSF-CCUNT 

2572P 

RTF 

1 

06,2625 

03  577 

1 

2CADR 

D SPMM JB 

25726 

RFC 

1 

■^6,2676 

60  10  1 

1 

2572E5 

06,2627 

C 0C03 

1 

RFL  INT 

25729 

REF 

225 

LAST 

659 

''6,2630 

0 C156 

1 

FNDSPMV 

TC 

MPAC 

R257B  nSFPN  FLACC  NAJCF  NCCF  CCQE  IMTC  NCCREG 
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25735 

REF. 

1 

40,3677 

SETLOC 

ENOBSLB 1 

25736 

PFF 

9 

LAST 

458  TC 

459  : 

23  832* 

CCUKT* 

$}/PIN 

2574 

REF 

1 

4 3577 

2 4262 

1 

DSPMM JR  CAP 

MDl 

GETS  HERE  THRU  CSFMM 

2575 

RFF 

6A 

LAST 

459 

4^,36TC 

56  776 

1 

XCH 

CSPCOUNT 

2576 

OFF 

I 

40,2601 

54  140 

r 

TS 

DSFMNTFN 

SAVE  [SFCCUNT 

2579 

REP 

7 

LAST 

264 

43,  ’6  )2 

11  '010 

0 

CCS 

MCOREG 

25EO 

RFF 

56 

LAST 

4 54 

40,3623 

6 475  1 

1 

AC 

CNF 

2580  1 

PFF 

4 

LAST 

445 

40,3604 

0 2342 

1 

TC 

DSPDECVN . 

IF  MCCREG  IS  + CP  +0,  CISFLAY  MODREG 

25802 

4 j ,36  )5 

0 3 607 

0 

TC 

+ 2 

IF  MCCREG  IS  -NZ,  DC  NCTHING 

2 5 802 

REF 

6 

LAST 

449 

40,3606 

F 2 60  1 

1 

TC 

2 BL  ANK 

IF  MCDPFG  IS  -C,  BLANK  MM 

2581 

REF 

2 

LA9T 

460 

40,3607 

56  14  i 

1 

xr  H 

D SPMMTE  M 

RFSTCPE  CSFCCLNT 

2582 

RFF 

65 

L AFT 

460 

40  ,3610 

54  776 

0 

TS 

DSPCOUNT 

2583 

PFF 

58 

LAST 

457 

40,3611 

0 515  5 

0 

TC 

ENDOF JOB 

R25P4 

RFC  ALTST 

IS  ENTERFC 

E IRFCTLY 

AFTER  DATA 

IS  LCACFD  (CR  RESEQUENCE  VERB 

I S 

P 2 5 8 5 

F XEC  LTED  ) , .‘TERMI  NATE 

VERB  IS 

FXFCLTFD 

f 

CR  FPCGEEC  WITHOUT  CATA  VERB  IS 

R25P6  EXFCUTEC.  n WAKES  UP  J('B  THAT  DIO  TC  ENCITLE. 


R?Eg7  IP  CAEPSTCP  N0T=  -^0  , IT  PUTS  tO  IMC  CSPLCCK,  AKC  TURNS  OFF  KEY  RISE 
R2588  LIGHT  IP  DSPLIST  IS  FVPTv  (LEAVES  KEY  RLSF  LIGHT  ALCNE  IF  NOT  EMPTY). 


2589 

REF 

9 

1 AST 

457 

40,2612 

11*041 

1 

RECALTST 

CC  S 

C ADR  SICR 

2 590 

RFF 

1 

40,2613 

0 3615 

C 

TC 

RFCAL  1 

2591 

cep 

59 

LAST 

46C 

40,3614 

0 5155 

r 

TC 

FNDCF JCP 

NCPMAL  EXIT  IF  KEYBOARC  INITIATED 

2 59  2 

RFF 

99 

LAST 

456 

40  ,3615 

3 4755 

1 

RF  cal  1 

CAF 

ZERO 

2593 

RFF 

10 

LA  ST 

46C 

40,361 6 

57*041 

0 

XCH 

c adrstgp 

2594 

40,2617 

f.  CC0  4 

n 

TNHIM 

2595 

REF 

3 

LAST 

375 

40,3620 

0 5137 

1 

TC 

JOBWAKE 

2596 

REF 

4 

LAST 

456 

40,3621 

11*012 

C 

CC  S 

lcadstat 

2597 

RFF 

1 

40,3622 

0 3644 

1 

TC 

DC  PROF 

+ PROCEED  WITHCUT  CATA 

2598 

RFF 

60 

LAST 

460 

40,2623 

0 5155 

0 

TC 

ENrCFJCP 

PATHALCG  ICAL  CASE  EXIT 

2599 

PEF 

1 

40, 2624 

0 3642 

1 

TC 

DCTERM 

TERMINATE 

266  0 

REF 

31 

LAST 

447 

4 1,3625 

3 4752 

0 

CAF 

TWO 

-0  DATA  IN  CR  PESECUENCE 

2601 

REF 

2 

LAST 

372 

40,3626 

50  064 

0 

RFGAL2 

iNcex 

LCCCTR 

2602 

RFF 

3 

LAST 

372 

40,3627 

6 :1164 

1 

AD 

LCC 

LCC  IS  + FCR  EASIC  JOBS 

26C3 

RFF 

■3 

1 AST 

460 

40,3630 

50  064 

0 

INCEX 

1.  CCCTR 

2604 

REF 

4 

LAST 

460 

40, 3631 

54  164 

c 

IS 

LCC 

26041 

REF 

15 

LAST 

.4  5 5 

40, 3632 

3 1001 

1 

CA 

NCUNREG 

SAVE  VERB  IN  MFAC,  NCLN  IN  MPAC+1  AT 

26042 

REF 

6C 

LAST 

457 

40 , 3633 

54  001 

1 

TS 

L 

TIME  CF  RESPONSE  TO  ENCIDIE  FCR 

26043 

RFF 

2 1 

LAST 

^ C C 

40 , 3634 

3 1000 

0 

CA 

VEPPPEG 

FCSSIBLF  LATFR  TESTING  EY  JCE  THAT  HAS 

26044 

RFF 

4 

LAST 

460 

40 ,3635 

50  364 

INCEX 

LCrCTR 

BEEN  V>AKED  UP. 

26C45 

RFF 

226 

LAST 

459 

4^  ,3636 

52  155 

1 

CXCH 

Mf  AC 

2605 

4 1,3637 

0 C0C2 

1 

REl  IM 

2606 

RFF 

9 

1 AST 

452 

40,3640 

0 445  7 

n 

RECAL3 

TC 

RFl DSP 

2607 

RFF 

6 1 

LAST 

460 

40,3641 

0 5 15  5 

C 

TC 

ENCCF JFB 

26TR 

pep 

100 

LAST 

460 

40,3642 

3 4755 

1 

DCTFRM 

CAF 

ZERO 

2609 

RFF 

1 

4G  ,3643 

0 3626 

0 

TC 

RFC AL2 
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2610  P£F  57  I AST  460 

2611  REF  2 LAST  4fC 


40,i644  3 4753  1 HCPRCC 
40,3645  0 3626  0 


C AF 
TC 


ONE 

PECAL2 
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P26I2  '^ISCELL  ANTOL'S  SERVICE  ROLTIN'FS  IN  FIXEn/FI>'=C 
2613  R FF  1 4 3 "1 3 SETLOC  ENCBLFF 


26135  PEE  5 LAST  AF6  tq  abb;  63  111* CCUNT*  tS/PINJ 

R2614  SETNICACR  E CACP  APPTVF.S  IN  A.  IT  IS  STCRFC  IN  NCLNCADR.  EBANK  BITS 

R2616  are  Sr^.  E AFRES  IS  CEPIVEE  AN  E PUT  INTO  MOUMADD. 


2616 
261  7 
26  18 

RFF 

PFF 

REF 

8 

13 

2 

LA  ST 
LAST 
LAST 

A 42 
389 
192 

4303 

4304 

4305 

55'016 
54  003 
7 4357 

C 

f) 

0 

SETKCADP  ts 
TS 

NAS  K 

NCUNC  ACR 

EBANK 

LCW8 

STCPE  ECACP 
SET  EBANK  BITS 

2619 

REF 

1 

4306 

6 50''? 

C 

AD 

0CT14D0 

262P 

DEE 

29 

LAST 

437 

43  )7 

54  145 

0 

TS 

MGUNADO 

PLT 

F 

ACRES  INTC  NCLNACC 

262  1 

REE 
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CYR 

2 640 

PER 

12 

LAST 

4 6 2 

4327 

56  020 

0 

XCH 

C YR 

2641 

RFF 

1 3C 

LAST 

462 

4330 

0 000  2 

c 

TC 

Q 

2642 

RFF 

13 

LAST 

446 

433  1 

54  G22 

c 

LEF75 

TS 

CYL 

2 643 

REF 

14 

LAST 

46  2 

4332 

4 0022 

c 

CS 

C YL 

2644 

Rff 

1 = 

LAST 

46? 

4333 

4 CC22 

0 

CS 

CYL 

2645 

REF 

16 

LAST 

4 6 2 

4334 

4 CC22 

c 

CS 

CYl 

2 646 

PFF 

17 

LAST 

462 

4335 

4 0022 

0 

CS 

CYL 

r.JP;  PrVISIPN  116  CF  A GC  PPCGPA^  LUMINARV  BV  NASA  2021112-C71 


I9;0q  4LC-.  11,1969  LPr'CN/i  ID  .099  P/iC-E  ^63 


L 

PINBALL 

GAME 

BUTT^^s 

ALC  LIGFTS 

LSER'S  PAGE  NO. 

73 

EC  S4 

26A7 

RFF 

18 

LAST 

46? 

4336 

56 

C22 

1 

XCH 

CVL 

2648 

RTF 

151 

LAS'^ 

46  2 

4337 

0 

0002 

0 

Tf 

Q 

2649 

434C‘ 

6 

0 1 Ti 

1 SLEFT5 

CCUBLE 

2 6 50 

4 34  1 

6 

CQQO 

1 

DOLBLF 

2651 

4342 

6 

0 X)  3 

1 

rOUBLE 

26  52 

4343 

6 

croo 

1 

CCUBLE 

2655 

4344 

6 

coco 

1 

DOUBLE 

2654 

PFF 

122 

LAST 

463 

4345 

0 

0002 

0 

TC 

C 

2655 

4346 

00C37 

0 

LCV\5 

CCT 

37 

THESE  3 CONSTANTS  FORM  A FACKEC  TABLE. 

2656 

4347 

01740 

C 

M 1C5 

OCT 

1740 

CCNT  SEPARATE. 

2657 

435C 

76CCC 

0 

HI5 

CCT 

76000 

MUST  STAY  FERE 

2658 

REF 

7 

LAST 

459 

435  1 

Cl  5072 

1 

TCNOVAC 

TC 

NCVAC 

2 659 

REP 

17 

LAST 

440 

4352 

C 5203 

0 

TCV(A  IT 

TC 

WAITLIST 

2660 

REF 

13 

LAST 

44C 

4352 

C 5 2 6 1 

1 

TCTSKCVR 

TC 

TASKCVER 

2661 

POP 

16 

LAST 

385 

4354 

0 5 105 

0 

TCF  INCVC 

TC 

FIND  VAC 

2662 

4 355 

3C000 

1 

CHPPF 1C 

CCT 

3 0000 

EXEC  FRICRITY  of  CHARIN 

2663 

4356 

0 3777 

C 

com 

CCT 

3777 

2664 

RPF 

6 LART  431 

4356 

E12-1 

EQUALS 

LCWl  1 

2665 

4357 

CC3  7 7 

1 

LCN8 

CCT 

377 

2667 

4360 

00023 

0 

VCl 

CCT 

23 

THESE  3 CCNSTANTS  FCRM  A FACKEC  TABLE. 

2668 

4361 

00021 

1 

NEl 

CCT 

21 

CCNT  SEPARATE. 

2669 

4362 

OOC25 

c 

WCI 

CCT 

25 

26  7C 

4363 

00012 

1 

e INCON 

CEC 

1C 

2671 

REF 

19 

last 

A ^ 6 

4364 

3 4745 

c 

FALTCN 

CA 

Rl^T 

TURN  CN  CPERATCR  ERROR  LICHT 

2672 

4365 

0 0006 

1 

EXTEND 

2673 

REF 

12 

LAST 

4 52 

4 366 

05  Oil 

1 

WOR 

DSALMOUT 

BIT  7 OF  CHANNEL  11 

2674 

OFF 

1 33 

LA-  ST 

463 

4367 

C C0C2 

0 

TC 

c 

2675 

RPF 

20 

LAST 

463 

437l 

4 4745 

1 

FALTCF 

CS 

BIT7 

TURN  CFF  OPPRATCF  ERRCR  LIGHT 

2676 

4371 

0 0016 

1 

EXTENT 

2677 

REF 

13 

LAST 

463 

4372 

C3  Cll 

1 

V>ANT 

DSALMCLT 

EIT  7 CF  channel  11 

2678 

REP 

134 

LAST 

463 

4 3 73 

C 00  12 

0 

TC 

Q 

2679 

REF 

24 

LAST 

44  9 

4374 

3 4747 

1 

RELCSFCN 

CAE 

e IT5 

TURN  CN  KEY  RELEASE  LIGHT 

2680 

4 37  5 

0 0006 

1 

EXTEND 

26  61 

RPP 

14 

LAST 

463 

4376 

05  Oil 

1 

WOR 

DSALMCUT 

BIT  5 CF  CHANNEL  1 1 

2682 

REF 

135 

LA  ST 

463 

4377 

C 0CC2 

c 

TC 

c 

G AP:  RFVISIDN  116  TF  f G>~  PPCG«A«>  LLNIN/>FV  EV  ^aSj5  20211  12-071 I9tn9  AUG.  11,1969  LEMQNAID.Cq9  PAGE 


L 

PINFALL 

GAME 

suttcns 

ANP  LIGHTS 

USFR' S PAGE  AG.  74 

EO  S4 

2e  f3 

4400 

C 0006 

1 

LCCSAMPT  EXTEHC 

2684 

REF  12 

• LAST 

36  7 

44  ) 1 

3 002  5 

C 

DC  A 

T TMF2 

2685 

Rf^F  5 

LAST 

316 

44  12 

5 2 >14 

0 

DXCH 

SAMPTIME 

2666 

RFF  126 

LAST 

463 

4403 

0 QC02 

0 

TC 

C 

2687 

2666 

2669 

REF 

RFF 

227 

228 

LAST 

LAST 

460 

464 

44''.4 

4405 

4406 

0 0006 
3 3156 
20  156 

1 TPSLl 
0 
1 

EXTEND 

CCA 

DAS 

MPAC 

meat 

+ 1 
+ 1 

SHIFTS  MAC,  +1,  +2  LEFT  1 

LFAVES  rVFIND  SET  TC  + /-  1 FCS  CF/LF 

2690 

Rcp 

229 

LAST 

464 

44  17 

6 0 154 

1 

AD 

MPAC 

269  ] 

RPF 

230 

LAST 

46A 

44  10 

26  154 

0 

ACS 

MPAC 

2692 

4411 

54  C07 

1 

TS 

7 

TS  A CCES  ACT  CHAAGF  A CN  OF/LF. 

2693 

PEF 

137 

LAST 

464 

4412 

•3  03  )2 

0 

TC 

Q 

AC  NET  CF/LF 

2694 

REF 

7 

LAST 

436 

4413 

54  16? 

0 

TS 

M FAC  + 6 

MPAC  +6  SET  TC  +/-1  FOR  PF/LF 

2695 

RPF 

1 38 

LAST 

46  4 

4414 

C CC02 

c 

TC 

Q 

R2696 

IF 

MPAC  , 

<•1  ARE  EACH 

+ AZ  CR 

+0  AAC  C(A)=-0 

, SHCPTMP 

WRONGLY  GIVES  -tC. 

R2697 

IF 

MPAC, 

+ 1 AP 

E EACH 

-NZ  OR 

-C  AND  C(A)=+r 

, SHCRTMP 

WFCAGLY  GIVES  +0. 

R2698 

pp<:HPT^F 

FIXES 

FT  PST 

CASF  ONLY,  BY  MERELY 

TESTING  CIA)  AND  IF  IT  = -0, 

R2699 

SFTTI AG 

RFSULT 

TC  -0. 

R270D 

(CC  AlCT 

USE  PRSHRTMP 

UNLESS 

MPAC,  +1 

ARE 

EACH  +AZ  C 

R +0,  AS  THEY  AFE 

R27C1 

AHEA  THEY  CONTAIN  TH 

E SF  CCASTAATS. 

) 

27C2 

PEF 

2 

LAST 

9 7 

44  15 

54  135 

1 PPSHRTMF  TS 

MFTEMF 

2703 

FEE 

152 

LAST 

459 

44  16 

10  000 

C 

CCS 

A 

2 7C4 

PFF 

3 

LAST 

4417 

3 0135 

0 

CA 

MPTEMF 

CIA) 

+,  CO  REGULAR 

SHCRTMP 

2705 

REF 

6 

LAST 

443 

4420 

1 7213 

f 

TCF 

SHCRTMP  +1 

CIA) 

+0,  CC  REGULAR 

SHCRTMP 

2 706 

4421 

1 4417 

0 

TCP 

-2 

CIA) 

-,  CC  REGLLAR 

SHCFTMF 

2707 

RFF 

101 

LAST 

46C 

4422 

4 4755 

0 

CS 

ZERO 

CIA) 

-0,  FORCE  RESULT  TC  -G  ANC  RETLRN. 

2708 

REF 

22  1 

LAST 

464 

4422 

54  154 

c 

TS 

MPAC 

2709 

RFF 

232 

LAST 

464 

. 4424 

54  155 

1 

TS 

MPAC  +1 

2710 

REF 

223 

LAST 

464 

4425 

54  156 

1 

TS 

MPAC  +2 

271 1 

REF 

139 

LAST 

4 6 4 

4426 

0 0002 

0 

TC 

Q 

2712 

RFF  36 

1 AST 

327 

4427 

3 4 746 

r 

FLASHCN  CAP 

BIT6 

TLPN  CN  V/N  FLASH 

2713 

4430 

0 C0C6 

1 

EXTEND 

BIT  6 OF  CHANNEL  11 

2714 

REF  15 

1 AST 

463 

443  1 

■15  311 

1 

WPR 

OSALMCUT 

2715  RFF  lAO  LAST  A6A  4A32  0 C002  0 TC  C 


2 716 

1 AST 

A 6 A 

4432 

4 4 74  6 

1 

FLASHCFF  CS 

BIT6 

TURN  CFF 

v/A  flash 

2717 

4434 

',)  000  6 

1 

EXTEND 

2718 

REF  16 

LAST 

464 

4435 

C2  Cll 

1 

WAAC 

OSALMCLT 

EIT  6 CF 

CHANNEL  11 

PEF  lAl  LAST  46A 


271  9 


4436  C 0002  0 


Tr 


r,flp;  FFVISTnN  116  CP  AGC  FRCGRAV  LL'MIM/iRY  3>  NASA  2C  2 1 1 1 2-(,!  7 1 


19-.C9  flUG.  11,1969  LE^'C^Mt:.099  FOCE  ‘='^5 


PINB4LL  GAMP  BLITCN'  ANB  LIGKTS  LSFP'S  PAGE  NO.  75  EC  SA 


P2720 

INTERNAL  LSE  OF  KEYBOARD  AND  DISPLAY  PRCGFAV 

R2721 

USER  NLST  SCHFGULF  CALLS  T C NVSUB  SC  THAT  THERE  IS  NO  CONFLICT  OF  LEE  CP 

P 2722 
P2723 
R2  72A 

CnNFLSIGN  TO  OPERATOR.  THE  CID  GRARLCCK  ( I NT E P N A L / 1 N T E PN AL  INTERLCCK) 

HAS  BEEN  REMOVED  AND  THR  INTERNAL  LSER  NO  LONGER  HAS  THE  FRCTFCTICN  THIS 
OFFEREO. 

P2725 

R2726 

ThERF  /'PE  TWO  WAYS  A JOB  CAN  BE  PLT  TC  SLEEP  EV  THE  KEYBCARO  + CISFIAY 
FRCGRAR.  11  PY  FNCIDLE 

R2727 
R272B 
R2  729 

2)  BY  NVSLBLSY 

THE  BASIC  CONVENTION  IS  THAT  CNLY  CNE  JCB  WILL  BE  PFRNITTED  ASLFEF  UA 
THF  keyboard. + DISPLAY  PRQGRAH  AT  A TIME.  IF  A JOB  ATTEMPTS  TO  GO  TC 

P273C 

R2731 

SLFFP  BY  MEANS  OF  (1)  OR  (2)  AND  THERE  IS  ALREADY  A JCE  ASLEEP  THAT  WAS 
PUT  TO  SLFFP  BY  (1)  CR  (2),  THEN  AN  ABORT  IS  CALSED. 

R2  732 
R273? 

THE  calling  sfcl'fnce  fcp  nvsue  is 

CAF  V/N 

R2  73A 
R2735 
R27^6 

L TC  AVSIJB 

LHI  PETLPN  herf  if  OFERATCP  HAS  INTERVENED 

L+2  RETURN  HERE  AFTER  EXECLTION 

R2  737 

A ROUTINE  CALLED  NVSUBUSY  IS  FRCVIDED  (USE  IS  OPTIONAL)  TC  PLT 

R2738 

R2739 

R27A0 

YOUR  JOB  TO  SLFFP  UNTIL  THE  CFERATCP  RELEASES  THF  KfyECARD  + DISPLAY 
system.  NVSUBUSY  Al'SC  TURNS  ON  THE  KEY  RELEASE  LIGHT. 

NVSLBLSY  CANNOT  BE  CALLED  frcn  ERASAELE  CR  F/ F MEMORY, 

P 27A1 

SINCF  JOBSLEFP  AND  JOBWAKF  CAN  HANDLE  CNLY  FIXED  BANKS. 

R27A2 
R 27A^ 
P27AA 

P 27A5 

THE  CALLING  SECUFNCE  IS 
CAF  WAKffCAOR 

TC  NVSUBUSY 

• 

R27AA 

NVSUBUSY  IS  INTENDED  FOR  USE  WHEN  AN  INTERNAL  PPCGPAN  FINDS  THE  DFEPATCR 

R2  7A7 
R 2 7 A £ 
R27AP 

IS  USING  THF  kEYBDAR.D  + DISPLAY  PROGRAM  (BY  HIS  OWN  INITIATION).  IT  IS 
NOT  INTENDED  FOR  USE  WHFN  CNF  T^TFF^a|.  FPCGPA^  FINDS  ANCTHER  INTERNAL 
PRCC-RAM  USING  THF  KEYBOARD  + DISPLAY  PROGRAM. 

R275C 

NVSLBLSY  ABCRTS  (WITH  CCCE  012J6)  IF  A SECOND  JCE  ATTEMPTS  TC  GO  TC 

R275\ 
R27S2 
R 2753 

SLEEP  IN  PINBAL(..  IN  PAPTTCLLAR,  IF  AN  ATTEMPT  IS  MACE  TC  GC  TC  NVSLBUSY 
whfn 

1)  DSFLIST  NOT=  fC.  THIS  I -S  THF  CASE  WHERE  THE  CAPACITY  CF  THE  CSPLIST 

R275A 

R2755 

IS  EXCEEDED. 

2)  CACFSTCR  NCT=  ♦() . THIS  INDICATES  THAT  A JCE  IS  ALREADY  LSING 
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C S P.L  I S T 

2799 

PEF 

4 

LAST 

460 

4472 

0 5137 

1 

TC 

JCBWAKE 

2800 

4473 

0 0003 

1 

RFLDS  F2 

RFL INT 

28  11 

REF 

25 

LAST 

463 

4474 

4 4747 

c 

CS 

B I T5 

TURN  CFF  KEY  RELEASE  LIGHT 

28C2 

4475 

0 0106 

1 

EXTEND 

(BIT  5 CF  CHANNEL  11 ) 

28'^3 

REF 

17 

LAST 

464 

44  76 

03  Oil 

1 

IaANO 

DSALPCUT 

2 8- >4 

RFF 

113 

LAST 

A67 

44  7 7 

3 4755 

1 

CAF 

ZEF.C 

28'^5 

REF 

c 

LAST 

466 

4500 

55*011 

1 

TS 

OSPLCCK 

28n7 

RFF 

2 

LAST 

466 

4501 

0 C 144 

c 

TC 

RELRFT 

2808 

RCF 

145 

LAST 

466 

4502 

56  002 

0 

RELDSPl 

XCF 

Q 

SET  OSFLCCK  TC  +0.  NC  CSFLIST  SEAPCF. 

2 80  9 

REF 

LAST 

467 

45('3 

54  14  4 

1 

TS 

RELRET 

TURN  KEY  RLSE  LIGHT  OFF  IF  CSPLIST  IS 

A2  81^'> 

EPFTY.  LEAVE  KEY  PLSF  LIGHT  ALCNE  IF 

A 2 8 1 1 

OSPLI ST  IS  NO!  EMPTY. 

281  2 

P^F 

6 

LAST 

467 

4504 

11*042 

1 

CCS 

DSFLIST 

2813 

4505 

0 4517 

1 

TC 

+ 2 

+ NOT  EMPTY.  LEAVE  KEY  RLSE  LIGHT  ALCNE 

2814 

PFF 

2 

LAST 

467 

4 506 

0 4473 

0 

TC 

RELDSP2 

+0  empty.  TLRN  CFF  KEY  RLSE  LIGHT 

2815 

PFF 

13R 

LAST 

467 

4 50  7 

3 4755 

1 

CAF 

ZERC 

- NCT  empty,  leave  KEY  RLSE  LIGHT  ALONE 

2816 

REF 

VO 

LAST 

467 

4510 

55  ' 111 

1 

TS 

DSPLOCK 

2817 

RFF 

4 

LAST 

4 6 7 

451  1 

C 014  4 

0 

TC 

RELRFT 

2818 


A512 


ENDPINBF  EOLALS 
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P2619 

R2820 

VBT  = 
GEF 

TL76 

TFF 

TURNS  ON  Al 
CAUTION  ANT 

L niSPLAY  FAAFL  LIGHTS.  AFTER 
STATUS  LIGHTS. 

5 SEC, 

, IT  TURN'S 

2B21 

RPF 

1 

41,^621 

SETLCC 

FNDNVSBl  +1 

28215 

RFF 

8 

LAST 

4 54  TO 

456: 

61  912* 

CCLNT* 

$$/FI  N 

2822 

41,3621 

0 00  14 

0 

VBTSTLTS 

INHINT 

28222 

RPF 

•L5 

LAST 

449 

41 ,3622 

C 4616 

1 

TO 

RANKCALL 

OPP  ERR  IF  NCT  IN  PrC 

2822A 

PPF 

6 

LAST 

29  1 

41,2622 

6 6 117 

C 

CACR 

CHKPCCH 

2823 

R8F 

24 

LAST 

459 

41 ,3624 

4 4753 

0 

CS 

BITl 

SET  BIT  1 FF  I»<CDES33  SC  IPLPCN  WCNT 

282A 

RFF 

19 

LAST 

222 

41, ’625 

7 13fC 

1 

PAS  t< 

I NCDES33 

TURN  CUT  ANY  LAPPS. 

2825 

8EF 

25 

1 AST 

469 

41 , 3626 

6 4752 

1 

AD 

B I’  1 

2 62  6 

REF 

20 

LAST 

46  9 

41 , 2627 

55' 300 

1 

TS 

IPCOES33 

2827 

RFF 

1 

41 , 3630 

3 3667 

0 

OAF 

TSTCCM 

TURN  CN  UPLINK  ACTIVITY,  TEPP,  KEY  RLSE, 

2828 

41 , 3631 

0 0006 

1 

EXTEND 

V/N  FLASH,  CPEPATCR  EFFCR. 

2829 

REF 

18 

LAST 

467 

41 ,3632 

05  Oil 

1 

WCR 

DSALPCUT 

2830 

RFF 

1 

41 , 3633 

3 3 670 

0 

OAF 

TSTCCN2 

TURN  CN  NO  ATT,  GIPBAL  LOCK,  TRACKER,, 

2831 

orjr 

27 

L AST 

455 

41 ,3634 

55*035 

1 

TS 

DSPTAB  +11D 

FPCG  ALP. 

2831  1 

RRF 

1 

41,2625 

r 6C22 

1 

TC 

C13STAL  L 

2832 

RFF 

21 

LAST 

419 

41,2626 

2 4 ?42 

1 

CAF 

BITIO 

TLRN  CN  TEST  ALARP  CU'*’E  IT 

2833 

41,3637 

0 0006 

1 

EXTEND 

2834 

REF 

5 

LAST 

22  1 

41,2640 

C5  C13 

0 

^CP 

C H A N 1 3 

2835 

PER 

5 

LAST 

40  1 

41,364  1 

3 43  63 

0 

CAF 

TEN 

2836 

Rr-F 

! 

41 ,3642 

54  117 

1 

TSTLTSl 

TS 

FRONT 

2837 

RTF 

1 

41,3642 

4 366  5 

c 

CS 

F L 1.  L D S P 

2838 

RFF 

2 

LA9T 

469 

41 ,3644 

5 0 117 

0 

INDEX 

FRONT 

2839 

RFF 

28 

1 A 'S  T 

469 

41 ,3645 

55*022 

1 

TS 

nSFTAe 

2 840 

RFF 

3 

LAST 

469 

41,3646 

1)  117 

1 

CC  S 

ERCNT 

2 641 

RFF 

1 

41 ,3647 

n 3642 

1 

TO 

TSTLTSl 

2842 

PFF 

1 

41,2650 

4 2 6 6 6 

c 

CS 

FU  LDSFl 

2843 

RFF 

29 

LAST 

469 

41 ,2651 

55  *C23 

r 

TS 

DSPTAR  +1 

TURN  CN  3 PLUS  SIGNS 

2844 

OFF 

31 

1 AST 

46  9 

41 ,2652 

55*026 

0 

TS 

DSPTAR  +4 

2845 

PFF 

^1 

LAST 

46C 

41,3653 

55  *C3C 

1 

TS 

nSFTAB  +6 

2 646 

R^'F 

1 

41  , 3654 

3 4760 

1 

CAF 

ELEVEN 

2647 

REF 

9 

. LAST 

^ 5 

41 ,3b55 

55*015 

0 

TS 

NCUT 

2848 

41 , 2656 

C fO03 

1 

RFL  INT 

2 64C 

REF 

1 

41 , 3657 

3 3672 

1 

CAF 

SHDLTS 

2850 

, ’66C 

C 0004 

c 

INHINT 

2851 

RFF 

18 

1.  AST 

462 

41,3661 

0 5203 

0 

TC 

WAITLIST 

28  = 2 

REF 

22 

LAST 

46  9 

1022 

EBANK= 

DSPTAE 

2853 

PFF 

1 

4 1 , 2662 

03673 

0 

2CADR 

T STLT  S2 

2853 

RF=F 

1 

41 ,3663 

62  102 

0 

2854 

RFF 

6 2 

LAST 

46C 

41 ,3664 

0 5 155 

0 

TC 

FNDCFJOe 

CSFLOCK  IS  LEFT  BUSY  (PROP  KEYBOARD 

A28S5 

ACTICM  LNTIL  TSTLTS3  TC  INSURE  THAT 

A2  656 

LIGHTS  TEST  WILL  BE  SEEN. 

2857 

41,2665 

C5675  0 

FLLLCSP 

OCT 

0 8675 

DISPLAY 

all 

8:S 

2858 

■ 41 , 3666 

07675  1 

FULLOSP  1 

CCT 

07675 

DISPLAY 

ALL 

8:S  AND  + 
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2899 
A2860 
A 2 8 A 1 

41,^667 

00  175 

1 

TSTCCM 

CCT 

00175 

LPLINK  ACTIVITY,  TEPF,  KEY  R LS E , 

v/N  flasf,  operatcr  error. 

2862 

41,2670 

4 C 6 7 4 

0 

TSTCCN2 

OCT 

4C674 

CSFTae  + llC  BITS  3, 4, 5, 6, 8, 9.  LR  CITES, 

A2  E63 

NO  ATT,  GINBAL  LOCK,  TRACKER,  PROG  ALN. 

2E64 

41,2671 

0C115 

1 

TSTOC  NT 

CCT 

00115 

CFAN  11  BITS  1,  2,  4,  7. 

A2865 

UPLINK  ACTIVITY,  TEMP,  CFERATCR  EFRCP. 

2E66 

41,3672 

CO  76  4 

1 

SFCLTS 

CCT 

764 

5 SEC 

P867 

REF 

4 

LAST 

c c 

41,2672 

3 4355 

C 

T S T L T S 2 

CAF 

CFPFF  IC 

CALLEC  BY  WA  ITL  1ST 

2 868 

REF 

8 

LAST 

46,3 

41 ,3674 

n 5072 

1 

TC 

NCVAC. 

2869 

R PF 

*3  O 

LAST 

469 

1022 

E8ANK= 

csftae 

2 87  7 

REF 

1 

41,3675 

0370C 

0 

2CAOR 

T STLT  S3 

2870 

REF 

1 

A1 ,3676 

62102 

n 

2871 

RFF 

14 

LAST 

A6  3 

41,2677 

C 526  1 

1 

TC 

TASKCVER 

2872 

2873 

2874 

REF 

1 

41,3700 
41 ,37C1 
41,3702 

4 3671 
0 0004 
0 0006 

0 

0 

1 

TSTLTS3  CS 

INFINT 

EXTEND 

TSTC0N3 

CALLED  BY  EXECUTIVE 

TURN  CFF  UPLINK  ACTIVITY,  TEPP, 

2 875 

REF 

19 

LAST 

469 

41 ,3703 

03  on 

1 

WANE 

DSALMOUT 

OPERATCR  EPRCP. 

2875  1 

REF 

2 

LAST 

469 

41  ,3  704 

0 6022 

1 

TC 

C13STALL 

2876 

RFF 

22 

LAST 

469 

41,3705 

4 4742 

0 

CS 

BI710 

TURN  CFF  TEST  ALARM  OUTSIT 

2 877 

41  ,3706 

0 0006 

1 

EXTEND 

2878 

REF 

6 

LAST 

46  9 

41, 2707 

02  013 

r 

RAND 

CHAM3 

28781 

REF 

21 

LAST 

33  2 

41,3710 

3 4750 

1 

CAF 

B IT4 

WAKE  NO  ATT  FCLLCIn  BIT  4 CP  CEANNEL  12 

28782 

41,3711 

0 GC06 

1 

EXTEND 

(NO  ATT  LIGET  ON  IF  IN  CCARSE  ALIGN) 

28783 

REF 

23 

LAST 

289 

41,3712 

02  C 12 

0 

RAND 

CHAM2 

2 8 79 

REF 

27 

1 AST 

456 

41,3713 

6 4735 

1 

AD 

B ni5 

TIFN  CFF  AUTC,  ECLD,  FREE,  SPARE, 

2880 

RFF 

^4 

LAST 

470 

41 ,3714 

55*035 

1 

TS 

OSPTAB  +11C 

GIPBAL  LCCK,  SPARE,  TRACKER,  -PROG  ALP 

2881 

PFF 

1 

41,2715 

4 3 74  0 

c 

C S 

13-11  ,1 

SET  BITS  TC  INDICATE  ALL  LAPPS  CUT.  TEST 

2882 

REt 

21 

LAST 

469 

41  ,3  716 

7 13n 

1 

PASK 

IMnDES3  3 

LIGHTS  CCPPLETE. 

2883 

REF 

3 

LAST 

22C 

41,3717 

6 5C26 

c 

AO 

FRI C16 

2884 

PFF 

22 

LAST 

470 

41,2720 

5 5 ’ 300 

1 

TS 

I PCOCS33 

2885 

PFF 

1 

41,3721 

4 3742 

1 

CS 

OCT55000 

2886 

RFF 

42 

LAST 

228 

41,2722 

7 1277 

c 

PASK 

I PCD6S3'J 

2 887 

RFF 

4 

LAST 

260 

41 ,3723 

6 5025 

1 

AC 

PRI015 

15CCC. 

2888 

RPF 

43 

LAST 

47C 

41  ,3724 

55 ' 277 

0 

TS 

IPCDES30 

2889 

ref 

1 

41,3725 

4 2 74  1 

1 

CS 

RFAI LS2 

2890 

RFF 

28 

LAST 

419 

41 ,3  726 

7 0110 

0 

''AS  K 

R ADMCDES 

289  1 

per 

3 

LAST 

185 

41,2727 

6 4 745 

C 

AD 

PCrUFEIT 

2892 

RFF 

29 

LAST 

470 

41 ,3730 

54  in 

0 

TS 

RADMODE  S 

2893 

41,3731 

0 CG03 

1 

PEL  INT 

2894 

RFF 

96 

LAST 

469 

41,3732 

0 46  16 

1 

Tr 

BANKCALL 

RECISFIAY  C(PCCREG) 

2895 

RRE 

1 

4L,'3733 

10  6 20 

1 

EACR 

DSPMM 
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2896 
2 897  ' 
2898 

Rcp 

PEF 

PFF 

4 

5 

> c 

LAST 
LAST 
1 AST 

4 54 
455 
466 

41,3734 
41  ,3  735 
41.3736 

(1  4204 
J 4433 
0 4635 

C 

1 

0 

TC 

TC 

TC 

KILMCNCN 

FLASHOFF 

PCSTJUMF 

TURN  CN  KILL  NCMTCP  EH. 

TURN  CFF  V/N  FLASH. 

CCFS  RELCSF  ANC  GOES  TG  PTNBRNCH  IF 

2899 

PFF 

1 

41,3737 

6 1534 

1 

CADR 

T STLTS4 

ENCIELE  IS  awaiting  CFERATOR  RESFCNSE. 

2901 

41,3740 

16001 

1 

13-11  ,1 

ncT 

16001 

29'i? 

41,3741 

Ti  r 3 3 c 

1 

P.FAILS2 

rcT 

3 30 

RACAP  ecu  ANC  CATA  FAIL  FLAGS. 

2903 

41, 3742 

5 3000 

1 

QCT55rnC 

OCT 

5 500C 

2904 

41  ,3743 

ENCPIAS2 

ECUALS 

GAP:  /iSSF^RLP  RFVISION  lU  CF  AGC  PRCGR^^  LINMNAPV  BY  NASA  2021112-(71 


IStOP  AUC-.  11,1969  LEMONAIC.099  PAGE  A'i2 


L PIABALL  GAMC  BUTTCNS  ANC  LIGHTS  LSEP'S  PAGE  NO.  G2  EC 


P290S  EPROP  LIGH-^  RESET  (RSET)  TURNS  CEE, 

R290H.  UPLINK  ACTIVITY,  AUTC,  HELD,  FRPp,  POEPATOP  ERROR, 
R2q07  PROG  ALP,  TRACKER  FAIL. 


R290R 
R29P9 
R 29  10 

LEAVES  GI»'BAL 
IT  ALSC  ZEROES 
IT  ALSO  SET'  : 

LOCK  AND  NO  ATT  ALCNIE. 
. THE  :TEST  ALARY:  OUT 
CALTICN  RFSFT:  TC  1. 

PIT 

, UHTCH 

TLPNS  CFH  STBV  ,RF£TAPT. 

R291I 

IT  ALSO 

FORCES 

; BIT 

12  OF  Al  L 

eSPTAB 

ENTRIES  TC 

1. 

2912 

PEE 

2 

LAST 

460 

49,36':-6 

SETLCC 

DDPROC  +2 

29125 

REF 

10 

LA  ST 

460 

TO  462  : 

39 

; 8 7 1* 

CCUNT* 

* J / P I N 

2913 

ret 

3 

LAST 

452 

4T ,3646 

56 

1 115 

1 

FRRPP 

>CH 

21/22REG 

RESTCFE  CRIGINAL  CICSPLCCKI.  THUS  ERROR 

291  A 

REF 

11 

LAST 

467 

40 ,3647 

55 

' -1 1 1 

1 

TS 

DSPLCCK 

LIGHT  reset  LEAVES  DSPLCCK  LNCHANGEC. 

2915 

40, 365C 

C 

CCC4 

C 

I N H I N T 

2916 

pep 

23 

LAST 

47- 

4 '',  3 651 

3 

4742 

1 

CAF 

B I T 1 C 

TURN  CN  :CALTICN  RESET:  CLTBIT 

2917 

40,3652 

0 

0006 

1 

EXTENC 

2918 

PEE 

20 

LAST 

47C 

40,3653 

C5 

0 1 1 

1 

HCP 

OSALYCLT 

EITIO  CHAN  11 

2919 

R'-p 

1 

40 ,3654 

3 

3 73  5 

0 

CAF 

GL  +NOATT 

LEAVE  GlYBAL  LCCK  AND  NC  All  INTACT, 

2920 

REF 

Q C 

LAST 

47f 

40,3655 

7 

1335 

1 

NASK 

DSPTAB  +11C 

TURNING  CFF  ALTO,  HOLD,  FREE, 

2921 

PEE 

28 

L AST 

47C 

40,3656 

6 

4735 

1 

AO 

B ITl  5 

FRCG  ALARY  , ANC  TRACKER  . 

2922 

REF 

36 

LAST 

472 

40,3657 

55 

•035 

1 

TS 

nSPTAP  +110 

2923 

REF 

4 

LAST 

47C 

40, 366C 

4 

5C26 

1 

CS 

PRI CI6 

RESET  FAIL  BITS  WHICH  GENERATE  RRCG 

2924 

REF 

23 

LAST 

47 

49,3661 

7 

not 

1 

PA  S K 

I YPDES33 

ALARM  SC  THAT  IF  THE  FAILLRE  STILL 

2925 

REF 

C 

LAST 

472 

40 ,3662 

6 

5026 

0 

AD 

PRIC16 

EXISTS,  IHE  ALARY  WILL  CCYE  BACK. 

2926 

PFF 

24 

LAST 

472 

4'j  , 3663 

c c 

' 3CC 

1 

TS 

I YrOES33 

2927 

PEE 

24 

LAST 

472 

40 ,366,4 

4 

4742 

0 

CS 

6 ITin 

2928 

ref 

44 

LAST 

47G 

40  ,3665 

7 

127  7 

0 

YASK 

INC0ES3O 

292° 

REF 

25 

LAST 

472 

40, 3666 

6 

4742 

1 

AO 

eiTiij 

2930 

PEF 

45 

LAST 

472 

43,3667 

55 

•277 

0 

TS 

I YODES30 

293  1 

PEF 

1 

40, 367C 

4 

2 734 

c 

CS 

REA  I LS 

2932 

REF 

3- 

LAST 

470 

40,3671 

7 

Clio 

0 

YASK 

RADYCOES 

2933 

REF 

4 

LAST 

4 70 

40 ,3  672 

6 

4 745 

0 

AC 

PCCUFF IT 

2934 

PEE 

31 

LAST 

472 

40,3673 

54 

1 10 

c 

TS 

R APYCEES 

2934  1 

REF 

3 

LAST 

47C 

40 ,36  74 

0 

6022 

1 

TC 

C 13STALL 

2935 

REF 

26 

LAST 

472 

40,3675 

4 

4742 

c 

CS 

BITIO 

TURN  CFF  :TBST  ALARM:  CLTBIT. 

2936 

4 ',  2676 

0 

C0u6 

1 

EXTEND 

2 93  7 

REF 

7 

LAST 

47C 

40,3677 

03 

013 

0 

WAMC 

CHAN  13 

2938 

REF 

1 

40, 3700 

4 

3733 

1 

CS 

EPf  CN 

TURN  CFF  UPLINK  ACTIVITY, 

2 93  9 

40,3701 

0 

np06 

1 

EXTEND 

CPERAICR  FPRCP. 

2940 

RcF 

2 1 

LAST 

472 

4C ,37C2 

03 

.311 

1 

WAND 

DSALYICUT 

2941 

REF 

2 

L AST 

40, 370? 

2 

4363 

c 

TSTAB 

CAF 

BINCCN 

(TEC  10) 

2942 

REF 

4 

LAST 

46P 

40,3704 

54 

117 

I 

TS 

ERCNT 

ERCNT  = CCLNT 

2943 

40,3705 

0 

0004 

0 

INHINT 

2 944 

REF 

5 

LAST 

472 

40,3706 

50 

117 

c 

INDEX 

ERCNT 

2^45 

PFF 

37 

LAST 

472 

40,3707 

11 

• 122 

1 

CCS 

DSPTAB 

2946 

REF 

58 

LAST 

46  1 

40,3710 

6 

4 753 

1 

AD 

CNE 

2947 

REF 

1 

40,3711 

0 

3716 

1 

TC 

E RPLLS 

2948 

R9F 

59 

LAST 

472 

’40,371  2 

6 

4753 

1 

AD 

CNE 

2949 

RFF 

154 

LAST 

466 

40,  :>7i? 

4 

CCCO 

c 

EPYINLS 

CS 

A 
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298-9 

2981 

2982 

REF 

rff 

PFF 

1. 

1 

1 55 

LAST 

47  2 

40.3714 

40.3715 

40 .3716 

7 3736 
C 37  2 1 
4 0000 

1 

0 

0 

EFPLUS 

WASK 

TC 

CS 

NCT BIT  12 

EPCCN 

A 

2953 

RFF 

2 

LAST 

473 

40,3717 

7 3736 

1 

NASK 

NCTBIT12 

2954 

PPP 

156 

L AST 

473 

4 1, 3720 

4 COCO 

0 

CS 

A 

MGHT  ViAAT  TC  RESET  CLFASS,  CFCERNCF, 

2955 

RFF 

6 

LAST 

472 

4;i,372  1 

50  117 

0 

ERCCP 

INCFX 

FRCriT  ' 

CTC. 

2956 

pff 

38 

LAST 

472 

40,3722 

55'C22 

1 

TS 

nSFTAE 

2957 

4 >,  3723 

0 COO 3 

1 

RFL INT 

2958 

P = F 

7 

LAST 

473 

40,3724 

10  117 

1 

CCS 

EFCNT 

2959 

PFF 

1 

40,3725 

0 3704 

1 

TG 

TSTAB  +1 

2969 

REF 

105 

LAST 

467 

40,3726 

3 4755 

!■ 

C AF 

ZERO 

2961 

PFF 

5 

LACT 

306 

40,3727 

54  375 

1 

TS 

FA  ILREG 

2961  1 

PEE 

6 

LAST 

473 

40, 3730 

54  ’76 

1 

TS 

FAILREG  +1 

2962 

PFF 

2 • 

LAST 

lOR 

49,3731 

55'  357 

0 

TS 

SFAIL 

2963 

RFF 

6 3. 

LAST 

46^ 

40,3732 

0 5155 

C 

TC 

ENDOF JCE 

2964 

43,3733 

00104 

1 

ERGON 

CCT 

1C4 

CHAN  11  BITS  3,7. 

A2965 

UPLINK  activity,  and  CFERATCP  EFRCR. 

2966 

40,3734 

00330 

1 

RFAILS 

rcT 

330 

PACAR  ecu  and  data  FAIL  FLAGS. 

29665 

4>i  ,3735 

00050 

1 

GL+NOATT 

ncT 

0C05C 

NO  ATT  AND  GINBAL  LCCK  LANFS 

2967 

40,3736 

73777 

1 

NCTB  TT12 

CCT 

73777 

2968 

41,  3737 

ENCPINSl  EQUALS 

2969 

REF 

5 LAST  321 

3C, 2nuo 

SEANK=  LCWSIJCER 

gap:  flSSE^'SLE  REVISION  116  CF  AGC  FP  CG  R A LU^*  I N f R V PV  ^fl;A  20211  12-071 19:09  AUG.  LEM0NAI0.Q99  PAGE  A7A 

L 96^,962  USER’S  RAGE  NO.  1 EO  S? 

RO  ICO  PCD  NT;  C ~ TATrFT~MTrT96'8  ~~  ' 

ROIfU  MOr  FY;  riGITAL  OPVFL  GRPUP  LCG  SECTION  R6C.RE2 

R01I2  FU^CTIC^AL  CESCRIFTICN: 

R0103  CALLER  AS  A GPNFpAL  SLBRCLTI^E  TC  vanelvER  TEE  IE  TC  A SPECIFIEC 
RO!  14  ATTITUCe. 


R0105  1.  IF  THE  3-AXIS  FLAG  IS  NET  SET  THE  FINAL  CCU  ANGLES  ARE 

R0m6  CALCULATED  (VECPDINT). 

Rni’'7  2.  THE  FCAT  RALL  ANGLES  (NOUN  18)  ARE  CALCULATED  (BALTanGSK  ' ~ 

ROlOf!  3.  REQUEST  FLASHING  DISFLAV  V50  M8  PLEASE  PERFCPN  AUTC  m/>neuvER. 

R01''9  4o  IF  PRIORITY  DISPLAY  ^LAG  IS  SET  DC  A PHASECHANGE.  TEEN  AWAIT 

ROllO  ASTRCNALT  RESPCNSR. 

ROlll  5.  DISPLAY  RESPONSE  RETURNS: 

R0112  A.  enter  - RESET  3-AXIS  FLAG  AND  RETURN  TC  CLIENT. 

R0113  B.  TERMINATE  - IF  IN'  POO  GC  TC  STFF  5A.  CTEERWISE  CHECK  IF  R6 1 IS 

R0114  THE  CALLING  PROGRAM,  IF  IN  REl  AN  EXIT  IS  MACE  TC  GCTCV56.  IF 

RT115  NCT  IN  P61  AN  EXIT  IS  CCNE  VIA  GGTCPOOF. 

R9116  C.  PROCEED  - CCNTINUF  WMH  FRCGRAY  AT  STEF  6. 

R0117  6.  IF  TEE  3-AXISFLAG  IS  NOT  SET,  TEE  FINAL  CDL  ANGLES  ARE  CALCULATEC 

R0118  (VECFCINY). 

R'U19  7,  TEE  FCAI  BALL  ANGLES  (NOUN  18)  APE  CAICLLATEC  (RALLANGS). 

R0120  P.  IF  TEE  G+N  SWITCH  IS  NCT  SET  GC  BACK  TC  STEP  3. 

R0121  9,  IP  teF  ALTO  SWITCH  IS  NCT  SET  GC  BACK  TC  STEF  3. 

R0122  1),  NCNFLASEING  pISPL''Y  V'~'6N1£  (FCAI  ANC-LFS). 

R0123  II.  DC  A PHASECHANGE. 

90124  12.  rc  A MANFIJVER  CALCUIATICN  AND  TCDL  DRIV*^  RCLTINE  TC  ACHIEVE  FINAL 

R012  E GIMBAL  ANGLES  (GCNAMJF). 

R0126  13.  A1  END  OF  MANELVER  GC  TC  STEF  3. 

90127  IF  SATISFACTORY  MANEUVER  STEP  £A  EXITS  RFC. 

90128  FOP  fL'PTHER  ADJUSTMENT  CF  THE  VEHICLE  ATTITUCE  ABOUT  TEE 

90129  DESIPFO  VECTOR,  THF  ROUTINE  MAY  BE  PERFCRMEC  AGAIN  STARTING  AT 
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L SFP*  S PAGE  NO.  2 EC  S? 


RCi3f  ■ STPP  sr. 


R11?1  CALLING  SECUENCE:  tc  BANKCALl 

RP132  CACR  R601.EN 


R0123  EOASAPLF  I NIT  TAL  1 7 AT  T CK  RFQLTPEC  : SCAXIS,  FCTMVSR  (FCP  VECPCINT) 
P013A  3AXTSFLG. 


R013E  SLBROLTINFS  CALLFC:  VECFCINT,  BALLANGS,  GCPFPF2R,  LIN'US,  GODSPERt- 
R013A  GCMANLR,  nCkNPLAG.  FHASCHNG,  LFFLAG 


R0137  NCFPAL  fXiT  MOCFS:  CAF  TEn<PR60  (CALLERS  RETURN  ADDRESS) 
PC138  TC  BANKJLNf 


R0139  AL  APMS:  NONE 

R014C  GLTFLT.  NCNE 


ROlAl 

CEPR  IS  ; 

CPHI  , 

CTHETA 

, r,  P S I , 

3AXI S=LG 

9 

T8ASE2 

0LA2 

34,2000 

BANK 

34 

01  A3 

RFF 

1 

26,2000 

SETLCf 

NANUVER 

■TIAA 

26,212? 

BANK 

01A5 

RFF 

1 

1 163 

EBANK= 

TFNPR  60 

0 IA6 

PEF 

1 

COUNT 

$i/R06 

01A7 

PEF 

2 

LAS'*- 

27  1 

26,2123 

0 4645 

1 

R60LFM 

TC 

MAKFCADR 

OlAE 

REF 

2 

1 AST 

475 

26,2124 

55  ' 163 

0 

TS 

TEMPR  60 

OlAP  1 

RFF 

14 

LAST 

2^^ 

26, 2125 

C 5504 

c 

TC 

UFFLAG 

INSURE  TEAT  TCTAL  ATTITUDE  ERRORS  ARE 

niA82 

PEF 

3 

LAST 

266 

26,2126 

00013 

0 

AORES 

NEEDLFLG 

CISFLAVEC  CN  FCAI  ERPCP  NFECLES. 

01AP3 

PEF 

34 

LAST 

38  = 

26,2127 

0 5516 

c 

TC 

rrwNFLAG 

01A8A 

pcp 

3 

L AST 

26  6 

26,2130 

CCOOO 

1 

ADRFS 

NEECZFLG 

(UA9 

PEF 

1 

26,2131 

3 4 746 

0 

RFCON  ANN 

CAF 

3AX  ISE>  I T 

0 150 

PEF 

13 

LAST 

291 

26,2132 

7 0101 

0 

NASK 

FLACKPC5 

IS  3-AXIS  FLAG  SET 

0151 

REF 

157 

LAST. 

A73 

26,2133 

10  000 

0 

CCS 

A 

0152 

RFF 

1 

26,2134 

1 2142 

0 

TCF 

TCBALL 

YFS 

015  3 

PEF 

27 

LAST 

389 

26,2135 

0 6042 

1 

TC 

T NTPPET 

0154 

26,2136 

77624 

1 

CALL 

0 155 

RCF 

2 

1 AST 

34  1 

26,2137 

5 6040 

0 

VECPCINT 

TC  CGRPLIE  final  ANGLES 

1156 

REF 

e. 

LAST 

370 

26,2140 

CC3Z2 

1 

STCRF 

C PHI 

STCRE  final  ANGLES  - C P FI  , CT F E T A , C P S 1 

0157 

26,2141 

77776 

1 

EXIT 

0158 

REF 

97 

LAST 

26,2142 

0 4616 

1 

tcball 

TC 

piANKCALL 

11585 

REF 

2 

LAST 

341 

26, 2 1A3 

54272 

1 

CACR 

B ALLANGS 

TC  CCNVERT  ANGLES  TC  FCAI 

0159 

RFF 

1 

26,2144 

3 2260 

1 

TCeALLA 

CAF 

V06M8 
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0160 

216! 

016? 

PEE 

RFF 

R''F 

98 

1 

1 

LAST 

475 

26.2145 

26.2146 

26.2147 

C 46  16 
2071  1 
0 2246 

1 

1 

C 

TC 

CACP 

TC 

BANKCALL 
GCPER  F2R 
R61T6ST 

cisPLAY  please  perforr  ALTC  RAAELYEF 

0163 

PEF 

1 

26,2150 

0 2 154 

0 

TC 

R EDORANC 

FRCCEEC 

0164 

pep 

1 

26,2151 

0 22  '1 

0 

TC 

EADMANUI 

ENTFR  I.E.  FINISHED  WITH  R 60 

0165 

FFF 

1 

26,2152 

C 2205 

1 

TC 

CFKLINLS 

TC  CHECK  FCP  FPIFFITY  CISFLAYS 

0166 

R'-F 

64 

LAST 

473 

26  ,2153 

0 5155 

0 

TC 

FNDOF JOB 

0167 

RFf 

2 

LAST 

475 

26,2154 

3 4 746 

f 

RFCORANC 

CAF 

3AXIS8IT 

0168 

RcF 

14 

LAST 

475 

26,2155 

7 Oi  l 

0 

"ASK 

F LAGUPD5 

IS  3-AXIS  FLAG  SET 

0169 

P''F 

158 

LAST 

475 

26,2156 

10  30  J 

0 

CCS 

A 

■)  170 

RFF 

1 

26,2157 

1 2165 

ff 

u 

TCF 

tcealic 

YES 

01  71 

RFF 

?8 

1 AST 

475 

26,2160 

0 604  2 

1 

TC 

INTPRET 

0172 

26,2161 

77624 

1 

CALL 

U 73 

PEF 

3 

LAST 

475 

26,2  162 

56C40 

0 

VECPCINT 

TC  CCAFLTE  FIAAL  ANGLES 

0174 

RFF 

6 

LAST 

475 

26,2163 

0332? 

1 

STORF 

CPHI 

STORE  ANGLES 

0175 

26,2164 

77776 

1 

EXIT 

0176 

PFF 

99 

L AS7 

4 7,6 

26,2165 

0 4616 

1 

T08ALLC 

TC 

BANKCALL 

U765 

REF 

3 

LAST 

475 

26,2166 

5427? 

1 

CACR 

BALL ANGS 

TO  CONVERT  ANGLES  TO  FCAI 

0177 

REF 

1 

26,2167 

0 226  1 

0 

TC 

G + A , ALTC 

CHECK  AUTC  RCCE 

0178 

RFF 

1 59 

LAST 

476 

26 ,217U 

10  OOU 

0 

CCS 

A 

0179 

REF 

] 

26,2171 

1 2144 

0 

TCF 

TCBALL A 

ACT  AUTC,  GC  REREQUEST  ALTO  MANEUVER. 

0180 

RFF 

2 

LAST 

475 

26, 2 1 72 

2 22  6C 

1 

ALTOPANV 

CAF 

V06N18 

STATIC  CISFLAY  CURING  ALTO  RANEUVEP 

J181 

REF 

IOC 

LAST 

476 

26,2173 

0 4616 

1 

TC 

B AAKC ALL 

- 

0182 

Rff 

1 

26,2174 

2C452 

c 

CACR 

GCOSFF 

- 

0183 

PFF 

2 

L AST 

A 76 

26,2175 

0 2 20  5 

1 

TC 

CHKLI NUS 

TO  CHECK  FOR  FRICFITY  EISFLAyS 

0184 

PFF 

101 

LAST 

476 

26,2176 

0 4616 

1 

STARTRNV 

TC 

BAAKCALL 

PFPFORR  RANEUVER  VIA  KALCRANL 

0185 

OFF 

1 

26,2177 

1 7 7 4 2 

c 

CACR 

GCNAALP 

0186 

PEF 

2 

LAST 

476 

26  j 220-1 

1 2144 

r\ 

ENCMANUV 

TCF 

TOBALLA 

FINISHED  RAAFLVER. 

0 187 

RFF 

•a  c 

LAST 

475 

26 , 2 201 

0 5516 

c 

EACRAALl 

TC 

DCkAF  LAG 

RESET  3-AXlS  FLAG 

1188 

REF 

3 

LAST 

34  1 

26, 22»2 

00  124 

0 

ADPF  S 

3AXT  SFLG 

0189 

RFF 

3 

1.  AST 

475 

26,2203 

31 ' 163 

1 

CAE 

TFRPR60 

019-0 

RFF 

6 

LA  ST 

447 

26,2204 

0 4640 

1 

TC 

bank JURF 

- 

0191 

RTF 

3 

LAST 

263 

26,2205 

4 Olon 

1 

CFKL  IKUS 

CS 

FLAGLRD4 

019? 

RFF 

1 

26,2206 

7 4 74,1 

1 

RASK 

PCSPFBIT 

IS  priority  display  flag  SET? 

0193 

RFF 

160 

LAST 

476 

, 26,220? 

10  000 

( 

CCS 

A 

- 

0194 

FFF 

146 

LAST 

467 

26 ,221  > 

0 0002 

0 

TC 

0 

NC  - EXIT 

0195 

RFF 

147 

LAST 

476 

26,2211 

0 ccc? 

c 

CA 

C 

0196 

PFF 

2 34 

LAST 

464 

26 , 2212 

54  156 

1 

TS 

RFAC  +2 

savf  FETLRA 

0197 

R^F 

1 6 

LAST 

444 

26,2213 

4 6250 

1 

CS 

TFPFF 

obtain  LCCATICN  fop  RESTART 

0198 

RFF 

4 

L AST 

37  1 

26,2214 

6 0133 

c 

AD 

6UF2 

FCLCS  C OF  LAST  CISPLAY 

0199 

RFF 

1 

26,2215 

55 '054 

0 

TS 

TBASE2 

0200 

RFF 

LAST 

289 

26,2216 

0 5353 

1 

TC 

PFASCFNG 

0201 

26, 2217 

or  132 

1 

CCT 

re  132 
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029? 

REF 

2 1 

LA  ST 

463 

26 , 222F 

3 4 745 

C 

CAP 

8 1T7 

02'^3 

RfF 

1 

26, 2221 

0 5464 

1 

TC 

LINUS 

GC  SET  fits  FCR  PPICPITY  DISPLAY 

C20A 

REF 

235 

LA'T 

476 

26 ,2222 

U 9 156 

0 

TC 

MPAC  +2 

0205 

PFF 

2 

LAST 

36S 

26,2223 

3 77  17 

1 

PELINLS 

CAE 

PRI 026 

RCSTCPE  CRIGINAL  PRIORITY 

J2^'6 

REF 

A 

LAST 

3-in 

26, ??P4 

0 5146 

1 

TC 

PRTOCHNG 

0207 

REF 

3 

last 

286 

26,2225 

3 4 747 

1 

CAF 

TRACKFIT 

DON'T  continue  R6C  UNLESS  TRACKFLAG  CN. 

0 208 

PFF 

15 

LAST 

295 

26, 2226 

7 C075 

1 

NASK 

F LAGWRQI 

0209 

PIPP 

161 

LAST 

476 

26,2227 

10  000 

0 

CCS 

A 

0 2 1"' 

PEF 

1 

26, 223C 

1 224  3 

1 

TC  F 

REP60 

1211 

PFF 

3 

LAST 

229 

26,2231 

3 4745 

c 

' 

CAF 

RNDVZBI T 

IS  IT  F20? 

0212 

REF 

19 

LAST 

286 

26,2232 

7 CC74 

0 

HAS  K 

FLAGWRDC 

0213 

PEE 

162 

LAST 

477 

26,2233 

10  CCC 

c 

CCS 

A 

0214 

26 , 2234 

0 2 240 

0 

TO 

4-  4 

YES 

0215 

RFF 

4 

LAST 

476 

26,2235 

0 5353 

1 

Tf 

PFASCFNG 

NC,  MLST  BE  P25,  SET  2.11  SECT 

0216 

26,2236 

40  1 12 

1 

CCT 

401 12 

021  7 

PCF 

65 

LAST 

476 

26,2237 

0 5155 

0 

TC 

ENOOF JCB 

0218 

RFF 

5 

LAST 

477 

26,2240 

0 5353 

1 

TC 

PFASCFNG 

SET  2.7  SOCT  FOR  P20 

0219 

26,2241 

4CC72 

0 

OCT 

400  7 2 

0220 

RFF 

66 

LAST 

477 

26,2242 

0 5155 

0 

TC 

FNCCFJCe 

)22! 

PFF 

15 

LAST 

475 

26,2243 

0 5 504 

0 

RFR  60 

TC 

L'FFLAG 

SET  PRIC  DISPLAY  FLAG  AFTER  RESTART 

'■'22? 

RFF 

1 

26  ,2244 

00077 

1 

ACRES 

PDSPFLAG 

0223 

REF 

2 

LAST 

476 

26 ,2245 

0 1154 

1 

TC 

TEASE2 

0224 

REF 

8 

LAST 

460 

26,2246 

3 1010 

1 

R6  ITEST 

CA 

NCDREG 

IF  WE  APF  IN  ECO  IT  MUST  EE  V49  OR  V89 

0225 

26,2247 

0 0006 

1 

EXTEND 

J226 

REF 

2 

LAST 

476 

26 ,2250 

1 220  1 

1 

ezF 

ENDPANUl 

THUS  WE  GC  TC  ENCEXT  VIA  USER 

0227 

RFF 

4 

t AST 

476 

26, 225  1 

3 0110 

0 

CA 

FLAGWR04 

ARE  WE  IN  R61  ( P20  CR  F25) 

0228 

RFF 

2 

LAST 

476 

26,2252 

7 4740 

1 

NASK 

PCSPFEIT 

1229 

26,2253 

C 0006 

1 

EXTEND 

0230 

REF 

3 

LAST 

246 

26,2254 

1 6011 

1 

BZF 

GOTOPQOH 

NO 

023  I 

RFF 

1 

26,2255 

C 6C25 

c 

TC 

GCTCV56 

YES 

023? 

26,2256 

20100 

1 

RIT14+7 

CC  T 

20  100 

- 

0233 

26,2257 

00203 

0 

nCT203 

OCT 

203 

0234 

26,2260 

01422 

1 

VC6N1 6 

VN 

0618 

R023  6 

SU8P0UT  INF 

TC  CHECK 

FCP  C+N 

CGNTPOL,  AUTC  STABILIZATION 

R0237  RETURNS  kITI-  C(A)  = + IF  NCT  SET  FCP  G + ^,  AOTC 

P0238  PFTURNS  KITr  G(*)  = 4D  IF  SWITCHES  ARE  SET 


C239 


26,2261  0 0CO6  1 G+N,ALTC  EXTEND 
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0240 

0241 

0242 

REF 

RFF 

RFF 

3 

27 

163 

LAST 

LAST 

LAST 

185 

472 

477 

26, 2262 

26.2263 

26 . 2264 

00  030 
7 4742 
10  COO 

1 

0 

0 

READ 

WASK 

CCS 

CHAN30 

B me 

A 

0243 

RFF 

148 

LAST 

476 

26,2265 

n CC02 

n 

TC 

Q 

NCT  I N 

G-»N 

C ( A ) = + 

0 24  4 

26,2266 

0 0006 

1 

ISITAUTC  EXTENC 

CEECK 

FOR 

ALTO  MODE 

0245 

REF 

2 

LAST 

282 

26, 2 26.7 

00  03  1 

0 

PEAC 

CHAN31 

0246 

PEE 

4 6 

LAST 

466 

26,2270 

7 4736 

c 

MASK 

B IT  14 

0247 

PEE 

149 

LAST 

47F 

26,227  1 

0 U00  2 

0 

1C 

C 

( + ) = 

NOT 

IN  AUTO  , ( +C  ) = AOK 

GAP: 

flSSERfiLP  revision;  i 16  CF  AGC  PROGRAM  LUMINARY  BY 
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NO.  6 

E2 
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P0  2''i8 

FROCR/!M  EFSCRIPTICL  BALI  ANGS 

^'C^  NT.  LCG  SPOTICN  P60,R62 

R0250 

RU251 

WRITTEN  BY  RAMA  M.AIYAFiAP 
FUNCTIONAL  CESCRIFTICN 

R0252 

R0253 

CCMFL7ES  LM  FDAI  BALI  CTSFIAY  ANGLES 

calling  sequence 

R0254 

R0255 

TC  BALLANGE 

NORMAL  EXJ  7 MODE 

R0256 

TC  BALLEXIT  ('AVEC  Q) 

R0257 

ALARM  CP  rxiT  MODE  ML 

R 0 2 5 P 
R'I25P 
R0260 

SLBROLT  INFS  CAL  LEC 
CCX-TR  X'G 
AR'CTAN 

R0261 

INPUT 

R )262 
R0263 
R126A 

CPEI  ,CTEET  A ,CFS  I ARE  t E ANCLES  COPR  E SPCN  D I N G TC  AOGtAIG.AMG.  THEY  ARE 
SP.2S  CCMPLIMENT  SCALFO  TC  HALF  REVCLUTICN. 

OUTPUT 

RH265 

R0266 

FDA  I X , FCAI Y ,FCA  I Z APE  THE  PFCUIRfC  BALL  ANGLES 
SP,2S  CCMPLIMENT. 

SCALEC  TO  HAI  F REVOLLTICN 

PT267 

ThESF  ANGLES  WILL  BE  DISPLAYFC  AS  DEGREES  AND 

HLNOREDTHS,  IN  THE  CFCEP  PCLL,  FITCE 

, YAW 

, USING  NCUN'S 

18 

8 19 . 

R026P 

ERASABLE  INITTALIZAT  ICN  RECUIFED 

R027O 

R0271 

CPFT  ,CTFETA,CPSI  EACH  A SP  REGISTFR 
C^ER  IS 

R.)27  2 

A,L,C,MFAC,S1NCCL,COSCOI,PUSELIST,8ALLEXIT 

R3273 

RG27P 

NCMENCLATUPF:  CPFI,  C THETA,  6 CPSl  REPRESENT 

FCLi  valently  , ccux,  cruY,  a rrijz. 

TEE  OLTBR,  inner,  Z MDCLE  GIMBAL  ANGLES, 

RESPECT  IVFLY  ; 

CR 

RC276 

NOTE:  APCTAN  CHECKS  FCR  CVEFFLCW  ANC  SHCLLC  BE  ABLE  TC  HANOLF  ANY  S I N GU L A F IT  I F S . 

0278 

0279 

REF  2 LAST  3AL  26,2000 

26,227? 

SFTLCC  BAWLANGS 
BANK 

028^1 

0281 

PE''  1 CCLM^X  t$/BALL 

RFF  3 LAST  A75  26,2272  0 6645  1 BALL«NGS  TC  MAKFCADR 

02  82 
02  83 

Mtt-  1 26.2273  55'  23  7 0 

RFF  7 1 AST  676  26,  2276  3 C321  1 

TS  BALLEXIT 

CA  CPHI 
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02PA 

PFF 

7 

LAST 

2S3 

26,2275 

54  77  1 

1 

TS 

OCLSFCT  +4 

0285 

PEE 

2 

L AST 

37C 

26 , 2276 

3 r ^ ? 2 

1 

CA 

CTHETA 

C286 

REF 

8 

LAST 

480 

26,2277 

54  765 

1 

TS 

CCUSPOT 

0287 

PEE 

■a 

LAST 

lie 

26.230C 

3 C223 

C 

CA 

C FSI 

■)?88 

R9F 

9 

L A.FT 

480 

26 , 2 30  1 

54  767 

0 

TS 

CDUSPCT  +2 

0289 

PEE 

29 

LAST 

^ilf: 

26 ,2  3'i? 

0 6042 

1 

TO 

I NTPRET 

0290 

26,2303 

450  0 1 

1 

SETPO 

CALL 

0291 

26,2304 

0000  1 

0 

00 

0292 

REF 

1 

26,23  5 

4 7 5 4 5 

c 

C C«TR  XG 

0293 

26,2316 

41345 

0 

OLCAD 

OPP 

C209 

REF 

1 

26,2307 

00742 

0 

S IN'CDUX 

SIN  (CGA) 

1295 

REF 

1 

26, 23  1' 

OC746 

1 

ccsccuz 

CCS  (PGA) 

0295 

26,2311 

57552 

1 

SL  1 

ncnwp 

SCALE 

0297 

26,2312 

65336 

1 

ARCS  IN 

PCCl 

YAU  = ARCS  IN(-SXCZ  ) IMC  C FD 

029? 

REF 

1 

26, 2313 

00740 

1 

FINTCL'Z 

0299 

PEE 

4 

LAST 

323 

26,2314 

14023 

0 

STOOL 

S INTH 

(SINTH  = leC  IN  PC) 

0300 

REF 

2 

LAST 

' 4Pr 

26,2315 

00746 

1 

CCSCCUZ 

03  n 

26, 2’16 

72405 

L 

OMP 

SLl 

F E S C A 1 E 

0302 

REF 

1 

26,2317 

C0750 

0 

ccsroux 

03. 13 

REF 

4 

LAST 

323 

26,2320 

34C21 

c 

STC AL  L 

C CSTH 

(CCST  F=  16C  IN  PC  ) 

0304 

REF 

1 

26,2321 

26510 

1 

ARCTAN' 

0 305 

26,2322 

41325 

0 

POOL 

DPP 

ROLL  = ARCTAN.  (SZ/CZCX)  INTC  2 PC 

0 3 >6 

REF 

2 

LAST 

48C 

26,2323 

C0740 

1 

SINCCLZ 

0307 

ref 

2 

LAST 

4,?r) 

26,2324 

00  74  2 

0 

SINCDLX 

03CP 

26,2325 

41512 

1 

SL2 

PUSH 

SXSZ  INTC  4 PC 

0309 

26, 2326 

65205 

0 

DPP 

POOL 

SXSZO  INTC  4 PC 

031  C 

REF 

1 

26,2327 

00744 

0 

CCSCDUY 

33U 

26,2330 

652C5 

0 

CPF 

PCCL 

SXSZSY  INTO  6 PC 

0312 

PEF 

1 

26,2331 

00736 

0 

SINICDLY 

0313 

REF 

2 

LAST 

4PE 

. 26,2332 

CC75Q 

r 

CCSCCIJX 

0314 

26,233? 

7240  5 

r 

DPF 

SLl 

CXCY 

'1 31  5 

REF 

2 

L AST 

480 

26 ,2334 

OC744 

0 

CCSCDL Y 

0316 

26, 2335 

45425 

L 

DSL 

STACR 

FULL  UP  FROM  6 PC 

031  7 

REE 

5 

LAST 

480 

26,2336 

63  756 

c 

STOOL 

CCSTH 

CCSTH  = CXCY  - SXSZSY 

0318 

RFE 

2 

1 AST 

48L 

26,2337 

CC736 

0 

S INCCUY 

031° 

26,2340 

72405 

0 

CPF 

SLl 

032" 

REF 

“a 

1 AST 

480 

26,2341 

00  750 

.0 

COSCDLX 

C X SV 

0321 

26,2342 

45415 

0 

CAC 

STACR 

PULL  UP  FRCP  4 PO 

1322 

PEE 

c 

L-AST 

4 8E 

26,2343 

43  754 

r 

STCALL 

SINTF 

SINTH  = CXSY  4 SXSZCY 

0323 

PFF 

2 

LAST 

480 

26,2344 

2651  ) 

1 

ARCTANJ 

RETURNS  H7H  C(NPAC)  = FITCH 

0324 

26 ,2345 

5 5 5 2 

c 

FCCL 

VCEF 

FITCH  INTC  2 PC,  ROLL  INTC  PPAC  PROP  2PC 

0325 

26,2346 

77634 

0 

RT8 

VCEF  PANES  V(NFAC)  = ROLL,  FITCF,  YAW 

C326 

REF 

2 

LAST 

36  6 

26,2347 

21621  , 

1 

V 1STC2S 

032  7 

REF 

2 

LAST 

396 

26,2350 

C2245 

1 

STCPE 

FCAIX 

PCCE  IS  TP 

0328 

26,2351 

77776 

1 

EXIT 

0 3 29 

REF 

2 

LAST 

479 

26,2352 

3 1337 

1 E^^8ALL 

CA 

eALLEXIT 
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P033O 

PPCGPAN  DFSCPIFTI^^  - VFCFCI^T 

R0331 
R0  333 
P 0 3 3 5 

THIS  INT‘=PPRETIVE  SGBOOLTINE  P«Y  BE  LSEO  TC  FEINT  A SPACECFAFT  AXIS  IN  A CESIREC  OIRECTICN.  TEE  AXIS 
TO  0E  POINTED  POST  APPEAR  AS  A HALF  UNIT  DOUBLE  PPECTSIOM  VECTOR  IN  SUCCESSIVE  ICCATICNS  CF  EPASAELE  NENCRY 
BEGINNING  'aIYH  THE  LCCATTCN  CALLFC  SCAXIS.  TFE  CCNFCNENTS  CF  This  VECTOR  APE  GIVEN  IN  SPACECRAFT  COORCINATES. 

R3337 
R033<; 
R0  34! 

TEE  DIP'=CTICN  in  weigh  THIS  AXIS  IS  TO  BE  POINTED  MUST  APPEAR  AS  A HALF  UNIT  CCUBLF  PREOISICN  VECTOR  IN 
SUCCFSSIVE  LCCATICNS  CF  ERASAELE  wERCFY  BEGINNING  WITH  THE  ACCPESS  CALLED  PGINTVSM,  THE  COMPONENTS  CF  THIS 
VFCTPR  APE  GIVEN  IN  STAPL'^  MEMBER  COCRCINATES.  WITH  THIS  INFCRMATICN  VECFCINT  GCMPUTES  A SET  OF  THREE  GIMBAL 

R13^3 

R''3‘i5 

R0346 

ANGLFS  (2S  COMPLEMENT)  CORFSPCNCING  TO  THE  CR C S S- PF OD UC T ROTATION  EETHE  EN  SCAXIS  ANC  FCINTVSM  ANC  STCFES  THEM 
IN  T(VFAC)  BFFCPE  returning  TC  THE  CALLER. 

THIS  ROTATION,  HOWEVER,  MAY  BRING  THE  S/C  INTC  GIMBAL  LOCK.  WHEN  POINTING  A VECTOR  IN  THE  Y- Z PLANE, 

R034P 

R03^f' 

RT352 

THE  TPANSPCNDFR  axis,  op  the  act  for  the  LEM,  THE  PROGRAM  WILL  CORRECT  THIS  PROBLEM  BY  ROTATING  THE  CPCSS- 
ORODUCT  ATTITUDE  ABOUT  PGINTVSM  BY  A FIXEF  AMCLNT  SLFFICIEN'T  TO  RCT/Tp  THE  DESIREC  S/C  ATTITUDE  CUT  OF  GIMBAL 
LOCK.  IF  THE  AXIS  TC  RE  ROINTEO  IS  MORE  thaN  AC.t  DEGREES  BLT  LESS  THAN  60.5  CFG  FRCM  THE  +X  (CR-X ) AXIS, 

R0354 

R3356 

P0358 

THE  ADDITIONAL  PCTATICN  TC  AVCIC  GIMAl.  LOCK  IS  35  EEGREES.  IF  THE  AXIS  IS  MORE  THAN  CC.5  DEGEES  FRCM  +X  (CF  -X) 
THE  additional  rotation  IS  35  DEGREES.  THE  GIMBAL  ANGLFS  C 0 P R ES PC N C I N G TC  THIS  ATTITLCE  ARE  THEN  GOMPLTED  AND 
STGREC  AS  2S  OGMPLIMFNT  ANGLES  IN  T(MPAC)  BEFORE  RETURNING  TO  THE  CALLER. 

R0360 

R0362 

R036A 

WHEN  POINTING  TpE  X-AXIS,  CR  THE  THRUST  VECTOR,  CR  ANY  VECTOR  WITHIN  AO. 6 DEG  OF  THE  X-AXIS,  VECFCINT 
CANNOT  CnRpFGT  .pnR  A CROSS-PRODUCT  ROTATION  INTC  GIMBAL  LOCK.  IN  THIS  CASE  A FIATFCPM  REALIGNMENT  WOULD  EE 
PFCUIREC  TO  POINT  THE  VECTOR  IN  THE  CESIREC  CIRECTION.  AT  PRESENT  NO  INDICATICN  IS  GIVEN  FCP  THIS  SITLATICN 

R03f,6 

EXCEPT  THAT  the  final  midDLF  GIMBAL  ANGLE  IN  MFAC  +2  IS  GREATER  ThAN  59  DEGREES. 

P0368 

CALLING  SFCUENCE  - 

R036F 

P'137’) 

R0371 

1)  LCAC  SCAXIS,  FCINTVSM 

2)  CALL 

VECPCINT 

RC372 

RETURNS  WITH 

R1373 

R0374 

R0375 

1)  DESIRED  outer  GIM3AL  ANGLE  IN  MPAC 

2)  nFSIfi<=n  INNER  GtMFAL  ANGLE  IN  wpAC  +1 

3)  DESIRED  middle  GIMBAL  ANGLE  IN  MFAC  +2 

P0376 

FRASAPLES  USED  - 

PC377 
R 1378 

11  SCAXIS  6 

2)  FCINTVSM  6 

P0378 

RJ38C 

P0381 

3 ) MIS  18 

A)  DEL  IS 

5 1 CCF.  6 

R03S2 

P3383 

M VECCTEMF  1 

7)  ALL  CF  VAC  AREA  A3 

Rr384  TCTAL 


038'i  PFF 
038/^ 


1 


27,?noo 

27, 2C32 


SETLCC  VECPT 
e4^K 
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0 387 
0388 

pep 

1 

1 1 

LAST 

367 

F6, 1676 

COUNTS 

EBAAK= 

* 1/VECPT 
BCDL 

a38PC5 

27,2032 

6002  1 

1 

V FC9NT  1 

STQ 

BOV 

THIS  ENTRY  LSES  CESIREC  CCLS 

0 3 8 8 1, 

pep 

1 

27,2033 

03  32  5 

0 

VECCTERF 

NCT  PRES ENT-ENTER  WITH  CDLD'S  IN  MPAC 

038815 

RFF 

1 

27, 2036 

5 6 ■:  3 5 

1 

VECPM2 

C3882 

27,2035 

52166 

0 

VECPM2 

AXC  ,2 

GCTC 

038825 

REF 

11 

LAST 

366 

27,2036 

03266 

1 

PIS 

038865 

R'^F 

1 

27,2037 

56166 

0 

stdrang 

0389 

27,2060 

60020 

1 

VEf PC  INT 

STC 

BCV 

SAVE  RETURN  ADDRESS 

0390 

RFF 

2 

LAST 

683 

27, 2-14  1 

03325 

0 

VECQTE^'F 

03  91 

pt-.f 

1 

27,2062 

56063 

0 

VECLEAR 

AND  CLEAR  CVFIND 

039? 

27  , 2063 

67  166 

1 

VECLEAR 

AXC  ,2 

RTP 

0393 

REF 

12 

LAST 

683 

27, 2066 

.13266 

i 

MIS 

READ  THE  PRESENT  CCU  ANGLES  AND 

039A 

RFF 

2 

1 AST 

352 

27,2C65 

66  60  3 

0 

READCDUK 

STORE  TFEM  IN  PD25,  26,  27 

0395 

27,2066 

36032 

1 

storaag 

STCALL 

25D 

03  96 

REF 

3, 

LAST 

352 

27,2067 

666  10 

1 

CDLTODCM 

S/C  AXES  TC  STABLE  MFMEER  AXES  (MIS) 

0397 

27,2050 

61375 

1 

VLCAC 

VXM 

0398 

REF 

•3 

LAST 

27,2C51 

03773 

1 

FCIN7VSV 

PESCLVE  A-pc  FCINTING  CIPECTICN  VF  INTO 

0399 

REF 

13 

LAST 

683 

27 ,2052 

13267 

1 

M IS 

INITIAL  S/C  AXES  ( VF  = FCINTVSM) 

0 

27,2053 

77656 

■ 1 

LM7 

0601 

27,2056 

C C 0 3 5 

1 

STCRE 

2 £0 

A0602 

PO  28  29  30  31  32  33 

0603 

27,2055 

C Q 3 K 

c 

\KM 

UMT 

TAKE  THE  CRESS  PRCCUCT  VF  X VI 

06  04 

REF 

12 

LAST 

361 

27, 2056 

03  765 

0 

SCAXJ  S 

NHERE  VI  = SCAXIS 

06C5 

27,7057 

5 7600 

1 

BCV 

VCCMF 

0606 

REF 

1 

27, 2060 

56  170 

1 

ptckaxi s 

0607 

RFF 

60 

LAST 

365 

27,2061 

1727  1 

0 

STCDL 

COF 

CHECK  MAGMTLCE 

06C8 

27,2062 

0016  5 

c 

36C 

CF  CRESS  PRCCUCT 

0609 

27, 2063 

5 0 >0  2 5 

0 

DSL 

VFCTCR,  IF  LESS 

0610 

REF 

1 

27,2166 

16615 

1 

DPB-  16 

THAN  R-1^  ASSUME 

)61  1 

R '=F 

2 

LA  ST 

683 

27,2065 

56  17C 

1 

PIC.KAXIS 

UMT  CPERATICN 

061  2 

27,2066 

50375 

0 

VLCAD 

DCT 

INVALID. 

06  1’ 

RFF 

1 3 

LAST 

683 

27,2067 

03765 

0 

SC  AX  IS 

061  6 

27,2070 

00035 

1 

2 80 

0615 

27,2071 

65552 

0 

SL  1 

ARCCGS 

0616 

27,2072 

77626 

1 

rCKPNATK 

CALL 

New  CCMIPUTE  THE  TRANSFORMATION  FRCM 

061  7 

RFF 

2 

L AST 

365 

27, 207? 

6 6 5 2 7 

1 

OFLCCNP 

FINAL  S/C  AXES  TC  INITIAL  S/C  AXES  MFI 

061  8 

27,2076 

75160 

1 

AXC,  1 

AXC  , 2 

0619 

REF 

16 

LAST 

683 

27,2075 

C3266 

1 

MIS 

CCMFUTE  THE  T R ANS  FOR  Ml  A T I C N FRC^  FINAL 

062i> 

RFF 

11 

LAST 

366 

27, 2076 

0 2 2 3 0 

1 

KEL 

S/C  AXFS  TC  STABLF  MEMBER  AXES 

0621 

27,2077 

77626 

1 

CAl  L 

MFS  = MIS  ''FI 

0622 

RFF 

3 

LAST 

366 

27,  ? I'’- 

663  12 

1 

M XM3 

(IN  FE  LIST) 

0623 

27,2101 

51565 

1 

CLOAC 

ABS 

0626 

27,2102 

no  117 

0 

6 

MFS6  = S IN (CPSI ) 12 

0625 

27,2103 

5002  5 

DSL 

BMN 

0626 

REF 

1 

27,21.16 

16602 

1 

s ingimlc 

= SIN ( 59  DECS  ) $2 

0627 

RFF 

1 

27,2  L;5 

56  160 

0 

F INDGIMB 

/CRSI/  LESS  THAN  59  DECS 
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APA28 

0429 

27,21  ’6 

51545 

1 

CLGAC 

A8S 

I.E.  CFSIREO  AITIIUDE  ACT  IN  G1N0AL  LCCF 
CHECK  ■"C  SEE  IF  WE  ARE  POIMTING 

0430 

R5F 

14 

LAST 

483 

27, 21-17 

03  76  5 

0 

SCAXI S 

THE  THRLST  AXIS 

042  1 

27,2110 

51C25 

1 

CSU 

8FI 

0432 

PFF 

1 

27,211! 

14404 

1 

SIAVECl 

SIN  49.4  CEGS  12 

0433 

"EF 

2 

LAST 

483 

27,2112 

56  160 

0 

F IMDGIMB 

IF  SO,  HE  ARE  TRYING  TC  FCINT  IT  INTO 

C434 

27,2113 

7 7 775 

1 

U GAG 

GIMBAL  LCCK,  AEORT  COLLC  GO  HERE 

043  5 

27, 2 1 14 

77626 

0 

STAOR 

C436 

REF 

1 5 

LAST 

483 

27,2115 

5 1514 

1 

STCVL 

MIS  +L2C 

0437 

27,2116 

77626 

c 

STAOP 

STORE  MFS  (IN  PC  LIST)  IN  MIS 

0438 

REF 

16 

LAST 

484 

27,2117 

50522 

1 

STGVL 

MIS  +6 

C439 

2 7 , ? 1 2 C 

776  26 

0 

STACK 

0440 

REF 

17 

LAST 

484 

27,2121 

5C53C 

1 

.KTG  VL 

wi  S 

0441 

REF 

18 

LAST 

484 

27,212? 

03255 

0 

MIS  +6 

INNER  GIMBAL  AXIS  IN  FINAL  S/C  AXES 

0442 

27,2123 

5 7 44  4 

1 

PPL 

VCCMP 

LCCATE  THE  IG  AXIS  DIRECTION  CLCSESI  TC 

0443 

REF 

1 

27,2124 

56  125 

1 

IGSAMEX 

FINAL  X S/C  AXIS 

044'i 

27,2125 

5C035 

1 

IGSAMEX 

VXV 

BMN 

FINC  THE  SHORTEST  HAY  CF  PCTATING  THE 

1445 

REF 

15 

LAST 

4 84 

27, 2126 

03765 

0 

SCAX  IS 

S/C  CUT  CF  GIM8AL  LOCK  BY  A ROTATION 

0446 

RCF 

1 

77, 2127 

56  134 

1 

U=SCAXI S 

ABCUT  +-  SCAXIS,  I.E.  IF  (IG  (SGN  MES3) 

A0447 

X SCAXIS  . XF  ) LESS  THAN  C , C = SCAXIS 

A0448 

CTHEPHISE  U = -SCAXIS 

0449 

27,^130 

57575 

1 

VLOAD 

VCOMP 

045C 

REF 

>6 

LAST 

484 

27,2131 

03765 

c 

SCAXIS 

0451 

KEF 

41 

L AST 

483 

27, 2132 

372  7 1 

1 

STCALL 

rcF 

PCTATE  AECUT  -SCAXIS 

0452 

REF 

1 

27,2133 

5613  7 

1 

CEEKAXIS 

0453 

27,2134 

77775 

1 

L=SCA>IS 

VLCAC 

0454 

R'^F 

17 

LAST 

484 

27,2135 

03  765 

0 

SCAXI  S 

1455 

R-F 

4? 

LAST 

484 

27,2136 

03271 

0 

STCPE 

CCF 

ROTATE  ABOLT  + SCAXIS 

0456 

27, 2 137 

51545 

1 

CHEKAXI £ 

CLCAC 

AES 

0457 

REF 

1 8 

LAST 

484 

27,2140 

03765 

0 

SCAXIS 

SEE  IF  HE  APE  FEINTING  THE  ACT 

045  6 

27,2141 

5 1)25 

1 

CSL 

BFL 

0459 

REF 

1 

27,2  142 

!44'’6 

0 

SINVEC2 

SIN  29.5  CEGS  12 

0460 

RFF 

1 

27,2143 

56147 

0 

P ICKAMG  1 

IF  SO,  ROTATE  5C  OEGS  ABCLT  +-  SCAXIS 

0461 

27,2144 

52145 

0 

CLCAD 

GCTn 

IF  NOT,  MUST  ee  POIMTING  THE  TRANSpCNOER 

0462 

RE'^ 

1 

27,2145 

14412 

0 

VECAKG2 

CR  SCi^E  VECTCF  IN  THE  Y,  CF  1 PLANE 

0463 

REF 

1 

27,2146 

56151 

1 

C CM  PM  ESN 

IN  THIS  CASE  ROTATE  35  DECS  TC  GET  CLT 

A0464 

CF  GIMBAL  LCCK  (VECANG2  1360) 

0465 

27,2147 

77745 

1 

PI CK  ANG  1 

CLOAC 

0466 

REF 

1 

.27,2  150 

14410 

1 

VEC ANGl 

= 50  CEGS  T 36C 

0467 

27, 215  1 

7 7624 

1 

CCMPPFSN 

CALL 

0466 

R''R 

3 

LAST 

483 

27, 2152 

44527 

1 

OELCCMP 

COMPUTE  THF  ROTATION  ABCLI  SCAXIS  TC 

'■>469 

27,2153 

7516C 

1 

fixe  ,1 

Axe  ,2 

ERING  MES  CUT  OF  GIMBAL  LCCK 

04  7 '1 

REF 

19 

LAST 

484 

27,2154 

03246 

1 

I s 

0471 

Qrp 

12 

LAST 

^83 

27,2155 

0223  1 

1 

KEL 

047? 

27,2156 

77624 

1 

CALL 

CCMFUTE  the  new  tpansfcrmaticn  frcm 

0473 

REF 

4 

LAST 

483 

27,2157 

44312 

1 

M XM3 

neSIREP  S/C  AXES  TO  STABLE  MEMBER  AXES 

A0474 

WHICH  WILL  ALIGN  VI  WITH  VF  ANC  AVCIC 
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L 

P60, 

R62 

USER'S  FACE  NC.  12  E6  S3 

A0^7S 

GIPBAL  LCCK 

0A76 

27, 2160 

4 5 16-1 

1 

F INCG  IP  E 

AXC,  1 

CALL 

0477 

27, 2161 

0000(1 

1 

0 

EXTRACT  THE  CC"'PANDEC  CCU  ANGLES  FRCP 

C41E 

RFF 

2 

LAST 

366 

27 ,2162 

A A 6 54 

0 

DCMTOCCU 

THIS  PATRIX 

1479 

27,2162 

4C234 

C 

PT6 

SFTPC 

04  8>i 

RFF 

3 

L /'FT 

4 86 

27,2164 

21621 

1 

V 1 STC2S 

CCP  VFPT  TF  2 : S CCPFLFPEM 

04P1 

27,2165 

0000  L 

0 

0 

04R? 

27,2166 

776  50 

1 

GC7C 

04  F7 

RFF 

3 

LAST 

AR3 

27,2167 

03325 

0 

VECQTfmp 

RETLRN  TC  CALLER 

04  P4 

27,2170 

50375 

0 

PICKAXIS 

\)L  CAC 

CCT 

IF  VF  X VI  = C,  FIND  VF  . VI 

0485 

27,2171 

00035 

1 

2 60 

04P6 

REF 

19 

LAST 

484 

27,2172 

03765 

0 

SCAXIS 

0487 

27,2173 

7224C 

1 

BPN 

T LCAC 

0488 

REF 

1 

27, 2174 

54354 

1 

RCT16C 

0469 

27,2175 

00032 

0 

2 50 

049') 

27,2176 

77  650 

1 

GCTC 

IF  VF  = VI,  CrU  CESIREC  = PRESENT  cCU 

C491 

REF 

4 

LAST 

485 

27,2177 

■03325 

0 

V ECOTEMP 

PRESENT  COL  ANGLES 

0492 

35,2-000 

BANK 

35 

0493 

REF 

1 

26,  200rj 

SFTLCC 

MANUVFR 1 

0494 

26,2354 

RANK 

049  5 

26,2354 

47  375 

0 

RFTl 80 

VLCAC 

VXV 

IF  VF,  VI  AM  IPARALLEL  , 108  DEG  RCTATION 

0496 

RCF 

20 

LAST 

484 

26,2355 

03255 

0 

MTS  +6 

IS  PFCUIREC.  V stable  PEMEER  AXIS  IN 

0497 

REF 

1 

26 ,2  156 

06522 

1 

F ICPFAL  F 

INITIAL  S/C  AXES. 

04^8 

26,2357 

472  56 

c 

LM  T 

VXV 

PINT  Y(SP)  X X(I) 

0499 

REF 

20 

UiST 

485 

26,2360 

03765 

c 

SCAXIS 

RIND  LMT(VI  X UNIT(Y(SP)  X X(I))) 

05^0 

26,2361 

4CC56 

c 

LN  I T 

ecv 

I.E.  PICK  A VECTOR  IN  THE  PLANE  OF  Ml), 

05'-.l 

RFF 

1 

26,2362 

54  3 76 

1 

PICKX 

Y (S*^)  PERPENC  ICLLAR  TC  VI 

0502 

RFF 

43 

LAST 

484 

26 ,2363 

1 7271 

0 

STOCL 

CCF 

0503 

26,2364 

0CC45 

0 

360 

CHECK  PAGNITUCE 

0504 

26,2365 

50025 

0 

DSU 

CP  THIS  VECTOR. 

0 5U5 

REF 

2 

LAST 

482 

26,2366 

14415 

1 

DF6-14 

IF  LESS  THAN  P-14, 

1506 

RFF 

2 

LAST 

485 

26,2367 

54376 

1 

PICKX 

PICK  X-AXIS. 

0507 

26,2370 

77775 

1 

VLOac 

0566 

REF 

44 

LAST 

465 

26,2371 

0327  1 

0 

CCF 

0509 

RFF 

45 

LAST 

26,2372 

17  27  1 

0 

XPQT 

STHDL 

CCF 

0510 

RFF 

2 

1 ilST 

485 

26 ,2373 

v)6522 

1 

H lOPHALF 

0511 

26,2374 

77  6 50 

1 

GCTC 

0512 

REF 

1 

26,2375 

56072 

1 

C CPPPATX 

0513 

26,2376 

52175 

0 

PICKX 

VLC  AC 

GCTC 

PICK  THF  XAXIS  IN  THI S CASE 

0514 

RFF 

3 

L AST 

465 

26,2377 

06  52  2 

1 

H IDPHALF 

0515 

RFF 

1 

26 ,24-10 

54372 

0 

XRPT 

0516 

26,2401 

1 5 555 

0 

SINGI^'LC 

20EC 

.4285835003 

= S IN  ( 59  ) $2 

0516 

26,2402 

35172 

c 

0517 

26 ,24-T3 

14113 

1 

S INV  EC  1 

2DEC 

.3796356537 

=SIN(R9.4)  i 2 

0517 

26,2404 

36326 

c 

051  8 

26,2405 

07701 

0 

S INVEC2 

20EC 

. 24621178CC 

= SIN( 29.5  ) *2 

051  P 

26,24  16 

35  7vn 

0 

0 519 

26. 24  '7 

C4343 

1 

VECANG  1 

2DEC 

. 1366868889 

= 5<7  CEGPFES  J36C 

0519 

.26,2410 

21616 

0 
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L ' R6C, P62  USER'S  PAGE  NO.  13  Et  S3 

05?0  26,2All  C3C7C  0 VECAAG2  2CEC  .C9722222222  = 35  CEGPEES  J3fC 

C520  26,2412  34344  0 

0521  26,2413  OOOOO  1 IBITCP  CCT  0 KEEP  TUS  PEECRE  CPB(-14) 

0522  26,2414  OCOOl  C CPB-14  CCT  UOOni 

0523  26,2415  CmoO  1 OCT  OOOOQ 
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L 

R6"  , R62 

LSFR'S  PAGE  NO. 

14 

E6  S3 

P052A 

ROLTtNF  FOR  IWITIiTING  ALICNAIIC  WANEUVSR  VIA  KFVeCAFC  (VA9) 

0529 

0526 

0527 

REF 

1 

34,2000 
23  ,?0OO 
2’  , 2 103 

BANK 

SFTLCC 

BANN 

34 

R62 

052  8 

REF 

12 

LAST 

483 

F6,  1676 

EBANK= 

BCDU 

0529 

REF 

1 

CCUNT>! 

I1/R62 

0530 

R'=F 

1 

23,2103 

R62DI SP 

EQLALS 

P62FLASF 

0531 

REF 

1 

23,21)3 

3 5 0 10 

0 

P62FLASF 

f AF 

V06N22 

FLASH  V06N22  ANC 

0 5 3? 

REF 

1C2 

LAST 

476 

23,21^4 

C 4616 

1 

TC 

BANKCAU 

I ecu  ANGLES 

0533 

RFF 

6 

L AST 

38? 

23,2105 

2C477 

1 

CAOR 

GCFLASH 

C534 

REF 

30 

LAFT 

376 

23,2106 

1 5472 

1 

TCF 

ENCEXT 

TERMINATE 

• 535 

REF 

1 

23,2107 

1 2 111 

0 

TCF 

GCNOVE 

FRCCFEC 

0 53  6 

RFF 

2 

LAST 

487 

23,2110 

1 2103 

0 

TCF 

R 6 2 F L A S F 

ENTER 

A05^7 

astronaut  way  lcac  new  iccls  at  tfts 

AO  53  8 

FEINT 

0 53  9 

RFF 

16 

LAST 

477 

23,2111 

0 5504 

0 

GCPOV  E 

TC 

UPFL AG 

SET  FCR  3-AxIS  MANEUVER 

0 540 

RRF 

4 

LA  ST 

476 

23,2112 

00124 

0 

AOPES 

3AXISFLG 

0541 

RFF 

103 

1 AST 

487 

23,2113 

0 4616 

1 

TC 

BANKCALL 

0 54? 

REF 

2 

LAST 

34  1 

23,2114 

54123 

0 

CAFR 

R60LEN 

0543 

RRF 

3 1 

LAST 

487 

23,2115 

1 5472 

1 

TCF 

ENOEXl 

ENC  R62 
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fiPOnn  SLEOOLTINF  NAME:  PC5  - S-BAND  ANTENNA  FCR  LP 

R2C'~I  ^'CCC  EV  T.  JAm;^.9 

D2CF2  NOCl  BY  P.  SHAKIP 

R20O3  FLNCTION'AL  CFSCRIPTICN 


R2004  THE  S-BANO  ANTENNA  RCUTTN^,  R35,  CC^'PUTES  ANC  EISPLAYS  THF  PITRE  ANC 

Rpnos  YAlv  ANTFNNIA  GTMBA.L  ANGLES  RECllREP  TC  PCINT  TER  IN  STEERABLE  ANTENNA 
F2006  TCEARC  TEF  CENTER  CF  THF  EAPTE.  TEIS  ROUTINE  TS  SELECTED  BY  THE  ASTRO- 
R2n07  NALT  VIA  CSKY  ENTRY  DURTNG  FCASTING  FLIGHT  DP  WEEN  TEE  I.V  IS  CN  TEE  MOON 

R200R  SUFFACF.  TEE  FART(-  cR  MCCN  REFERENCE  CCCRCIN'ATE  SYSTEP  IS  LSEC  CEPFNDING 

R2CC9  FN  EEETEEP  TEF  ip  IS  ABOUT  TC  ENTER  CP  EAS  ALREADY  ENTERED  TEE  MOON 

P2mO  SPHERE  OF  INFLLFNC.F,  RESPECTIVELY.  CAN  BE  CALLED  ANY  TIME  EXCEPT  kEEN 

P20I01  ''NCTEF‘^  EXTENDED  VERB  IS  IN  USE.  CIPPLAY  TS  MEANINGLESS  kITH  IMp  CFF. 


R201I  TC  CALL  SLBROJJTINE,  ASTPCNALT  KEYS  IN  V 6A  E 


P2012  SUBPCUTINES  CALLEC- 

P2C]  A INTFRET 

R2C15  LOACTIME 

R2016  LEPCCMC 

R2C1  7 LLNPCS 

R2C18  CCLTR TG 

R2ni9  *SMNP* 

R2r2«7 6ANKCALL 

R2021  B50FF 

P2022  FNDCFJCe 

P2D73 blanket 


R202A  RETURNS  kITE 


R2025 

FITCE  ANGLE  IN  PTTCEANG 

REV.  BO 

R2026 

YAk 

ANGLE 

IN  YAkANG  REV. 

8 J 

R2027 

ERASAELES  USED 

R2C28 

PITCHANG 

R202q 

YAk'ANG 

P2030 

Rl  M 

R2031 

VAC 

AREA 

2032 

Al, 37A? 

BANK 

41 

2033 

REF 

A 

LAST 

2B8  A2»20'0 

SETLCC 

SBANO 

203A 

A2 ,3606 

bank 

203? 

REF 

1 

F7, 1A71 

EBANK= 

WECCAPES 

2036 

REF 

2 

LAST 

46  TC  A7: 

2 2* 

COUNT=« 

tT/RC5 

2039 

RFF 

30 

LAST 

4BC  A2,3606 

C 6CA2  1 

SBANCANT  TC 

INTPRET 
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L 

S-E  ^NC 

AATEK'IMA 

FOP 

LW 

LSFF'S  FACE  AC.  2 E7  S4 

2rAG 

42 , 3607 

4 700  1 

0 

SFTPC 

RTF 

20A1 

42  ,36! C 

HO  O' I 1 

0 

OC 

?nA? 

pep 

5 

LA9T 

38  1 

42.3611 

21574 

1 

LCAOTIR^E 

PICK  LF  CUFFEAT  TIME 

20A? 

R5F 

6 

LAST 

340 

42  ,36  12 

34  >41 

0 

STCALL 

TDEC  1 

ADVANCE  INTEGRATICN  TC  TIME  lA  TCECl 

20AA 

REF 

2 

LAST 

34C 

42,3613 

27  101 

1 

LFRCCMC 

USIAG  CCAIC  integration 

2C'45 

42,3614 

46135 

1 

SLCAC 

BHI  Z 

20A6 

REF 

1 

42,3615 

00050 

1 

X 2 

X2  =0  EARTF  SPHERE,  X2  =2  MCCA  SFHEFE 

2047 

REF 

1 

42,3616 

65634 

0 

CC.NV4 

2C4P 

42.3617 

77775 

1 

VLOAC 

204G 

REF 

3 

LAST 

340 

42,3620 

0090  1 

0 

PATT 

2050 

RPF 

1 

42,3621 

1 6 2 C 5 

1 

STOOL 

RIP 

2C'il 

REF 

3 

LAST 

209 

42,3622 

00715 

0 

TAT 

2052 

42,3623 

77624 

1 

CCNV3 

CALL 

2057 

REF 

1 

42, 3624 

33647 

1 

LUNPCS 

UNIT  FCSITICN  VECTOR  FFCM  EAFTF  TC  MCCA 

2054 

42,3625 

74375 

0 

VLCAC 

VXSC 

2055 

RFF 

2 

LAST 

125 

42, 3626 

02723 

c 

VNCCN 

2056 

REF 

■ 1 

42,3627 

240H1 

0 

REMDIST 

MEAA  CISTAACE  FPCM  EARTH  TC  MCCA 

2057 

42,3630 

53372 

1 

\,SL1 

VAC 

2058 

PRF 

2 

LAST 

489 

42,36^1 

0 2 20  5 

1 

RLR 

2 0 5 9 

42 ,3632 

77650 

1 

GOTO 

2060 

REF 

1 

42,3632 

6 5 6 36 

1 

CCLV5 

2061 

42,3634 

77  775 

1 

CnNV4 

VLCAD 

206  7 

REF 

4 

LAST 

489 

42,3635 

00001 

0 

RATT 

UE  = -LNIT(RAIT)  EARTH  SPHERE 

2063 

42,3636 

5340  1 

1 

FCNVS 

SFTFC 

UM  T 

UE  = -UA  IT  ( (REM)  (OEM)  H PL)  MCCN  SPHERE 

2C64 

42,7637 

00001 

0 

00 

SET  PL  FCIATER  TC  0 

2C7  5 

42 ,364C 

450  76 

1 

VCCRF 

CALL 

2066 

REF 

1 

42,  364  1 

4 754  1 

1 

COLTRIG 

CCMFUTE  SIAES  AAC  CCSIAES  CF  CCU  ANGLFS 

2C67 

42,3642 

76521 

0 

lyxv 

VSL  1 

TRANSFCRM  REF.  COORDINATE  SYSTEM  TC 

2068 

REF 

7 

LAST 

340 

42, 2643 

01734 

c 

REFSRNAT 

SYAELE  MFMEER  8-1  X 8-1  X 8+1  = 8-1 

2060 

42, 3644 

71206 

0 

PUSH 

OLCAD 

8C 

207C 

RFF 

? 

LAST 

30C 

42,3645 

06524 

1 

HI6ZEFrS 

20  71 

RFF 

2 

LAST 

119 

42,3646 

0220  1 

0 

STORF 

PI  TCHANG 

2072 

prp 

1 

42 ,3647 

26203 

1 

STOVL 

YAWANG 

ZERC  CLT  angles 

2073 

42 ,3650 

77624 

1 

CALL 

2074 

REF 

1 

42,3651 

4 767  2 

0 

* SMNB* 

2075 

RFF 

3 

LAST 

489 

42,3652 

16205 

1 

STOCL 

RLT* 

PRE-MLLTIPLY  RLM  BY  (AB5A)  MATRIX(EO) 

2076 

RTF 

4 

LAST 

489 

42,3653 

0 2 2 j 7 

r 

RLR  +2 

2077 

42,  36  ‘!4 

45206 

1 

PLSH 

DSL 

2078 

RFF 

C 

• LAST 

489 

42,2655 

02205 

1 

RLP 

2079 

42,3656 

776C5 

1 

CPF 

20PC 

REF 

1 

42,3657 

2576  7 

c 

1CVSGRT2 

2081 

RFF 

6 

LAST 

489 

42,3660 

16  2 >7 

0 

STCCL 

RLM  +2 

2082 

42,3661 

4 12  15 

1 

DAD 

0 NF 

2C83 

REF 

7 

LAST 

48  9 

42  ,3  66  2 

022  15 

1 

RLM 

2084 

RFF 

2 

LAST 

489 

42,3663 

25767 

c 

1 CVSCRT2 

2085 

RFF 

8 

LAST 

489 

42,3664 

26205 

1 

STGVL 

RLM 

R 8-  1 

2C86 

REF 

9 

LAST 

489 

42,3665 

02  20  5 

1 

' 

Rl  M 

2087 

42, 2666 

62256 

c 

LL  I T 

PCVL 

2C88 

RFF 

10 

1 AST 

489 

42,3667 

0 2 205 

1 

RLM 

2089 

42  ,3670 

72431 

1 

\>FRC  J 

VSL2 

FRCJFCTICN  CF  R ONTO  LM  XZ  PLANE 

f 
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L 

s-e^^c 

/!NTFNNA 

FOP 

LM 

LSEF'S  PAGE  NC.  3 E7  S6 

2C'}f 

PFF 

1 

62 , 3671 

06  5 20 

0 

H I UNITY 

2C?1 

62 ,3672 

60  165 

1 

EVSL 

BOV 

CLEAR  CVERPLC^,  INCICATCP  IF  ON 

2092 

PPF. 

1 1 

LAST 

689 

62,3673 

02205 

1 

RLN 

2C^3 

PFF 

1 

62 ,3676 

65675 

0 

CCVCNV 

209A 

62,3675 

6'’C56 

c 

CCVCNV 

LMT 

BOV 

FXIT  CN  OVERFLOW 

2095 

REF 

1 

62,3676 

65763 

1 

SBANDEX 

2096 

62  ,36  77 

67206 

c 

PUSH 

VXV 

LRF  VECTCP  P-1 

2097 

PPF 

1 

62, 37CC 

C65  16 

0 

HI  LM  TZ 

2C9f 

62 ,3701 

57572 

0 

VSL  1 

VCOMP 

LZ  X LRP  = -(URF  X LZ 1 

2''99 

REF 

12 

LAST 

696 

62 , 2702 

0 2 2'J  5 

1 

STCRE 

RLM 

X V EC  E - 1 

2100 

62, 3703 

6226  1 

c 

DOT 

PDVL 

SGN(X.LY)  UNSCALEC 

2101 

RFF 

2 

LAST 

69C 

62 , 3706 

06520 

0 

H TUN  ITY 

2102 

pf  F 

13 

LAST 

69F 

62, 2705 

02  20  5 

1 

RLR 

2103 

62, 3 7 16 

75266 

c 

ARVAL 

SIGN 

210^ 

62 ,3707 

77736 

n 

AS  IN 

ASIN(  (SGN(  X.UY  ) )ABV<  xn  FEV  BO 

2106 

REF 

•a 

LAST 

689 

62, 3710 

2620  1 

c 

STCVL 

PI  TCHANG 

2 106. 

REF 

1 

62,3711 

0O0O7 

0 

UPP 

2107 

62,3712 

510  61 

0 

CCT 

P FI 

2108 

RFF 

2 

1 AST 

690 

62,3713 

06  516 

0 

HILNITZ 

2K9 

PFF 

1 

62 ,3716 

65721 

0 

NOAOJUST 

YES,  -9C  TO  +90 

2110 

62,3715 

6526  5 

1 

CLCAC 

DSU 

2111 

RFF 

6 

LAST 

685 

62,3716 

06522 

1 

HIDPHALF 

2112 

RPC 

6 

(AST 

690 

62,3717 

02.201 

0 

P ITCFANG 

2113 

REF 

5 

LAST 

69C 

62, 272C 

022C  1 

c 

STORE 

P ITCHANG 

2116 

62,3721 

67375 

0 

NCAO JLST 

VLOAC 

VXV 

2115 

REF 

1 

62,3722 

0000 1 

0 

UR 

Z = (UR  X URP ) 

2116 

RFF 

2 

LAST 

690 

62, 3723 

ccr.07 

c 

UBP 

2117 

62 ,3726 

77772 

0 

VSL  1 

2118 

RTF 

16 

LAST 

690 

62,3725 

162C5 

1 

STCCl 

R L R 
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P0A79  CAILIPG  SEGUFNCF  - 

ROABO  TC  BAPKCALI 

pnA81  CACP  R22LEM 
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CCT 

0 6022 

0565 

RFF 
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RFF 

15 

LAST 

5'»7 
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3 C075 
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0556 
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26,2532 
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0557 

26,2533 
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0 

RZF 
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26,2535 
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1 

26,2536 
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RFF 
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RFF 
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24,2557 
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1 
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INTPPET  . 
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1 
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24,2561 
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1 

TC 
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■) 
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24 , 2565 

1 2624 
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24,2566 
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RFF 
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24,2567 
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1 

CAF 
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2 
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24,2570 
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1 

TS 

N49FLAG 
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0587 

RFF 
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0 
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3 7 7 20 

0 

CAF 

FFI027 
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RFF 
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24,2574 

0 597? 

1 

TC 
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RFF 

•3 
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5C  8 

F7,  1746 
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N49FL  AG 

0592 

R'^F 

1 

24, 2575 

02645 

1 
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N'49DSF 

C592 

RFF 

1 

24,2576 
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0 

0593 

RFF 
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LAST 

508 

24 ,2  577 

C 6042 

1 

TC 

I MFRFT 

0594 

24, 2600 

77735 

0 
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0595 

RFF 

4 

LAST 

5C8 

24,2601 

03747 

0 
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0 596 

24, 2602 

50054 

0 

BZF 

BNN 

LCCF  TC  CHECK  IF  FLAG 
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24,2603 

506  ) 1 

1 

- 3 

SETTING  CHANGED-BPANCH  - NC 

0^98 

PEF 

1 

24 , 2604 
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1 

R22L  FM7 

FRCCEFO 

0599 

24, 2605 
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1 

GOTC 
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3 
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0 
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LAST 

493 
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1 
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cs 

TV.C 
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Rf^F 
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LAST 
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1 

TS 
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79 
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24,2611 

0 5155 

0 

TC 
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0603 

24,2612 
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1 
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RFF 

6 
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24,2613 
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0 
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1 
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ARE  WE  CN  LUNAR  SURFACE 

061C 

RFF 

1 

24,2626 

0 264? 

0 

TC 

R 22L9N46 

YES  - WAIT  2 SECCNDS 

GAP:  REVISION  116  CF  /.PC  FRCGPAV  LU^INflPY  BY  K'ASA  2C21112-C71 


lS;Cc  ALG.  11, 19^-;  LENP2CS  .1^0  PAC-t  509 


L P20-P25 


USFF'S  PAGE  NO.  16  E7  S3 


0611 

REF 

10 

LAST 

628 

26i 2627 

3 

6 7 56 

1 

CA 

F I VF 

ACT  CF  LLAAF  SURFACE 
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RENDEZVOUS  FLAG 

ARE 

NOT  SET. 

R 1 C 1 A 

rUPl  1 - 

R1C19 

SEE 

OLTPUT  FCP  LPS20.1  + ATTITUDE 
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1C345 

RFF 

14? 

LAST 

52F 

23,2140 

0 46  16 

1 

TO 

6 AN KC ALL 

EEFCFE  FIRST  MARK,  ONCE 

10346 

RFF 

8 

LAST 

5 1 1 

23,2141 

1 7 706 

0 

CADR 
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CllUl 

PRTARGET 

1051 

RFF 

4 

LAST 

483 

23,2171 

03  773 

1 

STORE 
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2F 
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NEGATIVE  CF  THE  NUNPER  AT  CALLER  4l.  OTHERWISE 

IF  THE  ABSCLUTE  VALLE  CF 
IT  RETURNS  tq  CALLER  +3. 

VALUE  CF  C ( A ) IS 
RAV  BE  CALLED  IN 

GREATER  THAN 
RUFT  CR  UNCER 

THE 
EXEC  . 

1 16A 

A5L2 

0 0306 

1 PAGSUE 

EXTENT 

1165 

A513 

6 A515 

1 

EZNF 

+ 2 

1166 

ASIA 

1 AS16 

0 

TCF 

+ 2 

1 167 

A515 

A ocoo 

0 

CCN 

1168 

REF  153 

LAST 

51E 

A S 1 6 

50  002 

0 

INDEX 

C 

1169 

A517 

6 0000 

1 

AD 

0 

1170 

A520 

0 0 00  6 

1 

EXTEND 

1171 

REF  1 

A52  1 

6 6 7 A A 

c 

BZNF 

Q + 2 

ABS(A)  <=  CCNST 

GC  TC  L+3 

1 172 

REF  3 

LAST 

268 

AS22 

1 67A2 

1 

TCF 

Q + 1 

ABS(A)  > CCNST 

GO  TC  L+2 
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PI  173  PRCGRAN  NAf'E.  PPl  IRfHK  ARE  IN  IhE  L I R IT ' CF  THE  CtPPEAT  KCE. 

P1175  FUACTICNAl  C ES  C P 1 PT  ICA<_ 

R1176  PRLIATI-k  checks  PF  CESIPEC  GIABAL  ANGLES  TO  SEE  IF  TFEV  ARE  ^.ITHIN 
R1177  IFF  LIVT7S  OF  THP  CUP'^CNT  ACDE.  INITIALLY  THE  CESIPEC  TPUNNICN  AM  C 

P1178  SFAFT  ANGLES  ARE  STOREG  tn  ITEYPI  AND  ITEMP2.  IFF  CLRPE^M  PR 

P117G  AMFNNAF  AODF  {RACAfCES  FIT  12)  IS  CFECKEF  WFICF  IS  = 0 FCR 
R1180  MOTE  1 ANC  =1  FOP  YODF  2. 

R1181  RCCF  1 - THE  triinmcn  ANGLE  IS  CFEGKEC  AT  AAGSLE  TC  SEE  IF  IT  IS 

R1IF2  BETWEEN  -55  AMC  +55  CEGFE-^S.  IF  ACT,  PETUpN  tc  1 +2.  IF  WITHIN  LIMITS, 

R1183  the  SFAFT  ANGLE  IS  CFECKFP  TO  SEE  IF  II  IS  BETFEEN  -7C  ANC  +59  CFGPEES. 

RHEA  IF  NCI,  PFTLRN  TC  I.  +2.  IF  IN  LI^'ITS,  PETUPN  TC  L +3. 

R 1 185  MOCF  2 - TFE  shaft  ANGLE  IS  CHECkFO  AT  NAGSUB  TC  SEE  IF  IT  IS 
RIIR6  FFTWEEN  -139  ANC  -25  rPGPEFS.  IF  NCT,  RETURN  TC  L +2.  IF  FITHIN 

R1167  LIMITS,  THF  TRUNMCN  ANGLE  IS  CFEGKEC  TO  SEE  IF  IT  IS  BETWEEN  +125 

P1I88  ANC  -125  (+235)  PECREES.  IF  NCT,  RETURN  TC  L +2.  IF  IN  LIMITS,  PETUPN 
R1189  TC  L +3. 


RI190  CALLING  SFCLENCF: 

R1191  I TC  PPL  IMCFK  (WITF  INTERRUPT  INHIBITED) 

PI192  I +1  ACRES  T,S  (CrSIPEC  TRUNMCN  ANGLE  ADDRESS) 

P1193  ERASARLF  INITIALUATItm  RECLIREC: 

R119A  RAFMrrES,  MOCEA,  MOCFB  (QR  DESIRED  TRUNNION  AND  SFAFT 

R1195  ANGLE'  RL'FFHERF  IN  CCNSECUTIVE  LCCATICNS  - UNSWITCFEC  ERASABLE  OP 

RH96  CURRENT  FRANK). 


R1197  SLBRCUTINES  CALLFC_  MAGSUB 
R1198  JOBS  CR  TASKS  INITIATED.  NCNE 


R1199  ALARMS.  NONE 


R120C  rxn.  L + 2 (FITFEP  Cf:  ECTF  ANGLES  NCT  WITHIN  LIMITS  rp  CLRkENT  MGCE) 
R1201  L + 3 (BOTH  ANGLES  WITHIN  LIMITS  CF  CURRENT  MCCE) 


12>2 

4523 

0 0006 

1 

RRLIMCHK  EXTEND 

1203 

REF 

15A 

LAST 

523 

4524 

5 0002 

0 

INI  EX 

Q 

12‘)A 

4525 

5 OOCO 

1 

INDEX 

n 

1205 

4526 

3 OCC  1 

0 

DCA 

0 

1206 

REF 

I C C 

LAST 

52  A 

4527 

24  C02 

0 

TNCR 

Q 

1207 

RFF 

6 

1 AST 

25E 

453C 

5 2 C62 

1 

rxcF 

I TEMPI 

12FF 

PFF 

156 

LAST 

524 

453  1 

22  002 

0 

LXCF 

0 

KCALLEP  +2)  TC  L. 

1209 

REF 

2 

LAST 

324 

4 5 32 

3 474C 

c 

CAF 

ANTENEIT 

SEE  WFICF  MCCE  RR 

IS  IN. 

1210 

R'^F 

38 

LAST 

5 18 

z,  5 3 3 

7 Clio 

n 

MASK 

R APMCDE  S 

1211 

RFF 

1 71 

I AST 

521 

4 534 

10  000 

0 

CCS 

A 

1212 

RFF 

1 

4 535 

1 4 550 

1 

TCF 

MCDE2CHK 

1213 

RFF 

7 

LAST 

524 

4536 

3 00  61 

0 

CA 

I TEMPI 

NCDE  1 IS  CEFINEC 

AS 

R/SP: 

^SS^NBLE 

REVISION 

1 116 

FF  A or,  PRORRAM  LUMINARV  BV  NASA  ?0 

2 1 1 1 ? - C 7 1 
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1214 

■ 9FF 

1 

4 537 

C 4512 

C 

TC 

NAGSLS 

1 . AES  (-F  ) L 55  CFGS  . 

1215 

4 540 

66161 

1 

DEC 

-,30555 

2.  AESIS  + 5.5  DECS)  L 64.5  CFGS 

121  f 

PFF 

63 

I N ST 

466 

4541 

I)  n-)'ji 

' t 

TC 

L 

(SEAFT  LIMITS  AT  +59,  -7C  DECS) 

1217 

PFP 

1 

4 542 

3 4 56  2 

1 

CAF 

5.5DEGS 

121  S 

P.FF 

3 

LAST 

99 

4543 

6 1062 

AC 

ITFMP2 

S 

1215 

RFF 

2 

LAST 

52  5 

4 544 

C 4512 

C 

Tf 

RAGSLE 

12  2''> 

4 54  5 

64420 

n 

EEC 

-.35833 

64.5  CEGS 

1221 

REF 

64 

LAST 

525 

4546 

0 0001 

1 

TC 

L 

1222 

REF 

1 

4547 

0 4 560 

c 

TC 

RRL  IRCK 

IN  LIR  ITS. 

1223 

RFF 

1 

4 55') 

3 4563 

0 

MnCE2Cl-K 

CAF 

82DLG  S 

ROCE  2 IS  CEFINED  AS 

1224 

REF 

4 

LAST 

525 

4551 

6 0C62 

0 

AC 

ITFRP2 

1.  ABS(T)  G 125  DECS. 

1225 

RFF 

3 

1 AST 

525 

4 552 

C 45  12 

0 

TC 

NAGSLE 

2 . AES  (S  + 82  CEGS  ) L 57  DECS 

1226 

4553 

65673  ,0 

CEC 

- .31667 

(SHAFT  LIRITS  AT  -25,  -139  CEGS) 

1227 

PFF 

65 

LAST 

525 

A 55A 

C 0 c r 1 

0 

TC 

L 

1228 

PCF 

8 

LAST 

524 

4555 

3 0C6  1 

0 

CA 

I TE  RFl 

1229 

R'^F 

4 

LAST 

525 

4556 

C 451? 

0 

TC 

MAGSUe 

1230 

4557 

51615 

1 

CEC 

-.69444 

125  CEGS 

1231 

REF 

66 

LAST 

525 

4560 

50  001- 

0 

RRLIlWCK 

INDEX 

L 

123? 

PFF 

67 

LAST 

525 

4561 

0 OCOl 

0 

TC 

L 

( = TC  1 ) 

1 233 

4 562 

00765 

c 

5. 50EGS 

CEC 

.03056 

1234 

4563 

16450 

1 

82CEGS 

CEC 

.45556 
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P20-P  25 
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P1235 

FRCGF7N  4APE_  SETTRKE 

. IF  either: 

R 1237 

EUNETI0N4L  CFSCRIPTICr. 

R1238 
R 12AC 
R 12A1 

SETTPKF  UPCATFS  Tt-E  TRACK'^R  <=  A I L LAMP  ON  THE  OSKY. 
INITIAILV  THE  LAMP  TE9T  FlAG  (INCCFS33  FIT  1)  IS  CHECKED. 
IF  A LAMP  TEST  IS  IN  PRCGRESS,  THE  P-JCGRAM  EXITS  TC  L +1. 

HFR 

THE  ALT  GR  VEL  INFCRMATION. 

R1242 
R 12^2 
R12A4 

IF  Nc  lamp  tfst  the  fcllcwinc  is  checked  SEQLENT IALL Y_ 
1)  RR  CDU:S  BEING  ZERC'^D,  PR  CCL  GK,  AND  PR  NET  IN 
AUTO  MODE  (RAPMODES  BITS  13,  7,  2). 

P 12A5 
P 12^(^ 
RiP'+r 

2)  LR  VEl  data  fail  AND  MO  IR  PCS  DATA  (RADMOfES  PITS 
P,  5) 

3)  NIC  PP  DATA  (RACMOCES  PIT  4) 

R124R 
R 124P 
P125n 

THE  ABSENCE  OF  AIL  THREE  S I MULT ANECUSLY  IN  (1),  THE  PRESENCE  OF  BOTH 
IN  (2),  AND  the  PPESEMCF  CF  (3)  RESLLTS  IN  EITHER  THE  TRACKER  FAIL 
lAMF  (CSPTAE  +11C  FIT  8)  BEING  TURNED  CN  CR  LEFT  CM.  CTHERVvISE, 

R 125! 
R125? 
R12  53 

THF  TRACKFR  fail  LAMF  IS  TURNED  CFF  CP  IS  LFFT  CFF.  THEREFORE,  THE 
TRACKER  FAIL  LAMP  IS  TURN'FD  DN  TF_ 

A ) RR  CCL  FAILFD  UITH  PR  IN  AUTC  wrCE  AND  RR  CCU:S  NGT  BEING  ZEROED. 

R125^ 

P1255 

R1256 

B)  N SAM'PLES,  OF  LP  DATA  CCULD  NGT  BE  TAKEN  IN  2N  TRIES  WITH 
EITHER  the  ALT  OR  VEL  INFORMATION 

G)  N SAMPLES  OF  RR  DATA  CCUID  NET  EE  DETAINED  FROM  2N  TRIES 

P 1257 

WITH  E ITHEP  THE  A L 

R1258 

calling  SEQUENCE: 

P.  1 2 5 9 

L TC  SETTRKF 

R1260 

EP.ASAELF  INITIALIZATION  RFCLIPED:  IMCOES32,  RADMCDES,  CSPTAB  +11D 

P 1261 

SLBRCLTINES  CALLFC.  NCNF 

R 1262 

JOBS  OP  TASKS  IN'ITIATED_  NCNE 

R1263 

ALARMS.  TRACKFR  FAIL  LAMP 

P 126A 

EXIT.  L +1  (ALWAYS) 

EC. 

1266 

PEF  26  LAST  469  4564  3 4753  1 SETTRKF  CAF  EITl 

NC 

ACTICN  IF  CURING  LAMP  TEST.  , 

1267 

126R 

1269 

PEF  25  LAST  47?  4565  7 1300  1 MASK  IMODES33 

RFF  172  LAST  £24  4566  10  000  0 CCS  A 

RFF  157  LAST  524  ^56?  C C0Q2  C TC  Q 

1270 

1271 

REF  25  LAST  ,335  4570  3 4744  1 RRTRKF  CA  BITS 

RFF  68  LAST  52S  4571  54  CCl  1 TS  L 

1272 
1 27^ 

RFF  2 LAST  186  4572  3 4615  1 CAF  12,7,2 

RFF  29  LAST  524  4573  7 0110  0 MASK  RAPMCDES 

SEE 

IF  ecu  FAILED. 

1274 

1275 

4574  C 0C06  1 EXTEND 

REF  1 4575  1 4601  0 BZF  TRKFLON 

CONDITICN  3 ABCVE. 

1276 

1277 

PPF  1 4576  3 475Q  1 RRCHECK  CAF  RRCATABT 

REF  40  LAST  526  4577  7 7110  0 MASK  RAPMCDES 

SEE 

IF  RR  DATA  FAILED. 
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1278 

1279 
12  8f; 

PEF 

8^=8 

RPF 

172 

69 

39 

LAST 

LAST 

LAST 

526 

526 

473 

460C 
46'''  1 
46M2 

1C  oon 
3 OCCl 
6 1.135 

c 

c 

n 

TRKFLCN 

CCS 

CA 

AC 

A 

L 

OSPTAB 

tl  ID 

HALF  ADD  OFSIRED  AND 

PRESENT  STATES. 

1281 

P.FF 

7C 

LA  ST 

52  7 

4602 

7 CCCl 

1 

NAS  K 

L 

1282 

4604 

C CCfl6 

1 

EXTEND 

128^ 

opp 

4 

LAST 

275 

4 6i'5 

1 6745 

n 

EZF 

TCC 

NG  CHANGF. 

1284 

RPF 

40 

LAST 

527 

4606 

2 103  5 

0 

FLIP 

CA 

D SPTAB 

+ 11  C 

CANT  USE  LXCH  CSPTA8 

+11C  (RESTART  PROP) 

1285 

4607 

0 0006 

1 

EXTEND 

1286 

REF 

10 

LAST 

2 5S 

4610 

06  00  1 

n 

RXCR 

LCHAN 

1287 

RTF 

11 

L AST 

434 

46  11 

7 4 733 

C 

NASK 

PCSMA  X 

1288 

REF 

30 

LAST 

51C 

4612 

6 4735 

1 

AC 

8 IT  1 5 

1289 

RTF 

4 1 

LAST 

527 

4612 

55  ‘ C35 

1 

TR 

nSFTAe 

+ 1 1C 

129r 

RPF 

158 

LAST 

526 

4614 

0 0CC2 

0 

TC 

0 

1291 

4615 

10102 

0 

. 13,7,2 

CCT 

1C102 

129  2 

4616 

ENDRRCDF 

ECLALS 

4 
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P1293  FRCGPA^'  N4MF_  PPTLRNON 

R129A  FLACICAAL  CESCPIFTICA_ 


R1295  RRTIRNPN  IS  ''^HE  TLRA-CN  'FCLEPCF  l^HTCH.  ALCFG  hITF 

R1296  PPZERCSE,  ZEROS  ThF  GGIJ;  S AND  GETER'^INES  TEE  RR  NCDF. 

R12F7  INITIALLY,  CCMPGl  IS  TFiASFERREC  TC  FR2ERCSE  FOR  ThE 
R1298  ACTUAL  TIJPN-QN  SPCUEACP.  LPGN  RETURN  THE  FPCGFAH 

R1299  WAITS  1 SFCCNC  PEFCRF  REPCVING  THF  TURN-ON  FLAG 

P1300  (RAO^rCES  BITl)  SC  THF  PEPrSITICN  PCUTINE  WCP:T 
R1301  INITIATF  PROGRAM!  ALARM  GC501.  A CH<=CK  IS  THEN  MADE 

R1302  TC  IF  A PP.nC-PAN  IS  USING  THE  PF  (STATE  FIT  7).  IF 

R 1 303  sn,  THF  PROGRAM  EXITS  tq  FNDFADAR  SC  THAT  THF  ,PP  CDL 

R1304  FAIL  FLAG  (RACMOCFS  PIT  7)  CAN  EE  CHECKED  BFFORF 

R1305  RETURNING  TC  THE  V'AITING  PRCGFAM.  IF  NET,  THE  PPCGFAM  EXITS 

R13CI6  TO  TASKOVFR. 

R1307  CALLING  SEQUENCE:  WAITLIST  TASK  FROM  RPAlJTCHK  IF  THE  PR  POWER  ON  ALTO 
R13P8  BIT  (CHAN  32  BIT  2)  CHANGES  TC  0 AND  NC  PROGRAM  WAS  USING 
R1309  THF  RR  (STATE  BIT  7). 


R13I0  FRASAELE  INItiaIIZATKN  pECUIFEC: 

P1311  racmodfs,  state 

R131  2 SUPPOUTINFS  CALLFD_  PRZFROSB,  FIXCELAY,  TASKOVER  , ENDRADAR 

R1313  JOBS  CR  TASKS  INITIATED. 

P131A  NONE 

P 1 3 1 5 alarms.  none  (SFF  PPrEPCSB) 


R1316  FXIT_  TASKOVER,  FNDFACAP  (WAITING  pRCGPAM) 


1317  24,22B5  BANK  24 

131E  REF  1 25,2U'I0  SETUOC  P2CS1 

1319 25,2973 BANK 


1320 

1321 

RFF 

REF 

21 

1 

LAST 

522, 

E7,  1456 

E8ANK= 

COUNT* 

LC  SC  CUNT 
$3/RSUB 

1322 

REF 

1 

25  ,2C73 

C 2 1C  2 

C 

RRTLPNCN  TC 

RF  ZEPCS  E 

1323 

RFF 

3 

1.  AST 

5^1  1 

25,2074 

0 522  1 

0 

TC 

F I XDELA Y 

WAIT  1 SEC  EEFCRE  REMCVING  TURN  ON  FLAG 

1324 

25,2075 

CC144 

0 

CFC 

100 

SO  A MONITOR  REPOSITICN  WCNT  ALARM. 

1325 

REF 

1 

25,2076 

4 4 753 

C 

CS 

tlrncnbt 

1326 

REF 

41 

LAST 

526 

25,2077 

7 0110 

0 

MASK 

RAOMOCES 

1327 

RFF 

42 

LAST 

526 

25  ,210C 

54  110 

0 

TS 

RACMCCES 

1328 

RFF 

23 

LAST 

522 

25, 2101 

1 5 2 6 1 

c 

TCF 

TASKCVER 

i 
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Pf329  PROGRAM'  NAME.  PRZFPCSB 

PL330  ' functional  CESCPIFTICN 

R1331  RRZERCSB  IS  A CLOSED  SUPPCLTINE  TO  ZERO  Tt-E  RR  CCU:S, 

R1332  DETERMINE  Tf-c  RP  MODE,  AND  TURNS  ON  THE  TRACK'=R  FAIL 

P1333  lamp  if  PFQLIREC.  INITIALLY  THE  RR  CPU  ZERO  EIT  (CHAN  1? 
P133A  BIT  1)  IS  SFT.  FOLLOWING  A 20  MLLISECCND  UAn,  THE  LGC 
R1335  RP  ecu  COUNTFPS  (CPTY,  OPTO  ARE  SET  = 0 AFTER 

R1336  WHICH  THF  RP  CPU  ZERO  DlSq-FTE  (CHAN  12  EIT  1)  IS 

P1337  PEMOVEC.  A A SECOND  NAIT  IS  SET  TO  ALL  THE  RR  CCL:S 
R1338  TO  REPEAT  THE  ACTUAL  TRUNNION  AND  SHAFT  ANGLES.  THE 

R 1339  PR  CDL  ZF.PQ  FLAG  (RACNOOES  PIT  13)  IS  RENCVEC.  THE 

R13A0  CONTENTS  OF  OPTY  IS  THEN  CHFCKFD  TO  SEE  IF  THE  TRUNNION 

R13A1  ANGLF  IS  LESS  THAN  90  CfgRFfS.  !F  NOT,  BIT  12  OF 

R13A2  OACMnCES  IS  SFT  = 1 TO  INOKATE  PR  ANTENNA  MQCE  2. 

R13A3  IF  LESS  THAN  90  DEGRFFS,  BIT  12  CF  RAOMOOES  IS  SET  = 0 TO 

R13AA  INDICATE  PR  ANTENNA  NODE  1.  SETTRKF  ’IS  THFN  CALLEC  TO 

RI3A5  SEF  IF  THE  TRACKER  FAIL  LAMP  SHCLLP  BF  TURNED  ON. 


R13A6  CALLING  SEQUENCE:  I TC  RPZFPCSB  {from  RPTURNON  AND  PRZEPG!) 

P13A7  erasable  initialization  pfclirec; 

R13A8  PAFMOCES  (BIT  13  SFT),  PSPTAB  + I ID 

RI349  SLBRCLTINES  CALLEF,  FIXOFLAY,  MAGSUE,  SETTRKF 


R 1350  JPBS  OR  TASKS  INmATFD 

R1351  NONE  , 


R1352  ALARMS.  TRACKER  FAIL 


R1353  EXIT.  L +1  (ALWAYS) 


1354 

25,2102 

0 0006 

1 

RRZERCSB  EXTEND 

1355 

POE 

2 

LAST 

1D6 

25,2103 

23*312 

0 

CXCH 

R R R FT 

1356 

REF 

27 

LAST 

526 

25,2104 

3 4 7*^3 

1 

CAP 

BIT! 

BIT  13  CF  PACMCDES  MUST  EE  SFT  BEFORE 

1357 

25,21)5 

0 0006 

1 

EXTEND 

COMING  FFRE. 

1358 

PEE 

28 

LAST 

51F 

25 ,21 C6 

05  012 

1 

WCP 

CHAN12 

TURN  ON  ZERO  RR  CCU 

1359 

REF 

4 

L AST 

528 

25,2107 

C 5 22  1 

0 

TC 

F I XDE  LAY 

1360 

25,2110 

00002 

0 

DEC 

2 

1361 

REF 

1 1 I 

LAST 

5 1 6 

25,2111 

*2  ^ -7  C C 

1 

CAF 

ZEPC 

1362 

PFF 

5 

LAST 

5 15 

25,2112 

54  035 

0 

TS 

CDUT 

1363 

REF 

4 

LAST 

31  1 

25,21 13 

54  036 

0 

TS 

ecus 

1364 

PEE 

64 

LAST 

5D9 

25,2114 

4 4753 

c 

c s 

ONE 

REMOVE  ZFRCING  BIT. 

1365 

25,2115 

0 0106 

1 

EXTEND 

1^66 

REF 

29 

LAST 

529 

25,2116. 

03  012 

1 

VvANC 

CHAN12 

1367 

RFF 

5 

LAST  . 

529 

25,2117 

0 522  1 

c 

TC 

FIXDELAY 

136E 

25,2120 

01750 

1 

CEC 

1000 

RESET  FAIL  INFI8IT  IN  10  SECS  - D.281 

1369 

REF 

3 

LA  ST 

507 

25,2121 

4 4737 

1 

CS 

RCrUO  EIT 

PFMCVE  ZFRCING  IN  PROCESS  BIT. 
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1370 

REF 

43 

LAST 

528 

25,2172 

7 0110 

0 

PASK 

RACMCCES 

137  1 

RFF 

44 

LA  ST 

53C 

25,2123 

54  lie 

c 

TS 

RACNCCES 

1372 

REF 

6 

LAST 

529 

25,2124 

3 0'73  5 

1 

CA 

COLT 

1373 

RPF 

e 

LAST 

525 

25,2125 

0 4512 

c 

TC 

PAGSue 

1374 

25,2126 

57777 

1 

CEC 

-.5 

1375 

25,2127 

1 2132 

1 

TCF 

+ 3 

IF  PCCE  2. 

1376 

REF 

1 1 2 

LAST 

529 

25,2130 

3 475  5 

1 

CAF 

ZERO  • 

1377 

25,2131 

1 2133 

0 

TCF 

+ 2 

137fc 

REF 

3 

LAST 

524 

25,2132 

3 4740 

0 

CAF 

ANTENBIT 

1379 

45 

1 AST 

53C 

25,2133 

56  no 

1 

XCH 

RACPCCES 

13  80 

RFF 

1 

25,2134 

7 7 74  4 

0 

PASK 

-BIT12 

1381 

REF 

46 

LAST 

53f 

25,2135 

26  110 

0, 

ACS 

RACMCCES 

138? 

REF 

2 

LAST 

186 

25,2136 

0 4 564 

1 

TC 

SETTPKF 

TRACKER  lANF  MGFT  GO  CN  NOW. 

1383 

REF 

3 

LAST 

529 

25,2137 

0 1312 

n 

TC 

RRRET 

CCNF. 

13E^  RPF 


1 


7 7A4 


-EIT12  ECUiLS  -1/8 


IN  SPRCCT 
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P1385  PRCGRA*'  NAME_  DCPPEPCS 

PL386  FUAC^ICAAl.  GESCPTFTICN_ 

°l3f7  nrRPPPCS  IS  fl  SECUENCP  rp  TC  CRIVS  TEE  REACEZVCUS  RADAR 

R1388  TC  A SAFE  POSTTinK.  IMITiaLLV  SETRRECR  IS  CALLEC  PhEPE  THE  RP 
R1389  EPPCR  CCUNTERS  (r|-AN  12  3 IT  2)  ARE  ENABLED  ANC  LASTYCMC 

R1390  AND  LASTxr.MD  S^T  = 0 TO  INDICATE  THE  CTFFFPENCE  EETPiEEN  TEE 

P1391  DESIREE  STATE  AND  PRESENT  STATE  OF  THE  CGNMANCS.  THE  RR 
R1392  TIRN-TN  flag  (RACNCCES  PIT  II  IS  CEECKFC  ANC  IF  NCT  PRESENT, 

R1393  PROGRAM  ALARM  C05C1  IS  PfCUFSTEr;  EEFCRE  C CNT I NO  I NC- . IN  EITHER 

R1394  CASE,  FCLLCUTNG  A 20  ’"ILLISFCCND  WAIT  THE  PROGRAM  CHECKS  THE  CURRENT 
PI395  RR  ANTENNA  RODE  (PACRCDES  BIT  12).  RRTCMY  IS  THEN  CALLED 

R1396  TO  CRTVF  THE  TRU^;^Ip^  ANGLE  TC  0 DEGREES  IF  IN  ^CCF  I AND  TC  180 

R1397  DEGREES  IF  IN  RCOE  2.  UPON  RETURN,  THE  CURRENT  RR  ANTENNA 

R139P  MODE  (RADMODFS  BIT  12)  IS  AGAIN  CHECKED.  RRSCNLY  IS  THEN 

R1399  CALLEC  TO  DRIVE  -^HE  SHAFT  ANGLE  tq  q DEGREES  IF  IN  I^CDE  1 AND  TC 

R140C  -9C  DEGREES  IF  IN  NCCE  2.  IF  CURING  RRTCNLY  CF  RRSOMLY  A 

R1401  PFMOCF  has  BEFN  RFOUESTFC  (RADMODFS  SIT  14),  ANC  ALWAYS 

R14I2  FCLLCWING  CCRFLETICN  CF  RRSCNLY,  CONTROL  IS  TRANSFERRED  TC 

R1403  pppnSRPT.  HERE  THE  PEECSITICN  FLAG  (PACNCCES  BIT  11)  IS 

R1404  RFMOVEC.  A CHECK  IS  THEN  MADE  GN  THE  DESIGNATE  FLAG  (PACI^COES 

R14nS  PIT  1C).  IF  PRES’^NT,  CQNTRCL  IS  TRANSFERRED  TC  EECCES.  IF  NOT  PRESENT 

R14')E  INDICATING  NO  FLRTHFR  ANTENNA  CCNTPCL  PECUIPEC,  THE  RR  FRRCR 

R1407  CCLNTER  BIT  (CHAN  12  BIT  2)  IS  RFMOVEC  AND  THE  ROLTINE  EXITS  TC 

R14C8  TASKOVER. 


R14D9  CALLING  SEQUENCE: 

R141H  WAITLIST  CALL  ERCN  PRGIMCN  IF  TRUNNION  AND  SHAFT  CPU  ANGLES 
R1411  NOT  WITHIN  LIMITS  CF  CURRENT  MCDE. 

P1412  FRASAELF  in  it  IAL  IZAT  ICN  REQUIRED: 

R141?  RADMCCFS 

R1414  SLEROLT  INFS  CA  LL'"D_ 

RL415  RRTONLY,  RRSONLY,  EECCES  (EXIT) 

R1416  JCBS  CR  TASKS  INITIATED, 

P1417  NONP 


R1410  ALARMS-  NCNE 


R141  9 

EXIT. 

TASKCVER,  EEGCES 

142Q 

REF 

1 

25,2140 

0 2167  0 

UCRRFFC  S 

TC 

SETRPECP 

SET  UR  PR  ecu  EPPCR  CCUNTERS. 

R 1421 

alary 

50)  DELFT'^D  IN  DANDE  279 

PER  FCR 

97  . 

1422 

R = F 

6 

LAST  529  25,2141 

C 5221  C 

Tf 

F IXDEl AY 

142  3 

25,2142 

00002  0 

DEC 

2 

1424 

REF 

4 

LAST  53C  25,2143 

3 4740  0 

CAE 

ANTENEIT 

MANEUVER  TRUNMGN  ANGLE  TC  NCMINAL  ECS. 

1 
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14?? 

R»=F 

47 

LAST 

530 

25,2144 

7 0110 

0 

PASK 

RADPCCE  S 

1^26 

1 74 

laST 

52  7 

25,2145 

1C  000 

0 

CCS 

A 

1427 

PPF 

31 

LAST 

527 

25, 2146 

3 4735 

1 

CAP 

e I T1  5 

0 FCR  PCCE  1 AND  180  FCR  POCE  2. 

142P 

P5F 

1 

25 ,2147 

0 2252 

0 

TC 

RR70NLY 

1429 

PFF 

C 

LAST 

531 

25,2150 

3 4 74C 

c 

CAF 

ANTENE IT 

NCW  PLT  SHAFT  IN  RIGHT  POSITION 

1433 

REF 

48 

LAST 

532 

25,2151 

7 PI  10 

f 

PAEK 

RAOMCDES 

1431 

REF 

175 

LAST 

532 

25,2152 

in  000 

0 

CCS 

A 

143? 

RFF 

5 

LA  FT 

510 

25,2153 

4 4 736 

0 

CS 

HALF 

-90  FCR  POPE  2. 

1433 

RFF 

1 

25,2154 

0 2255 

1 

TC 

PRSCMY 

1434 

REF 

2 

LAST 

18P 

25,2155 

4 4741 

c 

REFCSRFT 

CS 

REPCSEIT 

RETLRNS  fere  FROM  RRIAIIS  IF  PEPCCF 

A1435 

RECUFSTEC  CURING  PEPOSITICN. 

1436 

RFF 

49 

1 AST 

532 

25,3156 

7 0110 

0 

PASK 

RACMGCES 

REPCYE  REFCSITICN  BIT. 

1437 

REF 

50 

LAST 

532 

25,2  157 

54  lit 

0 

TS 

RADMOCFS 

1 43  8 

F'^F 

1 

2 = , 2 160 

7 4 742 

c 

PASK 

OESIGBI T 

SEE  IF  SCPECNF  TS  WAITING  TC  CESIGNATE. 

1439 

REF 

1 76 

1 AST 

532 

25 ,216  1 

in  10  0 

0 

CCS 

A 

144'.') 

RFF 

2 

LAST 

512 

25,2162 

1 26C4 

c 

TCF 

BEGDES 

144! 

REF 

29 

1.  AST 

516 

25,2163 

4 4752 

1 

CS 

8IT2 

IF  NC  FLFTFER  ANTENNA  CCNTFCL  PECUIREC, 

1442 

25,2164 

0 0006 

1 

EXTENC 

REMOVE  ERRCR  CCLNT6R  ENABLE. 

144  3 

fff 

2C 

LAST 

529 

25,2165 

03  C12 

1 

^ANC 

GFAM2 

1444 

REF 

24 

1 AST 

528 

25,2166 

1 526  1 

0 

TC  F 

TASKOYER 

1449 

RFF 

20 

LAST 

532 

25,2  167 

3 4752 

0 

SFTRRECP 

CAF 

B IT2 

SET  UP  RR  ERRCR  COUNTERS. 

1446 

25,2170 

C 00  7 6 

1 

EXTEPO 

1447 

REF 

3] 

LAST 

532 

25,2171 

02  012 

0 

RANG 

CFAN12 

1448 

REF 

177 

LAST 

532 

25,2172 

1C  CCC 

c 

CCS 

A 

EC  NOT  CLEAR  LAST  COMMAND  IF 

144Q 

PFF 

1 59 

LAST 

527 

25,2173 

0 crc2 

r 

TC 

Q 

ERFCR  CCINTEPS  ARE  ENAELFC. 

145C 

RFF 

7 

last 

203 

25,2174 

54  112 

1 

TS 

LASTYCPC 

1451 

RFF 

1 

25,2175 

54  113 

r 

TS 

LASTXCPC 

1452 

RFF 

31 

LAST 

532 

25,2176 

3 4 752 

G 

CAF 

B IT2 

1453 

25,217? 

0 'KKJ6 

1 

EXTEND 

1454 

RFF 

32 

L AST 

532 

25, 2200 

05  C12 

1 

t-CR 

CHAN12 

ENABLE  PR  CPU  ERRCR  CCLNTERS.- 

1455 

REF 

160 

LAST 

532 

2 5 , ? 2 0 1 

0 0002 

0 

TC 

Q 

k 
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Pl^56 

FRCGF«N  NAMF_  RFNfrF 

IVES  SHAFT 

TC  -45  , ANC  FINALLY  CF  IVES 

P 1 ^ £ e 

FUNCTIONAL  DESCRIPTICN. 

S CCNE  WITH 

SINGLE  AXIS  RCTATICNS  (SEE 

R1460 

R 

P 146P 

REPOCE  IS  TEE  GENERAL  REPCDING  SUBROUTINE.  IT  DRIVES  THE 
TRLNMGN  ANGLE  TC  0 CEGRRES  IF  TEE  CUFFENT  MCCE  IS  PCCE  1, 
180  DPGREES  FOR  MCOF  ?,  THEN  DRIVES  TEE  SHAFT  ANGLE  TC  -45 

PI  ^63 
Rl-iit4 
P1465 

CEGREES,  ANC  FINAILY  DRIVES  TEE  TRUNNION  ANGLE  TC  -13C  DEGREES, 
TO  RLACE  TEE  PR  IN  PCDE  ?,  -5C  DEGFEES  FCP  PCDE  1,  BEECFF 

initiating  2-axis  control,  all  rfpcoing  is  dcne  uth  single  • 

R1466 
R 1467 
P1468 

AXIS  FCTATICN'S  (RFIAXIS).  INITIALLY  THE  PR  ANTENNA  POCE  FLAG 
(RADMCCES  BIT  12)  IS  CHECKED.  CCNTRCL  IS  THEN  TPANSFEFFED  TO 
RFTCNLY  TO  CRIVE  TER  TRUNNTCN  ANGLE  TO  0 CEGRRFS  TE  IN  PPDE  1 

R1464 

R1470 

P1471 

OR  180  DEGREES  IF  IN  PCCE  ?.  FRSCNLY  IS  TEEN  CALLED  TO  CRIVE 
TEE  SEAFT  ANGL<=  TC  -45  OEGRECS.  THE  RR  ANTENNA  NCCF  FLAG 
(RACPCCFS  BIT  12)  IS  CFRCKFC  AGAIN.  CGNTRCL  IS  AGAIN 

R 147? 
R 1473 
P 1474 

TRANSFERRED  TO  RRTCMY  TC  DRIVE  TEE  TPUNMCN  ANCLE  TC  -13C 
CFGRFFS  TO  PLACE  TEE  RR  IN  •^CCF  2 IF  CLRRENTLT  IN  PCCE  1 CP  TC 
-5C  DEGREES  IF  IN  PCCE  ? TC  PLACE  TEE  FR  IN  PCCE  1.  RPOCINV 

R 1475 
P1476 
R 1 4 7 7 

IS  teen  called  to  set  RAOPOOES  BIT  12  TC  INDICATE  TEE  NEW 
PR  antenna  pope,  tee  REPCDE  flag  (RACPCOES  bit  14) 

IS  RE*'CVED  TO  INDICATE  TEAT  REPCDING-IS  CCPPLETE.  TEE  PROGRAM 

P 1478 

TEEN  EXITS  TO  STOESIG  TO  BEGIN  2-AXIS  CCNTFCL. 

R1479 

CALLING  SEQUENCE: 

P 14  80 
R1481 
P1482 

FRCP  BEGOES  WHEN  FFPCCF  FLAG  (RACPCCES  BIT  14)  IS  SET. 

■^FTS  FLAG  may  PE  SET  IN  PRDESSM  AND  RPDESNB  IF  RRLIPCFK 
CETFRMNES  TEAT  TEE  CESIRFC  ANGLES  ARE  WITHIN  TEE  LIMITS  09  TEE 

R14P3 

OTEER  MODE. 

F1484 

ERASABLE  INITIALIZATION  PECUIREC: 

R 1 4 8 5 

PACPCDES 

R1486 

SUBROUTINES  CALLED. 

R1487 

PRTCNLY,  PRSCNLY,  PPCCINV  (ACTUALLY  PART  OF) 

R 1488 

JOBS  CR  TASKS  INITIATED. 

R1489 

NONE 

R1490 

ALARMS.  NCNE 

R 149  1 

EXIT.  STDESIG 

1492 

1493 

1494 

REF  6 LAST  532  25,2202  3 4740  0 RFMQOE  CAP  ANTEN8TT 

R=F  51  LAST  532  25,2203  7 CLIO  0 PASK  RADPCDES 

PEE  178  LAST  532  25,2204  10  COG  C CCS  A 

CRIVE  TPLNMCN  TC  0 (IBO) 

(ERROR  COUNTER  ALREADT  ENABLED) 

1495 

1496 

FFF  32  LAST  532  25,2205  3 4735  I CAF  BIT15 

R9F  2 LAST  53?  25,2206  D 2252  0 TC  RPTONLY 

1497 

1496 

BEF  1 25,22<17  3 774  3 C CAF  -45DEGSR 

REF  2 LAST  532  ?5,2?10  0 2255  1 TC  RRSONLY 
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1499 

P£F 

52 

LAST 

533 

25,2211 

4 0 110 

0 

CS 

PADMCDES 

! 50C 

P'^F 

7 

LAST 

533 

25,2212 

7 4 740 

1 

MASK 

ANTEN81 T 

1501 

KEF 

179 

LAST 

533 

25,2213 

n COO 

c 

CCS 

A 

1502 

R6F 

1 

25,2214 

3 2243 

c 

CAP 

-8CDFGSR 

GC  TC  T = -130  (-50). 

1 503 

REF 

1 

25,2215 

6 2242 

1 

AC 

-50DEGSP 

15  14 

RFF 

•3 

LAST 

533 

25,2216 

C 2 25  2 

c 

TC 

PPTCMY 

1 5C5 

PFF 

53 

1 AST 

534 

25 ,22  17 

4 Clio 

0 

CS 

RADMODES 

1506 

REF 

8 

LAST 

534 

25,2220 

7 474  ' 

1 

^ASK 

AFTENBIT 

1 507 

PFF 

180 

L ''ST 

5 3 4 

25,2221 

1C  COQ 

c 

CCS 

A 

15C8 

REF 

33 

LAST 

533 

25,2222 

3 4 735 

1 

CAF 

R IT  15 

GO  TO  T = -lec  (+C). 

1509 

RFF 

4 

LAST 

CO/:, 

25,2223 

C 2252 

c 

TC 

RRTCN  LY 

1510 

R9F 

54 

LAST 

534 

25,2224 

4 0110 

0 

CS 

RADMODES 

GC  TO  S = -9C  (+0). 

151  ! 

REE 

q 

L AST 

534 

25,2225 

7 4740 

1 

NAS  K 

ANTENPIT 

1512 

PFF 

18! 

LAST 

53^ 

25,2226 

1C  COO 

c 

CCS 

A 

1513 

REF 

6 

LAST 

532 

25,2227 

4 4736 

0 

CS 

HALF 

15  14 

P.EF 

3 

1 AST 

5 "^3 

25,2230 

C 2255 

1 

TC 

RRSCKLY 

1515 

REF 

1 

25,2231 

0 2244 

1 

7C 

PMODINV 

1516 

RFF 

1 

25,2232 

4 4 73  6 

n 

CS 

REMOD0IT 

EMC  OF  P.EMCOF. 

1517 

REF 

55 

lA  ST 

534 

25,2233 

7 Clio 

c 

NASK 

RADMCCES 

1518 

PEF 

56 

LAST 

634 

25,2234 

54  1 10 

0 

TS 

RADMCDE  S 

1519 

RFF 

2 

LAST 

53? 

25,2235 

3 4742 

1 

CAF 

DESIGPIT 

WAS  REMCCE  CALLED  DURING  DESIGNATE? 

1520 

P = F 

57 

L AST 

534 

25,2236 

7 Olio 

0 

MASK 

RADMCCES 

(BIT  10  RADMCCES  = 1) 

1 521 

25,2237 

0 C006 

1 

EXTEND 

152? 

PPF 

1 

25,2240 

1 3 540 

1 

ezF 

RGCCCENC 

NO-RETUPN  TO  CALLER  WAITING  IN  RADSTALL 

1 523 

REF 

2 

LAST 

513 

25,2241 

Q 2613 

1 

TC 

STDESIG 

YES  - RETURN  TC  CES  IGNATE 

1524 

REF 

2 

LAST 

283 

7743 

-45CEGSR 

= 

13,  14,15 

1525 

25,2242 

67C7C 

1 

-5006GSR 

CEC 

-.27778 

1526 

25,2243 

61615 

1 

-fCDEGSP 

OFC 

- . 44444 

1527 

REF 

58 

1 AST 

5,34 

25  ,2244 

22  110 

1 

PPCCI  NV 

LXCF 

RADMCCES 

INVERT  THE  MCDE  STATUS. 

1528 

RFF 

10 

LAST 

534 

25,2245 

3 4740 

0 

CAF 

ANTENBIT 

1529 

25,2246 

0 0006 

1 

EXTEND 

1 530 

REF 

1 1 

LAST 

521 

25,2247 

06  CJl 

0 

PXCR 

LCFAN 

1531 

PFF 

59 

LAST 

534 

25, 225C 

54  1 10 

0 

TS 

RADMCDE  S 

1 532 

RTF 

161 

LAST 

532 

25,2251 

0 0002 

n 

TC 

Q 
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P1533  FPCGPAN  NAPES.  PFTCNLY,  frscNLY 

R1E3A  FUNCTICNAL  DESCRTFTICN 

R1535  RRTCNLY  ANC  RFSOMLY  ARE  SLBPOLTINES  FCB  DCING  SINGLE  AXIS 
PIE36  RP  PANEL\/ERS  FTP  PEPCGE  ANC  F E F C S I I CN . IT  CP  IVES  TO 

R15T7  WITHIN  1 DFGPFF.  TMIIALLY,  AT  PR1AX2.  THE  RENCCE  ANC  PEFCSITION 

P1533  FLAGS  (PAEMf’nFS  BITS  11)  APE  GHECKEC.  IF  BOTE  EXIST, 

R153F  the  PPCGPAM  EXITS  TC  PFFCSRFT  (SEE  CCFFEFOS).  TFIS  INCICATES 

RlSAf^  THAT  SCN^ErNF  POSSIBLY  PEQUESTEC  A EESIGNATE  (RACNCDES  PIT  10) 

P1S41  ViHICF  PECUIR'=S  A RENCEE  (PACMCCES  BIT  lA)  AND  TEAT  A 
RI5A2  REPnSITICN  IS  IN  FCCGPESS  (PACWCCES  BIT  11).  IF  NCNE 

P1543  CP  ONLY  CNE  OF  TEE  FLAGS  EXIST,  REPCDE  GR  REPCSITICN,  PAGSLB 

P1=AA  IS  CALLEC  to  see  IF  THE  AFPPCFRIATF  ANGLE  IS  WITEIN  1 DEGREE.  IF  YES,’ 

R1545  CONTPCL  PETUON'S  TC  TEE  FAILING  RCLTINE.  IF  NCT,  CCNTFCL  IS 

RI54A  TPANSFERPED  TP  RPOUT  FPP  SINGLE  AXIS  NANELVERS  EIIE  IFF  CTHER 

R1547  ANGLE  SET  = 0.  FCLLCWING  A .5  SECCNC  WAIT,  TEE  AECVE  FROCFCURE  IS 

R15AR  PEPEATEC.' 


R15^P  CALLING  SECUFN'CE:  L-1  CAE  *ANGLEX<  (DESIRED  ANGLE  SCALED  PI) 
P.1550  L TC  RRTONLY  (TRUNNION  ONLY) 

PI551  FRSCNLY  (SHAFT  ONLY) 

P1552  RRTCNLY  IS  CAILEC  BY  FREFCS29; 

R1553  RRTONLV  AND  RRSONLY  ARE  CALLED  BY  CCRREFCS  AND  PENCDE 


P155A  erasable  INITIALIZATION  RFeUIPFC: 
R1555  CIA)  = OFSIRED  ANGIF,  RACNCCFS 


R1556  SUBROUTINES  CALLED. 

R1557  FIXDELAY,  PEPOSRFt,  NAGSUB,  RFCUT 


RIEEE  JOBS  OR  TASKS  INITIATED 
R1559  NONE 


R156C  ALARNS.  NCNE 


R15F1  EXIT.  REPQSRPT  (PFN^CDF  AND  REPCSITICN  FLAGS  PRESENT  - RADPOCES 
R1562  BITS  lA  , 11) 

R1563  !+l  (ANGLE  WITHIN  CNF  DEGREE  CP  PP  CUT  CF  AUTC  NCDE ) 


1 56A 

1565 

1566 

REF 

PFF 

REF 

2 

113 

1 

LAST 

LAST 

106 

530 

25.2252 

25.2253 
25,2259 

55*313 
3 9755 
1 2257 

0 

1 

1 

RRTONLY 

TS 

CAF 

TCP 

RCFS 
ZERO 
PRl AX  IS 

DESIRED  TRUNICN 

ANGLE. 

1567 

RFF 

3 

L AST 

535 

25,2255 

55*313 

P 

RRSONLY 

T S 

ROES 

SHAFT  CDNNANCS 

ARE  UNRESOLVED 

SINCE  TFIS 

1568 

PFF 

65 

LAST 

529 

25,2256 

3 9753 

1 

CAF 

ONE 

ROUTINE  fnTERFo 

ONLY  keen  T = 

0 CP  180. 

1569 

REF 

1 

25,2257 

c c t -a  1 ^ 

1 

RPIAX  IS 

TS 

RF I NDEX 

1570 

25,2260 

0 ccoe 

1 

EXTEND 

1571 

PEF 

A 

1 AST 

53C 

25,2261 

23*312 

0 

CXCF 

RPPET 

1572 

RTF 

1 

25, 2262 

1 22  65 

c 

TCF 

RRl AX2 
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1573 

157A 

REF 

7 

LAST 

53  1 

25,2263 

25,226A 

0 522  1 
QCC62 

C 

C 

NXTRR  lAX 

TO 

CEC 

F IXDFLAY 
5C 

2 SANPLES  PEP  SECCNC. 

1 575 

REF 

60 

LAST 

53A 

25,2265 

A Olio 

0 

RR1AX2 

CS 

RAOMODFS 

IF  SONECNE  RECUFSTES  AS  CESIGNATE  NFICF 

1576 

RFF 

2 

LAST 

29  1 

25,2266 

7 7 7 1 3 

1 

NASH 

FPIC22 

PFCUIRES  A RENCCE  AND  A REPCSITION  IS  IN 

1577 

25, 2267 

0 0^06 

1 

EXTEND 

FPCGRESC,  INTERRUPT  IT  AND  START  TEE 

1 57E 

RFC 

1 

25,2270 

1 2155 

0 

ez  F 

RE  FDS  RPT 

RENOCE  INNECI  ATEL N. 

1579 

RFF 

A 

LAST 

5 3 5 

25,  227  1 

3 1313 

1 

CA 

RCES' 

1550 

25 ,2272 

C m.76 

1 

EXTEND 

15PI 

PEE 

2 

LAST 

535 

25,2273 

5 131A 

0 

INDEX 

RRINCEX 

1582 

RFF 

7 

LAST 

530 

25,227A 

20  035 

0 

NSL 

CDLT 

1 5E3 

R'^F 

9 

LAST 

525 

25 ,2275 

5A  061 

1 

TS 

I TFMP 1 

SAVE  ERRCR  SIGNAL. 

15PA 

25,2276 

C CC06 

■ 1 

EXTEND 

1585 

RFF 

1 

25, 2277 

? 2316 

c 

NP 

RRSPGAI N 

TRIES  TC  NULL  .7  CF  ERRCR  CVER  NEXT  .5 

1586 

REF 

71 

LAST 

527 

25,2300 

5A  001 

1 

TS 

L 

1587 

RFF 

61 

LAST 

536 

25,230! 

3 die 

1 

CA 

RADNCCES 

1588 

REF 

A 

LAST 

188 

25,23)2 

7 A752 

1 

NASK 

ALTONBIT 

' 1589 

REF 

10 

LAST 

536 

25,23M3 

56  06  1 

0 

xci- 

ITEMPl 

STORE  RP-OUT-OF-AUTC-MOCE  BIT. 

1590 

RFF 

6 

LAST 

530 

25, 230A 

0 A512 

c 

TC 

NAGSLB 

SEE  IF  NITFIN  CNE  DEGREE. 

1591 

25,2305 

776AA- 

1 

CEC 

- .00555 

scaled  in  EALF-REVS. 

1592 

REF 

1 1 

LAST 

536 

25, 2 3-'6 

10  C61 

1 

CCS 

I TENPl 

NC.  IF  RR  CUT  OF  AUTO  NODE,  EXIT. 

1593 

REF 

5 

LAST 

535 

25,2307 

0 13  12 

0 

TC 

RRRET  . 

RETURN  TC  CALLER. 

159A 

per 

3 

LAST 

536 

25,2310 

11 ' 31A 

1 

CCS 

RRINCEX 

CONMANO  FOR  CTHER  AXIS  IS  ZERC. 

159  5 

25,2311 

1 2313 

c 

TCP 

+ 2 

SETTING  t TC  0. 

1 596 

REF 

72 

LAST 

536 

25,2312 

56  001 

0 

XCF 

L 

1597 

PFF 

1 

25,2313 

53*355 

1 

CXCh 

TRUNNCNC 

1598 

R''F 

1 

25, 231A 

0 2217 

0 

TC 

RROUT 

15':9 

RFF 

1 

25,2315 

1 2 2 63 

0 

TCF 

NXTRR  lAX 

erWE  BACK  IN  .5  SECCNDS. 

160n 


25,2316 


22715  1 RPSPG^T^  EEC 


59062 


NULL  .7  ERRCR  IN  .5  SEC 
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p 16C I PRCGRAW  name.  RF  CLT  ~~~~  RPCR  CCLNTER  SCALING.  PROIT  LIPITS  IHEP 

R1603  FLN'CTICNAL  CESC.PIFTICA 

R160A  RRCLT  RECEIVES  RP  GYRC  CCRYANCS  IN  TANG,  TANG  1 IN  RR 

R1  605  ERROR  RCLNTFR  SCALING.  RPCIJT  THEN  LTNTTS  THRW  ANC 

RL606  GENERATES  CCPPANi'S  TC  y |- f.  CCU  TO  ACJIJST  THE  ERRCR  CnUNTERS 

R1607  TO  the  DESIRED  VALUES.  INITIALLY  NAGSUE  CHECKS  THE  NAGNITUDE  CF 
R1608  THE  CCRYAND  (SHAFT  ON  1ST  PASS)  TC  SEE  IF  IT  IS  GREATER  THAN 

R16C9  38A  PUSES.  IF  NCT,  CCNTCCL  IS  TPANSFEPREC  TC  RPCLTLIM  TO 

P1610  LTNIT  THF  COMMAND  TO  +I’PA  CP  -3F4  PLLSFS.  THE  DIFFERENCE  IS 
R1611  THFN  calculated  PfTWF^N  THE  CESIREC  STATE  AND  THE  PRESENT  STATE  UF 

R1612  THF  ERROR  CCUMTER  AS  PECCRDFC  IN  LASTYCMC  ANC  LASTXCNC. 

R1613  THF  PPSLIT  IS  STORED  IN  CPTYOO  (1ST  PASS)  ANC  CPTYCNC  (2ND 

R1614  PASS).  FCLLCWING  THE  SECGNO  PASS,  FOR  THE  TRUNNION  CCMNANC,  THE 

R1615  OCDUT  AND  OCDLS  FRPCR  CrUNTFR  DRIVE  SITS  (CHAN  14  BITS  12,  11) 

R1616  ARE  SFT.  THIS  PROGRAM'  THEN  EXITS  TC  the  CALLING  PROGRAM. 

Rlfcl7  CALLING  SFCLENCF: 

R1618  L TC  RROUT  (WITH  PLPT  INHIRITSO)  RRCLT  IS  CALLED  BY 
R1619  RRTCNLY,  RRSCNLY,  AND  DCCES 


R1620  FRASABLE  INITIALIZATION  RFCUIREC: 

R1621  TANG,  TANG  +1  (CFSIRFC  CCMMANOS),  LASTYCMC,  LASTXCf-C 

P1622  (1ST  PASS  = 0),  RP  ERRCR  COUNTER  ENAELE  SET  (CFAN  12  BIT  2). 


R1623  SLBROLTINES  CALLED. 
PL  62  4 MAG  SUE 


R162F  JPBS  CR  TASKS  INITIATFO, 
RI626  NONE 


R1627  ALARMS_  NCNF 

R 16?R  E XI  T_  lT  1 (A  L wTV  Sl  ~ ' S 1 R E(3^'v^  L £ £ . rU^T  MUST  BE  INHIE  Tt  eI:  ^ 


1630 

REF 

162 

LAST 

534 

25,2317 

22  C02 

C 

RRCLT 

LXGH 

0 

SAVE  FETUPN. 

163! 

RTF 

66 

LAST 

535 

25,2320 

3 4753 

1 

CAP 

ONE 

LOCP  Tl«ICE. 

163? 

RFF 

C 

1 AST 

520 

25,2321 

04  C62 

1 

RFCLT2 

TS 

ITEMP2 

1633 

REF 

182 

LAST 

53A 

25,2322 

50  C30 

1 

I NOE  X 

A 

1634 

REF 

2 

LAST 

536 

2“^, 2323 

3 1354 

1 

CA 

TRUNNCMC 

1635 

REF 

12 

LAST 

536 

25,2324 

54  C61 

1 

TS 

T tfmri 

SAV<=  SIGN  CF  CCMMANC  FCP  LIMITING. 

163  6 

RFF 

7 

LAST 

536 

25,2325 

0 4512 

0 

TC 

MAO,  SLE 

SEE  IF  H nn  IN  LM  TS. 

1637 

25,2326 

77177 

0 

-PPL  IMIT 

EEC 

-384 

1638 

RFF 

1 

25,2327 

1 23A6 

0 

TCP 

RRCLTLl M 

LIMIT  CGNMANC  TC  MAG  OF  384. 

1639 

RFF 

13 

LAST 

537 

25,2330 

3 0061 

0 

SFTPRCTR 

CA 

ITFMP  1 

CCLNT  CLT  CIFFERENCE  BETHEFN  DESIREC 

1640 

RFF 

6 

LAST 

537 

25,2331 

50  C62 

r 

INDEX 

I TEMP2 

STATE  ANC  PRESENT  STATE  AS  RECORDED  IN 

1641 

PCF 

8 

LAST 

532 

25, 2332 

56  112 

0 

XC  H 

LA  STYCMD 

LASTYCMC  ANC  LASTXCMD 

1642 

25,2333 

4 COOO 

0 

CCM 
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1643 

REF 

14 

LAST 

537 

25,2334 

6 rC61 

0 

AD 

I TFRFl 

1644 

RFF 

9 

LAST 

232 

25,2335 

6 4754 

0 

AC 

NFGO 

PREVENT  +0  IN  CUTCQUNTER 

1645 

REF 

7 

LAST 

537 

?5, 2336 

50  062 

r 

INDF  > 

I TFr/R? 

1 646 

RTF 

1 

25,2337 

5 A p 5 3 

0 

TS 

CCLTCRD 

1647 

RFF 

8 

LA  ST 

536 

25, 234C 

10  0 62 

1 

CCS 

ITFMP2 

FPCCESS  BOTH  INPUTS. 

1648 

PFF 

) 

25,  234  1 

1 232  1 

1 

TCF 

RPCUT2 

1649 

RFF 

1 

25,2342 

3 5020 

0 

CAF 

RRI06 

ENABLE  COUNTERS. 

1650 

25,2243 

0 CC06 

1 

EXTE^^ 

1651 

RFF 

7 

LAST 

283 

25,2344 

05  014 

1 

V.OR 

CHAA'14 

PLT  CN  ecu  DRIVES  S ANC  T 

165? 

RFF 

73 

LAST 

536 

25 ,?345 

n oooi 

n 

TC 

L 

RETURN. 

1653 

RFF 

1 5 

L AST 

53P 

25,2346 

10  C61 

1 RRCLUIR 

CCS 

I TFRFl 

LIMT  CCRRANC  TC  ABS  VAL  CF  364  . 

1654 

REF 

1 

25 ,?347 

4 2326 

0 

CS 

-RPL I KIT 

1655 

25 ,?35C 

1 2352 

0 

TCF 

+ 2 

1656 

RFF 

.2 

LAST 

538 

25,2351 

3 2 326 

1 

CA 

-PRLI RI T 

1657 

RFF 

16 

LAST 

538 

25,2352 

54  061 

1 

TS 

ITEMPl 

I65fi  RPF  1 25,2352  1 2231  T TCP  STTPRCTR  +1 
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P1659 

ROLTTNE  TO 

ZERO  THE 

RR  COLS 

AND 

CETERNINE  THE 

ANTENN'  NCCE. 

1660 

PEE 

1 

25, 2356 

3 2603 

1 

RRZERC 

CAP 

RTTll+1 

SEE  IF  NCMTCR  PEFCSITICN  CF  NCT  IN  AUTC 

166) 

REF 

62 

LAST 

636 

25,2355 

7 0110 

0 

NASK 

P aCMCCES 

IF  SO,  CCNT  RE-ZFRO  CDLS. 

1662 

REF 

183 

LAST 

537 

25,2356 

10  COO 

0 

CC  S 

A 

1663 

PFF 

1 

25.2357 

1 3513 

1 

Tf  F 

R ADNOnP 

(INNFCTaTE  TASK  TC  RGCCCFNC). 

1664 

25,2361 

C CCC6 

r 

INH  T N7 

1665 

REE 

A 

LAST 

5 29 

25, 2361 

6 6737 

1 

CS 

RCOUOBI T 

SFT  FLAG  TC  SFCN  ZFRCING  IN  FPCGPFSS. 

1666 

RFF 

63 

LAST 

539 

25,2362 

7 0110 

0 

NASK 

RaCNCCES 

1667 

REF 

C 

LAST 

c 2 c 

25,2363 

6 6 737 

c 

AC 

PCDLOET  T 

1668 

REF 

6A 

LAST 

539 

25  ,2366 

56  1 10 

0 

TS 

R ADNIOCFS 

1669 

RFF 

67 

LAST 

5 37 

25,2365 

3 67  53 

1, 

CAF 

CNF 

167'“ 

ref 

20 

L AST 

692 

25, 2366 

0 5203 

f 

TC 

V>AITLIST 

16-71 

REF 

22 

LAST 

52  8 

E7 , 1656 

EBANK= 

LOSCnUNT 

1672 

RFF 

1 

25,2367 

C26C  1 

c 

2CACR 

RRZ2 

f 

167? 

RFF 

1 

25,2379 

52  '67 

1 

1673 

ref 

65 

LAST 

5 2 9 

25,2371 

6 Olio 

0 

CS 

RACNCCES 

SEE  IF  IN  ALTC  NODE. 

167A 

REF 

5 

LAST 

5:^  6 

25,2372 

7 6752 

•1 

NASK 

ALTONBI T 

1675 

RFF 

1 86 

LAST 

539 

25,2373 

10  000 

0 

CCS 

A 

1676 

RFF 

1 

25,2376 

1 2377 

1 

TCF 

RCACPACK 

167  1 

REF 

22 

LAST 

693 

25, 2375 

C 5 567 

0 

TC 

ALARN 

AUTC  CISCRETE  NCT  PRESENT  - TRYING 

1678 

25,2376 

00510 

0 

OCT 

5 10 

1679 

2 5 , 2 3 7 7 

C 0C03 

1 

RCAoeacH 

RELINT 

1680 

ref 

3 

LAST 

329 

25, 2600 

1 663  1 

0 

TCF 

SWRETLRN 

1681 

REF 

2 

LAST 

528 

25,2601 

0 2 102 

0 

PRZ2 

TC 

RRZEPCSE 

CCNNICN  TC  TLRNON  AND  RRZERC. 

1682 

RFF 

1 

25,2602 

1 2 52  ) 

1 

TCF 

ENDRACAP 

1683 

25,2603 

0200  1 

1 

81T1141 

QCT 

02C01 
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P1684 

prcgran  NAPE_  rpcessp 

R.  (HALF-LMT)  IN 

PRTARGFT 

. REMCCES  IF 

R I68f 

FUNCTIONAL  OESCRIFTICN. 

R16B7 
R16F8 
R 1689 

TPIS  INTFPPRF'f  IVF  POLTINE  WILL  DESIGNATE,  IF  CESIRFC  ANGLFS  ARE 
WITHIN  THE  UNITS  CF  ET^PFR  PCCE,  TC  A LINE-OF  SIGHT  (LOS)  VECTOR 
(HALF-L'NIT)  known  with  PFSPECT  TC  THE  STAELF  PEHEEF  PRESENT 

R1690 
R 1691 
R1692 

orientation,  initially  ■"HP  IML  CCL':S  ARE  REAC  AND  CCNTPCL 
TRANSFERRED  TO  SNN8  TO  TRANSFCRH  THE  LCS  VECTOR  FROM  STABLE 
MEMBER  TO  NAVIGATION  BA'P  COCRD I N \ TE S (SEE  STG  MEMC  -699) 

R1693 
R 1694 
R1695 

PRANGLFS  IS  THEM  GALLED  TC  CALCULATE  THE  RP  GIMBAL  ANGLES, 
TRUNNICN  AND  SHAFT,  FOR  ROTH  THE  PRESENT  AND  ALTERNATE  MCCE. 
RRLIMCHK  IS  CALLFC  TO  SEE  IF  THE  ANGLFS  C/<LCLLATEC  FCR  THE 

R1696 
R1697 
R 1698 

PRESENT  MfOE  APF  WITHIN  LIMITS.  TF  WITHIN  LIMITS,  THE  RETURN 
LCGATIGN  IS  INCPEMENTEO,  TNASNLGH  as  NC  VEHICLE  MANELVER  IS 
RFCLIREC,  BEFORE  EXITING  to  STARTCFS.  IF  NOT  WITHIN  LIMITS  CF  THF 

R 169C 

R 1790 
R1701 

CURRENT  MODE,  TPYSWS  IS  CALLFC.  FCLLCWING  INVERTING  OF  THE  RP 

ANTFNNA  MODF  FLAG  (RADMODFS  BIT  12),  RRLIMG.HK  IS  CALIEC 

TC  SEE  IF  THF  angles  CALCULATEC  FOR  THE  ALTERNATE  MODE  ARE  WITHIN 

R1702 

R170’ 

P17C^ 

LIMITS.  IF  YES,  THE  RR  ANTENNA  MCCF  FLAG  IS  AGAIN  INVEPTEC, 

THE  RFMICCF  FLAG  (RADMODES  BIT  1 A ) SET,  AND  THE  RETURN  LCCATICN 
I NfREMFNTEC , TC  INDICATE  NC  VEHICI F MANEUVER  IS  REQUIRED,  BEFORE 

R1705 
R1  706 
R1707 

EXITING  TO  STARTDES.  IF  THESE  ANGLES  ARE  NCT  WITHIN  LIMITS 

OF  THF  ALTFRNATF  MCDE,  Tj-g  rr  ANTENNA  MODE  FLAG  (RADMCDES 

BIT  12)  IS  INVERTFC  BEFORE  RETURNING  DIRECTLY  TO  THE  CALLING  PROGRAM 

P 1708 

TO  INDICATE  THAT  A VFHIOLE  MANELVEP  IS  RFCUIPEC. 

R1  7C9 

f ADDING  SEGUFN'CE; 

P 1710 
P171  1 
R1712 

L STCALL  RRTAPGE.T  (LOS  HALF-LNIT  VFCTCF  IN  SM  CCCPDINATES) 
1 -I  1 RRCFSSM 

1+2  EASIC  (VEHICLE  MANEUVER  REQUIRED) 

R 1713 

L + 2 EASIC  (rNlO  VEHICLE  MANELVER  RFCUIPEC) 

R1714 

ERASAELE  IN  IT  lAL  IZAT  ICN  PFCUTPEO: 

R1715 

RRTARGEI,  RADMCOFS 

R1716 

SUBROLT  INFS  CALI  ‘=D_ 

R1717 

R1718 

READCDUS,  SMNBi  RPANGLES,  PRLIMCHK,  TRYSWiS  (ACTUALLY 
PART  OF) , RMOPINV 

R 1719 
R1720 

JCBS  CR  TASKS  INITIATFn_ 
NONP 

R1721 

ALARMS_  NONF  ' ' " 

R1722 

EXIT_  L+2  (NEITHER  SF^  CF  ANGLES  ARE  WITHIN  LIMITS  CF  RFLATEC  mgdE) 

R1723 

R1724 

STARTDCS  (DESIGNATE  POSSIBLE  AT  PRESENT  VEHICLE  ATT  I TUCF- R ETURN S 
TO  L+^  FROM  STARTDFS) 

CAN  EE  CCNE  IN 

PRESENT  V 

EH  ATI  ITLDE  . 

1-726  25,240^  43  )20  1 RPOESS^  STQ  CLEAR 

1727  RFF  4 LAST  271  25,2405  C1112  1 CESRET 
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17?S 

pPF 

1 

?5,2406 

0027  1 

f) 

RRNB  SVi 

L7P9 

25  ,2407 

77624 

1 

call 

CCNPUTES  sines  AND  COSINES,  ORDER  Y 

Z X 

1730 

RPF 

2 

LAST 

489 

25,2410 

4754  1 

1 

CCLTPIG 

1 731 

25,2411 

45175 

C 

VLOAC 

CALL 

LOAD  VECTOR  ANC  CALL  T P A N ' F C R P A T 1 C N 

173? 

P FF 

4 

LA  FT 

52C 

25,2412 

01  ICl 

C 

PRT  ARGET 

1733 

PFF 

2 

LAST 

489 

25,2413 

4 76  7 3 

0 

SPNB* 

173A 

25,?414 

77624 

1 

CALL 

GEf  RR  GIMBAL  ANGLES  IN  PRESENT  ANC 

1735 

U. 

Ul 

cc 

1 

?5. 241  5 

26  133 

1 

RRANGLFS 

AITEP.NATF  PCCE. 

1736 

25,2416 

77776 

1 

FXI  T 

1737 

25,2417 

0 000  4 

0 

JNFIFT 

1738 

RFF 

3 

LAST 

515 

25,2^20 

0 4 523 

I 

TC 

RRLI PCHK 

1 739 

RFF 

4 

LAS-F 

324 

25,2421 

01106 

1 

ADP.FS 

MOOFA 

CCNFTGUPATION  FOR  CURRENT  PCOE. 

1743 

25, 2422 

C 2425 

c 

TC 

+ 3 

NCT  IN  CURRENT  VOCE 

1741 

PFF 

5 

LAST 

540 

25,2423 

25*112 

1 OKDESSN 

I NC  R 

DESPET 

INCPEPENT  says  NC  VEHICLE  PANEL’VER 

PEC  . 

174? 

REF 

1 

25,2424 

0 2443 

0 

TC 

STARTCES 

SLOW  DESIGNATE  RECUIREO 

1743 

PFF 

6 

LAST 

509 

25,2425 

4 CU4 

r 

CS 

FL  AGNPC8 

1744 

PFF 

5 

, LAST 

509 

25  ,2426 

7 4744 

0 

MASK 

SLRFF0I7 

CHECK  IF  CN  LLNAR  SURFACE  (SLRFFLAG 

= F22F 

174  5 

25,2427 

0 0006 

1 

EXTEND 

1746 

REF 

1 

?5, 2430 

1 2 4 6 7 

I 

B2F 

NCP0S7 AL 

BPANCF-YES-CANNCT  CESICNATE  IN  PCCE 

2 

1 74  7 

QPF 

1 

25,2431 

0 247? 

1 

TC 

TRYSWS 

1748 

1749 

1750 

REF 

RFF 

7 

6 

1 AST 
LAST 

54  1 
54  1 

25.2432 

25.2433 

25 . 2434 

4 

7 

0 

C104 
4 744 
0006 

0 

0 

1 

LLNOESCH  CS 

PASK 

EXTEND 

FLAGl-RCS 
SLRFFBI T 

cverflciai  return  from  RPANGLES 

CHECK  IF  CN  LLNAP  SURFACE 

1751 

REF 

2 

LAST 

54  1 

25,2435 

1 

2467 

1 

ezF 

NCRDSTAL 

ERANCF-YES-'^ETUPN  TO 

CALLER  - 

ALARY  527 

1 752 

RFF 

37 

LAST 

522 

25,2436 

3 

0T74 

1 

CA 

STATE 

1753 

REF 

7 

LAST 

5C6 

25,2437 

7 

4745 

1 

NASK 

RNDV2EIT 

1 754 

REF 

185 

LAST 

539 

25,2440 

1C 

non 

Q 

CCS 

A 

TEST  PNCVZ'^LC. 

1 755 

RFE 

1 

25,2441 

0 

2502 

1 

TC 

NCDESSM 

NOT  ON  PCON-CALL  FOR 

ATTI  UOE 

PANELVER 

1756 

REF 

89 

LAST  ■ 

522 

25,2442 

1 

5155 

1 

TCF 

FNDCF JCE 

...EUT  NCT  IN  P29. 
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F20-F25 

USER'S  PAGE 

NO.  49 

E7  S3 

P17E7 

j:rcgr4r  name.  STARTCFS 

STOREC  AS  A HALF' 

-UNIT  \,ECIOR 

IN  RRTARC-ET 

oi  799 

FUNCTIONAL  OESCRIPTICN_ 

CKCN  IS  FESIPED. 

BIT14  CF 

RACMCCFS  IS 

R 1 7 6 1 
P 1763 
R1  765 

STARIGES  IS  ENTEPEC  WHEN  WF  AFE  FFACY  TO  EEGIN  EESIGNATION. 
BIT  14  OF  RADMnOES  IS  AIRFADY  SET  IF  A REHCDE  IS  PECLIPEO. 
AT  this  time,  THE  PR  ANTENNA  RAY  EE  IN  A REPCSITICN 

OR  PEPOSITICN  CPERATICN.  IN  IHIS 
THE  REPCSITICN  WILL  BE  INTERRUPTED. 
GINS. 

P 1767 
R1  768 
R1769 

rPFRATICN.  IN  THIS  CASE,  IF  A PENCCE  IS  PECUIPEC  IT  RAY  HAVE 
ALREACY  PEGUN  BUT  IN  ANY  CASE  THE  REPOSITION  WILL  BE  INTEPFUPTEC. 
OTHFPWTSE,  IHF  PFFCSITIOM  WILL  EE  CCRELETED  EFFCRE  2-A>!S 

R177C 
R1  771 
R1772 

CFSIGNATION  BFGINS.  INITIALLY  DFSCCLNT  IS  SET  = 6C  TC  INDICATE 
THAT  30  SFCONOS  WILL  PF  ALLfwFD  FOR  the  RR  DATA  GOOD  INBM 
(THAN  33  BIT  f)  if  LfOK-FN  IS  DESIREE  (STATE  PIT  5).  PIT  in 

R1773 

R1774 

P1775 

OF  RACMCDFS  IS  SFT  TO  SHOW  THAI  ^ CESIGNATF  IS  RFCUIRED. 

THE  RFFCSTTION  FLAG  (RArMCCFS  PIT  11)  IS  CHFCKEC.  IF  SET, 

THE  PROGRAM  EXITS  TC  L+^  Cf  THF  CALLING  PPCGRAR  (SEE  PPCESSM 

P 1776 
R1777 
R 1778 

ANE  PRCESNe).  THE  PROGRAM  ulLl  BEGIN  DESIGNATING  TC  THE  DESIRED 
angles  FCILCWING  the  RFFCSITIEN  CR  RFRCCF  IF  CNF  WAS 
RFOUESTFD.  IF  THF  RFRCSMIGA  FLAG  IS  NET  SET,  SETRPECF  IS  CALLEC 

R1779 
R 1 76C 
P 1781 

WHICH  SETS  THF  RR  ERRGR  CFUNTER  ENABLF  BIT  (CHAN  12  PIT  2) 

AND  SFTS  LASTYCRiC  ANC  LASTXGRC  = T TC  INCICATE  THE 
CIFFFRENCF  BFTwFEN  TH:^  present  and  DESIREC  STATE  CF  THE  ERROR 

R1782 
R 1783 

GCUNT'^PS.  A 20  RILLISECCND  WAITLIST  CALL  IS  SET  FOP  REGDES 
AFIFR  t,HIGH  THF  FPrGFAM  FXITC  TC  L + 3 CF  THE  GALLING  FFCGRAM. 

R17R4  C4LLTNG  SEQUFNCF: 

R17P5  FPCR  RRCESSR  ANT  FRCESNF  Wf-fN  ANGLES  WITHIN  LIMITS. 


R17eG.  FRASAELE  I N I T I A L I Z AT  I C N PECLIREC: 
R1787  RACMCCFS,  (SPF  TOCFS) 


R178P  5LBRCLTINFS  CAtLEC. 
P178<?  SFTRRFCR,  WAITLIST 

R1790  JCPS  CR  TASKS  IMTIATFC, 
R1791  QEGDEC 


R179E  ALARMS.  NONE 


R 1793  FXII_  L»3  GF  CALLING  FP^GPA^^  (SEE  RRCESSM) 
P1794  L+2  OF  GALLING  PRCGRAM  (PEE  PPOESNR) 


1795 

PEF 

6 

LAST 

54  1 

25,2443 

25'  112 

1 

STARTCES  INCR 

OESRFT 

1 796 

RFF 

66 

LAST 

539 

25,2444 

4 Cl  10 

0 

CS 

P ADMCDES 

1797 

RFF 

3 

LAST 

534 

25,2445 

7 4 7 4 2 

C 

RASK 

DES  IGEIT 

1798 

REF 

67 

LAST 

542 

25,2446 

26  110 

0 

ADS 

RAD MODES 

1799 

RFF 

3 

LAST 

532 

25 ,2447 

7 4741 

0 

RASK 

PEPOSPIT 

SEE 

I F 

REPOSITIONING  IN  PPCGRESS. 

1800 

REF 

186 

LAST 

54  1 

25,2450 

1C  COO 

0 

CCS 

A 

1 SCI 

PFF 

1 

25,245 1 

1 2457 

1 

TCF 

DESRETRN 

EC  IR 

ALPFACY 

SET  LP. 

1802 

REF 

2 

LAST 

531 

25,2452 

0 2167 

r 

TC 

SETPPECF 

SET 

UF 

EPRCP 

COUNTERS  . 
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1803 

1804 

1805 

REP 

PEE 

RPF 

36 

21 

?3 

1 4ST 
LAST 
1 ART 

509 

539 

539 

25.2453 

25.2454 
E7. 1456 

3 4 752 
C 5 2C3 

0 

0 

CAF 

1C 

E6  ANK  = 

TV«0 

VvAITL  1ST 
LOSCCLMT 

1806 

REF 

0 

LAST 

532 

25 , 2455 

C2604 

1 

2CACF 

8 E G r E S 

1806 

25,2456 

52067 

1 

1807 

REF 

3 

LAST 

518 

25,2457 

3 1303 

0 

CFSRETRN' 

CA 

R APCACH 

FI  FST 

PASS  THRU  CESIGNATE 

1808 

25,2460 

0 000  6 

1 

EXTEFO 

1 809 

RPF 

1 

25. 2461 

1 2 4 63 

(■ 

BZF 

DESRIPN 

YES 

SET  EXIT 

1 eir 

REF 

90 

LAST 

541 

25  ,2462 

j 5155 

0 

TC 

ENDOF JOB 

NO 

1811 

25,2463 

0 CP03 

1 

DFSRTRN 

RFl  IM 

1812 

REF 

7 

LAST 

542 

25,2464 

25  ' 112 

1 

INC  R 

DESRET 

1813 

RFF 

8 

LAST 

543 

25,2465 

3 1112 

1. 

CA 

OESRET 

1814 

REF 

9 

1 AST 

522 

25,2466 

1 464C 

0 

TCF 

bank JLRF 

1815 

REF 

1 14 

LAST 

535 

25,2467 

3 4755 

1 

NCRESTAL  CAF 

Z ERO 

ZERC  PACCACR 

TC  WIPE  CLT 

ANYCNE 

1816 

RFF 

4 

LAST 

54  3 

25,2470 

55*303 

1 

TS 

P ArCACR 

WAITING  IN  RACSTALL  SINCE 

WE  ARE 

NOW 

1 817 

REF 

2 

LAST 

54? 

25,2471 

1 2463 

0 

IGF 

DFSRTPN 

PFTURMAG  TC 

F20  ANC  WAY 

CC  NEW 

RACSTALL 
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L 

P20- 

P25 

USER'S  PAGE  NO.  51  E7  S3 

P181  8 

SEE 

IF  RPCESSM  CAN 

BE  ACCGMPLISFED  AFTER 

A RERCDE. 

1619 

PCF  ' 

2 

LAST 

53A 

25,2A72 

0 22AA 

1 

TRYSl«S 

TC 

PNCC  INV 

(NOTF  RLRt  INFIBIT) 

1820 

PEP 

A 

LAST 

5A  1 

25, 2A72 

0 z,  52  3 

1 

TC 

RPLINCHK 

TRY  CIFFEPENT  NCDE. 

1621 

REF 

A 

lAST 

32A 

25  ,2A7A 

ni  m 

0 

ACRES 

MCCEB 

1822 

P6F 

2 

LAST 

5A  1 

25  ,2A75 

1 2 50  2 

0 

TCF 

NCCFSSM 

VFFICLE  RANEUVFR  REQUIRED. 

1823 

RFF 

3 

LAST 

5AA 

25, 2A76 

0 22AA 

1 

TC 

R ^cni N V 

RESET  PIT12 

1 E2A 

PEF 

2 

LAST 

53A 

25 ,2A77 

3 A736 

1 

CAF 

RENODBI T 

SET  FLAG  FCR  REYCDE. 

1825 

P ff 

66 

LA  ST 

5A2 

25, 25CC 

26  no 

c 

AOS 

P ACPCCES 

1826 

RFF 

1 

25,25'.  1 

1 2A23 

1 

TCF 

CKDESSM  ■ 

1627 

RFF 

A 

LAST 

5AA 

25 ,2502 

,)  2 2AA 

1 

NCCESSR 

TC 

RNCC  INV 

RE-INVERT  NCDF  AND  RETLRM 

1828 

REF 

9 

LAST 

5A3 

25,2503 

25  ' 1 12 

1 

I NCR 

DESRET 

TC  CAILEF  +2 

1829 

RFF 

3 

LAST 

5A  1 

25 ,250A 

1 2A67 

1 

TCF 

NORDSTAL 

25,2505 


1 P30 


CC07A  1 NAXTFVS  CEC 


60 
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P1831  " DESIGNATE  TC  SPEGIFIC  RR  GT«E^L  ANGLES  ( I fJCE F END F NT  CF  VEHICLE  "CTIcV).  ENTER  hllH  OESIREC  ANGLES  IN 


R1833 

TANG 

ANC 

TANG 

+ L . 

183A 

REP 

6 

LAST 

5L  9 

25,2506 

0 4645 

1 

PPCESN8 

TC 

PAKECACP 

1835 

REF 

1" 

LAST 

544 

25,25T7 

55*112 

0 

IS 

HE  SRET 

1 F36 

REF 

57 

1 AST 

521 

25,2510 

0 5 51  6 

0 

TC 

OnwNFLAG 

RESET  FLAG  TD  PREVENT  CCCFS  FRCP  GCINC 

1 F37 

REF 

6 

LAST 

5 17 

25,2511 

CG041 

1 

A E R 5 S 

LCSCNFLC 

BACK  TC  F2l 

183  8 

REF 

1 

25,2512 

3 2 5 0 5 

0 

CA 

maxtrys 

SET  TINE  LIMT  CCCNTER 

1 63 

RFF 

2 

LAST 

51  1 

25 , 2513 

55*113 

1 

TS 

OESCCUNT 

FOR  DESIGNATE 

18^0 

25,2514 

0 CCC4 

c 

INHINT 

S FE  IF  CURRENT  MOLE  OK . 

1 841 

PFF 

1 

25,2515 

0 2551 

1 

TC 

PRLI NNB 

DC  SPECIAL  V41  LIMT  CHECK 

1842 

pep 

8 

LAST 

5]  C 

25,2516 

01116 

1 

ACRES 

TANG 

1R43 

RFF 

1 

25,2517 

1 25^4 

f 

ICF 

TRVSFN 

SEE  IF  TN  CTFER  MCCE. 

1844 

25,2520 

U 0003 

1 

OKCES.NB 

RFL  INT 

1645 

25,252  1 

0 0006 

1 

EXTENT 

1846 

REF 

9 

LAST 

545 

25,2522 

3 1 107 

0 

CCA 

TANG 

1 647 

RFF 

6 

LAST 

,325 

25,2523 

53*753 

0 

CXC  F 

TANGNB 

1848 

RFF 

45 

LAST 

52C 

25,2524 

f 6042 

1 

1C 

I NTPPET 

1 849 

25,2525 

77624 

1 

CALL 

GET  LCS  IN  NB  CCCPDS. 

1850 

REF 

] 

25,2526 

46P41 

0 

RPNR 

1851 

REF 

5 

LAST 

54  1 

25,2527 

C 1 1C  1 

c 

STCPE 

RPTARGET 

1 652 

25,2530 

774  14 

0 

SET 

F XIT 

1653 

RFF 

2 

LAST 

54  1 

25,253  1 

O007  1 

1 

RFNBSN 

1854 

25, 2532 

0 CC04 

c 

INHINT 

1 655 

PEF 

2 

LAST 

541 

25,2533 

1 2444 

0 

TCF 

STAPTCES  +1 

1886 

RFF 

5 

LAST 

544 

25,2534 

C 2244 

1 

IPYSlrN 

TC 

P NCDT  NV 

SFE  IF  ETHER  MODE  WILL  CP. 

1857 

RFF 

2 

1 AST 

545 

25,2535 

0 2551 

1 

TC 

RRLI PNP 

CC  SPECIAL  V41  LIMT  CHECK 

1658 

PEF 

IC 

LAST 

■=45 

25,2536 

01106 

1 

ACPFS 

TANG 

18  59 

RFF 

1 

25,2537 

1 2 544 

1 

TCF 

NCDESNB 

NCT  FCSSIBLE. 

1 66C 

REF 

6 

LAST 

545 

25,2540 

) 2244 

1 

TC 

RNnOINV 

166  1 

RFF 

Q 

LAST 

54  4 

25  ,-’5i,  1 

3 4736 

1 

CAP 

PFPDCBIT 

CALL  FCR  RPMCCE. 

1 86? 

PFF 

69 

LAST 

544 

25,2542 

26  1 10 

c 

ADS 

RADMCDES 

1 663 

PFF 

1 

25,2543 

1 2520 

0 

TCF 

OKOFSNB 

1864 

PEF 

7 

LAST 

54  5, 

25,2544 

0 2 244 

1 

NrOFSNB 

TC 

RNCOINV 

PEINVEPT  MCCE  BIT. 

1 865 

REF 

23 

LAST 

539 

25,2545 

0 5567 

0 

TC 

ALARM 

BAC  INPUT  ANGLES. 

1666 

25,2546 

OC502 

0 

CCT 

502 

1867 

RFF 

9 

LAST 

518 

25,2547 

0 60  1 1 

1 

TO 

C LRACMCC 

1 666 

RFF 

91 

LAST 

543 

25  ,2550 

0 5155 

0 

TC 

EMOOF JOB 

AVCID  502  ALARY. 

1 669 

R'=F 

163 

LAST 

537 

25,2551 

50  CC2 

c 

PRLI  NNB 

INDEX 

C 

THIS  PCUTIN'E  IS  IDENTICAL  TO  PRLIMCHK 

1 870 

25,2552 

3 OOOC 

1 

CAF 

0 

EXCEPT  THAT  THE  YCCE  1 SHAFT  LOWER 

1671 

REF 

164 

LAST 

545 

25,2553 

24  00? 

0 

INCP 

0 

LIMIT  IS  -65  INSTEAD  CF  -70  DEGREES 

1872 

2“=,  2554 

C CCC6 

1 

EXTEND 
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1 67^ 

RPP 

187 

1 AST 

5A2 

25,2555 

5 0000 

1 

INC  EX 

A 

RFAC  CIMPAL  ANGLES  INTC  ITENP  STCFAGE 

187A 

25,2556 

3 com 

0 

CCA 

0 

1875 

REF 

17 

LAST 

528 

25,2557 

52  C62 

1 

CXCF 

ITENFl 

1E76 

pqp 

165 

LAST 

5A5 

25,2560 

22  J)2 

0 

i.xr  F 

C 

L ( CA  LLER  +2  1 TC  1 

1877 

REF 

1 1 

L AST 

53A 

25,2561 

3 4740 

c 

CAF 

ANTFNei T 

SEE  WF  ICF  NCCF  RR  IS  IN. 

1 878 

REF 

70 

LAST 

545 

25  ,2562 

7 0110 

0 

NASK 

RADMCFES 

1879 

RTF 

188 

1 AST 

546 

25,25b3 

10  00  ) 

0 

CCS 

A 

1800 

REF 

2 

LAST 

524 

25,2564 

1 4 5 5<) 

1 

TCP 

NCDF2CHK 

NCCE  2 CAN  USE  RPLINCFK  CCCING 

1881 

REF 

18 

LAST 

546 

25,2565 

3 006  1 

0 

CA 

ITEMP 1 

1882 

REF 

8 

LAST 

537 

25,2566 

0 4 5 12 

c 

TC 

NAGSCe 

NCCE  1 IS  CEFINEC  AS 

1883 

25,2567 

66  161 

1 

DEC 

-.30555 

1.  ABS(T)  L 55  CEGS 

188A 

RFF 

7A 

LAST 

538 

25,2570 

0 nool 

0 

TC 

L 

2 SFAFT  LIMITS  AT  +59,  -65  DEGS 

1885 

PFF 

9 

LAST 

538 

25,2571 

3 0062 

0 

CA 

I TEMF2 

LCAC  SFAFT  ANGLE 

1886 

25,2572 

0 0006 

1 

EXTEND 

1887 

RFF 

1 

25  ,2573 

6 26  ) 1 

1, 

BZNF 

NFGSFAFT 

IF  NEGATIVE  SFAFT  ANGLE,  ACT  2C.5  DFGS 

1 888 

RPF 

2 

L AST 

525 

25,2574 

6 4562 

1 

AD 

5.5DEGS 

1889 

PFF 

9 

LAST 

546 

25,2575 

0 4512 

0 

SFAFT  L IN 

TC 

MAGSUE 

1890 

25,2576 

6442C 

f 

EEC 

-.35833 

64.5  EEGREES 

1891 

RPF 

75 

LAST 

546 

25,2577 

c coci 

c 

TC 

L 

NOT  IN  LIMITS 

1892 

REF 

2 

LAST 

525 

25,?6CC 

0 45b0 

c 

TC 

PFL INCK 

IN  L IM  ITS 

1893 

RFF 

1 

25,2601 

6 2603 

c 

NEGSHAF  T 

AD 

20.5DEGS 

MAKE  NEGATIVE  SFAFT  LIMIT  -85  DEGREES 

1 89A 

RFF 

1 

25,2602 

1 2575 

0 

TCF 

SEAFTLIN 

189'= 

25,2603 

03512 

1 

2C.5CEGS 

EEC 

.11389 
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P 1 85  6 

PRCGRAP  NAMF_  begdfs 

R1897 

• RUNCT  TONAL  GESCR  IPT  TCN 

Riesf 

R1899 

R190P 

BEGOES  CHECKS  VARIOUS  CESIGAATE  PECURSTS  iNC  REQUESTS  TEE 
ACTUAL  PR  OESIGNATION.  INITIALLY  A CHECK  IS  PACE  TC  SEE  IF  A 
REECOF  (PACNOCES  FIT  lA)  IS  RFGUESTEC  OR  IN  PROGRESS.  IE  SC, 

R igpi 
R lonp 
PIS  13 

CCNTRCL  IS  tranSFEPRFC  TG  STCFSIG  after  ROUTINE  REPCCE  IS 
FXECUTFC.  IF  NO  RFMOCE,  STDESIG  IS  IVNECIATELY  CALLEC  luEEPE 
FIRST  TEE  REFCSITICN  FLAG  (PACNCCES  BIT  11)  IS  CEFCKRP.  IF 

P 19CA 
P19'15 
R 19C6 

PRFSENl,  THE  DESIGNATE  FLAG  (FADYCCES  PIT  10)  IS  RFPCVEC 
AFTER  V.F1CE  TEE  PROGRAM  EXITS  TO  ROBAOENC.  IF  TEE  RFPCSITICN 
FLAG  IS  NCT  PRESENT,  THE  CCNTINUCUS  EESIGNATE  FLAG  (RACMOCES, 

R 1907 
R1  got! 
R 1909 

BIT  IS)  IS  CHECKRD.  IF  PEESFM,  CN  EXECLTIVE  CALL  IS  INNECIATELY 
PACE  FTP  COCES  AFTER  WEKF  A .5  SECONC  WAIT  IS  INITIATED  BEFORE 
REPEATING  AT  STGPSIG.  IF  THE  RR  SEARCH  ROUTINE  (IPS2A.1)  IS  CESIGNATING 

P.  1910 
R 191 1 
R1912 

TO  A NEW  POINT  (NFWPTFLG  SET)  THE  CURRENT  DESIGNATE  TASK  IS  TRPMNATEC. 
IF  CCNTINUCUS  EESIGNATE  IS  NCT  WANTEC,  THE  EESIGNATE  FLAG  (RACMGOES 
RIT  K)  IS  CHECKED.  IF  NCT  PRESENT,  THE  FPCGRAP  EXITS  TC  EMCPACAR  TC 

R191  3 
R 191  A 
R191  9 

CHECK  RR  CDU  FAIL  PEFCPE  RETURNING  TO  THE  CALLING  PRCGRAM.  IF  DESIGNATE 
IS  STILL  RECLIREC,  CFSOGUNT  IS  CERCKEC  TO  SEE  IF  TEE  20  SECONDS  HAS 
EXPIREE  BFFCRE  RECEIVING  THE  RR  DATA  GCGD  ICHAN  33  BIT  A) 

R191F. 
R 1917 
R191  8 

SIGNAL.  IF  rUT  OF  TINE,  PRCGRAE  ALARM  00503  IS  REQUESTED,  THE 

RR  ALTC  TRACKER  FNABLR  ANC  RR  EPPCR  COUNTER  ENABLE 

(CHAN  12  PITS  1A,2)  BITS  REECVEO,  AND  THE  CESIGNATE  FLAG 

R1919 
R 1920 
R1921 

(PADNCEES  BIT  ID)  PFNCVRC  BEFORE  RXITING  TC  PCEACENC.  IF 
TTMR  HAS  NOT  EXPIRED,  DFSCCLNT  IS  EECPENENTEC,  TEE 
EXECUTIVE  CALL  NACF  F CR  CGDES,  ANC  A .5  SFCONE  V>A  IT  INITIATED 

R1922 

PFFGPE  REPEATING  THIS  PPCCEOUFE  AT  STCESIG. 

P1923 

CALI  INC  SEQUENCE : 

R192A 

R1925 

R1926 

WAITLIST  CALI  RRCN  STARTEES 

TCP  BRGEFS  FROM  ECRPEPCS 

TC  STOESIG  RETURNING,  RRCR  RFNODE 

R1927 
R 19?P 

ERASABLE  INITIALIZATION  FECUIFEC: 
CESOOLNT,  RAEMOEEC 

R1929 
R 1 930 

SUEPngT  INFS  called. 
FNORAEAR,  FINEVAC 

P 1931 

JOBS  OP  TASKS  INITIATED.  DCDES 

R1932 
R 19’3 

ALARm<;_  PPCGPAN  ALARM  -'503  (30)  SECONDS  HAVE  EXPIRED)  WITH  NO  RR  DATA 
GOCD  (CHAN  33  BIT  A)  PECEIVFE  WEEN  LCCK-CN  (STATE  BIT  5)  WAS  RECUFSTEC. 

R19’A 
R 1935 
R 1936 

EXIT.  TASKOVER  (SFARCE  PATTERN  DESIGNATING  TC  NEW  POINT) 
ENCPAOAF  (NC  CESIGNATE  - RACNOCES  EIT  10) 

RCBAEEND  (REPDSITICN  CP,  30  SECCNOS  EXPIREC) 

1 937  REF  71  LAST  5A6  25.260A  A C 1 H!  0 BFGDES  CS  RAOBTCES 
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1938 

R FF 

4 

LA  ST 

3 A 5 

25, 26C5 

7 4 736 

C 

NASK 

REMCCeiT 

1 939 

• RFF 

189 

LAST 

546 

25,26-6 

10  COO 

0 

CCS 

A 

1940 

RTF 

Q 

LAST 

534 

25 ,2607 

0 2613 

1 

TC 

STCES  IC 

1941 

REF 

1 

25, 261C 

C 2202 

C 

TC 

RENCCE 

1942 

REF 

8 

LAST 

536 

25,2611 

0 5221 

0 

OESLOOP 

TC 

F IXDELAY 

2 SANFLES  FFp  SECCND. 

1943 

25,2612 

00062 

0 

CFC 

5 0 

1944 

RFF 

4 

LAST 

542 

2 5 , 2 6 1 3 

3 4 7 4 1 

1 

S7CE5  IG 

CAF 

RFPCSei T 

1 949 

REF 

72 

LAST 

547 

25,2614 

7 out 

0 

RASK 

RADMOCES 

SEE  IF  GIRIBAL  LIMIT  MGMTCR  HAS  FCLAC  LS 

1946 

RFF 

190 

LAST 

548 

25,2615 

1C  ccn 

C 

CCS 

A 

CUT  CF  ECUACS.  IF  SO,  THIS  BIT  SHCVvS  A 

1947 

RFF 

I 

25, 2616 

1 2634 

0 

TCF 

BADGES 

REFCSITICA  TC  BF  IN  FRCGRESS. 

1948 

RFF 

72 

LAST 

54F 

25,2617 

10  110 

n 

CCS 

RACMCCES 

SEE  IF  CCNTIAJUCUS  DESIGAATF  HANTEC. 

1949 

25,2620 

1 2623 

r 

7CF 

+ 3 

IF  SC,  CCAT  CHECK  BIT  10  TO  SEE  IF  IN 

195P 

25,2621 

1 2623 

0 

TC  F 

+ 2 

LIMITS  BLT  GC  RIGHT  TC  FIACVAC  ENTRY. 

1951 

REF 

1 

25,2622 

1 264C 

0 

TCF 

RCPECES  +1 

1952 

RFF 

74 

LAST 

546 

25,2623 

4 oin 

0 

CS 

RADRICDES 

IF  ACA-CCAT  INLCUS  , SEE  IF  FAC  CF 

1953 

RFF 

4' 

LAST 

54  2 

25,2624 

7 4742 

0 

MASK 

DESIGBIT 

PROBLEM  (DATA  GCCO  IF  LCCK-CA  HANTEC  CR 

1954 

REF 

191 

LAST 

548 

25,2625 

ir  COO 

r 

CCS 

A 

WITHIA  LIMITS  IF  NOT).  IF  SC,  EXIT  AFTER 

1 955 

REF 

2 

LAST 

539 

25,2626 

1 353  1 

1 

TCF 

FNTiRADAR 

CHECKIAG  RR  ECU  FAIL. 

1956 

RFF 

•a 

LAST 

545 

25,2627 

11*113 

1 

STCES  IGl 

CCS 

CESCCUNT 

SFE  IF  THE  TIAE  LIMIT  HAS  EXPIRED 

1957 

REF 

2 

LAST 

548 

25, 263i. 

1 26  37 

0 

7CF 

MCPEDES 

1958 

R^F 

1 

25,2631 

4 2645 

0 

CS 

B 14+B2 

IF  OUT  CF  TIME,  REMOVE  ECR  ENABLE  + TRAP 

1959 

25,2632 

n CCC6 

1 

FXTFAD 

19611 

PEF 

33 

LAST 

532 

25,2633 

03  012 

1 

loAMO 

CHAM  2 

196  1 

REF 

58 

LAST 

545 

25,2634 

0 5516 

0 

BAGDES 

TC 

CCWAJFLAG 

1962 

RFF 

1 

25,2635 

CC271 

0 

ACRES 

DESICFLC 

1964 

PER 

1 

25,2636 

1 3545 

1 

TCF 

R CBADEND 

1965 

RFF 

4 

last' 

54F 

25  , 26’7 

c c 1 1 [ 3 

1 

I'CRECES 

TS 

DESCCLNT 

1966 

REF 

9 

L AST 

521 

25,2640 

3 7717 

1 

CAF 

PRI 026 

LFCATE  CYRC  TCPGUE  CCMMANCS. 

1967 

REF 

22 

LAST 

52  1 

25  ,2641 

0 5105 

0 

TC, 

F TNOVAC 

1968 

RFF 

24 

LAST 

R ^ 0 

E7, 1456 

EBAA  K = 

LCSCCLN'T 

1969 

REF 

1 

25,2642 

02646 

1 

2CACR 

DCDES 

1969 

RFF 

1 

25,2643 

52067 

1 

1970 

REF 

1 

25,2644 

1 2611 

1 

TCF 

DESLCCP 

1971 

25 ,2645 

2000  2 

1 

814+82 

CCT 

20002 
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L 

P20-P  25  USFR'SP^GENO. 

56 

E7  S3 

Pl<372 

FRCGR/N  NAPE_  CrCES 

Rl<57? 

FtACTICNAL  OPPCPirilCN 

R 1974 
R1975 
R1976 

CPPE9  calculates  ANH  REQUESTS  ISSLANCE  OF  RR  GVRC  ICRCLE 
C^^PA^CS.  INITIALLY  IFF  CURPPM  PR  CCD  ANGLES  APE  STORED  AND 
THF  LCS  HALF-UMT  VECTOR  TPANSFCPNEC  ‘'PC''  STABLE  FEPeEP  TC 

R1977 
PI  97 a 
R1979 

NAVIGATION  BASE  COOR  C I'lATE  S VIA  SMNB  IF  NFCESSARY.  THE 
SHAFT  AND  TRUNNIGN  GCNYANCS  afe  TFFN  CALCULATED  AS  FCLLOWS_ 
+ SHAFT  = LOS  . (COS(S),  0,  -SIN  (SI)  (00^  FRCCLCT) 

P19fiv 
R 19R1 
R1982 

-TRUNNICN  = ICS  . (FIN  (T)  SIN  (S),  COS  (T),  SIN  (T)  CCS  (SI  ) 
THF  SIGN  OF  THE  SHAFT  Cf NMAND  IS  THEN  FEVEPSEC  IF  IN  NCCE  2 
(RACWCCFS  PIT  12)  6FCAUSF  A RFLAY  IN  THE  PR  REVERSES  THE 

R 1983 
R 198« 
P1985 

POLARITY  OF  the  fcRwANO.  AT  RRSCALUP  FACE  CCYNANC  IS 

SCALFD  AND  IF  EITHER,  OR  BOTH,  CF  THE  CCNNANCS  IS  GREATER  THAN 

.5  CEGREES,  MPAC  +1  IS  SFT  POSITIVE;  IF  A CONTINLCLS  DESIGNATE 

R19f  e 
R1987 
R1988 

(RADYGCES  RIT  15)  IS  CESIRED  AND  THE  SEARCH  ROUTINE  IS  NOT  OPERATING, 
THE  PR  AUTO  TRACKER  ENABLE  BIT  (CHAN  12  BIT  lA)  IS  CLEARED  AND  RRCUT 
CALLED  TC  PLT  CUT  THE  CCRYANDS  FRCVICED  NC  REPOSITION  (PADRCDFS  BIT  11) 

R 1989 
R19°0 
R1991 

TS  IN'  PRCGREFS.  if  A CCNTTNUCLS  FFSIGNATF  ANC  TEE  SEAFCF  ROUTINE  IS 
OPERATING  (SP.CHOPT  FLAG  SFT)  THE  TRACK  ENABLE  IS  NCT  CLEAPFD.  IF  NC 
CCNTINUCLS  CESIGNATE  ANF  BOTH  CCPVANDS  ARF  NOT  LFSS  TBAN  .5  DEGREES  AS 

R 1992 
R1993 
R1994 

INCTCATED  BY  NRAC  +1,  THF  RR  ALTC  TRACKER  ENABLE  BIT  (CHAN  12  PIT  14)  TS 
CLEAPFD  AND  RPOIJT  CALLED  t^  plj  clT  THE  COMMANDS  FRCVICED  NO  REFCSITICN 
(RADA'CCES  BIT  11)  IS  IN  FRCGPESS.  IF  ECTH  COMMANDS  APE  LESS  THAN  .5 

P 1995 
R1996 
R1997 

CEGREES  AS  indicated  BY  MFAC+1,  THE  RR  ALTC  TRACKER  ENABLE  BIT 
(CHAN  12  BIT  14)  IS  CLFAREC  ANC  RRHIJT  CALLED  TO  PLT  CLT  THE 
CCmmanos  FRCVIDEC  NC  REFCSITICN  (RADMCCES  BIT  11)  IS  IN 

R1998 

R1999 

R2000 

FRCGFESS.  IF  BOTH  COMMANDS  ARE  LESS  THAN  .5  CEGREES,  THE 
LCCK-CN  FLAG  (STATF  FIT  5)  IS  CHECKED.  IF  NCT  PRESENT,  THE 
CESIGNATE  FLAG  (RADMCDFS  BIT  10)  TS  CLEARED,  THE  RR  EFRCR 

R2noi 
R 2CO? 
R20.)3 

COUNTER  ENAELF  BIT  (GHAN  12  BIT  2)  IS  CLEARED,  AND  ENDCFJCB 
CALLED.  IF  LCCK-CN  IS  DESIRFC,  THF  RR  AUTO  TRACKER  (CHAN  12 
RIT  14)  IS  ENABLED  FCLICRFO  BY  A CHECK  CF  THE  RECEIPT  GF  THF 

R20'14 

R2nn5 

R2006 

PR  DATA  GCOC  (CHAN  33  BIT  4)  SIGNAL.  IF  RR  DATA  GCCD 
PRESENT,  THE  DESIGNATE  FLAG  (RACMCCES  E IT  IM ) IS  CLEfiREC, 
THE  RR  ERROR  COUNTER  ENABLE  BIT  (CHAN  12  BIT  2)  IS  CLEARED, 

R2C07 
R200P 
R2  0;ic 

ANC  "NGfEJCF  CALLEC.  IF  RR  DATA  GCOD  IS  NCT  PRESENT,  RROUT 
CALLED  TO  PLT  GLT  THE  CCMmanDS  FRCVIDEC  NC  REFCSITICN 
(RACMGCFS  SIT  11)  IS  IN  FPOGRFSS  AFTER  NHICH  THE  JOB  IS  TERMINATED 

R20ir 

VIA  ENDCFJCB. 

R201  1 

CALLING  SEQUENCE: 

R201  2 

EXECUTIVE  CALI  EVERY  .5  SECONDS  FROM  BEGDES. 

P2013 

erasable  ini tial T ZA T I CN  PFCLIRGD: 

R2014 

R2C15 

RETARGET  (FALF-LK'IT  LOS  VECTOR  IN  EITHER  SM  CR  NE  COCR  C I NA  T F S ) , 
LOKGNSH  (STATE  PIT  51,  PPNRSH  (STATE  E IT  6),  RACMCCES 

R2018 

P2017 

sleroltinfs  called. 

RFADCCUS,  SMNB,  crULCGIG,  MAGSUB,  RROLT 

GAP: 
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LEMF20S 
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L 

P2r-P25 

LSER'S  PAGE 

AO.  S7 

E7  S3 

R2018 

R2<nQ 

JCeS  OR  TASKS  INniATED_ 
ACAt 

P20?f)  AlARVS.  NOAF 


R2021  EXIT,.  ENCOFJCF  (ALWAYS) 


2022 

2023 

Rcp 

8 

LAST 

536 

25 ,2696 
25  ,2697 

0 000  6 
3 0)36 

1 

1 

CCCES 

EXTFAC 

CCA 

cruT 

2029 

PFF 

11 

LAST 

595 

25,2650 

53  ' 1C7 

1 

cxr  F 

TAAG 

2025 

RFF 

96 

LAST 

595 

25,2651 

0 6092 

1 

TC 

I ATPPET 

2026 

25,2652 

77  201 

1 

SFT  PC 

VLCAC 

2027 

25,2653 

OOC'’  1 

0 

0 

2028 

PFF 

6 

LAST 

595 

25,2659 

01101 

0 

RETARGET 

2029 

25,2655 

79  2 1 9 

0 

BCA 

VXSC 

2C30 

REF 

3 

LAST 

595 

25 , 2656 

0031  1 

1 

RRAlBSFs 

2C21 

REF 

1 

25,2657 

52671 

0 

nCA'BPC 

target  ia  aav-base  cqorcinates 

2032 

RCF 

1 

25,2660 

017  6 7 

c 

MLCSV 

MULTIPLY  UAIT  LCS  BY  »)AGNITUCE 

2033 

25,2661 

63372 

1 

VSL  1 

PDVL 

2039 

RFF 

2 

LAST 

1 1 2 

25,2662 

Cl  76  1 

r 

LCSVFL 

2035 

25,2663 

53361 

0 

VXSC 

VAD 

Anc  OAE  SECCAC  relative  VELCCITY  TC  LCS 

2036 

REF 

1 

25,2669 

13101 

0 

MCTCMS 

2037 

25,2665 

9EC56 

c 

LMT 

call 

2038 

Rcp 

3 

LAST 

591 

25,2666 

9759  1 

1 

CCLTR IG 

2039 

25,2667 

77629 

1 

CALL 

2090 

P F 

3 

LAST 

59  1 

25,2670 

9767  3 

0 

S N B 

2091 

25,2671 

19091 

1 

CnNERC 

STOCL 

32D 

2092 

RFF 

12 

LAST 

5 5 C 

25,2672 

01  110 

0 

TAAG  +1 

2093 

25,2673 

91939 

1 

PT3 

PLSH 

SHAFT  CCMYAAD  = V (320 ) . (CC S (S 1 , 0, 

2099 

REF 

I 1 

LAST 

375 

25,2679 

21577 

1 

CCULCG  IC 

(-S  INI  S ) ) . 

2095 

25,2675 

6 5356 

1 

SIN 

PCDL 

STMS)  TC  0 AAC  CCS  (S  I TO  2. 

2C96 

25,2676 

91596 

0 

cns 

PLSH 

2097 

25,2677 

6 5 2)5 

0 

CNF 

PCDL 

2098 

25,2700 

0009  1 

1 

320 

2C99 

25,27ul 

00095 

0 

36D 

2050 

25,2702 

99205 

0 

CNF 

8CSU 

2051 

25, 27'  3 

OQOQl 

0 

0 

2052 

25,2709 

77626 

0 

STACR 

2053 

REF 

13 

LAST 

550 

25, 2705 

7 6 6 6 7 

1 

STRE 

TAAG  +1 

SHAFT  CCNMAAC 

2059 

25,2706 

9 7 135 

0 

SLCAC 

RTB 

2055 

RCF 

19 

LAST 

5,50 

25,2707 

OllJ? 

0 

TAAG 

2 056 

REF 

12 

LAST 

550 

25, 2710 

21577 

1 

CDLLOGIC 

205  7 

25,2711 

71906 

0 

PUSH 

CCS 

COS(T)  TC  9. 

2058 

25,2712 

73  52  5 

1 

FOOL 

S I A 

2059 

25,2713 

91206 

0 

PUSH 

ONP 

SIMT  1 TC  6. 

2060 

25,2719 

COC03 

1 

2 
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L 

P 20-P  2 5 

■ USEP'S  PAGE 

NO.  56  E7  S3 

2061 

25,271 5 

65352 

J 

SLl 

POOL 

DEFINE  VECTCR  L = 

< SU  (T)  SIN  (S  ) ) 

2062 

25,2716 

00005 

1 

A 

(CnS(T)  ) 

2063 

25,2717 

A 1325 

C 

FCDl 

ni^F 

(SIN  (T  )CnS  (S  ) ) 

2C6A 

25,2720 

00007 

0 

6 

2C65 

25,2721 

00301 

0 

0 

2066 

25, 2722 

K C C C 2 

r 

SLl 

VDEF 

2C67 

25,2723 

77AA1 

0 

DOT 

EXIT 

DOT  U WITH  LCS  TO 

GET  TRINMCN  CCNPANC. 

2068 

2 5, 2 72  A 

OCCAl 

1 

32P 

gap: 

^SSENSLP 
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L 

P2C' 

-P25 

LSFP  *S  PAGE  NO.  39  E7  S3 

P2069 

- 

AT  THIS  POINT  WR  HAVF  A POTATION 

VECTCR  IN  GISH  AXES  LYING 

IN  THE  TS  PLANE.  CCNVEPT  THIS  TC  A 

P2071 

orpw/SNCPC  PflTF 

ANC 

fnablf  the 

tracker  if 

WE  ARE  WITHIN 

.5  DEGREES  OF 

THE  TARGET. 

2C73 

REF 

242 

LAST 

522 

25, 2723 

4 0134 

0 

CS 

MFAC 

CCT  WAS  NEGATIVE  OF  DESIRED  ANGLE. 

2074 

25,2726 

C CCC6 

1 

EXTEND 

207*5 

RPF 

1 

25,2727 

7 3 175 

1 

NF 

RCFSGAI N 

SCALING  CN  INPLO  ANGLE  HAS  4 RADIANS. 

2076 

REF 

Q 

LAST 

537 

25,2730 

c c;  1 -3  c ^ 

0 

OS 

TPLNNCNC 

TPUNMCN  CCNNANC  FCP  PROUl 

2' 17  7 

R = F 

75 

LAST 

548 

25,2731 

4 0110 

0 

CS 

RADMDCES 

A relay  in  THE  RR  REVERSES  FCLAFITY  CF 

2078 

RFF 

22 

LAST 

510 

25,2732 

7 4 740 

1 

NASK 

B IT12 

THE  SHAFT  CCMNANDS  IN  NODE  2 SO  THAI  A 

2079 

25,2733 

0 0006 

1 

EXTEND 

FCSITIVE  TCRCUE  AFPLIEE  TC  THE  SHAFT 

20  80 

25,2734 

1 2737 

1 

PZF 

+ 3 

GYRO  CALSES  A POSITIVE  CHANGE  IN  THE 

208  1 

REF 

1 5 

LAST 

5 50 

25,2735 

3 11C7 

c 

CA 

TANG  +1 

SHAFT  ANCLE.  CCMPENSATE  FCR  THIS  SWITCH 

2082 

25,2736 

1 2740 

1 

TC  F 

+ 2 

BY  CHANGING  THE  PCLAPITY  CF  CUR  CCNNANC. 

2088 

RFF 

16 

1 AST 

532 

25,2737 

4 1107 

1 

■*3  OS 

TANG  +1 

2084 

25,2740 

0 C006 

1 

EXTENT 

2065 

RFF 

2 

LAST 

552 

25,2741 

7 3 175 

1 

HP 

RCESGAIN 

SCALING  CN  INFLT  ANGLE  WAS  4 RACIANS. 

2066 

R = F 

1 

25 ,2  742 

35 ' 253 

1 

IS 

5HAFTCMC 

SHAFT  CCNNANC  FOP  PROUl 

2087 

REF 

47 

LAST 

550 

25,2743 

0 6042 

1 

1C 

I NTPRRT 

2 0 6 8 

25,2744 

41345 

0 

ELOAD 

DNP 

’089 

25,2745 

C0CQ3 

1 

2 

CCS  (S  ) . 

2 090 

25,2746 

00005 

1 

4 

COS(T  ) . 

20  9 1 

25,2747 

65352 

0 

SLl 

PCDL 

Z CONFONFNT  OF  LRR. 

2092 

23,2750 

65276 

1 

CCCNF 

POOL 

Y CCN  FCNCNT  = -SIN  (T  ) . 

2C98 

25,2751 

00001 

0 

0 

SIMS  ». 

2094 

25,2752 

72  405 

u 

CNF 

SLl 

2095 

25,2753 

C00C5 

1 

4 

CCS  (T  ) . 

2C96 

25,2754 

43166 

0 

VDEF 

BOM 

FORM  URR  IN  MB  AXES. 

2097 

PEF 

4 

LAST 

550 

25,2753 

CC311 

1 

RRNBSU 

EYFASS  NESN  CCNVERSICN  IN  VERB  41. 

2098 

25, 2756 

52761 

Q 

+ 3 

2C99 

25,2757 

77624 

1 

CALL 

2100 

R'^F 

) 

23,2760 

47675 

c 

X'  N E S N * 

GFT  URR  IN  SN  AXES. 

2101 

25,2761 

7744  1 

1 

EOT 

EXIT 

2 102 

RFF 

7 

LAST 

550 

25  ,2  762 

0 1 1)  1 

0 

PPTARGFT 

GFT  CCSTNE  CF  ANGLE  BETWEEN  RP  ANC  LCS. 

2103 

25, 276? 

Q 0006 

1 

EXTEND 

2K4 

PEF 

1 

25  ,2764 

4 3 077 

0 

CCS 

CCS1/20G 

2115 

RFF 

242 

LA  ST 

5^2 

25,2765 

20  135 

1 

CAS 

NFAC 

CIFFERENCE  CF  COSINFS,  SCALED  B-2. 

2i;:6 

REF 

244 

LAST 

552 

25,2766 

1''  154 

0 

CCS 

YFAC 

2107 

RFF 

113 

1 A FT 

5 A ^ 

25,2767 

3 4755 

1 

CA 

ZEPC 

IF  CCS  EFRCR  EIGGER,  ERRCP  IS  SNALLEP. 

2108 

25, 2770 

1 2772 

c 

OCF 

+ 2 

2109 

PFF 

68 

LAST' 

539 

25,2771 

3 4 7 3 3 

1 

CA 

ONE 

2110 

PEF 

245 

LAST 

552 

25,2772 

5 ^ 15  5 

1 

OS 

MFAC  +•! 

ZEPC  IF  PR  IS  POINTED  CK,  ONE  IF  NOT. 
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P2111 

SEF  IF 
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1 

GRF2  FC 

3071 

26, 2617 

77624 

1 

CALL 

e-\iEC7CR  ,OELTAC  FCR  RANGE  PATE 

3072 

REF 

2 

LAST 

580 

26,2620 

55  333 

1 

GETULC 

3073 

26, 2621 

53  725 

1 

POOL 

SR* 

GET  PLC  SCALEC  B-29/B-27 

3C74 

26,262? 

0004  5 

0 

360 

AND  SHIFT  TC  8-23 

30V^ 

26,2623 

57232 

0 

0 -4,2 

3076 

26,2624 

24045 

0 

S70VL 

360 

THEN  STORE  EACK  IN  360 

3C77 

26,2625 

57414 

1 

BON 

VCOMP 

81,  CCRP.  IF  L*  BEING  CCRRECTEC 

3078 

REF 

a 

LAST 

58  1 

26,2626 

OC7C7 

1 

VEF-UFFLG 

3079 

26,2627 

54630 

0 

+ 1 

3080 

26,2639 

77761 

1 

VXSC 

3081 

26,2631 

CCU45 

0 

360 

El  = PLC  (8-24/8-22) 
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30fi2 
3083 
3f  84 

- RPF 
PFF 

c 

1 

LART 

58  1 

26.2632 

26.2633 

26.2634 

27533  1 
01653  0 
53257  1 

STCVl 
VSR  * 

EVECTCR  +6 
N L V L E R 
VAD 

3CP8 

26,2635 

5717C  C 

6 ,2 

SHIFT  FCP  EARTH/MCON  SPHERE 

3086 

RPF 

2 

LAST 

50  2 

26, 2636 

111  66  7 1 

VeVLEP 

earth  E-7.  NCCN  B-5 

3C87 

26,2637 

53715  1 

FPVL 

VSR* 

VL  TO  PDA 

3088 

PFF 

1 

26,2640 

01601  1 

ALVeS." 

3089 

26, 264  1 

57170  0 

6,2 

SHIFT  FOP  EARTH/NCCN  SPHERE 

3090 

26,2642 

52255  1 

VAC 

vsu 

309  1 

PEF 

1 

26, 2643 

C1615  1 

vcvesp 

3C9,? 

26,2644 

50315  0 

PCVL 

DCT 

VC  - VL  = VIC  TC  FD6 

3093 

26,2645 

neo  n 0 

0 

3994 

26, 2646 

00007  C 

6 

30  95 

26,2647 

536  '6  1 

PLSF 

SRP  * 

RDGT  e-F/B-6  1C  PD12 

3096 

26,2650 

56174  0 

2 ,2 

SHIFT  FPCM  EAPTH/MOON  SPHERE  TQ  B- 8 

3097 

26,2651 

57316  1 

DSQ 

DPPR 

PCCT**2  E-16  X PATEVAR  E12 

3098 

9FF 

1, 

26 ,2652 

01773  0 . 

RATFVAR 

3099 

RFF 

4 

LAST 

58  1 

26, 2653 

C27C7  C 

STCRE 

VAPI ALCE 

31  n 

26, 2654 

54335  0 

SLOAD 

SR 

3101 

RFF 

1 

26,2655 

01776  0 

VVAPR IN 

GET  SINGLE  PRECISION  VVARMIN  (B+12) 

3102 

26,2656 

2C621  0 

160 

SHIFT  TC  CP  (E  -4) 

3103 

26,2657 

00031  0 

STORE 

24D 

ANC  SAVE  IN  240 

3104 

26,2660 

5CC25  C 

esu 

BNN 

IS  MIN.  variance  > COMPETED  VARIANCE 

3105 

PEF 

5 

LAST 

582 

26,266  1 

02707  0 ■ 

VARIANCE 

31'’6 

REF 

1 

26,2662 

54666  0 

VCK 

EPANCH  - NC 

31.17 

26,2663 

77745  1 

CLCAC 

YES  - LSE  MINIMUM  VARIANCE 

3108 

26,2664 

00131  0 

240 

3inc 

REF 

6 

LAST 

582 

26,2665 

02707  0 

STCRE 

V AR  lANCE 

3110 

26,2666 

60545  0 VCK 

CICAC 

SR2 

RCCT(FC12)  FRCP  E-8/B-6 

3111 

26 ,2667 

53725  1 

POOL 

SLR  * 

TC  B-lC/e-F 

3112 

RFF 

0 

LAST 

574 

26,267:' 

03751  1 

P CCTP 

SHIFT  TC  EARTH/MCCN  SOHERE 

3113 

26,2671 

56577  1 

0 -1,2 

B-7  TC  P-lC/E-8 

3 1 14 

26,2672 

77625  0 

esu 

311  5 

26,2673 

77675  0 

CNFR 

3116 

26,2674 

00045  0 

3 60 

311  7 

REF 

3 

LAST 

58  1 

26,2675 

27547  1 

STCVl 

OELTAC 

E-3  2 

3118 

26,2676 

0 C G 0 1 0 

NCH  GET  EO 

3119 

26,2677 

47235  0 

VXV 

VXV 

(Lie  X VLC  ) X LLC 

3120 

26  ,2700 

57414  1 

BCN 

V COMP 

BO,  CCMP.  IF  LM  BEING  CCRPECTFD 

3121 

REP 

9 

LAST 

58  1 

26,27  '1 

O07C7  1 

VEHLPFLG 

3122 

26,2702 

54703  1 

+ 1 

3123 

26,2703 

77657  0 

VSR* 

3124 

26,2704 

57200  1 

0 -2,2 

SCALEC  E-5 

3125 

RfF 

6 

LAST 

582 

26 ,2705 

27525  0 

STOVL 

BVECTCR 

3126 

RPF 

3 

LAST 

58  1 

26,276 

06524  1 

ZEPCVPCS 

3127 

26,2707 

00025  0 

STCRE 

2C0 

ZERO  CLT  20  TC  25  IN  FLSHLIST 

3128 

REF 

7 

LAST 

582 

26,2710 

2 7541  1 

STCVl 

BVECTCR  +12C 

3129 

REF 

8 

LAST 

582 

26,2711 

03525  C 

EVECTCR 

313  0 

26,271 2 

6 )246  1 

ABVAL 

NORM 

LOAD  BO,  GET  NAGMTLDE  ANC  NCRNALIZE 

3ni 

26,2713 

CCF25  C 

20C 

SHIFT  CCLNT  IN  20C 
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313? 

26,2714 

51575 

1 

VLPAC 

ABVAL 

3133 

RF8 

9 

LAST 

58? 

26,2715 

C3533 

1 

BVECTCR  +6C 

LOAC  Bl,  GET  MAGNITUDE  ANC  NORMALIZE 

3134 

26,2716 

71301 

0 

KCRR 

OLCAP 

3135 

26,2717 

00027 

1 

22D 

SHIFT  CCLNT  lA  22C 

3136 

26,2720 

00027 

1 

22D 

FINE  WHICH  SHIFT  IS  SMALLER 

3137 

26 , 2721 

50025 

c 

ESU 

BRF 

BRANCH-  EG  HAS  SMALLER  SHIFT  CCUAT 

3 13E 

26,2722 

0 0 025 

0 

?.'JC 

3139 

REF 

1 

26,2723 

54727 

1 

VCKl 

314G' 

26,2724 

52150 

1 

LXA.  1 

GOTO 

3141 

2 6,2  72  5 

00026 

0 

22P  , 

LOAC  X2  WITH  THE  SMALLER  SHIFT  C0LN7 

314? 

■^EF 

1 

26, 2726 

5 4 73  1 

c 

VCK2 

3143 

26,2727 

77750 

0 

VOKl 

LXA  , 1 

3144 

26,2  730 

00024 

1 

20D 

3145 

26,2731 

537  75 

1 

V0K2 

VLOAC 

VSL* 

THEA  ACJLST  BO,El,CELTAC  AAC  VARIANCE 

3146 

R=F 

10 

1 AST 

583 

26,2732 

03525 

0 

BVECTCR 

W ITH  THIS  SHIFT  CCCA'T 

3147 

26,2733 

2C2C  1' 

0 

0,1 

3148 

REF 

11 

LAST 

583 

26 ,2734 

27525 

0 

STOVL 

BVECTCR 

3149 

REF 

12 

LAST 

583 

26,2735 

03533 

1 

BVECTCR  +6 

3150 

26, 2736 

7 7 6 ^7 

0 

VSL* 

3151 

26,2737 

2020  1 

0 

0,1 

315? 

REF 

13 

LAST 

583 

26 ,2740 

1 7 53  3 

1 

STCDL 

BVECTCR  +6 

3153 

RPF 

4 

LA9T 

582 

26,2741 

03547 

1 

OELTAG 

3 154 

26,2742 

7 765  7 

0 

SL* 

3155 

26,2743 

2C201 

0 

0,1 

3156 

RTF 

5 

LAST 

583 

26,2744 

03547 

1 

STORE 

OELTAG 

3157 

26,2  74  5 

53  745 

1 

CLCflC 

S L’!' 

GET  PLC  ANC  ADJUST  FOR  SCALE  SHIFT 

3158 

26,2746 

0CC45 

0 

3 6D 

3159 

26,2747 

20  2 » ) 

1 

0 -1,1 

31'^0 

26,2750 

41316 

c 

DSG 

DNP 

MLL"^IFLY  RLC**2  BY  VARIANCE 

3161 

REF 

7 

LAST 

582 

26,2751 

02  70  7 

VARI AACE 

316? 

26,2752 

4 7012 

1 

SL4 

RTB 

SHIFT  TC  CCAFCRM  TC  BVECTCRS  AAC  CElTAG 

3163 

REF 

3 

LAST 

58  1 

26,2753 

21  634 

0 

T FNOCE 

3164 

PEF 

8 

LAST 

583 

26 ,2754 

36  70  7 

1 

STC ALL 

VARIANCE 

ANC  S7CPE  TF  VARIANCE 

3165 

P-^F 

? 

LAST 

58  1 

26,2755 

55401 

1 

LGCUPCTE 

3166 

26,2756 

77624 

1 

CALL 

316  7 

RFF 

1? 

LAST 

581 

26,2757 

11226 

1 

GRP2PC 

3168 

26,2760 

T7414 

0 

ECN 

PX  IT 

ARE  ANGLES  ^0  BE  CONE 

3169 

rff 

9 

L AST 

580 

26,2761 

043C7 

1 

SCREE  1 AG 

3 170 

RE'= 

1 

26,2762 

55176 

1 

REACENC 

NO 

3171 

RFF 

K 

LAST 

574 

F7, 1457 

EPAAH= 

A IG 

317? 

RFF 

1 

26  ,2763 

3 3 3 3? 

0 

w XMYM  Z 

CAF 

A IGBAAK 

3173 

PEF 

13 

LAST 

458 

2 6,2  764 

54  n06 

) 

TS 

BBAAJK 

3174 

RFF 

6 

1.  AST 

583 

26,2765 

2 1457 

0 

CA 

A IG 

YES,  CCAFUTE  MX,  MY,  AZ 

31  75 

PEF 

13 

LAST 

574 

26,2766  . 

54  765 

1 

TS 

CDUSPOT 

3176 

REF 

? 

LAST 

5 7^ 

26,2767 

3 146C 

1 

CA 

A AG 

3177 

RFF 

14 

LAST 

583 

26, 2770 

54  767 

0 

TS 

COUSPCT  +2 

3178 

P^F 

C 

L AST 

26,2771 

3 1461 

0 

CA 

ACG 

8179 

rff 

15 

1.  AST 

5 8? 

26, 2772 

54  77  1 

1 

TS 

CTLSPCT  +4 

GIMBL  angles  ACW  IN  CCUSPCT  FCR  TRG^NBSM 

3186 

prp 

54 

LAST 

5 8C 

2'.  ,2  773 

0 6042 

1 

TC 

INTPRET 
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318  1 

26,2774 

45175 

0 

\/ 1 C A C 

CALL 

3162 

PTF 

c 

> 

14ST 

340 

26,2775 

06522 

1 

UNITX 

3183 

RFF 

4 

LAST 

253 

26,2776 

47666 

1 

TRG^AESP 

318^ 

26,2777 

7 6 50  5 

0 

\,  XR 

VSLl 

3185 

RFF 

10 

LAST 

569 

26,3000 

01734 

0 

RFFSPPAT 

3185 

P9F 

c 

LAST 

146 

26,300  1 

2 7 6 7 7 

1 

STC\iL 

PX 

3187 

REF 

3 

LAST 

30  1 

26 , 3002 

06520 

0 

IJM  TV 

^188 

26,3003 

77624 

1 

CALL 

3189 

REF 

2 

LAST 

K C 2 

26,3004 

47675 

0 

•XABSP* 

31  9C 

26 , 3‘);.i5 

76  50  5 

0 

VXM 

VSLl 

3191 

RFF 

1 1 

LAST 

5 84 

26,3006 

0 1734 

0 

refsmmat 

3192 

RTF 

2 

L AST 

146 

26, 3107 

27705 

c 

STCVL 

PV 

3193 

PFF 

C 

LAST 

341 

26,3010 

06516 

0 

UNITZ 

3 194 

26,3011 

7 7 6 2 4 

1 

CALL 

3195 

REF 

3 

LAST 

584 

26, 3)12 

476  75 

0 

X'NBSPT 

3 196 

26,3013 

76505 

0 

VXP 

VSLl 

3 197 

R^F 

12 

LAST  ' 

584 

26,3014 

01  734 

0 

refsppat 

3 198 

PFF 

2 

L AST 

146 

26, 3015 

37713 

0 

SFAFTBC  STCALL 

PIZ 

3 199 

RFF 

1 

20,3016 

55361 

0 

RACARANG 

3 2'3(.) 

26,3'il7 

7733  1 

Q 

SSP 

VLQAD 

STCPE  SHAFT  CCCE  (3)  FCR  P3  IN  NCLN  49 

3291 

RFF 

4 

LAST 

581 

26 ,30  20 

01357 

1 

wfchread 

32T2 

26,3021 

OCOC3 

1 

CEO 

3 

3203 

RFF 

2 

LAST 

146 

26,3022 

0 3 7 2 4 

0 

ULC 

32^4 

26,3023 

72441 

0 

COT 

SLl 

32H5 

PFF 

6 

LA  ST 

5 8F 

26, 3024 

C26  77 

1 

PX 

32'36 

RFF 

6 

LAST 

480 

26, 3025 

24023 

0 

STCVL 

SINTH 

IRC 

3207 

RFF 

■3 

LAST 

58F 

26,3026 

03724 

0 

ULC 

3 20  8 

26, 3027 

7244  1 

0 

CCT 

SLl 

32C9 

RFF 

3 

LAST 

584 

26,3030 

03713 

1 

HZ 

321C 

REF 

6 

LAST 

48C 

. 26,3031 

3402  1 

c 

STCALL 

CCSTF 

16C 

3211 

RFF 

3 

LAST 

480 

26, 3032 

26  5 10 

1 

ARCTAN 

3212 

26,3733 

41221 

0 

BDSU 

OPP 

3213 

RFF 

•a 

LAST 

574 

26, 3034 

0 3 7 3 6 

c 

RRSHAFT 

3214 

REF 

1 

26,3035 

15441 

1 

2 FI  /8 

3215 

26 , 3036 

41472 

0 

SL3R 

PUSH 

3216 

26,3037 

52545 

1 

Cl  CAD 

SL3 

3217 

R*=F 

2 

1 AST 

197 

26 , 3040 

01701 

0 

X789 

3218 

26,3041 

44257 

1 

SRR* 

BCSU 

SHIFT  FRCM  -5/-3  TO  RO 

3219 

26, 3042 

56  176 

1 

0 ,2 

3220 

26,3043 

53605 

1 

CMF 

SRR=X 

322  1 

ref 

2 

LAST 

146 

26,3044 

03722 

c 

PX  Z 

3222 

26,3045 

2 1601 

0 

0,1 

SHIFT  TC  EARTH/PCCN  SPHERE 

3223 

REF 

6 

LAST 

58? 

26,3046 

2 7547. 

1 

STCVl 

DELTAS 

EARTH  E-29.  PCCN  B-27 

3224 

RFF 

4 

LAST 

584 

26,3047 

03  724 

c 

ULC 

3225 

26 ,3050 

76435 

1 

vxv 

VSL  1 

3226 

REF 

3 

LAST 

584 

26,3051 

03705 

0 

PV 

3227 

26,3052 

776  56 

1 

LNl  T 

3228 

26 ,3053 

57414 

1 

BCFF 

VCOMP 

BO,  CCPP.  IP  CSP  BEING  CCRPECTEC 

3229 

RFF 

10 

LAST 

562 

26 ,3054 

00747 

c 

VEHIJFFLG 

323*'’ 

26, 3055 

55C56 

1 

+ 1 
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323  1 

PFF 

14 

LAST 

583 

26,3C56 

27  525 

r 

S7F\,L 

B\/ECTCR 

3232 

PFF 

4 

LAST 

582 

26,3057 

06524 

1 

ZFPOVECS 

3233 

PFF 

15 

LAST 

5 85 

26,3060 

33533 

1 

ST  CPE 

eVFCTCR  +6 

323A 

REF 

16 

LAST 

c p C 

26,3061 

1 7 5 41 

1 

STCCL 

6VECTCR  +12C 

3235 

REF 

3 

LAST 

584 

26, 3062 

03722 

0 

R AZ 

3236 

26,3663 

53657 

1,) 

SR=l= 

SRP* 

SFIFT  FPCM  EARTH/MOON  SPHERE  TO  B- 2 5 

3237 

26, 3064 

2 0 5 7 7 

C 

0-2,1 

3238 

26, 3065 

56  176 

1 

0,2 

3239 

REF 

17 

LAST 

5 8 5 

26.3C66 

C3  54  1 

1 

STORE 

BVFCTCfi  +12C 

3240 

26,3067 

77735 

0 

SLCAD 

3241 

REF 

1 

26,3070 

02011 

0 

SHAFTVAR 

3242 

26,3071 

41215 

1 

CAC 

DRP 

3243 

REF 

1 

26,  3i'72 

1 5436 

1 

I WUVA  R 

RAC**2  E12 

3244 

REF 

4 

LAST 

58'^ 

26,3073 

03722 

0 

RXZ 

3245 

26,3074 

41257 

1 

SRR* 

DPR 

3246 

26,3075 

21601 

0 

0,1 

SHIFT  TC  EARTH/RCCN  SPHERE 

3247 

REF 

5 

LAST 

5,8  5 

26,3076 

03722 

0 

RXZ 

3248 

26,3077 

5 3 6 5 7 

0 

SP=i> 

SP# 

3249 

26,3100 

2 3577 

0 

0-2,1 

3250 

26,^101 

571  76 

c 

0 ,2 

3251 

26, 3M2 

47057 

0 

SR'3< 

RTB 

3252 

26,3103 

57176 

0 

0,2 

3253 

REF 

4 

LAST 

583 

26,3  104 

21634 

0 

TP8CCE 

STCRE  VARIANCE  TRIPLE  PRECISION 

32  54 

REF 

9 

LAST 

583 

26,3105 

36707 

1 

STCALL 

VARIANCE 

B-40 

3255 

r>-f 

•a 

LAST 

5 83 

26,3106 

55401 

1 

L ecu  FETE 

3 2 56 

26,3107 

77624 

1 

CALL 

3257 

REF 

13 

LAST 

583 

26,3110 

11226 

1 

GPP2PC 

3258 

26,3111 

77624 

1 TRUNEC 

CALL 

3259 

REF 

2 

LAST 

584 

26, 3112 

5 536  1 

0 

R ADARANG 

326C 

26,3113 

77331 

0 

' SSP 

VLCAD 

STORE  TRLNNION  CODE  (4)  FCR  R3  IN  N49 

3261 

REF 

C 

LAST 

584 

26, 3114 

0135  7 

1 

WFCHREAC 

3262 

26, 3115 

0C004 

0 

CEC 

4 

3263 

REF 

c 

LAST 

584 

26,3116 

03724 

0 

ULC 

3264 

26,3117 

7 6 4 3 5 

1 

VAV 

VSLl 

3265 

REF 

4 

LAST 

584 

26,3120 

0 3 705 

0 

MY 

3266 

26,3121 

76435 

1 

VXV 

VSLl 

(ULC  X MY)  X ULC 

3267 

RFf 

6 

LAST 

585 

26, ’ 122 

0 3724 

0 

LLC 

3268 

26,3123 

57414 

1 

boff 

VCOMP 

BO,  CCMP.  IP  eSM  BEING  CCRRECTEL 

3269 

REF 

11 

1 AST 

584 

26, ^ 124 

00  747 

c 

VEHUPFL  G 

3270 

26, 3125 

55126 

1 

+ 1 

327  1 

REF 

18 

LAST 

585 

26,3126 

27525 

0 

STCVL 

eVECTCR 

3272 

ref 

5 

LAST 

585 

26,3127 

06524 

1 

ZERCVFCS 

32  73 

PEE 

19 

LAST 

585 

26  ,3130 

02533 

1 ■ 

STORE 

BVCCTQR  +6 

3274 

pRF 

20 

LAST 

585 

26,3131 

17541 

1 

STCDL 

BVECTCR  +12C 

3275 

REF 

6 

L AST 

cc 

in 

26,3132 

C 2 7 22 

c 

RXZ 

3276 

26,3133 

53657 

0 

SR« 

SRRX' 

SHIFT  FRCM  EARTH/MOCN  SPHERE  TC  B-25 

3277 

26, 3134 

20577 

c 

0-2,1 

32  78 

26, ’135 

56176 

1 

0,2 

3279 

REF 

21 

LAST 

5 8 5 

26,3136 

03543 

0 

STCPE 

BVECTCR  +14C 

gap:  /jSSe^'BLF  PEVISIDN  116  CF  &GC  fPCePfit>  LUMN/iRV  EV  NASA  2C21112-C71 


IGiCq  AUG.  n.lSfS  LE^P2CS  .1^0  PAGE  5f6 


L P?0-P25 


USER'S  PAGE  NO.  S3  E?  S3 


3280 

26, ^137 

77  735 

0 

SLCAC 

328  1 

•REF 

1 

26,3140 

02012 

0 

TPUNVAR 

3282 

26,3141 

41215 

1 

CAC 

DNP 

3283 

REF 

2 
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26,3152 

47057 

0 

SR4 

RTB 
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0 
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VAR  I INC  F TRIPLE  FREC  IS  ICN 

32  9A 

PPF 

10 

LAST 

585 

26,3155 

16707 

0 

STOOL 
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1 
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3348 

26, 3217 

43C14 

c 

clear 

SET 

3349 

PEF 

7 

LAST 

580 

26,3220 

01675 

1 

ri60R9FL  G 

3350 

REF 

1 1 

LAST 

58C 
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REF 

6 

1 AST 

587 

26,3226 

55242 

0 
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26,3231 

77624 

1 
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3377 
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1 

CAF 
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3382 
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2 
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26,3255 
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TS 

W.INC 

3383 

RFF 
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26,3256 

3 4755 

1 
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zero 

338A 

PFF 

3 

LAST 

588 

26,3257 
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INDEX 
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3385 

RFF 

5 

LAST 

588 
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0 

TS 
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PFF 

4 

LAST 

588 
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26,3262 
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-5 
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LAST 
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0 
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1 
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1 

BON 

SLOAD 
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3392 

REF 

10 

LAST 
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1 

SUPFFLAG 
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3393 
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1 
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c 
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2 
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26,3271 
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1 

WRENDPOS 
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26,3272 
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1 
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REF 

1 

26,3273 

55276 

1 

WPCSTCRF 
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26,3274 

77735 

0 

WL  SR  PROS 

SLOAC 
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REF 

1 

26,2275 

02CC7 

1 
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3399 

26,3276 

77661 

n 

WPCSTORE 

SR 

SHIFT  TC  B-19  SCALE 

3A00 

26,3277 
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5 
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6 
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REF 

7 

LAST 
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1 
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8 
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1 
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3494 
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1 
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REF 

11 
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1 

SURFFI  AG 
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1 

26, 3205 
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1 
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1 
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1 
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1 
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REF 
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c 
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3410 
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0 
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3411 

REF 

1 
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1 
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0 
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3415 

26, 3316 

77735 

0 
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c 
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1 
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13 
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0 
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R.ENCNFLG  - W- 

NATRI>  VALID 

3422 
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8 
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0 
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3429 

REF 

2 

LAST 

50  8 

26 ,3332 

54067 

1 

A IGBANK 

EBCON 

LSR22.3 

R3430  GPTUir 

R3431  THIS  SUP.RriJTINE  CCPPUTES  tj-E  RELATIVE  PCSTTICN  VECTCR  BETV»EFN  THE  C SM 
R3A32  AND  THE  LM,  LEAVING  THE  UNIT  VECTCR  IN  THE  PUSLIIST  ANC  ►'FAC  ANIC  THE 
R3^|-"3  HAGN'ITUCF  IN  36D. 


3434 

26,3333 

7720  1 

1 GFTULC 

SETPC 

VLOAD 

3625 

26,3334 

OOCCl 

0 

Cl 

3436 

PFF 

1 

26,3335 

01645 

1 
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3441 

REF 

2 

LAST 

502 

26,3342 

C1661 

1 

RCVLEN 

3442 

26,3343 

53715 

1 

PCVL 

VSR* 

3443 

PEE 

1 

26,3344 

01573 

1 
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26 ,3  554 

52361 

1 

VXSC 

VSU 

3620 

RFF 

2 

LAST 

593 

26,3555 

C6522 

1 

CCS60CFG 

3621 
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26, 3656 

c 

2 ^33 

C 

RAND 

CHAN33 

3690 

26,3657 

C 

0006 

1 

EXTENC 

3691 

RFF 

1 

26,366C 

1 

3667 

1 

BZF 

STCRFIS 

YES-  GC  TC  STGBE  11111  FOR 

DISPLAY  IN  PI 

3692 

RFF 

16 

1 AST 

635 

26, 3661 

A 

6265 

0 

CS 

ST  X 

3693 

P<=F 

6 

LAST 

593 

26,3662 

6 

1 736 

1 

AC 

NSPCFFNT 

IS  N GREATER  THAN  6 

3696 

26, 3663 

C 

0006 

1 

EXTENC 

3695 

PEF 

2 

LAST 

518 

26,3666 

1 

3662 

1 

BZF 

LRS26.1 

YES  - RESET  N = C AND  STAFT 

ARCLNC  AGAIN 

3696 

RFF 

c; 

LAST 

595 

26,3665 

2 

5 ' 736 

1 

INCR 

NSRCF  FNT 

NC-SFT  N = N+1  AN  GO  TC 

3697 

REF 

1 

26, 3666 

1 

26A6 

1 

TC  F 

CHKSPCH 

NEXT  feint  in  pattern 

3698 

RFF 

1 

26,3667 

3 3703  0 

STCREIS  CAF 

ALLIS 

STORE  mil  FCR  DISPLAY  IN  R1 

3699 

RFF 

5 LAST  517 

26,2670 

55*733  C 

TS 

OATAGCOC 

GAP: 

fSSEPSLE 

RFVI5I0N  116 
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596 

L 

P20- 

F25 

LSEP'S  FACE  NC.  103  E7  S3 

3700 

26,3671 

C 0004 

0 

INHINT 

3701 

PEF 

8 

L ART 

593 

26, 3672 

C 6032 

0 

1C 

KILLTASN 

CFLETE  DESIGNATE  TASK  FFCP 

370? 

pep 

LAST 

593 

26,3673 

52613 

1 

CACR 

DESLOOP  +2 

WAITLIST  USING  KILLTASK 

37C3 

RFF 

98 

1 AST 

c c ^ 

26  ,3674 

0 5155 

r 

TC 

ENCCF JOE 

3 704 

R8F 

26 

LAST 

557 

26,3675 

C 5567 

0 

1 IPALARN 

TC 

ALARP 

ISSUE  ALAPP  527-LCS  NOT  IN  PCCE2 

37C5 

26,3676 

00527 

1 

OCT 

527 

COVERAGE  IN  P22  OP  VEHICLE  PANELVFP 

3706 

26,3677 

0 C0C4 

c 

INHTNT 

PEGU  I FED  IN  P20 

37'  7 

PEF 

9 

LAST 

596 

26, 3700 

0 6032 

0 

TC 

KI  LLTASK 

KILL  WAITLIST  CALL  FCR  NEXT 

3 70  8 

PFF 

4 

LAST 

592 

26, 3701 

55643 

0 

CAEP 

CALLCGCH 

POINT  IN  SEARCH  PATTERN 

3700 

REF 

99 

LAST 

596 

26,3702 

0 5155 

0 

TC 

ENDCF  JOE 

371C 

?6 , 3703 

2554  7 

0 

ALL  IS 

CEC 

11111 

3711 

26, 3704 

33555 

1 

SIN60CEG 

20cC 

.86603 

3711 

26, 37.15 

0 1 106 

1 

3712 

REF 

7 

LAST 

363 

23  ,2521 

C0S6'iCEG 

= 

dfhalf 

( 2CEC  .50 

3713 

001  4 

LXVECTFP 

FCUALS 

1 2D 

PPEVICUS 

3 714 

00  2 2 

UWEC  TPR 

equals 

160 

3715 

0014 

p 1 WUN  IT 

EQUALS 

12C 

3716 

26, 3706 

01642 

0 

CFESTFAC 

2DEC 

0.C5678 

TANGENT  CF  3.25  DEGREES 

3716 

26,37  )7 

11145 

0 

371  7 

26,3  71  0 

OCOOl 

0 

ONEOCT 

CCT 

00001 

NOTE-THESE  two  CONSTANTS  RLST 

3718 

26,3711 

OOOOO 

1 

3SEC0NCS 

20EC 

300 

ep  this  order  eecause 

x>  # * < 

3718 

26,3712 

00454 

1 

A3710 

****  ONEOCT  NEEDS  A LOWER  ORDER 

**** 

A3720 

HCPO  CF  ZEROES 

# 5^  5*  * 

372  1 

26,3713 

01  130 

1 

6SECCNCS 

CEC 

600 

37?2 

26,3714 

OCCOO 

1 

1. 5SECS 

2DEC 

1 5L 

3122 

26,3715 

00226 

1 

0733 

REF 

”3 

LAST 

6.6  9 

23  ,2523 

ZERC/S  F 

ECLALS 

H I6ZEP0S 

3 72  4 

4616 

BLOC  K 

02 

3735 

PEF 

3 

LAST 

?.?  5 

60  10 

SETLCC 

EFT AG5 

3726 

6C25 

BANK 

3727 

REF 

1 

CGUNT=> 

$$/P20 

3728 

6C25 

0 0006 

1 

GfTCV56 

EXTENC 

P20  TFRPINATES  BV  GOTCV56  INSTEAD  CF 

3729 

REF 

1 

6026 

3 6C31 

c 

ncA 

VE56CADR 

GCTCPCCH 

3730 

PEF 

4 

LAST 

459 

602  7 

1 5165 

1 

TCF 

SLPDXCHZ 

3 731 

pnp 

2 

LAST 

48F 

F7,1471 

EBANK= 

HHOCAPES 

3732 

rff 

2 

LAST 

262 

60  3 0 

0 304  1 

1 

VP56CACR 

2CADR 

TRMTRACK 

3 732 

603  1 

66107 

1 
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P3733  FRCGRi^  N/S^E:  P?9  (PFNPEZVOUS  R«CiP  CESIGNATE  DURING  PCWEPED  ELIGED 
R 3734  EGO  NT.  2 BV  bLAIR-SMTH  JULY  2 , 1968  . 


R3735  EUNCTICNAL  CESCPIPTICN: 


P3736  EESIGNATFS  TEF  PENCF2VCUS  RACAR  TrwARC  TEE  Cf^PUTEO  LCS  TO  TEE  CSP.  EITH  TEE  CHIEF  CBjECTIVE  CF  CETAIMNG  RANGE 

P3738  AND  RANGE  RATE  DATA  A''’  2-SEGCND  INTERVALS  FCR  TPANSPISSION  TC  TEE  GFCUND.  EHEN  TEE  RR  IS  WITEIN  .5  DEGREE  CF 

R37AO  TEF  CCPPUTEC  ICS,  TRACKING  IS  EMABLEC,  AND  OESIGNATICN  CGNTTMES  IMIL  THE  CATA-GCCC  CISCPETE  IS  PECEIVEC.  AT 

P37<^2  fHAT  PCINI,  OESIGFATICN  CEASES  ANC  A P A C A P-R  E A C IN  G ROUTINE  TAKES  CVEP.  PREPARING  A CCNSISTENT  SET  CF  DATA  f'c  R 

P374A  DOWN  TELEMETRY.  THE  SET  TNCILOES  RANGE,  RANGE  RATE,  MARK  TIME,  TEC  PR  CCU  ANGLES,  TEPEE  IMUCCU  ANGLES,  AND  AN 

R3746  INPICATCR  NEICE  IS  1 WEEN  TEP  SET  IS  CCNSISTENT  AND  0 OTHERWISE.  TEE  INDICATCP  IS  IN  TRKMKCNT. 


R37A9  CALLING  SEQUENCE:  BEGUN  EVERY  2 SECCNDS  AS  AN  INTEGRAL  PART  CF  SERVICER 


R3750  SUEPOLTINES  CALLED: 


R3751 

PEMCDF  ^ 

PRTCNLY 

P3782 

UNIT 

MPACVBUE 

R3783 

CLICTPIG 

AX*SP*T 

P.  3 7 54 

SP'I  N 

SPCCS 

R3755 

SETRR  ECR 

RROUT 

R3  756 

PPPOC  T 

RPR  ANIGE 

P3757  EXIT;  TC  NOR29NnE,  IN  SCRVICEb. 


R3738  CLTPLT:  (ALL  FCR  DCWNLINK) 


R 3 759 

p M 

RDCTM  ■ 

(RAW) 

R3760 

AIG 

AMG 

R3761 

ACG 

TRKMK  CNT 

TRKMKCNT  = onCOl  IF  SET  IS  CONSISTENT, 

R376? 

TANGNB 

TANGNB  +1 

CTHERUSE  TPKMKCNT  = 00000. 

R3  763 

MKT  IN E 

gap:  /'SSF^eLF  I^'~V1SIPN  116  A GC  PRCGR4M  Lt"^INARV  NASA  2C;ill2-071 
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ICE  F7  S3 

P376A 

ERASAFI.E 

IN  IT  T AL  IZAT  ION 

REQL  IPEC  : 

R 3765 

NCP29FLG 

PEADPFLP 

(TC  1 ANC  0 BY  FPESF  START)  (RESET  NORZ'SFLG 

TC  LET 

SERVICER 

PLN  P29) 

P 3767 
P3768 
P3769 

PIPTIMF 
R (CSM  ) 

R 

RADMOCES 
V(CSR  1 
V 

(BIT  10)  (BIT  SET  TC  C BY  FPFSF  START) 

(PIPTIME  thru  V BY  AVE  G IN  SFPVIGER) 

R3770 

CEBR  IS: 

R3771 
P 37  7? 

RAfvCCES 

LO'SM 

(BIT  10  ) 
LnSVDT/4 

( = RRTARGET  S 1 CS VEL ) 

P.3773 

R377A 

SAVFG CUT 
LC  SCA'FLG 

nLOf^SPlG 

REACRFLG 

(SAVECDUT  = MLOSV) 

P3775 

ALARMS: 

NONE. 

P3776 

CFR  FCNFNT 

JCPS  ANC 

TASKS 

P";???  INI  TT  fli  IZ  ING,  IF  RR  IS  FCUND  TC  S'"  IR  NTCF  1:'  JCE  R2SPEMCJ  ^NC  TASK  RERCFE;  ALIaAVS:'  TASK  PRFPCS2S. 
R3779  CESIGNATING:  TASK  BFGDFS29  £ JOB  R29DODBS. 

R3760  RADAR  RFACIAG:  TASK  RR9RFAD  AhC  JCE  F29RCJ'1E.  ALL  JCBS  APE  NOVAC  TYPE.  


3781 

33,2085 

BANK  33 

378? 

REF 

1 

33,2000 

SFTLCC  R2S/SFRV 

3 763 

33,2085 

BANK 

378A 

ref 

1 

CCLM*  $$/R29 

3765 

RFF 

2 

LAST 

389 

5018 

NP296PCP  ECL'ALS  EEANK5 

r,AP:  ^SSE^'B1■E  PFVTSION  116  ACC  PPCGPa^*  LUMIN/iRY  BY  NASA  2C21I12-071 
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P3786 

SERV  ! CEP 

rcNES 

TC 

F29  FRCM  "1 

R29?"  IF 

NOP29FLG, 

READRFLC 

, RRPENOCE, 

RRCCL2FC,  PRPEPCS,  ANC  D I S F 1 A Y - 1 N E P T I A L - C AT  A 

P 37E8 

ARE 

ALL 

RESET, 

ANF 

TFT  Rfi  IS 

IN  LGC 

RCCE  (CFTEN 

CCNFUSINGLY  C. 'ILL  EC 

AUTO  MOCF  ) . 

3790 

REF 

99 

LAST 

593 

33.2045 

4 0 110 

0 P 29 

CS 

PACNCCES 

3791 

REF 

9 

LAST 

548 

33 ,2'i46 

7 4742 

0 

RASK 

DESIGPIT 

3792 

33,2.047 

C CC06 

1 

EXTENT 

3793 

REF 

1 

33, 2050 

1 2 123 

1 

BZF 

P29. LCS 

8PANCF  IF  CESIGNATICN  IS  ALRFACY  CN  . 

3794 

33,2051 

0 0004 

0 

INFINT 

3799 

REF 

I'D 

LAST 

599 

33,  2'^52 

26  110 

c 

ADS 

RAC^CCES 

SHEW  that  CESIGNATION  IS  NOW  ON. 

3796 

REF 

93 

LAST 

59  1 

33,2053 

4 4736 

0 

CS 

BI  714 

3797 

33,2054 

0 0006 

1 

EXTEND 

3798 

REF 

40 

LAST 

59  2 

33,?C55 

C3  012 

1 

V.AND 

CFAN12 

RENCVE  FP  TRACK  ENABLE  CISCPETE. 

3 79  9 

REF 

2 

LAST 

554 

33,2056 

4 4740 

1 

CS 

L0SCN6I T 

36C0 

RTF 

1 1 

LAST 

592 

33.2C57 

7 0076 

1 

lASK 

FLAGNPC2 

3 801 

RFF 

12 

L AST 

599 

33,2060 

5 4 0 76 

1 

TS 

F LAGWRD2 

CLEAR  LCSCNELG  TC  SFCW  CFS.  LOCP  IS  OFF. 

3802 

RFP 

1 

3 3 ,. 206  1 

4 4753 

0 

CS 

OLDESBIT 

3 8.33 

RFF 

39 

LAST 

C P 0 

?=■ , 2062 

7 CC74 

{) 

NASH 

STATE 

38'^4 

RFF 

4 0 

LAST 

599 

33,2063 

54  074 

0 

TS 

STATF 

SHCW  THAT  CES.  LOCP  IS  NCT  RFCUESTEC. 

3809 

r;;f 

1 54 

LAST 

58C 

33,2064 

G 4616 

1 

TC 

pankcall 

3806 

REF 

'X 

LAST 

54  2 

33,2065 

52  167 

0 

CACR 

SETRRECR 

ENABLE  RE  EERCR  CCUNTFRS. 

38C7 

REF 

12 

LAST 

546 

33,2066 

3 4 7 40 

0 

CA 

ANTEN8TT 

38^8 

REF 

101 

LAST 

599 

33 ,?067 

7 0113 

0 

NASK 

RACNCCES 

3 80  9 

Off: 

205 

LAST 

579 

33,2070 

10  ono 

n 

CC  S 

A 

TEST  PR  NCCE  FIT. 

3810 

RFF 

1 

,2071 

1 2104 

1 

TCF 

SP3-pRpnS 

NinCE  2. 

3811 

RFF 

2 

LAST 

329 

33, 2072 

5^31 

c 

r A 

PRIC21 

NCCE  1;  NUST  REMOTE. 

3812 

REF 

11 

LAST 

90  8 

33,2073 

0 5072 

1 

TC 

NCVAC 

3813 

RFF 

32 

LAST 

592 

E7 , 1456 

E8ANK= 

LCSCCUNT 

3814 

REF 

1 

33, 2074 

0 2 113 

0 

2CADR 

R29PFWC J 

NEEDS  CWN  JCe  TC  RACSTALL  IN. 

3814 

PEF 

1 

33,2075 

66067 

0 

3619 

RFF 

6 

LAST 

■=99 

33,2076 

4 4742 

0 

CS 

CESIGEIT 

381  6 

RFF 

1)2 

LAST 

999 

33,2077 

7 0110 

n 

NASK 

RADMODFS 

CLEAR  DESIGNATE  FLAG  IN  RADNCDES 

3817 

REF 

1C3 

LAST 

599 

93 ,2100 

54  1 10 

0 

TS 

RADMODES 

BEFORE  CALLING  REVGDE  ' 

3818 

RFF 

6 

LAST 

592 

33,2101 

3 4 736 

1 

CA 

PENCCEIT 

3819 

RFF 

104 

LAST 

999 

33,2102 

26  110 

Q 

ADS 

RADNCDES 

SFCW  IFAT  RE^CDING  TS  CN. 

3820 

REF 

1 

33,2103 

1 2 5 73 

0 

TCF 

NCP29NCW 

CONTINLE  SERVICER  FUNCTICNS. 

3831 

RRF 

74 

LAST 

565 

33,2114 

3 4 7 53 

1 SETPPPC 

S CA 

CNE 

382? 

RFF 

25 

LAST 

592 

33,2105 

0 5203 

0 

TC 

WAITLIST 

3823 

RFF 

33 

LAST 

599 

E 7 ,1456 

fpank= 

LCSCCUNT 

3824 

RTF 

1 

33,2136 

03  564 

0 

2CADR 

PRE  PCS29 

TASK  TC  SET  TEUNMCN  ANCLE  TC  -180  CFG. 

3 824 

RFF 

1 

33,21)7 

52  067 

1 

3825 

RFF 

7 

LAST 

559 

33,2110 

3 4 74  1 

1 

CA 

REFGSEIT 

3826 

REF 

105 

LAST 

599 

33,2111 

26  1 11 

0 

ADS 

PADNCDE  S 

SHCW  THAT  REPCSITICMNG  IS  CN. 

3827 

R'^F 

2 

LAST 

599 

33,2112 

1 25  73 

0 

TC  F 

NCP29NCW 

GAP: 

ASS£^6LP  REVISION'  116  TF 

AGC  FRCGFAR  LU^INAFY  BY  NASA  2021112-C71 

is: CG  AUG.  11, 

ISAS  LGNP2CS 

.ISO  PAGE  600 

L 

P20-P2S 

LSFR'S 

PAGE  NO.  1C7 

E7  S3 

P3  8?8 

pcfce  pfnce?vcus  pacar 

IMC  i^CCF  2. 

382S 

REF 

7 5 

LAST 

59S 

33,2113 

3 4 75  3 1 

P29RERC J 

CA 

ONE 

3 830 

REF 

26 

LAST 

599 

33,2114 

C 5203  0 

Tf, 

WAITLIST 

3831 

REF 

34 

LAST 

599 

F7,1456 

FBANK= 

LCSCCUNT 

3832 

RFF 

2 

LAST 

548 

33,2115 

02202  C 

2C  ADR 

PEMOCE 

PEMrCE  MLST  RLN  AS  A TASK. 

3832 

33,2116 

52067  1 

RFF 

1 5 5 

1 A'T 

59S 

33,2117 

r 4616  1 

TC 

bankcall 

WAIT  FCR  ENC  CF  PFMCDING. 

3 834 

RFF 

12 

LAST 

574 

33, 212L 

177C6  0 

CADR 

RADSTALL 

3F38 

RFF 

100 

LAST 

596 

33,2121 

1 5155  1 

TG.  F 

FNDOF J08 

BAC  EXIT  CAN'T  HAPPEN. 

3836 

REF 

101 

LAST 

60C 

33,2122 

1 5155  1 

TCF 

ENCQF jce 

P3837 

TASK 

TC 

PRFPOS  IT  !FN 

the  RR  TRLNNICN  angle  to  -18C 

1 DEG. 

3f  38 

RFF 

1 

25,2CCC 

SFTLCf 

R29S  1 

3839 

25,3564 

BANK 

3 840 

REF 

2 

1 AST 

368 

25, 3564 

3 4735  1 

PPEPCS2S 

CA 

MEGMA  X 

-leo  CEG. 

3841 

R'^'P 

5 

LAST 

534 

25,3565 

0 2252  0 

TC 

RRTCM.Y 

CR  IVE  TRLNNKIN  CDL. 

3842 

RFF 

8 

LAST 

5SS 

25,3566 

4 4741  C 

CS 

REFCSEIT 

SHEW  THAT  PEFCSITICMNG  IS  CFF. 

3843 

RFF 

106 

LAST 

599 

25,3567 

7 Oil)  0 

MASK 

RACMOCES 

3844 

REF 

1C7 

LAST 

6CC 

25 ,357C 

54  lit  0 

TS 

RACMCCES 

3848 

RPF 

27 

LAST 

595 

25,3571 

1 5261  C 

IGF 

TASKCVER 

R 3846 

CC'NPLTE 

1 IiVE-OF 

-RIGHT  ANC  LCS 

VFLCr  1 TY  , 

ANC  PASS 

THFM  TC 

THF  R2S(iCDES 

LOOP. 

3848 
3 84  9 

REF 

1 

33, 2045 
33,2123 

SETLCC 

BANK 

R29 

3 8 50 

33,2123 

C 0006 

1 

R29.LCS  EXTEN: 

3851 

RFF 

4 

LAST 

337 

33, 2 124 

4 1224 

1 

DCS 

PIPTIME 

3852 

REF 

259 

LAST 

577 

33 ,2125 

52  155 

1 

CXCH 

MPAC 

3853 

33,2126 

C 0006 

1 

EXTEND 

3854 

REF 

16 

LAST 

5.7  2 

33,2127 

3 "025 

0 

ncA 

TIME  2 

3855 

RPF 

26C 

LAST 

60C 

33,2130 

20  155 

1 

CAS 

MFAC 

(MFAC)  = T-PIPTIME,  scaled  8-2E. 

3856 

REF 

4 

LAST 

33  7 

33,2131 

54  162 

1 

T£ 

MCPF 

SET  MCCE  TC  CCUBLE  PRECISION. 

3857 

REF 

261 

1 AST 

600 

33,2132 

3 0155 

0 

CA 

MPAC  +1 

3858 

33,21  3.3 

0 00')  6 

1 

EXTENC 

3859 

RFF 

23 

LAST 

552 

33,2134 

7 4740 

1 

MP 

BIT12 

386C 

PEF 

262 

LAST 

60C 

33,2135 

52  155 

1 

CXCH 

MPAC 

T-PIPTIME  NOW  SCALED  B-17. 

3861 

REF 

59 

LAST 

594 

33,2136 

C 6C42 

1 

TC 

I NT  FRET 

GAP 
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P386? 

R3R64 

LO'CPPLG 
START  IT 

= 0 PEANS  that  THF  CES  IGNAT  IC\  IS  REACT  FCR  NEl\ 
UP  WHEN  THE  data  IS  IN  PLACE. 

CATA.  SETTING 

LGSCRFLG  MAKES  II  6C  AWAV  SC  SETLF29C  CAN 

3665 

33.2137 

52315 

1 

PCVL 

VSU 

PLSH  DCWN  T-FIFTINE. 

3666 

REF 

1 

33, 2 16C 

0 17  2 6 

C 

V ICSM 

3 867 

P = F 

2 

LAST 

168 

33, 2161 

02527 

1 

V 

LCSVEL  = V (CSM  - V. 

3668 

33,2162 

76325 

0 

POOL 

VXSC 

SWAP  LCSVEL  FCR  T-°IPTINE,  NLITIPIV  THEN 

3869 

33,2162 

52255 

1 

\,A.C 

VSU 

ANC  6CC  THE  RESULT  TO  R(CSM)  - R TC  GET 

3870 

REF 

1 

33,2166 

01720 

0 

R (CSM)  ■ 

AN  UF-TC-DATE  LCS  VECTCR  IN  SN  AXES. 

367  1 

PPF 

6 

LAST 

236 

33,2165 

03521 

1 

R 

3872 

33,2  166 

7 7 616 

0 

eCFSET 

EXIT 

(ECFSET  CCES  ITS  THING  INFINTEC.) 

3 673 

REF 

9 

LAST 

569 

33,2167 

01063 

1 

LCSCMFI  G 

IF  DESIGNATF  ICCP  IS  CFF,  CHANGE  LCSCN- 

3876 

PPF 

1 

33,2150 

66  152 

1 

SETUF29C 

FLG  TC  CN  ANC  GO  TU  SET  LP  NEW  DATA. 

3876 

RFF 

3 

LAST 

599 

33,2151 

! 2 572 

c 

TCF 

NCR29NCW 

IF  CES.  ICCF  IS  CN,  LET  it  USE  CLC  CATA, 

3676 

REF 

1 

33,2152 

25101 

0 SETUF29C 

STCVL 

LCSSN 

L INE-CF-S  IGFT  VECTCR,  STAELE  MEMBER  AXES 

3877 

33,2153 

OCOCl 

0 

0 

3878 

33,2156 

7776  1 

1 

VXSC 

3879 

RCF 

1 

33,2155 

26177 

1 

.5SECB17 

3 880 

RFF 

1 

33,2156 

0 1 7 6.  1 

STCPE 

LCSVCT/6 

1/2  SFCCNC'S  WCRTF  CF  LCS  VELGCITV, 

3681 

33,2157 

77616 

0 . 

CLEAR 

EXIT 

3882 

REF 

10 

LA  ST 

601 

33,216f 

0126  3 

1 

LCSCNFl  G 

LFT  R29DL0CP  LSt  NEW  CATA. 

3883 

REF 

61 

LAST 

599 

33, 2161 

6 0C76 

c 

CS 

STATE 

3886 

R6F 

2 

LAST 

599 

33,2162 

7 6753 

0 

HASK 

OLCESeiT 

3885 

23,2163 

C CCG6 

1 

FXTEAO 

3886 

RFF 

6 

LAST 

60  1 

33,2  166 

1 2573 

c 

BZF 

NCP29Nnw 

ERANCF  IF  R29  D!=^S.  LOCF  IS  RECUESTFC. 

3687 

33,2165 

0 0006 

0 

IFH  TNT 

3888 

REF 

62 

1.  AST 

6F1  1 

33,2166 

26  C76 

c 

ADS 

STATF 

CTHEPWISE  RFCUEST  IT  NCW. 

36pc 

RFF 

1 

33,2167 

1 1 '055 

1 

CCS 

P IPCTR 

SEE  IF  T^SK  SHCtLD  BE  CFFSET  CNE  SECCNC. 

3890 

PEF 

1 

33,217C 

6 6776 

1 

CS 

SLPERllO 

-96C  +10CC  = 6. 

3891 

RFF 

6 

LAST 

382 

33, 2171 

6 6777 

1 

AD 

1 SFC 

C +10CC  = lOOC. 

3692 

RFF 

27 

LAST 

600 

33,21 72 

C 5 20  3 

0 

TC 

WAITLIST 

3893 

RFF 

35 

LAST 

60C 

F7,  1 656 

EEANK= 

LCSCCUNT 

3896 

RFF 

1 

33,2173 

03356 

1 

2r.ADR 

BEG0ES29 

START  BEG0ES29  TASK  ASAF. 

3896 

REF 

1 

33,2176 

50067 

a 

3895 

PEF 

C 

LAST 

60  1 

33,2175 

1 2573 

c 

TCF 

NCP29ACN 

REIINT  ANC  CCNTINUE  SERVICER  FUNCTICNS. 

3 6 96 

33,2176 

00006 

1 .5SEC817 

2DEC 

50  B-17 

3896 

33,2177 

ICGOC 

0 

GAP:  /S.SSE^BLE  REVISION  116  t r,C  FPCGFAN  LbMN/>KV  BV  ^/iSA  202III2-P71 19:09  AUG.  11,196S  LEMP2CS  .lAO  PAGE  6C2 


1 

' P20 

-P25 

USER'S  PAGE  NO.  1C9  E7  S3 

P’69  7 

R2^ 

CF5 

IGNA7F 

jce 

AFC  TASK  NACFIFEFY 

• 

TASK  FECUPS  EVERY  .5  SEC  UNTIL 

CESIGNATE  IS  CALLED  CFF  ; n nay  vAIT 

FCF  A 

R3899 

CEN 

TISFCCNO  OP 

TWO 

IF  IT  COMF 

S UP  WHILE 

SFTUP29D 

IS  SUPPLYING  NEW  C AT  A 

• 

3900 

24,3356 

RANK 

24 

3901 

RFF 

6 

LAST 

576 

24 ,2C'J0 

SET  LCC 

P20S 

3902 

2A, 3356 

bank 

39C’ 

PEF 

1 

COUNT  t 

11/R29  , 

3904 

RFF 

•3 

LA  ST 

599 

24,3356 

2 5C21 

C 

BEGDE  S29 

CAF 

PRIC21 

3905 

REF 

12 

LAST 

599 

24, 3357 

C 5072 

1 

TC 

NCVAC 

39Cfc 

RFF 

2 

LA'T 

6F  1 

E3, 1 76F 

FEANK= 

LCSVCT/4 

3907 

Rpp 

1 

24,3360 

02550 

0 

2CACP 

R29DCCFS 

START  R29DCCES  JOB  TWICE  A SECOND. 

3907 

PEF 

1 

24,3361 

64063 

c 

' 

39CP 

RFF 

2 

LAST 

^16 

24 , 3362 

3 4774 

1 

R29DLCCF 

CAF 

.5SEC 

3909 

PFF 

4 

LAST 

566 

24,3363 

0 ‘=224 

0 

TC 

VARDELAY 

39H' 

RFi^ 

ice 

LA'T 

60C 

24, 236.4 

4 0110 

0 

CS 

RACMCDES 

3911 

RFF 

7 

LAST 

599 

24,3365 

7 4 74  2 

c 

NASK 

DESIC-eiT 

3912 

PFF 

206 

1 AST 

599 

24,3366 

10  000 

0 

CCS 

A 

3913 

RFF 

28 

LAST 

6 no 

24,3367 

1 5261 

TCF 

T ASKCVER 

QUIT  IF  CESIGNATICN  IS  CALLED  CFF. 

39)4 

PFF 

13 

L AST 

24,  337'’ 

4 C076 

1 

CS 

FLAGWR02 

3915 

RFF 

3 

LAST 

599 

24,3371 

7 4740 

1 

PASK 

LCSCNBI T 

3916 

24,2372 

C CC06 

1 

EXTENE 

391  7 

24, 3372 

1 2 376 

1 

BZF 

+ 3 

EPANCF  IF  SETUF29CS  SUPPLYING  NEW 

CATA  . 

3918 

RFF 

14 

LAST 

60  2 

24,3374 

26  076 

1 

ACS 

FLAGWRD2 

SET  ICSCNFLG:  SHOW  THAI  DES.  LCCP  1 

IS  CN. 

3919 

RFF 

2 

LAST 

60  1 

24,3375 

1 2256 

c 

TCF 

PEGDES29 

3920 

REF 

76 

1 AST 

600 

24,3376 

3 4753 

1 

CA 

ONE 

392! 

PEF 

1 

24  ,3377 

1 3363 

0 

TC  F 

R290LC0P  +1 

WAIT  A CFNTISECOND  FOR  NEW  DATA. 
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P3922 

R3923 

R290CCES:  RR  CESIGNATKN  LCCP  EOF  P29 

THIS  onUTIUE  OOFS  RUCH  ThP  SANE  THING 

AS  CCDES,  BUT  A GREAT  DEAL 

FASTER 

. IT  TAKES  TEE  NDN-UNITIZED  LCS  VECTOR 

P3929 

IN  STABLE 

ME^BFR  rcCPDIN'ATFS 

(LOSSM  ) 

AND  A delta-ids  IN 

SR  AXES 

(LOSVOT/4)  UHICH  IS  1/2  SEC  TIRES  LCS  VELCCITY, 

R3927 

AND 

DEVELOPS  TFF  'FAFT  AND  TPLNMCN  CERRANCS  USING  SINGLE  PRECISION  AS 

RUCF  AS  POSSIBLE,  AND  INTERPRETIVE  NCT  AT 

R3929 

ALL  . 

TEE 

: iJNITfLOSSM 

+ LCSVFL 

« 1 SEC 

) 

IS  CCRFUTED  IN  CP  ANC  TPANSFCPREO  TC  NAV  EASE  CCCPCINATES  IN  COUELE  PRE- 

R3931 

C I S I C N ( L 

• SING 

SF  SINES  ANC  fCSINES  OF 

ECU  ANCLES),  ANC 

THE  REST 

IS  CONE 

IN  SP. 

R3933 

TEE 

FUNCTIONAl 

DIFFERENCE  IS 

THAT  P29DCCES  ALFAVS  CLEARS  LCSCRFLG  NFEN 

IT  ENDS,  ANC  IT  STARTS  LP  THE  R29PEAC 

P3935 

TASK 

t-  F ^ 

. LOCK 

-ON  IS 

ACHIEVFC 

• 

3936 

32  ,?550 

BANK 

32 

397  7 

RPR 

2 

LAST 

40 

32,?0  1C 

SETLCC 

F20PSX‘32 

3938 

32.2550 

BANK 

39  39 

REF 

1 

CCUNT» 

SJ/R29 

3 94  7 

REF 

3 

LAST 

60  2 

E3,  1760 

EBANK= 

LCSVDT/4 

3941 

R'-F 

77 

LAST 

60? 

3 2 , 2 5 5<) 

3 4753 

1 

R29CCCFS  CA 

ONE 

394? 

REF 

21 

LAST 

574 

32,255! 

55'  1C6 

C 

TS 

TANG 

INCICATE  1ST  PASS  THRU  VECTOR  LCDF. 

3 943 

PEE 

12 

L AST 

5 5 5 

32,2552 

3 4756 

1 

CA 

F I VF 

3944 

RTF 

2C7 

LAST 

602 

32 ,2553 

10  COC 

0 

R29CVEEC  CCS 

A 

CCLNT  CCWN  BY  TWOS  IN  VECTOR  LCOP. 

3945 

REF 

174 

LAST 

564 

32, 2554 

54  002 

1 

TS 

C 

3946 

P9F 

22 

1.  AST 

603 

32,2555 

11*106 

0 

CCS 

TANG 

39^7 

REF 

1 

32,2556 

1 2 5 64 

r 

TCP 

P29DFAS1 

CC  this  CN  1ST  PASS  TFRL  LOOP. 

3948 

32,2557 

C 0006 

1 

EXTEND 

(A  "PASS"  HEPE  REANS  3 TIRES  ARCUND). 

3949 

REF 

1 7 5 

LAST 

6C3 

32,2560 

5 CC02 

0 

INCEX 

C 

3954 

REE 

4 

LAST 

603 

32, ?56  1 

3 1761 

c 

DCA 

LCSVCT/4 

3951 

PEF 

176 

L AST 

60  3 

32,?56? 

50  00  2 

0 

INDEX 

Q 

3952 

R5F 

2 

LASt 

60  1 

32,2563 

21 ' 101 

1 

CAS 

LCSSR 

ADVANCE  LOS  VECTOR  1/2  SECOND, 

3953 

22, 2564 

C CQ06 

1 

R29DPAS1  EXTEND 

3954 

REF 

1 77 

LAST 

603 

32 ,2565 

5 0002 

0 

INDEX 

0 

3955 

RFF 

3 

LAST 

60  2 

32,2566 

3 1101 

c 

DCA 

LCSSR 

3956 

RFF 

178 

LAST 

60  3 

32,2567 

50  002 

0 

INDEX 

Q 

RCVF  CLPBENT  LCS  (1ST  PASS)  CP  LCS  FPC- 

3957 

PEF 

26  ; 

LAST 

6CC 

32,2570 

52  156 

1 

CXGF 

RFAC  +l 

JECTEC  1/2  SEC  AHEAD  (2ND  PASS). 

3953 

REF 

23 

LAST 

603 

32,2571 

1 1 ' 106 

c 

CCS 

TANG 

3959 

PEF 

1 

32,2572 

1 2600 

1 

TCF 

R29DVEN0 

BUG  CLT  FERE  IN  1ST  PASS. 

3960 

’2,2573 

c cro6 

1 

extend 

39ol 

REF 

179 

LAST 

60  2 

32,2574 

5 CC02 

0 

INDEX 

0 

3962 

RCF 

5 

LAST 

AO  3 

32,2575 

3 1761 

n 

CCA 

LCSVDT/4 

3963 

RFF 

130 

LAST 

602 

32,2576 

50  CC2 

0 

INDEX 

C 

3964 

REF 

264 

LAST 

603 

32,2577 

20  156 

1 

DAS 

MPAC  +1 

PROJECT  LCS  1 SECCNC  AFEAC  (2NC  PASS). 

3965 

RPF 

181 

1 AST 

603 

32 , 260C 

10  002 

1 

R29CVENC  CCS 

C 

3966 

REF 

1 

32,2601 

1 2553 

1 

TCE 

R29CVEEG 

EPANCF  TC  CCNTINUE  VFCTCR  LCCP. 
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L 

F29 

-F25 

LSFR' S PAGE  NC.  Ill  E3  S3 

P3967 

UNITI Z9 

AND  TRAMSFCRR  TC  NAV 

PASE  AXES 

THE  PRESENT  LCS 

(1ST  PASS)  CP 

TFE  1-SEC  PROJECTED  LOS  (2ND  PASS). 

3969 

PFF 

265 

LAST 

60  2 

32,2602 

52  156 

1 

OXCH 

MFAC  +1 

39  7C 

R9F 

266 

1 AST 

604 

32  ,2633 

52  155 

1 

EXCF 

MPAC 

3971 

R FF 

1 

22,2604 

2 2 7 7 5 

r 

CA 

P29FX  LCC 

= ACPES  1NTE15+  -34D 

3972 

P^F 

18 

LAST 

357 

32, 2605 

54  120 

0 

TS 

F I Xl.CC 

39  7 3 

PEF 

1 

22,2636 

0 4713 

0 

TC 

USPRCACR 

NITF  FIXLCC  ARMED  FOR  LENGTH  ANC  LENGTH 

3974 

PFF 

1 

32,2637 

C1023 

1 

CACR 

UNIT 

SCUAREC,  RCRRCW  UNITIZING  ROUTINE. 

3975 

RTF 

1 

32,2610 

0 7535 

a 

TC 

MPACV3UF 

PCVE  LNIKLCS)  TC  AX^SF^T  AFG  AFEA. 

3976 

RFF 

24 

LAST 

603 

32,2611 

1 1 ' 106 

c 

CCS 

TANG 

3977 

32,  26  12 

1 2614 

1 

TC  F 

+ 2 

39  7P 

RFF 

1 

32,2613 

1 2 630 

1 

TCF 

GCTAMGL  s 

GET  CDU  ANGLES  CNL>  AF1ER  1ST  PASS. 

3979 

22, 26] 4 

C 0004 

0 

INHINT 

ENSURE  CCNSISTENT  CDU  READINGS. 

3980 

32,2615 

C 0006 

1 

EXTEND 

39P! 

PrF 

I 1 

LAST 

594 

32 ,2616 

3 00  36 

1 

ECA 

CCUT 

3982 

PFF 

1 

22,2617 

53  • 767 

1 

CXCH 

SAVECCUT 

TRUNMCN  ANC  SHAFT  ANGLES. 

3963 

RFF 

3 

LAST 

573 

32.  ,2620 

3 0)33 

1 

CA 

CCLY 

3984 

RFF 

16 

LA9T 

582 

32,262  1 

54  765 

1 

TS 

CCUSFCT 

3985 

RFF 

6 

1 AST 

356 

32, 2622 

2 0024 

0 

CA 

CDLZ 

3986 

REF 

17 

LAST 

604 

32,2623 

54  767 

0 

TS 

CDUSPG"^  +2 

3987 

PFF 

1 1 

LAST 

572 

32,2624 

2 0C22 

r 

CA 

CCUX 

3988 

PFF 

18 

LAST 

60  4 

^2,2625 

54  77  1 

1 

TS 

CDUSPCT  +4 

ecu  ANGLES  IN  FUNNY  CREEP  FCP  AX«SR*T. 

3989 

REF 

1 56 

1 AST 

60  P 

32  ,2626 

0 4616 

1 

TC 

BANKCALL 

3990 

REF 

1 

22,2627 

47617 

1 

CACP 

CLICTFIG 

G'T  SINES  ANC  COSINES  CF  CEL  ANGLES. 

3991 

RFF 

19 

LAST 

567 

32,2630 

4 6250 

1 

GCTANCLS  CS 

THREE 

3992 

RFF 

157 

LAST 

604 

32,2631 

0 46  16 

1 

7C 

P ANKCALL 

3993 

REF 

1 

32,2632 

47677 

1 

CADR 

AX*SR«T 

TRANSFCPN  UNIT  LCS  TC  NE  AXES  (ULCSNB). 

3994 

RFF 

25 

LAST 

604 

32,2633 

11 ' 106 

0 

CCS 

TANG 

3995 

22, 263A 

1 2626 

1 

TCF 

+ 2 

3996 

REF 

1 

32, 2635 

1 2 70  3 

0 

TCF 

R 29DPAS2 

GO  TO  RR  CCMRANC  CCMF.  AFTFP  2NC  PASS. 
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L 

P2C- 

■P25 

USER'S  RAGE  NO.  112  E3  S3 

F3997 

OOPPIJTC 

CCS  INF 

OF  THE 

■ angle 

BFTWFFN 

TFE 

PRESENT 

LCS  ANC 

THE  RR  eCRESIGHT 

VFCTCF,  and  SET  TFE  SELFTRACK  ENABLE  IF 

R3999 

THF- 

CrSIN'E  IS 

APPPCX IRATELY 

CCS(  .5  CEG  ) 

CP  GREATER  ( I.E 

. SRALLER 

ANGLE). 

4000 

32,2636 

C C0C4 

C 

INHI  FT 

4001 

26 

LAST 

60  4 

32,2637 

55  ' 1F6 

TS 

TANG 

INCICATC  2ND  PASS  THRU  VFCTCR  LCCF. 

4002 

R"F 

2 

LAST 

604 

32,2640 

3 1766 

1 

C A 

S AVECCUT 

400  3 

R5F 

3 

LAST 

19C 

32,2641 

C 5032 

0 

TC 

S ECCS 

4CC  4 

Rt^F 

2 

LAST 

252 

32,2642 

54  166 

1 

IS 

PLSHLCC  ' 

PLSHLCC  = CCS  T. 

4Q05 

R‘=F 

O 

LAST 

605 

32 ,2643 

4 17  66 

0 

CS 

SAVECCUT 

4006 

REF 

3 

L AST 

189 

32,2644 

C 5033 

1 

TC 

SFST  N 

4CC7 

REF 

5 

LAST 

600 

32,2645 

54  163 

1 

TS 

MODE 

RODE  = -SIN  T. 

4008 

22, 2646 

C CC06 

1 

EXTEND 

4009 

REF 

26 

L AST 

336 

32, R647 

7 0124 

1 

|VP 

VBUF  +2 

FCRR  - SIN  T LLCSNBY. 

4010 

REF 

267 

LAST 

604 

32,2650 

52  155 

1 

CXCF 

MFAC 

401  1 

RFF 

4 

LAST 

605 

32,2651 

3 1767 

c 

CA 

SAVECFL7 

+ 1 

4012 

REF 

4 

L’A  S T 

605 

32,2652 

0 50  3 3 

1 

TC 

SPSIN 

4013 

PFF 

5 

LAST 

6<^5 

3?  ,2653 

55' 766 

0 

TS 

SAVECFUT 

SAVECCUT  NO,  = SIN  S. 

4014 

32,2654 

C 0C06 

1 

EXTEND 

4C1  5 

RFF 

3 

LAST 

60  5 

32  ,2655 

7 0166 

1 

Mp 

PUSHLCC 

4016 

32,2656 

C COO  6 

1 ■ 

EXTEND 

401  7 

RFF 

27 

1 AST 

6<'5 

32,2657 

7 0122 

1 

RP 

VBUF 

FCRR  SIN  S CCS  T LLCSNEX. 

4018 

PEF 

26£ 

LAST 

605 

32,2660 

20  155 

1 

CAS 

RFAC 

4019 

REF 

6 

LAST 

60  5 

22,2661 

3 1767 

c 

CA 

SAVFCCUT 

+ l 

4G2r 

PF<= 

4 

LAST 

605 

32,2662 

0 5032 

0 

TC 

spcns 

4021 

RFF 

7 

LAST 

605 

32  ,2663 

55*767 

1 

7S 

SAVECCUT 

+ l 

SAVECCUT  +1  NOW  = COS  S . 

4022 

32,2664 

C CP06 

1 

EXTEND 

4T?3 

REF 

4 

LAST 

605 

32  ,2665 

7 '1166 

1 

RP 

PUSHLOC 

4024 

32,2666 

C CC06 

1 

EXTEND 

402  5 

REF 

28 

LAST 

60  5 

32,2667 

7 '126 

0 

RP 

VBUF  +4 

FCR**  CCS  S CCS  T ULCSNE2. 

4026 

RFF 

269 

LAST 

6C5 

32,2670 

20  155 

1 

CAS 

RFAC 

COS(EPROP)  = LLCSNB  . (SIN  S CCS  T, 

4027 

32, 26  n 

C CC06 

1 

EXTEND 

- SIN  T,  CCS  S CCS  T). 

4C26 

REF 

27C 

LA'T 

605 

32  ,2672 

3 0155 

0 

CCA 

MPAC 

4029 

RFF 

271 

LAST 

60  5 

32  ,2673 

20  155 

1 

TEST''FS 

CAS 

RFAC 

(ULCSN8  IN  VBUF  WAS  A FALF-LMT  VECTOR). 

4030 

RFF 

208 

LAST 

60  3 

32,2674 

10  000 

0 

CC  S 

A 

TEST  FCP  + CVERFLCW,  NCNE,  CR  R TNUS  . 

4C31 

REF 

54 

LAST 

599 

32,2675 

3 4736 

1 

CA 

B IT  14 

4032 

32,2676 

12  67  7 

1 

NCCP 

4C33 

32,2677 

C 0006 

1 

EXTEND 

4034 

rff 

41 

LAST 

59c 

32 ,2700 

05  712 

1 

WCP 

CFAN12 

IF  PLUS  OVERFLOW,  SET  SELFTRACK  ENABLE. 

4035 

32,27  1 

C 000  3 

1 

RFLINT 

4036 

REF 

2 

LAST 

603 

32,2712 

1 2 5 52 

n 

TCF 

R29CVBEG 

-1 

RAKE  END  PASS  THRU  VECICR  LCCF. 
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1 

P2C 

-P25 

USER'S  PAGE  NO.  113  E3  S3 

P4037 

CCPPIJTE 

SI- A FT 

AND 

trunnion  CCpmaNCS 

or 

NUIL  half 

THE  ERPCR  IN  HALF  A SECCNC-. 

4C3S 

REF 

8 

LAST 

6C5 

32 , 2 703 

3 1 767 

n 

R29DPAS2 

CA 

SAVECCUT 

4 1 

4040 

32, 27C4 

C 0C06 

1 

EXTEND 

4C41 

REF 

29 

LOST 

60  5 

32, 27(  5 

7 0122 

1 

PP 

VBLF 

FCRR  CCS  S UUrSNE'X. 

40A2 

Rpr 

27 

1 AST 

605 

32,2706 

53 ' 1 17 

1 

CXCF 

TANG 

4043 

REF 

9 

LAST 

606 

32, ?707 

4 1766 

0 

CS 

SAVECCLT 

4C44 

32 ,2710 

0 0006 

1 

EXTEND 

4045 

REF 

30 

LAST 

606 

32 ,27  1 1 

7 0126 

0 

NF 

veuF  +4 

FCPM  - SIN  S ULOSNB'Z. 

4046 

REF 

28 

L AST 

606 

32,2712 

2 1 ' 10  7 

1 

CAS 

TANG 

RAV,  shaft  CNC  = UUCSNE*  . (COS  S,  0, 

4C47 

RFF 

6 

LAST 

605 

32,2713 

4 0163 

I 

CS 

MODE 

-SINS) 

4048 

32,2714 

C CCC6 

1 

EXTEND 

4049 

PF-F 

1 ’ 

LAST 

606 

32,2715 

7 1766 

0 

HP 

SAVFCDUT 

405P 

32 ,2  71 6 

C 0006 

1 

EXTEND 

4 >5  1 

REF 

3 1 

L AST 

606 

32,2717 

7 0122 

1 

NF 

VELF 

FCFN  SIN  T SIN  S UUCSNE  *X  . 

4C52 

RFF 

27? 

LAST 

605 

32,2720 

52  155 

1 

CXCH 

MPAC 

40  5 3 

REF 

C 

LAST 

605 

32  ,2  721 

3 0166 

0 

CA 

FLSHLCC 

4054 

32,2722 

0 0CQ6 

1 

EXTEND 

4F55 

RCF 

32 

LAST, 

606 

32,2723 

7 0124 

1 

HP 

VBUF  42 

FORM  COS  T ULCSNB'V. 

4056 

RFF 

273 

LA  £T 

606 

32,2724 

20  15  5 

1 

CAS 

R FAC 

4057 

RFF 

7 

LAST 

60  6 

32, 2725 

4 0 163 

1 

CS 

RCOE 

405E 

32,2726 

C 0006 

1 

EXTEND 

4059 

REF 

1 1 

LAST 

606 

32,2727 

7 1767 

1 

NP 

SAVECCUT 

41 

4C60 

32,2730 

0 0006 

1 

EXTEND 

4C61 

RFF 

•2  3 

LAST 

6C6 

32  ,2  73  1 

7 0126 

> 

NF 

VEUF  +4 

FCRN  SIN  T COS  S ULOSNB'Z. 

4062 

REF 

274 

LAST 

606 

32, 2732 

20  155 

1 

DA  S 

RFAC 

RAV>  TPUNNICN  CRC  = UUCSNE'  . 

4C63 

RFF 

275 

LAST 

606 

32  ,273  3 

3 0154 

1 

CA 

MPAC 

( SIN  S SIN  T,  CCS  T,  SIN  ' CCS  T). 

406^ 

32,2734 

C CCC6 

1 

EXTEND 

4{  65 

RFF 

1 

32, 2735 

7 2776 

1 

(i/p 

RR29GAT  N 

4066 

REF 

4 

LAST 

552 

3? ,2736 

57*354 

1 

XCH 

TRUNNCMC 

STORE  REFINED  T CRD, GET  RAU  S C-C. 

4067 

32,2737 

C CQC6 

1 

EXTENF 

4F68 

RFF 

2 

LAST 

606 

32,2740 

7 2776 

1 

HP 

RR29GATN 

2 LAST  552  ' 32,2  741  ^<^<  355  1 IS  SHAFTCMC 


406S  PE>= 


STCPE  REFIN'EC  SHAFT  CGWMAND  FOR  RRCLT 
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P4070 

R4072 

PHCTHPP 
RF  < r TNG 

CP  ^^T  TRACKING  WAS  ENAELfC  THIS 
CATA  from  tee  RFNDEZVCLS  RADAR. 

T]WE,  CHECK  CN 

RP  DATA-GOOC. 

IF  PRESENT,  STCP  DESIGNATING  ANC  START 

40  73 

RFF 

28 

LAST 

595 

32,2742 

3 4750 

1 

r GOO  C 7 

CAF 

B IT4 

4C74 

22, 2743 

C CCC6 

1 

EXTEND 

4 ''.79 

REP 

21 

1 AST 

595 

32, 2744 

02  C33 

0 

RAND 

CHAN33 

GPT  PR  CATA-CCCC  BIT. 

407E 

32 ,2745 

0 7004 

0 

INF  INT 

(NAINLV  FCR  PRCLT). 

4077 

32,2746 

C C006 

1 

EXTEND 

4-’7P 

REF 

1 

32,2747 

1 2753 

0 

RZF 

R29LCKCN 

BRANCH  IF  CATfl-GCCD  IS  PRESENT. 

4C79 

PEE 

1 56 

LAST 

604 

32 ,2750 

C 4616 

1 

TC 

BANKCALL 

4''P0 

PEP 

2 

LAST 

32, 2751 

5 2 3 1 7 

0 

CACP 

RPCLT 

CATA-CCCC  IS  ABSENT,  SC  SEND  CCN-NANCS. 

4CE1 

REP 

1 

32,2752 

1 277  1 

0 

TC  F 

FND29DOD 

4082 

RFF 

8 

LAST 

60S 

32,2753 

4 4 742 

c 

P29LCKrN 

CS 

CFSIGEIT 

4080 

RFF 

109 

LAST 

60? 

32,2754 

7 QUO 

0 

l«ASK 

RAOMCPES 

4C64 

RFF 

in 

LAST 

607 

32,2755 

54  110 

0 

TS 

P ACMCCES 

SHOW  THAT  CESIGNATICN  IS  CVEP. 

4089 

RFF 

34 

LAST 

575 

32, 2756 

4 4752 

1 

CS 

8IT2 

4C84 

32,2757 

0 0006 

1 

EXTEND 

4087 

REF 

42 

LAST 

6C5 

32,2760 

0 3 012 

1 

^ANC 

CHAN'12 

DISABLE  RR  ERROR  COUNTERS. 

4088 

REF 

2 

LAST 

2 20 

32,2761 

3 474  3 

0- 

CA 

READBBIT 

4C89 

RFF 

11 

LAST 

557 

32,2762 

26  077 

0 

ACS 

FLAGWRD3 

SHCW  THAT  READING  HAS  BEEN  RECLESTEC. 

4090 

PEF 

2 

LAST 

60  1 

32,2763 

1 1 ' C55 

1 

CCS 

PI  pr,T.p 

SEE  IP  TASK  SHOULD  RE  OFFSET  1 SEC. 

4091 

PFF 

2 

LAST 

60  1 

’2, 2764 

4 4 7 76 

1 

CS 

SLPEPllO 

- 96D  + lOCC  = 4. 

4092 

RFF 

5 

LAST 

60  1 

32,2765 

6 4 777 

1 

AC 

ISEC 

C + ICCC  = ICCD. 

4093 

REF 

28 

LAST 

60  ] 

32,2766 

F 5203 

c 

7C 

WAITLIST 

4094 

RFF 

36 

LAST 

601 

E7,  1456 

FEANK= 

LCSCCLNT 

4099 

REF 

1 

32,2767 

03400 

0 

2CACP 

R29READ 

START  READING  TASK  ANC  JOB. 

4099 

REF 

1 

32, 277C 

50067 

0 

4f96 

RPF 

4 

1 AST 

'60  2 

32,2771 

4 4 740 

1 

ENC29CCF 

CS 

L0SCM8IT 

4097 

REF 

19 

LAST 

60? 

32,2772 

7 CC76 

1 

^ASK 

FLAGWPC2 

4098 

RFF 

16 

LAST 

60  7 

32,2773 

54  976 

1 

TS 

FLAGWP02 

ALWAYS  CLEAR  LCSCNFLG. 

4099 

RPF 

102 

LAST 

60C 

32,2774 

1 5155 

1 

TCP 

ENCCFJOe 

100 

4101 

REF 

4 

LAST 

96 

32.2775 

32.2776 

00052  0 
56655  1 

R29FXLCC 
PP29GA  IN 

ACRES 

CEC 

INTB15+  -34C 
- .53624 

419? 

PEF 

6 

LAST 

593 

E3,  1760 

LCSVCT/4 

ECUA  1 S 

1 C S V E L 

4103 

REF 

14 

1 AST 

593 

1 100 

LOSSN" 

EOLAL  5 

PRTARGET 

41  ""A 

P'=F 

6 

LAST 

57C 

E3,1766 

S AVEC  CUT 

EQUALS 

NLCSV 
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A106 

2A.3AO0 

BALK 

24 

A107 

REF 

7 

LAST 

602 

2A  , 2000 

SETI CC 

P20S 

AlCe 

24,3AOO 

8ANK 

A 109 

2 

LAST 

6C2  TO 

603  : 

18 

18* 

CCL'AT* 

T J/R29 

All  J 

REF 

37 

LAST 

60  7 

E7,  1A56 

FBANK= 

LOSCCLNT 

All  1 

REF 

ir 

LAST 

5AF 

2A  ,3A0C 

3 771  7 

1 

■R29RFAC 

CAF 

PPIC26 

CALLEC  BY  WAITLIST. 

All? 

RRp 

12 

LAST 

602 

2A, 3A0  1 

0 5072 

1 

TC 

NCVAC 

A113 

PEF 

38 

LART 

608 

F7, 1A56 

EBAKK= 

LCISCOLNT 

AllA 

REF 

1 

2A,3A02 

03A13 

1 

2CACP 

R29RCJ0e 

START  JCE  TO  REAR  AND  CCWMINK  FDR 

R29. 

AHA 

PEF 

1 

2A  , 3A'H 

S0C6  7 

0 

Alls 

PEF 

2 

LAST 

566 

2A,3AO^, 

3 5000 

1 

CA 

2SECS 

AHA. 

PEF 

C 

LAST 

6C2 

2A,  3A05 

0 522A 

c 

TC 

VARCELAY 

AH7 

REF 

12 

LAST 

60  7 

?A, 3A06 

3 C077 

1 

CA 

F LAGV.RD3 

2 SECCNCS  LATER,  SEE  IF  PEACING  IS 

ST  II  L 

AH8 

RFF 

Q 

LAST 

6C7 

2A,3A')7 

7 A7A3 

1 

RASK 

PEACPFIT 

ALLCWEC  (MC  TRACKER  FAIL  ETCH 

AH9 

RFF 

209 

LAST 

605 

2A, 3A1C 

1C  COO 

0 

CCS 

A 

A120 

REF 

2 

LAST 

607 

2A,3A1 1 

1 3Aon 

1 

TCF 

R 29READ 

ITS  CK;  call  it  AGAIN. 

A 121 

pec 

29 

LAST 

602 

2A,3A12 

1 5261 

0 

TCF 

T ASKGVFR 

IT  AIN'T;  WAIT  EDR  REDESIGNATE. 

A122 

P'^F 

13 

' AST 

608 

2A, 3A12 

3 CC77 

1 

R29Rnjoe 

CA 

F LAGIaRD3 

CALLFC  VIA  NCVAC. 

A123 

REF 

3 

LAST 

28  1 

2A,3A1A 

7 A7A1 

0 

RASK 

MR29FBIT 

AHA 

REF 

2 10 

LAST 

608 

2A,3A15 

1C  COC 

c 

CCS 

A 

TEST  •'NrP29FLG". 

A125 

RRF 

1 

2A, 3A  16 

1 3 500 

c 

TCF 

E ADR29RD 

R29  OVER, EXIT  KITE  RR  STHL  LCCKEC 

CN 

A126 

RPF 

1 1 1 

LAST 

6C7 

?A  ,3A17 

3 OHO 

1 

CA 

PACMCCES 

A127 

PEF 

6 

LAST 

c 3 c 

2A, 3^20 

7 A 7 52 

1 

RASK 

ALTCREIT 

A128 

RFF 

211 

LAST 

608 

2A,3A21 

10  OOJ 

(1 

CCS 

A 

TEST  RR-NCT-IN-ALTC-RCCE  EIT. 

A129 

REF 

1 

2A  ,3A22 

1 3A75 

0 

TCF 

ENCRPC29 

ASTPC  TCCK  RR  CUT  OF  ALTO  MODE. 

A130 

RRF 

159 

LAST 

60  7 

2A,3A22 

0 A6  16 

1 

TC 

RAAKCALL 

A nr 

ref 

5 

LAST. 

573 

2A,3A2A 

'5311 2 

0 

CACR 

RRRDCT 

INITIATE  reading  CF  RANGE  PATE. 

A 132 

REF 

160 

LAST 

608 

2a, 3A25 

0 A616 

1 

TC 

B ANKCALL 

A133 

RFF 

13 

LAST 

6'''0 

2A, 3A26 

1 7 7 0 6 

c 

CADP 

RAOSTALL 

GC  TO  SLEEP  UNTIL  IT'S  READY. 

A13A 

REF 

2 

LAST 

6 0 8 

2A ,T^27 

1 3A75 

0 

TCF 

ENCPPCPS 

BAC  READ  ; REDESIGNATE. 
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A 136 
A137 
A1  38 

REF 

REF 

7 

276 

LAST 
1 AST 

573 

6'i6 

2A,3A3C 
2A, 3A3  1 
2A,  3A32 

53  ' IC5 
52  155 
0 0'104 

0 

1 

0 

CXCF 
DXCH 
INF  IRT 

T TREFCLC 
MPAC 

TIME  CF  PR  REACING,  FCR  CCWNLINK. 

BE  PURE  CF  5 CONSISTENT  CCL  ANGLES. 

A139 

2A,  3A33 

C 00C6 

1 

EXTFAD 

AlAO 

PEE 

12 

LAST 

60  A 

2A, 3A3A 

3 0036 

1 

CCA 

COLT 

AlAl 

REG 

277 

LA  ST 

609 

2A.3A35 

52  157 

0 

CXCF 

•'»FAC  *2  ■ 

RRCCU  ANGLES  AT  RR  REAC,  FCR  OCNNIINK, 

A1A2 

2A, 3A36 

C CC06 

1 

EX7ERD 

A1A3 

REF 

A 

1 AST 

60A 

24 ,3A37 

3 0034 

0 

CCA 

CDLY 

AlAA 

REF 

278 

LAST 

609 

24 , 3440 

52  161 

0 

CXCF 

MPAC  +4 

MPAC'S  7 WORDS  ARE  BUFFER  FOR  COPYCYCLE. 

A1A5 

Pf=C 

12 

LAST 

60  A 

24,^44  1 

3 0032 

c 

CA 

COLX 

A1A6 

REF 

2 79 

LAST 

609 

24,3442 

54  162 

0 

TS 

MPAC  +6 

IMLCDL  ANGLES  AT  RR  PEAC,  FCR  DCWNLINK. 

A1A7 

REF 

161 

1 A ST 

608 

24, 3443 

C 4616 

1 

R29RAAGF 

TC 

BANKCALL 

AlAP 

REF 

A 

LAST 

57A 

24, 3444 

53114 

0 

CACR 

R.RPANGE 

INITIATE  READING  CF  RP  PAKGF. 

A 1 A9 

REF 

162 

LAST 

60  9 

24,3445 

0 4616 

1 

TC 

8ANKCALL 

A 150 

PFF 

lA 

LAST 

608 

24, 3A46 

1 7 706 

c 

CACR 

P ACST4L  L 

GO  TO  SLFEF  UNTIL  IT'S  READY. 

A1  51 

R^F 

1 

24,3447 

1 3466 

1 

TCC 

R 29RRR? 

BAC  READ  CP  SCALE  CHANGE  ...  kFICh? 

A152 

24,3450 

0 0004 

0 

INFIAT 

A1  53 

REF 

7 

LAST 

57A 

24,3451 

C 0 1 Q 1 

0 

CXCH 

DNPRANGE 

CCPYCYCLE  TC  LAY  CUT  NEW  R29  CCWNLINK. 

A15A 

REF 

6 

LAST 

581 

24,3452 

53 ' 75  7 

1 

CXC  F 

PM 

A ' 55 

RRF 

280 

LAST 

609 

24,3453 

52  155 

1 

CXCF 

MFAC 

A156 

REF 

7 

1 AST 

587 

24, 34=4 

fc  3 i 7 5 5 

c 

DXC  w 

MKTI ME 

A 1 57 

REF 

281 

LAST 

609 

24,3455 

52  157 

0 

CXCF 

MPAC  +2 

A168 

PEE 

Q 

LAST 

59^ 

24,3A56 

53  * 7 5 3 

0 

C XCF 

TANGNB 

A155 

RRF 

2 82 

LAST 

609 

24,3457 

52  161 

0 

CXCF 

MPAC  +4 

A160 

RFF 

8 

1 AST 

569 

24,3460 

5 3 ' 460 

0 

CXCF 

A IG 

A161 

RPF 

2 83 

LAST 

609 

24, 3A6  1 

3 CU2 

1 

CA 

MPAC  +6 

A16? 

REP 

6 

LAST 

583 

24,3462 

55' 461 

1 

TS 

AEG 

A 163 

R-^F 

78 

LAST 

603 

24,3463 

3 4753 

1 

CA 

CNE 

A16A 

REF 

A 

LAST 

315 

24, 3A6A 

55  • 462 

1 

IS 

trkmkcnt 

SHCW  TFAT  CCWNLINK  n^TA  IS  CCNSISTENT. 

A 165 

REF 

103 

LAST 

607 

24,3465 

1 5155 

1 

TCF 

ENCCF JOB 

hh 

RFF 

18 

LAST 

575 

24,3466 

4 ClCl 

c 

R29PRR? 

r s 

FLAGNRC5 

A167 

RFF 

29 

LAST 

553 

24,3467 

7 4742 

0 

RASK 

B me 

A168 

PFF 

212 

LAST 

60  8 

24,3470 

1C  onn 

0 

CCS 

A 

WAS  IT  A SCALE  CHANGE  (PEAL  OR  PHONY)? 

A169 

REF 

3 

LAST 

60  8 

24,3471 

1 2476 

c 

TCF 

ENDRRD29 

NC,  A BAC  PEAC:  RECESIGNATE. 

A1  7C 

REF 

61 

LAST 

573 

24,3472 

0 5516 

0 

TC 

DCWMFLAG 

A171 

RFF 

3 

LAST 

573 

24,3473 

00  12C 

1 

ACRFS 

rngscflg 

A1  7? 

REF 

1 

24, 3474 

1 3443 

0 

TCF 

R29PANGE 

YCS;  CLEAR  FLAG  AND  PEAC  AGAIN. 

A 173 

PFF 

5 b 

LA  'T 

605 

24,3475 

4 4736 

0 

ERCPFC29 

CS 

F IT14 

TRCLBLE  MACE  LS  CCME  HERE  TC  LEAVE  THE 

A1  7A 

24,3476 

0 00')6 

1 

EXTENP 

rp-peacing  mcce.  ciscrecit  COWNTEL 

A1  75 

REF 

A3 

t AST 

607 

24,3477 

03  01  2 

1 

UANC 

CFAM12 

A176 

RFF 

12A 

1 AST 

59  1 

24,3500 

3 4755 

1 

ENCR29RC 

CA 

ZERC 

A177 

RFF 

5 

L AST 

609 

24,35)1 

5 5 ' 4 6 2 

1 

TS 

trkmkcnt 

A178 

RFF 

62 

LAST 

609 

24,3502 

0 5516 

0 

TC 

DCWNFLAG 
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MCNITDR 

A182 

31 , 2 107 

BANK 

31 

A1  63 

REF 

1 

31  ,2000 

SETLCC 

VB67 

A18A 

31,2007 

BANK 

A185 

PEF 

1 

COUNTS 

$$/EXTVe 

A 1P6 

P9F 

*5 

LA9T 

31  e 

EA  , 160C 

EBANK= 

WWFOS 

A1P7 

PEF 

60 

L AST 

60f 

31,2007 

0 60A2 

1 

V67CA1L 

TC 

I NTPRFT 

Alee 

31,20  in 

77624 

1 

OALL 

A 1 PS 

REF 

1 

31  ,2C1  1 

6 2 120 

r) 

V67LJK 

Ai  <?n 

31,2012 

7 7 7 7 6 

1 

EXIT 

Ai  <;i 

31,2013 

0 3006 

1 

EXTEND 

SAVE  TFE  PRESENT 

N99  VALLES  FCP 

A192 

REF 

A 

LAST 

611 

3 1,201  A 

3 16C1 

1 

EGA 

WKPCS 

CCNFARISCN  AFTER 

TFE  CISPLAY 

A193 

RFF 

2 

LAST 

31P 

31,2015 

53'607 

0 

OXC  H 

WWBIAS  +2 

A19A 

31  ,2C16 

0 C006 

1 

extem: 

A195 

REF 

2 

LAST 

3 le 

31,2017 

3 1603 

0 

CCA 

KKVEL 

AI  96 

PEF 

3 

Last 

61  1 

31  ,2020 

53’61 1 

1 

CXCF 

WKBIAS  +A 

A 197 

3 1 , 7 -r?  1 

0 0006 

1 

EXTEND 

A198 

REF 

A 

1 AST 

611 

31,2022 

3 160  5 

c 

CCA 

NKBI AS 

A199 

RFF 

5 

1 AST 

611 

31  ,2023 

53' 613 

0 

OXC  F 

WWBIAS  +6 

A200 

PEF 

1 

31,202a 

3 21A3 

0 
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=NPEF 

1 

35,2017 

0 1067 

1 

XCEL VFLG 

00677 

* 

35, 2CP0 

77776 

1 

EXIT 

006  8 

PFF 

1 

35, 202 1 

2 2C33 

u 

PARAM3C 

CAE 

V06N42 

CISFLAY  AFCGEE  ,FER  IGEE  , CELTA  V 
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PACE  iie 


L 

POC, 

, F37 

LSFR'S  PAGE  NC. 

2 '"4  S3 

0C69 

RFF 

3 

LAST 

617 

35 , 2C22 

0 3621 

1 

TC 

VNFDOF 

0070 

PFE 

63 

LAST 

617 

35,2323 

0 60^2 

1 

TC 

I NTPRET 

0C71 

❖ 

35.202A 

77614 

1 

SET 

0072 

♦ RFF 

1 

35, 2C2E 

G1C71 

C 

F IN  SLFIG 

007^t 

35,2026 

77624 

1 

REVN  164  5 

CALL 

007‘5 

REF 

1 

35,2027 

73515 

1 

VM645 

0076 

35, 2C3C 

77650 

1 

GCTC 

CCNES  FFFE  CN  RECYCLE 

RESPOMSE 

CC77 

RFF 

1 

35,2031 

72026 

0 

REVN1645 

Oicr 

35,2032 

C1441 

1 

VC6A33 

\h 

0633 

0102 

35, 2033 

01452 

0 

VC6M42 

W 

0642 

r,AP; 

ASSPRBl-P 

REVISION  116  CF  AGC  FRCC-RAP  LUMINARY  8 

Y NASA  2C21112-J7I 
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LEMF3CS  .105  PAGE  619 

L 

P30,P37 

USER'S  PAGE 

NO.  3 E4  S3 

FPCGP  f** 

CFSCfilPTlCN  S30.1  CATE 

9N0V66 

R0106 

VGO  NT 

1 LCG  SFCTtCN  F30fF37 

R0107 

ROl'iP 

R0109 

MCC  EY  RAMA  ATYA>,AP  ** 

PU^CTIC^^L  rF.SCRIFTTCN 

BAPEO  ON  STORED  TARGET  PARANETERStR 

CF  IGMT  ICN  ( FT  IG  ),  V 

Of 

ROll') 

ROlll 

R0112 

CALL  TNG 

IGN IT  ION (VT 1C ) ,T  IME  0=  IGNITION  ( T 1 G 1 ) ,CCMP L TE  PERIGEE 
APOGEE  AITITIJOE  ANT  CELTAV  P E CU  I P ED  ( C ELV  S IN' 1 . 

SEQUENCE 

At  TITLCE 

RO 1 1 3 
ROl  14 
RO  1 15 

1 

1 + 1 

N C R P A 1. 

CALL 

S3C.  1 

EXIT  MOCF 

POl  16 
R C 11  7 
POUR 

AT  Lt?  OR  CALI  ING  SECUENCE  (GCTC 

puproltines  called 

LEPPPEC 

L + 2 ) 

ROUP 

ROlpn 

R0121 

PER  T ARC 

ALARM  OR  ABORT  EXIT  NCDES 
NCNP 

P0122 

P0123 

R0124 

ERASABIE  IMTTALl  ZATICN  PECUIRED 

'tig  time  of  IGNITION 

DElvSLV  SPECIFIEC  CELTA-V 

IN  LOCAL 

CF  E28CS 

VERT. 

90125 
R 1126 
R0127 

OLTPLT 

CCCRDS.  CF  ACTIVE 
TIME  09  IGNITION 

VEEICLE 

■VECTCR 

AT 

e+7  METFRS/CS 

ROUP 

R.U29 

Rono 

RTIG  PCSITION  AT  TIG 

vTiG  velocity  at  tig 

PEL  4D  APCGEF  / LT  ITUCE 

VECTCfi 

VECTOR 

CP 

F+29  METFRS 

B+2S  METFRS/CS 

8+29  M , S+27  METERS. 

R013f)  1 
R0131 
Roni  1 

HAPO  APCGEF  altitude 

PEL  ar  PEP  IGEE  ALT  ITLCE 
HPER  PFFIGFE  ALTITLCE 

CP 
CP 
C F 

E+29  METEFS 

B+2S  M , B+27  METERS. 

P429  meters 

ROl  32 
R0133 
R0134 

CELVSIN  SPECIFIED  CELTA-V 

CCORt . OF  ACT  IVE 
■ tine  CF  IGMTICN 

IN  INERTIAL 
VEHICLE  AT 

VECTCR  E+7  METFFS/CS 

R0135 

RQ136 

R0137 

DEBR  I S 

CELVSAB  MAG.  OF  DFLVSIN 
CTEMP  TEMP.  EPASAELF 

GPRET.MPAC 

VECTOR 

B+7  METERS/CS 

ROUP 

PUSH1.T5T 

0139 

REF  1 

34 ,2C0D 

SETLCC  P30S1 

0160 

34, 200C 

BANK 

0141 

REF  1 

COUNTS  t$/S30S 

0 142 
0143 

REF  1 

34,2000  7122C 

34,2'>ai  1 0 36  32 

1 S3C.1 

0 

STC  DLCAC 

QTEMP 

0144 

0145 

0146 

REF  S 

REF  21 
PEE  3 

LAST  495  34,2'V12  '1344? 

LAST  59?  34,2013  34C41 

LAST  20E  34,2''04  27060 

0 

C 

1 

T IG 

STCALL  TCECl 

LEMPREC 

TIME 

ENCKE 

IGMTICN  SCALED  AT  2(+28)CS 
RCLTTNE  FCR  LEM 

0147 

34  ,2005  6 717', 

0 

VLCAC  SXA,2 

GAP:  /iS^rNBLE  RFVTSICN  116  CF  ACC  PRrCMt'  LUMINfRY  EY  NASA  2021112-071 iqrCS  ftUG.  LENP3CS  .105  P/iGE  620 


1 

P30, 

,P37 

LSFP'S  PAGE  NO.  4 E4  S3 

01471 

pr-f 

IF 

LAST 

592 

34,2006 

onoo  1 

0 

P ATT 

0148 

R8F 

1 

34,2007 

02  777 

1 

RTX2 

015f' 

OFF 

2 

LAST 

143 

34,20  10 

03642 

1 

STCPE 

RTIG 

PACIUS  VFCTCF  AT  IGMTICN  TIME 

01=3 

34,2011 

57456 

1 

IN  IT 

VCOMP 

0154 

RFF 

n 

LAST 

144 

34,2812 

2 7 6 56 

1 

STCVL 

DEI  VS  IN 

ZPF/LV  lA  CELVSIN  SCALEC  AI  2 

1155 

P = F 

6 

L AST 

592 

34,  2'  13 

0CCL7 

f 

VATT 

VELCCITY  VECTCR  AT  TIG,  SCALEC  2(7)  P/CS 

0156 

RTF 

2 

L AST 

143 

34 ,2014 

0365C 

1 

STORE 

VTIG 

0158 

34, 2=  1 5 

53435 

C 

9XV 

UM  T 

0159 

RFF 

3 

LAST 

62F 

34, 2"  16 

13642 

1 

RTIG 

016'’ 

34,2017 

66001 

0 

SET  PE 

SXA,  1 

0161 

34 , 2C2C 

COCCI 

0 

0 

C161  1 

REF 

2 

LAST 

125 

34,2021 

027  76 

0 

PTXl 

0162 

34 , 2022 

47206 

c 

FLSF 

VXV 

YPF/LV  PCL  0 SCALEC  AI  2 

0163 

PFF 

4 

LAST 

6 2C 

34,2023 

036  56 

1 

DEL  VSIN 

0164 

34,2'i24 

63372 

1 

V5L1 

PDVL 

0165 

34,2025 

6331  5 

c 

FCVL 

PCVL 

YFF/LV  PCL  6 SCALEC  AT  2 

0166 

Pi^F 

5 

LAST 

6 20 

34,2026 

03656 

1 

delvsin 

ZRF/LV  PCL  12C  SCALEC  AT  2 

0 167 

RFF 

2 

1 AST 

199 

34,2027 

03434 

1 

CELVSLV 

0168 

34,2038 

76  5C5 

( 

VXR 

VSLl 

0169 

34,2031 

OOOOl 

0 

0 

0170 

RFF 

6 

LAST 

6 2C 

34 , 2032 

03656 

1 

STCPE 

DEL  VS  IN 

CELTAV  lA  INERT.  COOR.  SCALED  TC  B+IP/CS 

0172 

34, 2033 

77646 

0 

ABVAL 

0173 

P.FF 

2 

LAST 

143 

34 , 2034 

27664 

0 

STCVL 

CEL  VSA6 

DELTA  V PAG. 

0174 

RFF 

4 

LAST 

62C 

34,2035 

C3642 

1 

RTIG 

(FCF  FERIAFC) 

Cn  75 

34, 2036 

53315 

0 

pnvL 

VAO 

VREGUIREC  = VTIG  + DELVSIA  (FOR  FERIAPCl 

0176 

RFF 

“3 

L AST 

62C 

34,2037 

03650 

1 

VTIG 

0177 

REF 

7 

LAST 

62P 

24,204'- 

03656 

1 

PELVSIA 

C177  1 

34 ,2  )41 

77624 

1 

CALL 

0178 

RFF 

1 

34 , 2042 

46341 

c 

PERI  APni 

01  781 

34, 2043 

77624 

1 

CALL 

0 1 7 8 2 

RPF 

1 

34 , 2 044 

46451 

0 

SHIFTRl 

RCSCALE  IF  NEEDED 

017822 

34, 2045 

77624 

1 

CALL 

LIPIT  DISPLAY  TO  9999.9  N.  P'1. 

017824 

RFF 

1 

34,2046 

45636 

G 

R.A  XCHK 

0 17  8? 

RFF 

2 

LAST 

315 

34,2047 

16321 

0 

STCCL 

HFFR 

PERIGEE  ALT  2(29)  MFTEPS,  FCR  CISFLAY 

01784 

34,2'’5C 

00005 

1 

4D 

01785 

34,2051 

77624 

1 

CALL 

01786 

RFF 

2 

LAST 

62C 

34 , 2C5  2 

4 6 4 51 

0 

ShIFTRl 

RESCALE  IF  NEEDED 

01787 

34, 2053 

77624 

1 

CALL 

LIPIT  DISPLAY  TC  9999.9  N.  PI. 

C178  8 

REF 

2 

LAST 

620 

34,2054 

45636 

0 

M AXChK 

0179 

REF 

4 

LAST 

315 

34,2055 

363  1 7 

1 

STCA  L L 

hafc 

AFCGEE  ALT  2(29)  PIFTEPS,  FOR  DISPLAY 

0180 

REF 

2 

LAST 

619 

34,2056 

0 3 6 3 2 

0 

OTEMP 
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POCn  COELl  IFTIC  EEObENCF  INITTATICN  (CSI)  FRCGRAn'  ff22  ANC  F72) 

R0011  RCD  NC  -1 LEG  SECTtCN  - P32-F35,  P72-P75 

P0012  MOC  BY  InPITF.P  DATE  IJLNE67 

P0013  PlFonsF 


RO'^IA  (U  TO  CALCLLATE  PARAPETERS  ASECCIATED  V^ITF  THE  FOLLFWING 

ROOl  5 CON'CENTPIC  PLIGHT  PLAN  vA\iELVERS  - THE  CC-EILIFTIC  SEGUEKCE 

R0016  IMTIATIFN  (C5I)  MA^EUVER  ANT  THE  CONSTANT  DELTA  ALTITUOE 

R0C17  (CCH)  NAHELVFF, 


R0018  (2)  TO  CALCLLATE  TpESf:  PARAR-TERS  BASED  LFCN  MANEUVER  CATA 

RQC19  APPRCVFC  AAC  KEYEF  INTC  THE  FSKY  BY  THE  ASTRONAUT. 


R0020  (3)  TO  DISPIAY  TO  THF  ASTRCAALT  ANC  THE  GRCLNC  EEFFNOENT  VARIABLES 

R0O21  ASSrCIATEC  WI'^H  THE  CONCENTRIC  FLIGNT  PLAN  RANELVERS  FOR 

R0C22 AFP'PQVAL  BY  THE  A S T P CN  A LT /GP  CU  N C . 


ROD23  (A)  TC  RTPRF  THE  LSI  TARGET  PARARETERS  FCF  LSE  EY  THE  CESIREC 

RQOPA THRUSTING  PRQGRAR. ^ 


ROC25  ASSUMPTIONS 


R0026 

R0027 

R002R 

( 1 ) 

AT  A SELECTED  Tpi  TIME  -^HE  LINE  OF  SIGHT  BETWEEN  THE  ACTIVE 
AND  PASSIVE  VIHICLPS  IS  SELEGTFC  TO  PE  A PRESCRIBED  ANGLE  (E) 
PROM  THE  HORIZCNTAl  PLANE  DEFINED  BY  THE  ACTIVE  VEHICLE 

R0028B 

PCS  IT  ICN. 

R0029 

(2) 

THF  TIME  BETV<FEN  CSI  IGNITION  ANC  CCH  IGMTICN  MUST  BE 

R0030 

R0031 

CCMPUTEC  TC  BF  GREATER  THAN  10  MINUTES  FCP  SUCCESSFUL 
CCMFLETICN  CF  TH'  FPCGFAM, 

R0032 

R0033 

R003A 

( 2 ) 

THE  TIME  BETWEEN  CDH  ICNITICN  ANC  TFI  IGMTICN  MUST  BE 
CCMPUTEC  TC  BF  GREATER  THAN  10  MINUTES  FOR  SUCCESSFUL 
CCMPLFTICN  CF  the  FFCGFAM. 

ROD?  5 
ROOBfc 

( A ) 

CCH  DELTA  V IS  SELECTED  TC  MINIMIZE  THE  VAPIATICN  CF  THF 
ALTITUDE  DIFFERENCE  BETWEEN  THE  ORBITS. 

R0037 

ROOTS 

( 5) 

CSI  BURN  IS  DEFINED  SUCH  THAT  THF  INPULSIVE  DELTA  V IS  IN  THE 
HORIZONTAL  PLANE  DEFINED  BY  THE  ACTIVE  VEHICLE  PCSITICN  AT  CSI 

R0038* 

ignitipn. 

R003° 

( A ) 

THE  PERICENTFP  ALTTTLDE  CF  THE  CRBIT  FCLLCWING  CSI  ANC  CCH 

ROOAO 

ROOAl 

MUST  BE  GREATER  THAN  35,000  FT  (LUNAR  ORBIT)  CP  85  NM  (EARTH 
CPRIT)  FCP  SUCCESSFUL  CFMFLETION  OF  THIS  PRCGPAM. 

ROD  A 2 
R00A3 

(7) 

THE  CSI  ANC  CDH  MANEUVERS  APE  ORIGINALLY  ASSUMED  TO  BE 
parallel  TC  THF  PLANE  OF  THE  CSM  ORBIT.  HOWEVER  CREW 
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L 

P32-P25, 

P7  2-P  15 

USER'S  PAGE  NO. 

2 

EC  S3 

R004A 

Rooas 

MGCIFirailCN  OF  nPLia  V (IV)  CC^PC^E^^S  pav  FESLLT  IN  aN 
CUT-FF-FLANE  tSI  ►'ANEUVER. 

P00A6 
P.004  7 

( 8 ) 

STATE  VFCTCR  UPDATES  BY  P27  APE  CISALLCNFF  CURING  AUTHPATJc 
STATE  VFCTCR  UPDATING  INITIATED  BY  P2C  (SEE  ASSLPPTICN  10). 

ROOAR 

R00-!i9 

R0050 

(9) 

CnMPLTEC  VARIABLES  NAY  PP  STCFEC  POP  LATER  VERIFICATION  BY 
THE  GRnUND.  these  STORAGE  CAPaPILITIES  ARE  NCPPALLY  LIMTEC 
ON(Y  TF  TFF  PARAMETERS  FOR  ONE  THRUSTING  MANEUVER  AT  A TIME 

P0051 

PXCEPT  FCR  CONCENTRIC  FLIGHT  FLAN  CANEUVEP  SFCUENCES. 

R0O52 

( 10  ) 

THE  RPNCEZVCUS  RADAR  MAY  OR  MAY  NOT  BE  USED  TC  UPDATE  THE  LP 

POOS:^ 
R0094 
R005  5 

OP  CSR  state  vectors  FCR  THIS  PROGRAM.  IF  RACAR  USE  IS 
DESIRED  THE  PAOAR  V^AS  TLRNEC  CN  ANC  LOCKED  CN  THE  CSP  RY 
PREVIOUS  SELFCTION  CF  P20.  RACAft  SIGHTING  PARKS  WILL  BE  PACE 

R0C56 

R0057 

ROORB 

AUTOMAT ICA i LY  A p p p C X I P A T E L Y CNCF  A MINUTE  WHFN  ENABLEC  BY  THE 
TRACK  ANC  update  FLAGS  (SEE  P20  ) . THE  RENCEZVCLS  TRACKING 
PARK  COUNTER  IS  ZERCEC  PY  THF  SELECTION  OF  P20  AND  AFTER  EACH 

RCC59 

THRUSTING  PANTUVER. 

R09f,0 

(11) 

THE  ISS  NEED  NOT  BE  ON  TO  CGP'PLETE  THIS  PROGRAM. 

R0061 

( 12  ) 

THE  OPEPATICN  CF  THE  FRCGRAP  UTILIZES  THE  FCLLOWING  FLAGS  - 

R'7'’)62 

R00B3 

ROOfc^ 

ACTIVE  VEHICLE  FLAG  - DESIGNATES  THE  VEHICLE  WHICH  IS 
CCINC  RENDEZVOUS  THRUSTING  MANEUVERS  TC  THE  PROGRAM  WHICH 
CALCULATES  THE  MANEUVER  FAPAPETERS.  SET  AT  THE  START  OF 

ROC'BB 

EACH  RENDEZVOUS  RRE-THR L ST  I N G FRCGRAP. 

RC066 

RINAl  FLAG  - SELECTS  FINAL  FPOC-RAP  DISPLAYS  AFTER  CREW  HAS 

R006  7 
R0068 

COMPLETED  THE  FINAL  PANELVEP  CCPFLTATICN  ANC  DISPLAY 
CYCLE. 

RCr6<3 

R0n7n 

R0071 

EXTERNAL  DFLTA  \ STRFRING  FLAG  - DESIGNATES  THE  TYPE  CF 
STFFRING  FFQuIRED  for  execution  CF  THIS  MANEUVER  BY  THE 
THPLISTING  program  SELECTRC  after  COMPLETICN  of  THIS 

R0072 

PROGRAM. 

R0073 

( 13  ) 

IT  IS  NCP.MALLY  RFOUIPEO  that  THF  ISS  BE  ON  FCR  1 HCLR  PPICR  TC 

Rn07^ 

A THRUSTING  MANEUVER. 

R007B 

( 14  ) 

THIS  PROGRAM  IS  SELECTFC  BY  THE  ASTRCNALT  BY  DSKY  ENTRY  - 

R0076 

P32  IF  Th’S  VEHICLE  IS  ACTIVE  VEHICLE. 

R0077 

P72  IF  THIS  vehicle  IS  PASSIVE  VEHICLE. 

ROlin 

INPUT 

ROn  1 

( 1 ) 

TCSI  time  CF  THE  CSI  wANFUVEP 
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ROl  12 
R0113 
ROllA 

<2  1 

NN 

NUMBPR  OF  APSICAU  CROSSINGS  THRU 
VFHICIE  CRE-IT  CAN  EE  AEVANCEC  TO 
MANEUVFR  PCINT 

k«HKH  THE  ACTIVE 
OBTAIN  TFE  CDF 

R0115 

(3) 

euev 

CFSTPED  LCS  ANCLE  AT  TPI 

ROII  6 

( Al 

TTPI 

TIME  OF  the  TFI  MANEUVFR 

R013I 

OUTPUT 

RQ131 

R013? 

(1  ) 
( 2 ) 

trkmkcnt 

TTOGO 

NUMPEP  CF  MAFKS 
TIME  TC  GC 

ROl  33 

( 3 ) 

+ MGA 

M ICCI  F G IMPAL  ANGLE 

R013A 

1 A 1 

DIFFALT 

DELTA  AITITijCE  AT  CCF 

R0135 

( 5 ) 

TlTnT2 

DELTA  tine  FRCM  CSI  TO  COF 

ROl  3 A 

(6  ) 

T2TfT3 

CELTA  time  FRCA'  CCF  TO  TPI 

R0137 

(7) 

DELVL VC 

DELTA  VELCCITY  AT  CSI  - LOCAL 

VERT  If AL 

COGPC  IMAT  ES 

R0138 

( B ) 

DELVLVC 

DELTA  velocity  at  CDH  - LCCAL 

VERTICAL 

CCCPCINATES 

R0139  CCkNLINK 

ROl’91  (1)  TCSI  7I«E  GF  thE  C9I  NANEUVE1i“  ' " ' 

P01392  (2)  TCOF  TIP'=  OF  THF  CCF  MANEUVER 

RQ1393 (3)  T7PT TI»E  CF  THE  E I paneUVEP 

P)139A  (A)  TIG  TTMF  OF  THE  CSI  MANEUVER 

R01395  (5)  CEI VEETl  CEUTA  VELCCITY  AT  CFI  - REFERENCE  CCCROINATES 

R<U39t (6)  0EUVEET2  DELTA  VELCCITY  AT  CCF  - REFEPENCF  CCCRCIMATES 

R01R97  (7)  CIFFAIT  DELTA  ALTITUDE  AT  CCF 

R0139E  (B)  NN  NU^’BFR  CF  AFSICAL  CFCSSINGS  THRU  NFICH  TFE  ACTIVE 

pnnqc VEHir  LE  CPBIT  CAN  PE  ACVANCEC  TC  CBTAIN  THF  CCF 

POIAO  MANEUVER  PCINT 

ROlAOl  (9)  ELEV  OESIPEC  LCS  ANCLE  AT  TFI 


R01AD2  CnwMUN  ICATIONJ  TO  THRUSTING  PRCGPAMS 

ROl^tiVj (11  TIG time  np  c<;  I MANEUVER 

ROIADA  (?)  RTIC  PCSTTICN  CF  ACTIVE  VEHICLE  AT  CSI  - EEFCRE  POTATION 

POIAOE  INTO  PLANE  OF  PASSIVE  VEHICLE 

R01AC6 (3)  VTIC VELCCITY  CF  ACTIVE  VEHICLE  AT  CSE  - BEFORE  ROTATION 

R01A07  INTO  PLANE  CF  FA'SIVE  VEHICLE 

R71A0B  (q)  OELVSIN  delta  VELOCITY  AT  CSI  - REFERENCE  CCCROINATES 

ROl AC  9 (5)  DELVSAP  MACNTTUPE  CF  CELTA  VELOCITY  AT  CSI 

ROlAl  (6)  xnELVFLG  SET  TO  INDICATE  pxTERNAL  CELTA  V VC  CCMPUTATICN 

RJ150  subroutines  used 


R0151  AVFLAGA 

ROl  92 AVFLAGP 

RC152E  F2(7F1G0M 

R0153  VARAUARI^ 

R019A EANHCALl 

R0155  GCFLASH 

R0196  GCTOPCOH 
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R31E62  ' \/^PrCH 

R.U56A  CCFL  ASI-P 

R0157 eLA^KET 

R0158  PNOOFJOR 

pnsp  SFLECTMU 

R016O ADVANCE 

R0161  INTINT 

R0162  PASSIVE 

RC163 CSl  / A 

R0164  S32/33.1 

R0165  CTSrVLVf 

RO  U6 VN16AE 


0400 

0401 

RPF 

1 

35, 2034 
35, ’TOO 

BANK 

SETLCC 

35 

CSI/CCH 

0402 

35,2024 

BANK 

0413 

REF 

1 

E7, 1470 

EBANK= 

SLEF  XI T 

0404 

PEF 

1 

OCUNT* 

$ J/P2272 

0500 

REF 

1 

35,2034 

0 2354 

1 

P 22 

TC 

A VFL  AG  A 

05C2 

RFF 

1 

35,2085 

0 2J37 

1 

TC 

P32STRT 

0503 

PEF 

1 

35,2036 

0 2361 

1 

P72 

TC 

AVFL  AGP 

0503  F5 

35,2027 

C 0006 

1 

P 22STRT 

EXTEND 

C5C3C6 

PEF 

1 

35 , 2 140 

3 2 42  5 

0 

CCA 

P30ZER0 

059307 

RFF 

3 

LAST 

3 16 

35,2041 

52'621 

1 

CXCh 

CENTANG 

05j3  1 

PEF 

1 

35,2042 

0 2060 

0 

TC 

P22/P72A 

0 5032 

35,2C43 

77734 

1 

AlPX ITA 

SXA,2 

05033 

RFF 

2 

LAST 

142 

35,  ?'’44 

036  1 3 

0 

CSIALRN 

05034 

35  ,2045 

7774T 

1 

ALMX  IT 

LXC  , 1 

05035 

PEF 

0 

LAST 

624 

35 , 2046 

03613 

0 

CSIALPP 

05038 

35,2047 

77532 

1 

SLCAD>> 

EXIT 

05C3S 

REF 

1 

35,2050 

3243T 

1 

ALARM/TE  -1,1 

0 5 74 

RFF 

284 

LA  ST 

60S 

35,2051 

3 0154 

1 

f A 

NFAf 

05041 

REF 

3 

LAST 

289 

35,2052 

C 5 734 

1 

TC 

VAPAl ARW 

0 5042 

REF 

1 

35,2053 

3 5006 

1 

CAF 

V05N09 

0 5042 

REF 

164 

LAST 

6 1 I 

35,2054 

C R616 

1 

TC 

BANKCALL 

05044 

RFF 

8 

LAST 

495 

35,2055 

20477 

1 

CACR 

GCFLASH 

05045 

RFF 

6 

LAST 

4S5 

35,2056 

0 6TTI 

c 

TC 

GCTOPCOH 

05046 

35, 2057 

C 2052 

0 

TC 

-4 

05'‘5 

p!=P 

1 

35 , 2060 

T 2 366 

0 

P32/P72A 

TC 

P2f)FLG0N 

0505  1 

P P F 

2 

LAST 

624 

3 5 , ’ 6 1 

3 2424 

1 

CAF 

P3<‘'ZEFr 

0506 

REF 

3 

LAST 

316 

35, 2062 

55*467 

1 

TS 

NN  + 1 

0506  1 

REF 

4 

L AST  • 

206 

35,2C63 

55*633 

1 

TS 

TCSl 

05062 

REF 

C 

LAST 

6 2 4 

25 , 2064 

c 5 # 4 3 

c 

TS 

TCSI  +1 

05C7 

REF 

1 

35,2065 

3 2 415 

0 

VN06  1 1 

CAF 

V06N11  TCSI 

0 50  8 

REF 

4 

LAST 

61  E 

35,2066 

')  3 62  1 

1 

TC 

VNFODH 

050801 

PEF 

64 

LAST 

618 

35,2067 

60  4 2 

1 

TC 

I NTPPFT 

C508(2 

35,2070 

57545 

1 

CLCAC 

DCOMP 

050802 

RFF 

6 

LAST 

624 

35,207  1 

03634 

0 

TCSI 

05089^ 

35,2072 

7124Q 

1 

BNN 

OLCAO 

G50FC  5 

R'^F 

1 

35,2073 

7212C 

1 

VN0655 
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P 72-P 
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050flC6 

Rf!F 

3 

L/iFT 

50  2 

35, 2'’74 

C l 643 

1 

TETLE8 

0508'‘7 

RET 

22 

LOST 

61E 

35,2075 

34  341 

0 

STCALL 

T CECl 

0508C8 

PE8 

1 

35.2c  76 

464C3 

1 

PRFCSET 

0 5 ) 8 ( <; 

35,2077 

5277' 

1 

VLCAC 

VSR  * 

0508  1 

REF 

1 

35,210c 

03  536 

1 

RACT3 

050811 

35,2101 

5 7 17  6 

r 

C ,2 

C5<‘81? 

PEE 

2 

LAST 

496 

35 ,2  102 

26655 

0 

STOVL 

RVEC 

05">8  1 3 

REF 

2 

LAST 

142 

35,2103 

0 3 544 

1 

VACT3 

050814 

35,2104 

43057 

1 

VSR« 

SET 

05re  15 

35,2105 

57176 

0 

0,2 

0508 ] 6 

PEP 

2 

LAST 

496 

35, 2196 

03466 

0 

RVSW 

05C817 

REF 

3 

LAST 

496 

35,21)7 

16  F44 

1 

STOCL 

VVEC 

050816 

REF 

c 

LAST 

613 

35,2110 

06532 

c 

CFFOSMAX 

050819 

REF 

2 

LAST 

126 

35,2111 

3 6 7 5 6 

c 

STCALL 

RCESIREC 

05C82 

PFF 

1 

35,2112 

25557 

1 ' 

T IMERAO 

0 5't8  2 1 

35,2112 

7 7 6 1 5 

c 

CAE 

050822 

REF 

1 

35,2114 

03574 

1 

TDEC2 

050822 

pep 

7 

LAST 

tit- 

35,2115 

03634 

0 

STORE 

TCS  I 

050824 

35,2116 

77  776 

1 

Extt 

05^825 

REF 

1 

35,2117 

0 2065 

0 

TC 

VNCEll 

050826 

35,2120 

7 7 776 

1, 

VN0655 

EXIT 

0509 

REF 

1 

35, 2121 

3 3 63  3 

1 

CAP 

VC6N55  AF  , E LEV  (RGLFS  1 

C51C 

REF 

165 

LAST 

tm 

35,2122 

0 4616 

1 

TC 

bank  GALL 

0511 

REF 

9 

LAST 

tit- 

35,2123 

2C477 

1 

CACR 

GCFLASH 

0512 

RFF 

7 

L AST 

624 

35,2124 

0 6001 

0 

7C 

GCTOPCOH 

0513 

35,2125 

0 212  7 

1 

TC 

+ 2 

0514 

35,2126 

C 2121 

1 

TC 

-5 

C51  8 

REF 

1 

35,2127 

3 3632 

0 

CAF 

VC6M37  TTPI 

0519 

RFF 

C 

LAST 

624 

35 ,2130 

0 2 621 

1 

Tf 

VNPOnF 

0520 

REF 

65 

LAST 

624 

35,2131 

0 6042 

1 

TC 

I ATPRET 

0521 

35,2132 

mt*5 

1 

CLOAD 

0522 

pep 

8 

LAST 

til 

35,2133 

03634 

c 

TCS! 

0523 

PFF 

10 

LAST 

6 19 

35,2  134 

37442 

1 

STCALL 

TIG 

0524 

RFF 

1 

35,2135 

20000 

0 

SELECTNU 

0525 

35,2136 

77  6 2^ 

1 

P 3 2 / P 7 2 e 

CALL 

C526 

PFP 

1 

35,2137 

71016 

0 

ADVANCE 

0527 

35,2140 

7 72  )1 

1 

SET  FC 

VLCAC 

0528 

35,2141 

OCCO  1 

0 

00 

C529 

RFF 

3 

LAST 

145 

35 ,2142 

33  506 

1 

VFASS  1 

0 530 

35, 2143 

653  15 

c 

FDVL 

PCDL 

0531 

R'=F 

2 

L AST 

142 

35,2144 

03500 

1 

R PASS  1 

0532 

REF 

9 

LAST 

tit 

35,2145 

03634 

0 

TCSI 

0533 

35,2146 

65325 

c 

FCCL 

POOL 

0534 

PFF 

4 

LAST 

307 

35,2147 

03636 

1 

TTPI 

0535 

PFF 

1 

35,2150 

33641 

1 

T^'P  I 

0536 

35, 2151 

45006 

c 

PLSH 

CALL 

C537 

RFF 

1 

35,2152 

73376 

1 

INTINT 

0538 

35,2153 

7 7 624 

1 

CALL 

0539 

PPF 

1 

35,2154 

46435 

1 

PASSI VE 

0540 

35,2155 

77624 

1 

CALL 
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1, 

, P3  2- 

P25, 

P72- 

P 75 

USER'S  PAGE  NO.  6 E7  S3 

0541 

pep. 

1 

35,2156 

70113 

0 

C SI  /A 

0542 

35,2157 

43C14 

0 

F32/F72C 

FfN 

S f.t 

0543 

RPF 

2 

LAST 

618 

35, 2 16f 

01311 

0 

F INALFLG 

C544 

PFF 

1 

35,2161 

72163 

0 

P22/P72D 

0545 

PPF 

6 

L AST 

617 

35, 2 162 

OOA7  1 

1 

UFDATFLG 

0546 

35,2163 

7 7 7 4 5 

1 

P32/P720 

DLCAD 

0 54  7 

RFF 

3 

LAST 

317 

35, 2164 

02253 

1 

T 1T0T2 

154  8 

RFF 

4 

LAST 

626 

35,2165 

02253 

1 

P32/P72E 

STORE 

T 1TCT2 

054  9 

35, 2166 

51125 

1 

OSU 

BFL 

0550 

RFF 

1 

35,2167 

32427 

1 

60MIN 

0551 

REF 

1 

35, 2170 

72  165 

c 

P32/F72E 

C55? 

35,2171 

77745 

1 

CLOAC 

0553 

RFF 

2 

LAST 

31  7 

35,2172 

<32255 

1 

T2TOT3 

1554 

RFF 

3 

LAST 

626 

35,2173 

0 2 2 5 5 

1 

P32/P72F 

STORE 

72TOT3 

0555 

35,2174 

51325 

1 

CSU 

BPL 

1556 

REF 

2 

LAST 

626 

35,2175 

32-^27 

1 

60MA 

0557 

PEP 

1 

35,2176 

72  173 

1 

P3P/P72F 

0558 

35,2137 

77776 

1 

ex  IT 

1559 

REF 

I 

35, 22CG 

3 24  1 7 

1 

CAF 

VC6N75 

C56C 

PpF 

6 

LAST 

62  5 

35,2201 

0 3621 

1 

TC 

VMPnOH 

C561 

RFF 

66 

LAST 

62  5 

35,2202 

0 6.14  2 

1 

TC 

INTPPET 

0562 

35,2203 

45  175 

r 

VLOAD 

CALL 

0563 

REF 

3 

LAST 

199 

35 , 2204 

02267 

0 

DELVEET  1 

0566 

RFF 

1 

35,2205 

7 1 IOC 

C 

S32/33. 1 

0567 

PFF 

4 

LAST 

626 

35,2206 

26267 

0 

STfVL 

DEI VEETl 

0567  1 

PFF 

2 

LAST 

HE 

35,22f  7 

02311 

0 

R.ACT2 

1567? 

REF 

2 

LAST 

118 

35, 22ir 

26303 

0 

STCVL 

PACTl 

0568 

PEF 

3 

LAST 

199 

35,2211 

02275 

0 

DEL VEFT2 

0569 

35,2212 

45  173 

c 

AXT,  1 

CALL 

05691 

35, 2213 

0 1522 

f 

\/N 

0682 

0572 

PEF 

1 

35,2214 

72375 

0 

D ISOVLVC 

0573 

35,2215 

7 7 745 

1 

CLCAC 

05731 

RFF 

5 

LAST 

625 

35,2216 

03636 

1 

TTPI 

05732 

RFF 

1 

35,2217 

3 7640 

1 

STCALL 

TTPIO 

0574 

PFF 

2 

LAST 

6 1 8 

35, 222C 

73  5 15 

1 

VM  645 

0575 

35,2221 

77650 

1 

GOTO 

0576 

PEF 

1 

35,2222 

72136 

c 

F32/ P72  F 
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L 
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PICK 

CCA'TAH  7 

DELTA  HEIGHT  (CCH)  fPCGFAMS  (P33  ANE  P73) 

R in  1 1 

MCE  NT  -1 

LEG  SECTION  - P32-P35,  P72-P7S 

Rl-M  2 
R 10  12 

PCD  ev  WHITE. P DATE  1JUNE67 
PURPOSE 

R 1 “1 1 A 
R KK 

( 1 ) 

TO  CALCULATr.  p(\R^METERS  ASSOCIATED  WITH  THE  CONSTANT  DELTA 
ALTITUDE  MANFUVRR  <CDH). 

R 1016 
R1017 

( 2 ) 

TO  caixllate  these  parawetfps  based  lfca  maneuver  data 

APPROVED  AND  KEYF.O  INTO  THE  DSKY  BY  THE  ASTPCNAUT. 

P 1018 
R n 1 9 
P1C2C 

( 3) 

TO  niSPlAY  TO  THF  ASTRONAUT  AND  THE  GRCUNC  CEPENCENT  VARIABLES 
ASSOCIATED  WITH  THE  COH  wANEUVER  FCR  AFPRCVAL  BY  THR 
ASTRCNALT/GRCUND. 

R ir’i 
R102? 

{ A ) 

TO  STHRE  the  ODH  target  PARAMETERS  FCR  USE  EV  THE  DESIRED 
thrusting  PROGRAM. 

R 1023 

ASSUMF7 1 CNS 

R102A 
PK25 
R 1026 

( 1 ) 

THIS  PROGRAM  IS  BASED  UPCN  PREVIOUS  CCMFLETICN  CF  THE 
CO-ELLIPTIC  SFGUENCE  I M T I AT  I CN  ' ( C S I ) PROGRAM  (P32/P72). 
THERFCRF  - 

R102  7 
P 1028 

(A)  AT  A SELPCTED  TPI  TIME  (NOW  IN  STORAGE)  T|-E  LINE  CF  SIGHT 
BETWEEN  TH'=  ACTIVE  AND  PASSIVE  VEHICLES  WAS  SELECTED  TO  BE 

R 1029 

R1030 

A PRESCRIBED  ANGLE  (E)  (NCW  IN  STCRAGE)  FPCM  THE 

hcrizcntal  plane  cefined  by  the  active  vehicle  positkn. 

R 1031 
P 1002 

(B)  THE  tint  between  CSI  IGNITICN  AND  CCH  ICMTIFN  WAS 
computed  to  be  greater  THAN  10  minutes. 

R1033 
R 103A 

(C)  THE  TIME  PFTWRFN  CCH  IGNITICN  ANC  TPI  IGNITION  WAS 
COMPUTED  TO  BE  GREATER  THAN  10  MINUTES. 

P1036 
R 1036 

(Cl  THE  VARIATION  OF  Tpp  ALTITUDE  DIFFERENCE  BETWEEN  THE 
ORBITS  WAS  MINmiZED. 

R 1037 
Rlo3f 

(E)  CSI  BURN  WAS  DFFINFD  SUCH  THAT  THE  IMPULSIVE  DEITA  V WAS 
IN  THE  HORIZCNT'n  PLANE  DEFINED  EY  ACTIVE  VEHICLE 

R102P3 

POSITICN  CSI  IGNITICN. 

R1039 

(F)  THE  PEPICFNTFR  AITITUDES  OF  THE  ORBITS  FCILCWING  CSI  ANC 

R lOAO 
PlOAl 

CDH  were  CCMPUTED  TC  be  greater  TFAN  35,000  FT  frR  LUNAR 
CRRIT  OR  85  NM  FOR  EARTH  CPPIT. 

RIO^,? 
P in/,  3 


(G)  Tl-G  C9  1 AMC  GDI-  MflNEUVPRS  WFRE  ASSUMED  10  BE  PARALLEL  70 
THF  PLANE  the  passive  VEMCLE  CPEIT.  HOWEVER,  CREW 
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P 3 2-  F 3 5 , 

P72-P75 

USER'S 

PAGE 

NC.  8 

E?  S3 

R 1044 
R 1045 

•NrriFICATTCN  OF  CELT4  V ( LV  ) CCRFCNFNTS  MAY  HAVF  RESLL7ED 
IN  AN  OL'^-CF-FI  ANE  MANEUVER. 

R1046 
R104  ■/ 

( 2 ) 

STATP  VECTCP  UPOATBS  RY  P27  ARE  DISALLOWED  DLRING  ALTCRATIC 
STATE  VPCTCR  UFCATING  INITIATED  BY  P20  (SEE  ASSUMPTIC’N  4). 

R 104P 
R1049 
R 1050 

( 3 ) 

CC'^PUTED  VAPTAPLFS  RAY  8F  STCRED  pCR  LATER  VFRIFICATICN  BY 
THE  GPCUND.  THESE  STORAGE  CAPABILITES  ARE  NCRMALLY  LIMITFD 
ONaY  TC  the  PAPARfters  FCR  CNE  THRUSTING  RANEUVER  AT  A- TIRE 

R1051 

EXCEPT  FOR  rnNCENTRIC  FLIGHT  PLAN  RANEUVER  SECUENCFS. 

R 1052 

(4  ) 

TEE  RENCEZVCUS  RABAP  RAY  FR  NAY  NOT  EE  LSEC  TO  UPDATE  THE  LR 

R 1^53 
R1054 
R 1055 

OR  C FR  STATE  VECTCPS  FCP  THIS  PREGRAR.  IF  RADAR  USE  IS 
DFSTREC  THE  RADAR  WAS  TURNED  ON,  AND  LCCKED  CN  THE  CSR  BY 
PREVIOUS  SELEOTirN  CF  P20.  RADAR  SIGHTING  RAPKS  WILL  BE  RACE 

P.10  56 
R1057 
R 1058 

AUTOMATIGAI LY  APPRCXIRATFLY  CNCE  a RINLTE  when  enabled  by  THE 
TRACK  AND  UPDATE  FLAGS  (SEE  P20).  THE  RENDEZVOUS  TPACKING 

Mark  cdlnter  is  zerced  by  the  seifctkn  of  e20  and  after  each 

R1059 

THRUSTING  RANEUVER. 

R 1C6C 

( 5 ) 

THE  ISS  NEED  NET  RE  CN  TC  CCRPLETE  THIS  PPPGPAM. 

R 1061 

(6) 

THE  OPERATION  OF  THE  PRCGRAR  LTllIZES  THE  FCLLCWING  FLAGS  - 

R1062 
R 106  3 
R 1064 

ACTIVE  VFCICLE  FLAG  - DESIGNATES  THE  VEHICLE  WHICH  IS 
DOING  PENCFZVPLS  THRUSTING  RANEUVERS  TC  TEE  FPCGRAM  WHICH 
CALCULATES  THE  RANEUVER  PARARETEPS.  SET  AT  THE  START  EF 

R1065 

EACH  PENDEZVrUS  F R F -T H RUST  I N G FRCGPAM. 

R 1066 

FINAL  FLAG  - SELECTS  F i n A j_  PPCGFAR  CISFLAYS  AFTER  CREW  HAS 

P1067 

R1C68 

CCRFLETED  THE  FINAl.  MANEUVER  CCRPLTATTON  AND  DISPLAY 
CYG  IF. 

R.1069 
R107C: 
R 1071 

FXTEPNAL  DELTA  V STEERING  FLAG  - DESIGNATES  THE  TYPE  CF 
STFERINf  REGMIRED  for  execution  of  this  RANEUVER  BY  THE 
THRUSTING  PRCGRAR  SELECTED  AFTER  CCRFLETICN  OF  THIS 

R1072 

PRCCRAP, 

R1073 

( 7) 

IT  IS  NCFRALLY  RSCUIRED  that  THE  ISS  EF  ON  FCR  1 HOUR  PRICR  TC 

R1074 

A THRUSTING  ^'A^ELVEF. 

R1075 

(8  ) 

THIF  PROGRAR  IS  SELECTED  BY  THE  ASTRONAUT  BY  OSKY  ENTRY  - 

R 1C76 

P33  IF  THIS  VEHICLE  -IS  ACTIVE  VEHICLE. 

R1077 

P73  IF  THIS  VEHICLE  IS  PASSIVE  VEHICLE. 

Rllin 

INPUT 

P 1 1 1 1 

( 1 ) 

■^TPIO  TIRE  CF  THE  TPI  RANEUVER  - SAVED  FFER  F32/P72 

G4P  : 
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F32-P35,  P72-P7“: 

LSFF'S  PAGE 

NC.  9 

E7  S3 

R1112 

Riin 

(21  GLFV 
( 3 ) TCDH 

CESIPED  LCS  ANGL.E  AT  TFT  - SAVEC  FROM  P32/P72 
TIMF  OF  the  CCH  maneuver 

Rinn 

OUTPUT 

R ini 

(1)  TRKPKCNT 

NUMBFR  OF  MARKS 

R1132 
R1133 
R 113^ 

(2)  TTOGO 
(’)  +MGA 
(4)  OIFFALT 

TIMF  TO  GO 

MICCLE  GI^BAL  ANGLE 

delta  altttlce  at  CD- 

R1135 
P 1136 
R1137 

(5)  T2TOT3 

(6)  NCRTFT 

(7)  DELVLVC 

DELTA  TIME  FROw  Coh  TC  CCMfUTEC  TFI 

DELTA  TIFF  FPCM  ^^M^AL  TFI  TO  COMFLTFC  TP  1 

delta  VFtrCITY  AT  CCF  - LCCAL  VERTICAI  COORDINATES 

R1 139 

rcVvNL  INK 

R ] 1 3 c 1 
P 11392 
R11393 

(1)  TCOH 
(21  TTPI 
(3)  tig 

TTMF  CF  THE  CCH  MANEUVER 
TIME  OF  the  TPI  maneuver 
T IMF  CF  THE  CCH  M-ANEUVER 

R1139« 
R1  1395 
P.1139< 

( 4 ) OFI  VFET2 

(5)  Crr-FALT 
(61  ELEV 

DELTA  VFLCCITY  AT  CCH  - PEFEFFNCF  CrCPCTNATFS 
DELTA  ALTITUDE  AT  CCH 
CESIFFC  LCS  ANGLE  AT  TPI 

R 11A02 

rOMMUNIGAT lOM  TO  THRUSTING  FPCGPANS 

R11^03 

( 1 ) TIG 

TI^E  CF  THE  CCH  MANEUVER 

R 1 1404 
R1  140  5 
R11406 

(2)  RTIG 

(3 ) VT  TG 

FCSITIfn,  CF  ACTIVE  VEHICLE  AT  CCH  - BFFGPt  RCTATION 
INTO  FLANE  OF  PASSIVE  VEHICLE 

VEICCITY  op  ACTIVE  VEHICLE  AT  CDH  - BEFORE  RCTATION 

P.  114C7 
R11408 
R114C<; 

(4)  HEUVSIM 

(5)  DFLVSAB 

TNTC  FLANE  CF  PASSIVE  VEHICLE 

DELTA  VELOCITY  AT  CCH  - REFERENCE  CCCRCINATES 
»'AGNITUCE  CF  CELTA  VELCCITY  AT  CCH 

R 1141 

( 6 ) XOEl  \FI  G 
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RACIANS 

R00A6 

R00A7 

ROOAR 

5CALP  _A 

20EC 

_2.5E319E6a1  F-A 

RACIANS 

R00A9  ACAE 
ROO'^0  DEERIS 
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R0051 

P0052 

R0053 

GENIRALS-A  ,0  ,L 
r-TFER-TI-nSE  USED  EY 

THE  ABOVE 

L I STED 

SLBROLTINES 

ROGEA 

SEE 

LFNFRFC  ,LAT-l C^G 

0G55 

p FF 

8 

LAST 

494 

30,2000 

SBAAK= 

LCV,SLFFR 

FOR  LCW  2CACP'S. 

0C?6 

33,2230 

BA  NK 

33 

0057 

REF 

8 

LAST 

608 

24,2CCr. 

SFT  L CC 

P2CS 

0358 

24. 3535 

BANK 

CC59 

RFF 

4 

LAST 

240 

E7, 1 762 

EBANK= 

P21TIME 

0060 

REF 

1 

CCUKT4 

J T/P21 

0061 

PEE 

8C 

LAST 

615 

24,3535 

3 4 7 53 

1 

PRCG2  1 

CAF 

ONE 

0C62 

REF 

3 

LAST 

495 

24,3506 

55 ' 144 

0 

TS 

0PTIQN2 

ASSUMED  VEHICLE  IS  LM  , P2  = OCOO 1 

0C63 

REF 

36 

LAST 

653 

24,3507 

3 4 7 52 

C 

CAF 

8 IT2 

CFTICN  2 

006A 

REF 

167 

LAST 

6 30 

24,3510 

C 4616 

1 

TC 

BAAKCALL 

0065 

REF 

2 

LAST 

4Q5 

24,3511 

20634 

1 

CACR 

GCPERF4 

0066 

REF 

9 

Last 

630 

24,3512 

C 6001 

0 

TC 

GCTCFCCH 

T ERM I RAT  E 

0067 

24,3513 

0 3 51  5 

0 

TC 

+ 2 

PRCCEEC  VALLE  CF  ASSUMEC  VEHICLE  CK 

0068 

24,3514 

0 3507 

0 

TC 

- 5 

R2  LGACEC  THROUGH  DSKY 

00682 

REF 

126 

LAST 

653 

24,3515 

3 4 7 5 5 

1 . 

CAF 

ZERO 

IMTIAL  TIRE  = FRESFM  TI^F 

0C68^ 

REF 

23 

LAST 

575 

24,3516 

55 '044 

1 

TS 

DSPTFMl 

006E6 

RFF 

2S 

LAST 

655 

24,3517 

55 ' 045 

0 

TS 

CSPTFM  +1 

0069 

REF 

1 

24,3520 

3 3674 

1 

P21PRGG1 

CAF 

V6N34 

LCAO  CESIREC  TIPF  OF  LAT-LONG. 

0C7C 

REF 

168 

LAST 

655 

24,3521 

0 4616 

1 

TC 

BAMKCALL 

0071 

REF 

1 1 

LAST 

63C 

24,3522 

204  77 

1 

CACR 

GCFLASH 

0072 

REF 

10 

LAST 

655 

24, 3523 

0 6001 

0 

TC 

GCTQPPOh 

TERM 

0073 

24 ,3  524 

0 3526 

0 

TC 

+ 2 

PRCCEEC  VALUES  OK 

007A 

24, 3525 

C 3 520 

c 

TC 

-5 

TIME  LCACEC  THRCUGH  DSKY 

0G75 

REF 

71 

LAST 

633 

24,3526 

0 6042 

1 

TC 

INTPRFT 

0C76 

24,3527 

53  145 

1 

CLCAC 

B2E 

0077 

RFF 

25 

LAST 

655 

24, 3530 

r 1045 

1 

DSFTEPl 

CC775 

RFF 

1 

24,3531 

51666 

c 

P 2 IPRTR 

0078 

REF 

2 4 

LAST 

645 

24,3532 

34041 

c: 

P21PRCG2 

STCALL 

TCECl 

INTEG  TC  TIME  SPECIFIEC  IN  TCECl 

007q 

RFF 

18 

1 AST 

612 

24,3533 

274  12 

0 

I MSTALL 

0C80 

24,3534 

43014 

0 

ecA 

CLEAR 

0081 

RTF 

1 

24, 3535 

00^04 

0 

P21FLAG 

0082 

RFF 

1 

24,3536 

5 1554 

1 

P21CGNT 

ON RECYCLE  LSING  EASE  VECTCR 

0C83 

REF 

17 

LAST 

587 

24, 35  37 

01674 

c 

VINTFLAG 

CFF— 1ST  PASS  CALL  BASE  VECTOR 

0084 

24,3540 

70535 

c 

SL  CAD 

SRI 

CCE5 

RFF 

4 

LAST 

655 

24,3541 

01  145 

0 

GPTICN2 

0086 

24,3542 

43030 

c 

EHI  Z 

SET 

0C87 

24, 3543 

51545 

1 

+ 2 

ZERO — this  VEHICLEILMI 

0C88 

REF 

18 

LAST 

655 

24,3544 

014  74 

1 

V INTFLAG 

ONE — CTHEP  VEHICLE(CM) 

0089 

24,3545 

43C14 

c 

CLEAR 

CLEAR 

CC9C 

REF 

12 

1 AST 

587 

24,3546 

01676 

1 

0 IHOFLAG 

0091 

REF 

6 

LAST 

58  7 

24,3547 

01673 

1 

I NTYPFLG 

FREC IS  ION 

0002 

24,3550 

77624 

1 

CALL 

CC93 

RFF 

9 

LAST 

588 

24,355  1 

27135 

0 

INTEGRV 

CALCULATE 

0004, 

24,3552 

77650 

1 

GCTC 

-ANC 

4 
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L 

GROUNC 

TRACKING  OFTEPRUATICN 

PROGRAM  - 

P21 

LSER'S  PAGE  AO.  3 E7  S3 

CC95 

PFF 

1 

24, 3553 

51575 

1 

P21VSAVE 

-SAVE  BASE  VECTOR 

0096 

24, 3594 

77775 

1 

P21CCAT 

VLCAC 

0097 

REF 

2 

LAST 

149 

24,3555 

03676 

0 

P2  IBASER 

PECVCLE--I ATEG  FRCR  BASE  VFCTCP 

0C9fi 

REF 

c 

1 AST 

497 

24,3556 

25535 

0 

STCVL 

PCV 

— POS 

0099 

Df  F 

2 

LAST 

149 

24,3557 

03704 

1 

F21 BASEV 

OIC'' 

PEF 

A 

LAST 

322 

24,3560 

15543 

1 

STCCL 

VCV 

— VEL 

Old 

ref 

c 

LAST 

6 5S 

24,356  1 

03763 

C 

P21TI.ME 

01H2 

PF  F 

5 

LAST 

497 

24,3562 

0 15  17 

r 

STCRF 

TET 

--TIRE 

01<"3 

24,3563 

43014 

0 

CLEAR 

CLEAR 

01  >9 

REF 

13 

LAST 

^ c c 

24, 356A 

016  7 6 

1 

D 1 RO  F L A C- 

0109 

PEF 

1 

24, 3565 

00263 

0 

MCCNFIAG 

0106 

24,3566 

53135 

0 

SLC  A C 

PZE 

01')7 

PPF 

1 

24, ’567 

01163 

1 

F21CFIG 

C108 

24,3570 

51573 

1 

+ 3 

ZEPC=EAPTH 

0109 

24,3571 

776  14 

1 

SET 

2=RCCA 

Clin 

PEF 

2 

1 AST 

656 

24, 3572 

CCC63 

1 

Rf CAF  LAG 

0111 

24,3573 

77624 

1 

+ 3 

CALL 

01  1? 

REF 

1 

24,3574 

27  110 

1 

I ategfvs 

0113 

24,3575 

77745 

1 

P21VSAVE 

Cl  CAD 

SAVE  CLFREAT  PASEVECTCF 

01  lA 

REF 

7 

LAST 

592 

24,3576 

•10015 

0 

TAT 

0119 

REF 

6 

L A ST 

696 

24,3577 

2 7 7 6 3 

c 

STCVL 

P21TIRE 

--TIRE 

0116 

RFF 

A 

LAST 

496. 

24,3600 

00017 

1 

RATT  1 

0117 

REF 

■3 

LAST 

6-=6 

24,3601 

276  76 

0 

STCVL 

P21 BASER 

--PCS  E-29  CR  B-27 

oiia 

REF 

7 

LAST 

496 

24,3602 

00025 

0 

VATTl 

0119 

REF 

3 

LAST 

696 

24,3603 

03  704 

1 

STORE 

P21BASEV 

— VEL  B-C7  OR  B-C5 

0119  1 

24,3604 

53  646 

0 

APVAl 

S L* 

01192 

24,3605 

57576 

1 

0,2 

0 1193 

REF 

0 

1 AST 

31  F 

24,3606 

27712 

0 

STCVL 

P2  IVEL 

VEL/  FOR  N91  CISP 

0119A 

RFF 

1 1 

LAST 

620 

24,3607 

0000  1 

0 

RATT 

C1193 

24,3610 

50256 

c 

LN  IT 

DOT 

01196 

REF 

9 

LAST 

64C 

24,3611 

. 1000  7 

0 

VATT 

U(  R ) .V 

01197 

24, 3612 

6747  1 

1 

DDV 

A SI  N 

L(P).U(V) 

Cl  19fc 

RFF 

A 

LAST 

696 

24,3613 

0 3 712 

0 

P2  IVEL 

01199 

RFF 

3 

LAST 

3 1 8 

24,3614 

03714 

c 

STCRE 

P21GAR 

SIA-1  U(R).U(V)  , -9(1  TC  F9(. 

0120 

24,3615 

67334 

1 

SKA  , 2 

SLCAD 

0121 

PEF 

2 

LAST 

696 

24,3616 

01162 

0 

P21 CP  IG 

0=EARTF 

0122 

PEF 

c 

LAST 

699 

24,3617 

01145 

c 

CPTICA2 

0123 

24,3620 

46  142 

1 

SRI 

BFI  Z 

012A 

24,3621 

51624 

0 

+ 3 

0129 

24,3622 

7765C 

I 

GOTO 

0126 

24,3623 

51627 

0 

+ 4 

0127 

24,3624 

776  14 

1 

+ 3 

ecA 

0128 

REF 

13 

LAST 

612 

24,3625 

04  307 

1 

SLRFFLAG 

0129 

REF 

1 

24 ,3626 

51631 

1 

°2irsp 

0130 

24,3627 

776  14 

1 

+ A 

SET 

0131 

PEF 

2 

LAST 

659 

24 ,3630 

00064 

0 

P21FLAG 

0132 

24,3631 

67214 

1 

P21 CSF 

CLEAR 

SLCAC 

GEAFPATF  CISPLAY  CATA 

0133 

REF 

1 

24,3632 

C 1663 

c 

LLAAF  LAG 

013A 

REF 

8 

1 AST 

651 

24,3633 

00050 

1 

X2 

0 135 

24.3634 

43C54 

1 

ezE 

SET 
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L 

GRCUNO  ■ 

TRACKING 

■ CETERMNATICN 

PROGRAM  - 

P21 

LSEP'S  PAGE  AC.  4 E7  S3 

013fi 

24 , 3635 

51637 

1 

+ 2 

C=EAPTF 

0137  . 

PEF 

2 

LAST 

656 

24, 3636 

01463 

1 

LLAAFLAG 

0138 

24.3637 

77775 

1 

VLCAC 

0139 

PEF 

12 

LAST 

656 

24 ,364C 

OCOOl 

0 

R ATT 

01  Ad 

PFF 

2 

LAST 

1 1 5 

24,  364  1 

16032 

1 

STCDL 

ALPHAV 

ClAl 

RFF 

8 

LAST 

656 

24.3642 

00015 

0 

TAT 

01A2 

24,3643 

45G14 

C 

CLFAF 

CALL 

01  A3 

RFF 

1 

24, 3644 

00662 

0 

FRADFLAG 

ClAA 

REF 

1 

24,3645 

26351 

1 

LAT-LCNG 

01AA2 

24,3646 

77605 

1 

CMP 

NPAC  = ALT, METERS  B-29 

Q1AA3 

ref 

1 

24,3647 

1 1676 

0 

K.Ol 

OlAA^ 

RFP 

2 

LAST 

31F 

24,3650 

0371  6 

1 

STORE 

P21ALT 

ALT/ICO  FOR  N91  D I SP 

01A9 

24,3651 

77776 

1 

EXIT 

01  A6 

RFF 

1 

24,3652 

3 3673 

0 

CAF 

VC6N43 

display  LAT.LCAG.ALT 

01  A7 

RFF 

169 

LAST 

655 

24,3653 

0 4616 

1 

TC 

EANKCALL 

LAT.LCNG  = 1/2  RFVS  BO 

0148 

cep 

12 

L AST 

655 

24, 3654 

20  4 7 7, 

1 

CADR 

GCFLA  SH 

ALT  = KP  E14 

C149 

RFF 

11 

LAST 

655 

24,3655 

0 600  1 

0 

TC 

GCTOPnOH 

TERM 

0150 

RFF 

12 

LAST 

6 5? 

24, 3656 

C 600  1 

0 

TC 

GCTCFCCH 

0151 

PFF 

72 

LAST 

655 

24,3657 

0 604  2 

1 

TC 

I NTPRFT 

V32E  RECYCLE 

0152 

24,3660 

43345 

T 

CLCAC 

DAC 

0153 

RFF 

7 

LAST 

6 56 

24,3661 

03763 

0 

P21TI NE 

0154 

PFF 

1 

24,3662 

1 1672 

1 

600SEC 

6CC  SECCAOS  CF  1C  MIN 

0155 

RFF 

2 6 

LAST 

655 

24  ,3663 

0104-5 

1 

STCRE 

DSPTEMl 

0156 

24,3664 

77634 

c 

R TB 

0157 

RFF 

I 

24,3665 

51520 

1 

P21PRCG1 

01572 

24,3666 

52C34 

1 

P21 PPTM 

PTE 

GfTC 

01574 

RFF 

13 

LAST 

RQ  2 

24,3667 

21574 

1 

ICADTIME 

01576 

RFF 

1 

24,3670 

51532 

1 

P21PPCG2 

0158 

24,3671 

00003 

1 

6C0SEC 

2DEC 

6CG00 

10  MA 

0158 

24,3672 

25140 

0 

0159 

24,3673 

01453 

1 

VC6N43 

VK 

00643 

0160 

24, 3674 

01442 

1 

V6N34 

LN 

0C634 

C1602 

24,3675 

00  24  3 

1 

K .01 

2 TEC 

.01 

01602 

24,3676 

321C3 

1 
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POOlO  TRANSFER  PI-AST  INniATICN  CPI)  FPCGPA^S  (F3^  AAC  F7A  ) ~ ~ ~ 

ROOll  PCC  NO  -1  LCC  SECTION  - P3Z-P35,  P7S-P7S 

P0C12  WCD  BV  PHITE.P  DATE  1JU^'^67 

ROO  13  PURPOSE 


R0O14 

R0015 

( 1 ) 

TO  CALCULATE  T(-f  PECUIRTC  CELTA  V AND  OTHER  INITIAL  CnNOniCNS 
REQUIRED  PV  THE  ACTIVE  VEHICLE  FCR  EXECUTICN  CF  the  TRANSFER 

ROO  16 

PHASE  INITIATION  (TFI)  PANELVER,  GIVEN  - 

ROCl  7 

(A)  TIPF  CF  IGM'^ICN  TIG  (TFI)  OR  THE  ELEVATION  ANGIE  (E)  CF 

P0O18 

THF  ACTIVE/FASSIVE  VEHICLE  ICS  AT  TIG  (TPI). 

RCriQ 

(E)  central  Af CLE  CF  TRANSFER  (CFNTANG)  FRCN  TIG  (TFI)  TC 

R00?0 

INTFRCEFT  TImf  (TIG  C^PF)). 

ROO  21 

(2) 

tO.CALCLLATE  tig  (TFI)  GIVEN  E CR  E GIVEN  TIG  (TFI). 

R0C22 

R0C23 

(3  ) 

TC  CAICLIATE  thFSF  FARANETERS  EASEL  UPON  MANEUVER  DATA 
APPROVED  AND  KEY'^D  INTO  THE  CSKY  BY  THE  ASTFCNAUT. 

RT02A 

R0025 

(4  ) 

TO  CISPIAY  TO  THE  ASTRONAUT  AND  THE  GROLNC  CERTAIN  CEFENCENT 
variables  ARSOCIATEC  WITH  THF  MANEUVER  FOR  AFPRCVAL  BY  THE' 

R0O26 

ASTRONALT/GPOLN'D. 

R0027 

(B  ) 

TC  STCRF  THE  TPI  t/irgfx  PARAMETERS  FOR  LSE  EY  THE  DESIRED 

R002B 

thrusting  frcc.ram. 

R0029 

ASSUPFT  IONS 

R0C3O 

P'Vi31 

t 1 ) 

LM  ONLY  - THIS  PROGRAM  IS  EASEC  UFCN  PREVIOUS  COMPLETION  CF 
THE  CONSTANT  (lELTA  ALTITUDE  (CDH)  PRCGPAM  (F33/P73). 

R0O3? 

THEREFCFC  - 

R0033 

(A)  AT  A SELECTFC  TFI  TIME  (NEW  IN'  STORAGE)  THE  LINE  CF  SIGHT 

R003^ 

RC035 

R0036 

8FTWEFN  the  ACTIVE  AND  PASSIVE  VEHICLES  WAS  SELECTFC  TC  EE 
A FRESCRIPEC  ANCLE  (E)  (NCW  IN  STCPAGEI  FROM  THE 
HORIZCNTAI  PLANE  DEFINED  BY  THE  ACTIVE  VEHICLE  POSTTICN. 

R0037 

R0038 

(B)  THF  TIME  BETWEEN  CCH  IGNITION  AND  TPI  IGNITION  WAS 
COMPUTED  TC  BF  GREATEE  THAN  10  MINUTES. 

R0039 

R004O 

(C ) THF  VARIATION  OF  THE  ALTITUDE  DIFFERENCE  EETWEEN  THE 
ORBITS  WAS  MINIMIZED.' 

ROO^l  (0)  THP  PEP^CENTER  ALTITLDES  CF  CREITS  FCLLCt^ING  CSI  ANC 


R0n/+2 


CDH  WERE  rOMPUTEC  TC  8E  GREATER  T|-an  35,CCn  FT  FOR  LLNAB 


GAP: 
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L 

. P3A-P35,  F74-P75 

USER'S  PAGE 

NO.  2 

FC  S3 

ROOA3 

CRBIT  CR  85  NM  FCR  EARTH  CREIT. 

R004A 

(F)  THE  CSI  AND  CCH  MANEUVERS  WERE  ASSUMED  TC  BE  PARALLEL  TC 

R0045 

R0046 

R0047 

THF  PLANE  CF  t(-e  PASSIVE  VEHICLE  CRBIT.  HOWEVER,  CREW 
MCCIFICATIGN  OF  DELTA  V ( LV  ) CCNFCNENTS  MAY  HAVE  RESULTED 
IN  AN  CUT-CF-PLAN=  MANEUVER. 

R004P 
ROD  49 

(21  STATE  VF'CTCR  UPDATED  RY  F27  ARE  C I S A L L C W E C DU  R I N G AUTCMATIC 
STATE  VECTOR  UPDATING  INITIATED  BY  P2C  (SEE  ASSUMPTION  (41). 

R0C50 
P )951 

(3)  THIS  PPCGRAM  f'UST  PE  DCNE  OVER  A TRACKING  STATION  FOR  REAL 

TIME  GROUND  PARTICIPATION  IN  DATA  INPUT  AND  OUTPUT.  CCMFUTEC 

RT05? 
R00  5 3 
RT054 

VARTA6LFS  "AY  B F STORED  FDR  LATER  VERIFICATION  BY  THE  GROUND. 
THESE  RTCRAGE  CAPABILITIES  ARE  LIMITED  CNLY  TC  thE  PARAMETERS 
FOR  ONE  THRLS'^IMG  MANEUVER  AT  A TI"E  EXCEPT  FCR  CCNCFNTRIC 

PCC55  FLIGI-T  PL/'^  PANFUVFR  SECUFNfES'. 


R0056 (^)  THE  RENDEZyruS  RADflP  NAY  CR  FfV  NCT  8F  ISEC  TC  LPC/>TE  TFE  I.  P . 

R0n';7  HR  CSR  ST^TE  VECTCRS  FOR  7|-is  PROGRiM.  IF  RADAR  USE  IS 

PC0S8  DESIRFD  THE  RADAR  WAS  TURAEC  CN  AND  LCCKFD  CF  THE  C SM  BY 

P0059 PREVIOUS  SELFCTION  CP  P20.  RADAR  SIGHTING  HARKS  WILL  BF  NAPE 

R0060  AUTCRAT TC ALLY  APPROXIMATELY  CNCE  A MINUTE  WHEN  ENABLED  BY  THE 

R0061  TRACK  AND  LFDATE  FLAGS  (SEE  F20  ) . THP  REACFZVQLS  TRACKING 

R0062 MARK  COLMTER  IS  ZERCED  BY  THE  SELECTION  OF  P2P  AND  AFTER  EACH 

P0CA3  THRL'STIHC  RAMUVFP. 

R006A (51  THE  ISS  AFED  L'CT  RE  CN  TC  CCRPLETE  THIS  PRCCPAM.  


R0065  (6)  THE  OPEFATICN  CF  THE  PROGRAM  UTILIZES  THE  FCLLOWING  FLAGS  - 


R0066  ACTIVE  VEL  ICLF  FLAG  - CESIGFATFS  THE  VEHICLE  WH  ICH  IS 

R0067  COINC  RENDFZVCLS  THRUSTING  HANFLVFPS  TC  THE  PRCGRAM  WHICH 

R0CA8 CAICLLAYES  THE  MANEUVER  FAPAMETEPS.  SET  AT  THE  START  OF 

P0C6S  EACH  RENDEZVOUS  FRE-THRUST I NG  FPCGRAM. 

R0070 FINAL  FLAG  - SELECTS  FINAL  PROGRAM  CISFLAYS  AFTER  CREW  HAS 

R0071  SELFCTEC  THE  FINAL  ''/s^EuvER  COMFUTATICN  CYCLE. 

ROOT2 EXTERNAL  DELTA  V FLAG  - DESIGNATES  THE  TYPE  CF  STEERING 

R0073  RFOUIREC  ECR  EXECUTION  OP  THIS  MANEUVER  BY  THE  THRUSTING 

R007A  PROGRAM  SF LECTFD  AFTER  CCNPLETICN  CF  THIS  PROGRAM. 

R0075  (7)  ONCE  THF  PARAMETWPS  REQUIRED  FOP  CCMPLTICN  CF  THE  MANEUVER 

RCC76  have  been  completely  SFECIFIEC,  THE  VALUE  OF  THE  ACTIVE 

R0O77 VEHTCLF  central  ANGLE. CF  TRANSFER  IS  CCMFL^ED  AND  STORED. 

R0078  THIS  NUMBER  WILL  BF  AVAILABLE  FOR  DISPLAY  TC  The  ASTRCNALT 

ROOTS  THROUGH  THF  USE  CF  V06N52. 


R0080 

R0C81 


THF  ASTRONAUT  WILL  CALL  THIS  DISPLAY  TC  VERIFY  THAT  THE 
CENTRAL  ANGLE  CF  TRANSFER  CF  THE  ACTIVE  VEHICLE  IS  NOT  WiITHIN 
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170  TO  190  OEGPFrs.  jp  THE  ANGLE  IS  UTHIN  THIS  ZONE  TFE 
ASTRCNALT  SHGLM  C PFASSESS  TFF  INPUT  TARGETING  PARAMETERS  PASEO 
UPON  0'=I.TA  V AND  EXPECTED  MANEUVER  TIME. 

POOP'S 

(8  ) 

TViS  program  is  SELECTEC  PY  TFE  ASTRONALT  BY  DSKY  ENTRY  - 

R0086 

P3A 

IF  THIS  VEHIOLE  IS  ACTIVE  VEHICLE. 

R0087 

P7A 

IF  TH'S  VFHICLE  IS  PASSIVE  VEHICLE. 

RCCP8 

INFLI 

R008S 

R0("50 

R0091 

( 1 ) 
(2  ) 
(3) 

TTP  I 
EL  EV 
CENTANG 

TIME  CF  THE  TPI  maneuver 
DESIRED  LCS  ANGLE  AT  TPI 

CPBITAL  CENTRAL  ANGLE  CF  THE  PASSIVE  VEHICLE  DURING 

P0092 

TRANSFER  FPCM  TPI  TC  TIME  CF  INTERCEPT 

R0093 

OUTPUT 

R0094 

P0095 

( 1 ) 
(2  ) 

TPKMKCNT 

TTOGO 

ncmrepcpmarks 

TlMf-  TO  GO 

P0096 

ROC97 

R0098 

(3) 
( 9 ) 

+ MGA 
TTPI 
CP 

MICOLE  GIMEAL  ANGLE 
CCMPUTFO  TIME  OF  TPI  MANEUVER 

RCC99 

ROlOn 

ROl'l 

( 5) 
(6) 

FLFV 
POSTTPI 
DFLVTP  I 

OCMPUTEO  LCS  ANGLE  AT  TPI 

PERIGEE  ALTITUCE  AFTER  THE  T-P 1 MANELVEP 

MAGNITUDE  CF  DELTA  v AT  TPI 

R0102 
ROl  13 
ROl'iA 

( 7) 
( 8 ) 
(9) 

DEL VTPF 

DVLDS 

DELVLVC 

MAGNITUDE  CF  DELTA  V AT  INTERCFFT 

DELTA  VELOCITY  AT  TPI  - LINE  C F SIGHT 

DELTA  VELOfITY  AT  TPi  - LOCAL  VERTICAL  COORDINATES 

pn  105 

CQV.NJL  INK 
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R0115 
ROl  16 

( 1 ) 
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TTP  I 

TIG 

ELEV 

TIME  OF  THF  TPI  MANELVFR 
TIME  CF  THE  TPI  MANEUVER 
DESIRED  LOS  ANGLF  AT  TPI 

ROl  17 
ROl  18 
RO  119 

(A  ) 
( 5 ) 

CFNTANG 
CEL  VEET3 

orbital  CENTRAL  ANGLE  OF  THE  PASSIVE  VEHICLE  DURING 

transfer  FRCM  TPI  TC  TIME  CF  INTERCEPT 

DELTA  velocity  AI  TFl  - REFERENCE  CCFRCINATFS 

R0120 

R0121 

(6)  TPASSA  TINE  OF  INTEROEPT 

COMMUNICATION  TO  THRLSTING  PRCGRANS 

R0122 
R0123 
ROl  2-^ 

( 1 ) 
(2  ) 
( 2 ) 

TIG 

RTAPG 

TPASSA 

TIME  OF  THE  TPI  MANEUVER 
OFFSET  TARGET  PCSITIGN 
time  of  INTERCEPT 

R0125 

(A) 

XCFLVFLG 

reset  to  INCICATF  LAMBERT  (AIMIPOINT)  VG  CCMPLTATION 

R0126 

SUBROLTINES  LSED 

R0127 

iVFl AGA 
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TC 
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TC 
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35,2461 

3 3632 

0 
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TTPI 

0152 

REF 

10 
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1 

7C 

\/NF-OCH 
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PENCE2VCUS  PIC-CrUPSE  MANEUVER  PRCGRAPS  (P35  ANC  07E) 

R0256 

MOG  NO  -1 

LCG  SECTICN  - P32-P35,  P72--F7E 

P0257 

«GC  EY  hPITE.P  DATE  1JUNE67 

R C258 

PLPPCSe 

R025P 

R0260 

( 1) 

TO  talCUATc  thp  REGUIRFG  DELTA  V AND  CTHEP  INITIAL  CCNCITICNS 
PFQUIPEC  BY  THE  ACTIVE  VEHICLE  FOR  EXECUTICN  CF  THE  NEXT 

R0261 

P02ft2 

MIDCCIR'E  CCPPECTICN  CF  THE  TRANSFER  PHASE  CF  AN  ACTIVE 
VEHICLE  RENDEZVOUS. 

P0263 
R 1264 
R0265 

(2  ) 

TC  DISPLAY  TO  the  ASypcNAIJT  ANC  THE  GFOLNC  CERTAIN  DEPENDENT 
VARIABLES  ASSf^CIATED  HITH  THE  MANELVFP  FCF  APPROVAL  BY  THE 

astponaut/ground. 

R0266 

P0267 

(3) 

TC  STCPE  THE  TFN  TARGET  PARAHETEP?  FCP  LSE  EY  THE  DESIRED 

thrusting  program. 

R026R 

ftSSUPP'^JCNS 

R0269 

{ 1) 

THE  ISS  NEED  NCT  BE  CN  TC  CCNFLETE  THIS  FRCGCAM. 

R1271 

( 2 ) 

STATE  VECTOR  UPDATES  BY  P27  ARE  OISALLCHED  DOPING  ALTCNATIC 

R0271 

STATE  VECTCR  UPDATING  INITIATED  EY  F20  (SEE  ASSLMPIION  (3)). 

R027? 

( 3) 

THE  RFNDEZVCUS  RADAR  IS  CN  AND  IS  LCCKEC  CN  THE  CSM.  THIS  «AS 

P 1273 
R0274 
R0275 

DCNF  DURING  PPEVTCUS  SELECTIGN  OF  P2C.  RADAR  SIGHTING  NAFKS 
HILL  BE  MACE  A L T C N A T I C ALL Y A PPR CX I N AT E L Y CNCE  A MINUTE  WHEN 
ENABLED  BY  THE  TRACK  ANC  UPDATE  FLAGS  (SEE  F2C).  THE 

R0276 

P1277 

RFNCEZVCLS  TRACKING  MARK  COUNTER  IS  ZEROED  EY  THE  SELECTION  OF 
P20  AND  AFTER  EACH  TH»LSTING  MANEUVER. 

R1278 

(4  ) 

THE  OPERATICN  OF  THE  PROGRAMI  UTILIZES  THE  FCLLOHING  FLAGS  - 

RQ279 

ACTIVE  VEHICLE  FLAG  - DESIGNATES  THE  VEHICLE  WHICH  IS 

P 128(1 
R0281 
R028.? 

DOING  PENDFZVOLS  THRUSTING  MANELVEPS  TC  THE  PROGRAM  WHICH 
CALCULATES  THE  MANELVER  PARAMETFRS.  SET  AT  THE  START  Qp 
EACH  RFNDFZVCLS  FR E -t h RUST  I NG  FPCGPAM. 

R0283 

P0284 

FINAL  FLAG  - SELECTS  FINAL  PROGRAM  DISPLAYS  AFTER  CREH  HAS 
SE.i  ECTEC  THE  FIMAL  MANEUVER  COMPUTATION  CYCLE. 

R0285 
R02  86 

EXTERNAL  DELTA  V FLAG  - DESIGNATES  THE  TYPE  OF  STEERING 
RFCUIREO  FCR  EXECUTION  OF  THIS  MANELVER  BY  THE  THRLSTING 

R0287 

PROGRAM  S'^LECTFC  AFTER  CCMPLETICN  OF  THIS  PROGRAM. 

P 1288 

( 5 ) 

THE  TIME  OF  INTERCEPT  (KINT))  WAS  DEFINED  EY  PPEVICUS 

Rvl28g 

Rf1290 

CCMPLETICN  CE  TH'"  TRANSFER  PHASE  INITIATION  (TPI)  PROGRAM 
(P34/P74)  AND  IS  PRESENTLY  AVAILABLE  IN  STCFAGE. 
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R0291 

R0292 

Rfi293 

(5  ) 

CNCE  TEE  parameters  uECUIREC  EGF  CCMPUTION  OF  TEE  MANEUVER 
HAVE  BEEN  rCPPLRTFLY  SPECIFIEC,  THE  VALUE  CF  THE  ACTIVE 
VEHICLE  CENTRAL  ANGLE  CF  TRANSFER  IS  COMPETED  AND  STORPo. 

R029A 

P0295 

THIS  NUMPEP  WILL  PE  AVMLAELE  FCP  CISFLAY  TO  THE  ASTRONAUT 
THROUGH  THE  USE  OF  VC6NE2. 

R0296 
R02  9 7 
R1298 

THR  astronaut  will  CALL  THIS  CT'PLAY  TC  VERIFY  THAT  THE 
central  ANGLE  CF  TRANSFER  CF  THF  ACTIVE  VEHICLE  IS  MOT  WITHIN 
170  TO  ISO  nSGREFS.  IF  THE  ANGLE  IS  WITHIN  THIS  ZONE  THE 

R0299 

P039n 

ASTPCNAUT  SHGULC  REASSESS  THE  INPUT  TARCETINC  PARAMETERS  PASEC 
UPON  DELTA  V AND  EXPECTED  MANEUVER  TIME. 

P0301 

(7  1 

this  frcgpam  ir  sflectec  by  the  astronaut  py  csky  entry  - 

P 030? 

P35 

IF  THIS  VEHICLF  IS  ACTIVE  VEHICLE. 

P03  13 

P75 

IE  THIS  VEHICLE  IS  PASSIVE  VEHICLE. 

ROBOA 

INPUT  . 

P )3  15 

( 1 ) 

TPASSA 

TIME  CP  INTERCCFT  - SAVEC  ERCM  F3A/F74 

P03  If) 

OUTPUT 

R0307 

( 1 ) 

TRKMiKCNT 

NUMBER  CP  MARKS 

P033R 

R0309 

R031O 

( 2 ) 
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R0  311 

( 5 ) 

DEL VL VC 

DELTA  VELOCITY  AT  MID  - LCCAl  VERTICAL  COCFCINATES 
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04  34 
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35-2761 

03463  0 
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0436 
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35,2762 

00154  1 

MPAC 

0437 

35,2763 

77330  1 

SXA,1 

VLOAC 

J43  8 

PFF 

3 
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35, 2764 

03613  0 

titer  , 
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RPF 

8 
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35 , 2765 

73552  7 
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35,2766 
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LMT 
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0441 
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00045  0 
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0442 

35,2770 

53515  7 

FOV  L 

1 J M T 

^1443 

REF 

13 
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35,2771 

03536  1 

R ACT3 

0444 

35,2772 

77725  1 

POOL 

0445 

35 , 2773 

41525  0 

FCCL 

PLSH 

0446 
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00045  0 

3 6D 

C44  7 

35,2775 

77621  1 

BDSU 
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35,2776 
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0449 

35, 2777 
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STOOL 

3 CD 
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RFF 

8 

LAST 
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35 , 3000 

06522  1- 

CPFALF 

0451 

35, 3CC1 

41425  1 
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PLSH 
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8 
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35,3072 
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35,3003 
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6 
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35,3075 

03463  0 
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0456 

35,3006 

71545  C 
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0457 
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00035  1 
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35, 30  14 
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ROSU 

0463 

RFF 

9 

LAST 
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35,3015 

06522  1 
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1464 

35,  30  16 

7724C  1 
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VLOAC 

0465 

REF 

7 

LAST 
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35, 3017 

03463  0 

NCPME  X 

0466 

REF 

1 
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0467 

35, 3C2  1 

53435  0 
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LMT 
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35,3022 
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0469 

35,3023 
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RFF 
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LAST 
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35, 3024 
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0500 

35,3062 

77615 

0 

CAC 

)501 

35,3063 

5620  5 

0 
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FLFCTICNAL  DESCRIFTICN 

R089? 
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This  SUBROUTINE  CC'^FutfS  THF  REQUIRED  INITIAL  VELOCITY  VECTOR  FOR 
A TRAJECTORY  CF  SPECIFIED  TRANSFER  TIME  PETWEEM  SPECIFIED  INITIAL 

R089A 

R0895 

R0896 

AND  TARGET  PCSITirNS.  THF  TRAJECTCRY  PAY  BE  EIThER  CCMC  CP 

PRECISION  CEFFNCING  ON  AN  INPUT  PARAMETER  (NAMELY,  NUMBER  OF 
OFFSETS).  IN  ADDITICN,  IN  THE  PPECISICN  TPAJECTCRY  CASE,  TEE 

R0897 

RC898 
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SUBROUTINE  AI.FC  COMPUTES  AN  OFFSET  TARGET  VECTOP,  TC  BE  LSEC 
CURING  PURE-CCMC  C PCSS-PRCCUCT  STEERING.  ThE  OFFSET  TARGET 
VECTOP  IS  ThE  TERMINAL  FCSITICN  VECTOP  CF  A CCMC  TPAJECTCRY  hhICh 

R090n 

R09C1 

hAS  ThF  SAMF  INITIAL  STATE  AS  A PRECISICN'  TPAJECTCRY  WHCSE 
TERMINAL  FCSITICN  VECYFR  IS  ThE  SFECIFIEC  TARGET  VECTOR, 

R099? 

R0903 

R09CA 

IN  OROFF  TC  AVriO  ThE  INHERENT  SINGULARITIES  IN  THE  180  DEGREE 
TRANSFER  CASE  WHEN  Th"  (TRUE  OR  OFFSET)  TARGET  VECTOR  MAY  BE 
slightly  CLT  CF  THE  CRBITAL  PLANE,  ThIS  SLEFCUTINE  PGTATFS  ThlS 

80905 

P09C8. 

R09C7 

VECTOR  INTO  A PLANE  DPF  INED  BY  THE  INPUT  INITIAL  POSITICN  VECTOR 
ANC  ANCTFEP  INPUT  VECTCF  (USUALLY  ThF  INITIAL  VELOCITY  VECTOP), 
NhENEVER  THF  INPUT  TARGET  VECTOR  LIES  INSIDE  A CCNF  WHCSE  VERTEX 

P09P8 

R09G9 

ISThE  ORIGIN  CF  CCCPDINATES,  WhOSE  AXIS  IS  THE  ISO  OFGREE 
TRANSFER  niRFCTTCh,  AND  WhCSF  CCNE  ANGLE  IS  SPECIFIED  BY  THE  LSER. 

R09in 
R091 1 
P0912 

ThF  LAMBERT  SUBROUTINE  IS  UTILIZED  FOR  THE  CCMC  CCMFUTATICNS  ANC 
THE  CCASTTNC  INTEGRATION  SUBROUTINE  IS  UTILIZED  FOR  THE  PRECISION 
TRAJECTORY  C C M F L T f 1 1 C N S . 
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0 -1 

0981 

11, 2" 31 

70596 

1 

COSINE 

SRI 

CALCULATE  CCSINE  ( F4 ) (+2) 

0982 

PFF 

1 

11  ,2'-  32 

1 766  7 

1 

STCCl 

CC7Y9 

SET  C0ZY9  TO  CDSINE(E9)  (PI  OC I 

0983 

11,2033 

67199 

c 

LXA  ,2 

S X A , 2 

0989 

REF 

2EP 

LAST 

669 

1 1 ,2-139 

00159 

1 

MFAC 

0989 

REF 

2 

l.ART 

126 

11 , ?"35 

02  70  1 

c 

VTARGTAG 

“ SET  VTARGTAG  to  00  (SP) 

0986 

11,  21-36 

77  779 

1 

VLCAF 
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L 

F39' 

-P35, 

P79- 

P75 

LSFR'S  PAGE  NO.  3C 

E7  S3 

09P7 

P.PF 

9 

LA  ST 

6E6 

11  ,203  7 

C2323 

1 

P IMT 

09fl8 

REF 

3 

LAST 

126 

11, 2P9C 

26  6 5 5 

0 

STCYL 

RIVEC 

RIVEC  EC  PIMT 

C9P9 

89  F 

9 

I.AST 

686 

11,2  '91 

0397? 

n 

PTARGl 

0990 

REF 

2 

LAST 

126 

11, 2P^2 

1 6 6 6 3 

C 

STCOl 

R2VEC 

F2VEC  EC  PTAPG 

0991 

REF 

9 

LAST 

673 

11, 2093 

03952 

1 

DEI  1 T9 

0992 

RFF 

2 

LAST 

126 

11,2699 

02671 

0 

STCRE 

T C E S I E E C 

TCESIPEC  EC  DELLT9 

0993 

11 , 2995 

77  20  1 

1 

SETPC 

VLCAD 

0 9 99 

11 ,2U96 

oooni 

0 

00 

INITIALIZE  PL  TC  CD 

0995 

prp 

c 

LAST 

6 87 

11 . 2097 

0 2 3 2 3 

1 

P I M T 

PPAC  EC  RINIT  (<-251 

0996 

11,2050 

91956 

c 

LNTT 

PLSH 

UNIT { P I ) ( +1  ) 

(PI  60 

C997 

11,2051 

53935 

0 

YXV 

UNIT 

0998 

PFF 

9 

LAST 

686 

11,2052 

02331 

1 

VTMT 

PFAC  EC  UN  IT ( R I)  X V I ( +8  ) 

0999 

REF 

2 

LAST 

126 

11, 2053 

26679 

« 

STCVL 

UN 

1000 

RFF 

c 

LAFT 

6.  E7 

11  ,2C59 

C3972 

0 

RTARCl 

100  1 

11,2055 

5C256 

c 

LMT 

DCT 

TFPF  = LFT  .UR  I (+2) 

(PL  CO 

100? 

11 ,2056 

93015 

1 

CAC 

CLEAR 

1003 

REF 

2 

LAST 

6.86 

11 ,2057 

03667 

0 

CCZY9 

1009 

REF 

1 

11,2060 

03  66  5 

1 

NCRPSIa 

1C05 

REF 

3 

LAST 

687 

1 1 ,2061 

03667 

0 

STORE 

CCZY9 

1006 

1 1 , 20  6 2 

93C99- 

c 

IMTYEL2 

8PL 

SET 

1007 

RFF 

1 

11, 2 63 

22105 

c 

I M TVFL3 

UN  calculated  in  LAMBERT 

1008 

RFF 

2 

LAST 

687 

11,2069 

03965 

0 

NCRPSW ■ 

R100° 

RPT/!TE  RC 

INTO 

YC  PI  ANE  - 

SET  LMT 

NORPAL  TC 

YC 

Ifir 

11,2065 

91575 

0 

VLOAC 

“LSH 

(PI  60 

ICl  1 

REF 

LAST 

6E7 

11,2066 

02663 

c 

R2VEC 

PC  TO  6C  ( +25 ) 

1012 

11,2067 

6329  6 

1 

APVAL 

PD  VI. 

PC  TC  PFAC,  AEVAl(RC)  (+29)  TO 

OC(PL  20 

1013 

11,2070 

96206 

1 

PUSF 

VPRCJ 

( FL  80 

1019 

RFF 

■3 

LAST 

687 

11,2071 

C 2 6 79 

0 

UA 

1015 

11,2072 

51352 

1 

VSL2 

B VSU 

1016 

11  ,2C73 

79256 

0 

UNIT 

VXSC 

(PL  0C» 

in  17 

11,2079 

7 7 7 7 2 

c 

YSLl 

1018 

REF 

9 

LAST 

68  7 

1 1 ,20  75 

02663 

0 

STORE 

R2VEC 

1019 

11,2076 

67351 

1 

TLCAC 

S LCAC 

1020 

REF 

2 

LAST 

37 

11,2077 

29C07 

c 

ZERCVEC 

1021 

RFF 

2 

LAST 

686 

11  ,2100 

03617 

1 

ITCTR 

1022 

1 1 , 2 10  1 

77299 

c 

8PL 

VLCAC 

1023 

PFF 

2 

L.AST 

687 

11,2102 

22105 

c 

I M TVEL3 

1029 

ref 

C 

LAST 

687 

11  ,21')3 

0 2663 

0 

R2VEC 

1025 

REF 

6 

LAST 

687 

U , P K9 

C 3 9 7 2 

0 

STCRE 

RTAPGl 

1026 

11,21  15 

63395 

0 

INITVEL3 

CLOAC 

PDVL 

(PL  20 

1027 

REF 

1 

11  ,2106 

26007 

1 

MLEAFTH 

PCSIT  IVE  VALUE 

1028 

REF 

6 

L AST 

687 

11,2107 

■ 02663 

0 

R2VEC 

1C20C2 

11  ,2110 

63256 

0 

UNIT 

PDVL 

2D  = LNIT(R2VEC) 

(PL  80 

1028C9 

REF 

9 

LAST 

687 

11,2111 

02655 

0 

RIVFC 

1028C6 

11,2112 

91956 

0 

LMT 

PLSH 

ec  = LMT(RIVEC) 

(PL  190 

1C28CF 

11,2113 

57935 

1 

VXV 

VCCPP 

-N  = LNIT(R2VEC)  X UNIT(RIVFC) 

1028  1 

11,2119 

0QCC3 

1 

2C 

10282 

11,2115 

77606 

1 

PUSF 

( F120C  ) 

10283 

11,2116 

7125C 

1 

LXA,  1 

CLOAC 
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L 

F33 

-P35, 

P73-P75 

LSEP'S  PAGE 

NC.  31  E7  S3 

ir?8A 

REF 

6 

LAST  66? 

11  ,21  17 

02776 

0 

RTXl 

10?6i 

1 1 ,?12C 

c c r 7 ? 

C 

1 8C 

10236 

11,2121 

62.030 

1 

8MN 

I NCR  , 1 

1C2P7 

11,2122 

22123 

0 

+ 2 

1028R 

11,2123 

7 7 767 

1 

CEC 

-8 

1028S 

11,2123 

673  1'.’ 

1 

INCR  , 1 

SLCAD 

1028 

11  ,2125 

OCOl  2 

1 

KID 

1023  1 

REF 

13 

LAST  668 

11,2126 

CCC37 

1 

XI 

1C282 

11 ,2127 

77230 

0 

enz 

VLDAD 

(PL130 

1029’ 

11,2130 

22  137 

1 

+ 2 

10293 

11,2131 

3 13  76 

1 

VCONP 

PLSH 

(PL20C  ) 

IC295 

11,2132 

7 7775 

1 

VLOAC 

( FL13C) 

10296 

11,21’? 

5C2’5 

0 

VXV 

DCT 

(PL  20 

1032 

11,2133 

71233 

0 ' 

8PL 

DLCAD 

(FL  OC  ) 

1033 

RFP 

1 

11,2135 

22137 

1 

IMTVEL3 

1033 

11,2126 

3 1376 

1 

crcpF 

PLSH 

(PL  20 

1035 

11  ,2137 

67  153 

■1  INITVEL3  LXA,2 

SXA,2 

1036 

1 1 ,2  13C 

oocoo 

1 

OC 

' 1037 

RFF 

2 

LAST  126 

11,2131 

02672 

C 

GECNSGN 

R 1038 

cc 

T INPLTS  UP  FTP 

LAPflERT 

103° 

11,7132 

6 6 3 50 

1 

LXA  ,1 

SSP 

1030 

REF 

7 

LAST  688 

11,2133 

02776 

0 

RIXl 

1030  1 

RFF 

1 

11,2133 

0C027 

1 

ITERCTR 

103O2 

11,2135 

CCC23 

1 

20D 

R1031 

CFERMF  IFF  LAPEFRT  CFMC 

RCUT  INF 

(COAST 

FLT 

SUBROLT INF ) 

103? 

11,2136 

7 7 6 2 3 

1 

CALL 

1033 

RFF 

1 

11,2137 

2 5 2 1 2 

1 

LAPBE PT 

R 1033 

ARRI v°n 

AT  SCLUTIC6 

IS  Gccc  fncugf  acccrcing  to 

SLTGFTLY  WIDER  8CUNCS. 

1035 

11,2150 

77213 

0 

CLEAR 

VLCAD 

1036 

P°F 

2 

lAST  686 

11,2151 

0C675 

c 

GUESSW 

1C37 

REF 

P 

LAST  663 

11  ,2152 

02733 

1 

VVEC 

R 1038 

STFRE  CALCULATEF  INITIAL  VELOCITY  PECLIREO 

IN  VIRRINE 

R103° 

1050 

REF 

2 

LAST  663 

11,2153 

16337 

1 

STOOL 

VIPRIYE  INITIAL 

VELCC  ITY 

REQUIRED  (+7) 

P1051 

R105? 

IF  MMT  IS  ZFPC, 

COM  IMJF 

AT  TMTVELP, 

OTFERV,  ISF 

R1053 

SFT 

UP  INPUTS  FOR  ENCKF  INTEGPATICN 

( INTFGR VS  ) . 

1053 

REF 

3 

LAST  686 

11,2153 

C2702 

0 

VTARGTAG 

1055 

11,2155 

35030 

0 

ELI  Z 

CALL 

1056 

REF 

1 

11,2156 

2 2 2 3 3 

C 

I M TVFL7 

1C57 

REF 

20 

LAST  677 

11  ,2157 

27312 

0 

INTSTALL 

1061 

11  ,2 160 

33135 

1 

SLCAC 

CLEAR 

1062 

REF 

5 

LAST  686 

11,2161 

C300C 

1 

RTX? 

1C63 

RFF 

5 

LAST  677 

11,2162 

00263 

0 

MOQNFL AG 

1063 

11,216? 

33C3C 

c 

EHI  Z 

SET 
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L , 

P34- 

P35, 

P74-P75 

USER'S  PAGE  NO.  32 

ET  S3 

1C65 

■ R9F 

1 

11,2164 

22166 

0 

IMTVEL5 

1066 

PFF 

e 

L«  ST 

686 

11,2165 

CCC63 

1 

NCrNFLAG 

1067 

11,2166 

7T775 

1 

INITVEL5 

VLCAC 

1C68 

PFF 

6 

LAST 

6 67 

11,2167 

02323 

1 

R IMT 

1069 

P9F 

5 

LAST 

687 

1 1, 217t 

02  655 

0 

STORE 

R 1 VEC 

1070 

REF 

7 

LAST 

677 

11,2171 

25535 

r 

STOVl 

RCV 

107  1 

PFF 

3 

LAST 

688 

11,2172 

02  33  7 

1 

V I PR  IRE 

1072 

PEF 

6 

LAST 

677 

11, 2172 

1 5 54  3 

1 

STCDL 

VCV 

1073 

REF 

5 

LAST 

673 

11.2174 

03610 

u 

INTIME 

1074 

PEF 

7 

LAST 

677 

11,2175 

01517 

r 

STORE 

TFT  ■ 

1075 

1 1, 2176 

43C15 

1 

DAD 

C LEAR 

1C76 

rff 

C 

LAST 

687 

11,2177 

03452 

1 

CELLT4 

1077 

PEF 

9 

1 AST 

677 

11,229C 

CI673 

1 

I MYFFLG 

1078 

P9F 

28 

L AST 

677 

11,2201 

34041 

0 

STCALL 

TCECl  ■ 

1C79 

REF 

•a 

I.AST 

677 

11 ,2202 

27  110 

.1 

T NTEGPVS 

1080 

11,2203 

77775 

1 

VLOAD 

1C81 

RFF 

8 

LAST 

656 

1 1 ,2204 

00025 

0 

VATT  1 

1082 

PEF 

2 

LAST 

126 

11,2205 

r ? 7 0 3 

1 

STORE 

VTARGET 

P1083 

IF 

ITEPATIFN 

CCUMRR 

( TTCTR  ) 

CQ  NO. 

ITERATIONS 

( NUMIT ) 

, CONTINUE  AT 

R1C84 

IMTVFIC 

, CTHFRM  RE  PFITERATF 

LAPEEPT 

ANC  ENCKF 

1085 

11,2206 

63  1 54- 

1 

IXA  ,2 

I NCR  ,2 

1C86 

REF 

3 

LAST 

687 

11 ,2207 

03616 

0 

I TCTR 

K87 

11 ,221F 

CCfOl 

0 

1 C 

INCRENENT  ITCTP 

1088 

11, 2?1  1 

55  134 

1 

SXA  ,2 

XSl  ,2 

K89 

REF 

4 

LAST 

689 

11,2212 

03616 

0 

ITCTp 

lOOn 

REF 

4 

LAST 

688 

11,2213 

0272  1 

C 

vtargtag 

1091 

11,2214 

46  135 

1 

SLCAD 

BHI  Z 

IF  SP(MPAC)  EC  0,  CCNTINUF  AT 

IMTVELC 

109? 

prF 

9 

LAST 

656 

11,2215 

00050 

1 

X2 

1093 

REF 

1 

11,2216 

22230 

C 

I M TVEL6 

R1C«^4 

R 1 0 9 5 

OFFSET 

CONIC 

TARGET 

VEC  TCP 

1C96 

11,2217 

52375 

1 

\/LOAD 

VSL 

1 C97 

REF 

7 

LAST 

687 

11  ,2220 

034  72 

0 

RTARGl 

1098 

PEF 

5 

LAST 

656 

11,2221 

OCC  17 

1 

PATTI 

1099 

11, ?222 

77655 

1 

VAD 

1100 

PEF 

7 

LAST 

687 

11,2223 

02663 

n 

R2VFC 

ini 

PEF 

8 

LAST 

689 

1 1 , 2224 

16  663 

0 

STODL 

P2VEC 

113? 

REF 

4 

LAST 

687 

1 1 ,2225 

03667 

0 

CCZ  Y4 

1 133 

11 ,2226 

7765  1 

1 

GOTO 

1104 

REF 

1 

11,2227 

22C62 

0 

IMTVEL2 

C^^■RI^UF  ITERATING  AT  IMTVEL2 

R1105 

CCRPITF 

THE  CFLTA  VEICCITY 

ll:>6 

1 1 ,2230 

■ 77775 

1 

IMTVEL6 

UCAC 

1107 

RFF 

9 

LAST 

689 

11,2231 

02663 

0 

R2VEC 

1 108 

PEF 

F 

t A ST 

689 

11 ,2232 

03472 

0 

STORE 

RTARGl 

1 109 

11,2233 

52  37  5 

1 

IMTVFl  7 

VLCAC 

VSL 

1110 

PFF 

4 

LAST 

689 

11 ,2?34 

02337 

1 

V IPRIME 

111  1 

RR  F 

C 

LAST 

6 87 

11  ,2235 

0 2 331 

1 

V IMT 
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L 

F34- 

P25, 

P74- 

P75 

LSER'S  PAGE  NO.  33  E7  S3 

111? 

REF 

8 

I AST 

679 

11,2236 

26366 

0 

STOVL 

0ELVEET3  DELVEET3  = VIFRINE-VIMT  (♦7) 

im 

REF 

■3  . 

LA  ST 

689 

11,2237 

(J27C3 

1 

VTARGET 

1114 

REF 

2 

LAST 

663 

11, 224C 

C3  566 

1 

STORE 

VTPRI FE 

1115 

11 ,2241 

46135 

1 

SLOAC 

0F1Z 

1116 

REF 

6 

LAST 

688 

11,2242 

C3CCC 

1 

RTX2 

1117 

PFF 

1 

11,2243 

22260 

f 

I MTVFL  X 

11)71 

11 ,2244 

7C575 

1 

V 1 C A C 

VSR2 

11172 

REF 

2 

LAST 

69C 

11,2245 

C3  566 

1 

VTPRI NE 

1 11  R 

REF 

4 

LAST 

69C 

1 1 ,2246 

27566 

1 

STOVL 

VTPP  IFE 

1 1 19 

RFF 

c 

LAST 

689 

11 ,2247 

02337 

1 

V IPPIFF 

1129 

1 1 ,2250 

7 7 7 4 2 

C 

VSR2 

1121 

REF 

6 

LA'T 

690 

11 ,2251 

26337 

1 

STOVL 

V IPR  live 

1122 

REF 

9 

LAST 

689 

11,2252 

03472 

0 

RTARGl 

1 1 23 

1 1 ,2253 

77742 

c 

VSR  2 

1124 

RFF 

1C 

LAST 

69C 

11,2254 

27472 

0 

STOVL 

RTARG 1 

1125 

RFF 

9 

1 AST 

69C 

11,2255 

02366 

0 

DELVEET3 

1126 

U ,2256 

7 7 742 

0 

VSR  2 

1127 

REF 

1C 

LAST 

69( 

11  ,2251 

C2366 

0 

STORE 

CELVEET3 

1128 

11 ,2?6C 

7C75C 

1 

INITVSL7  LXA,1 

El  lCAn« 

11281 

RFF 

e 

LAST 

688 

1 1 ,2261 

02776 

0 

PTX  1 

11282 

RFF 

1 

11,2262 

1CCC3 

r 

FLTA6LE  -2,1 

112825 

11,2263 

41206 

c 

PLSH 

DFP 

11283 

RFF 

3 

LAST 

65  1 

11 ,2264 

02742 

1 

R lA 

1 128« 

11 ,2265 

56342 

1 

SRI 

DCV 

11285 

REF 

4 

1 AST 

65  1 

11,2266 

0CC41 

1 

R 1 

11286 

REF 

2 

LAST 

144 

11  ,2267 

17771 

0 

STCRL 

MU/ A 

11287 

11 , 221C 

7766  1 

c 

SR 

112E71 

11  ,2271 

20607 

1 

6 

112815 

RFF 

? 

LAST 

144 

11,2272 

03717 

0 

STORE 

MUASTEEP 

11288 

11,2273 

7 7 2C  1 

1 

SE7PD 

VLCAD 

1129 

11 ,2274 

00001 

n 

OD 

1 13C 

RFF 

1 1 

LAST 

69C 

11,2275 

C3472 

0 

PTAPGl 

1131 

♦ pep 

8 

LAST 

686 

■11,2276 

03444 

c 

STORE 

RTARG 

1132 

* 

11 ,2277 

52014 

0 

CLEAR 

GOTO 

1133 

*RFF 

3 

1 AST 

645 

11, 230C 

01267 

0 

XCFl VFLG 

1134 

REF 

1 5 

LAST 

686 

1 1 ,2301 

03463 

0 

NCRMEX 

R113E 

Rin6  END  OF  INITVEL  ROUTIMP 
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L P3-!|-P35,  P74-P75  LSFR'S  P*GE  NO.  E7  S3 

P 1 1 3 7,  MTHGIM  

Pll3b  Rrr  Nr.  PY  '^TLlPfN,  CUPpriJTINE  RENCGUIC.  LCG  P3^-P3S,  P7A-P7S 

Rl  139  RFVl SION  03 , 1 7 FEB  67 

R1  lAO IF  ThF  ACTIVE  VFUCLE  IS  DOING  THF  rCMPLIATICN,  ^InGI^  CCRFLTES 

R11A1  THE  PrSITIV'"  MIDDLE  CImBH  ANGLE  CF  THE  ACTIVE  VEHICLE  TO  THE  INPUT 
PllA?  DELTA  VELOCITY  VECTCP  tOC  IN  FLSH  LIST),  CTHERHISF 

R11A3  HIDGI*'  CCNVEFTS  THF  INP'IT  DELTA  VELOCITY  VFCTCR  FPCY  INERTIAL  CCCRCIN- 

Rll^A  ATFS  TC  LCCAL  VERTICAL  CCCRCINATES  CF  THF  ACTIVE  VFHICLF. 

R11A5 . ♦ INPUTS  .. 

R11A6  NAHF  RFAMNG  UN  IT  S / SC  AL  ING /NODE 

P L1A7  AVFLAG  TNT  FLAG  - 0 IS  CSN  ACTIVE,  1 IS  LEN  ACTIVE  ~ ?Tt 

PllA-9  RINIT  ACTIVE  VEHICLE  RADIUS  VECTOR.  H'FTFRS/CSEC  ( + 7)  V1 

RllFC VIMT  ACTIVE  VCHICLF  VFLCCITY  VECTOR MFTSFS/CSEC  (t7)  VT 

R1151  no  (PL)  ACTIVF  VEHIC1F0EITA  VFLCCITY  VECTCP  RETfrs/CSEC  (+7)  VT 

R1152 ..  CUTpijTS  .» 

R1I53  NAME  MEANING  U MT  S / SC  A L IN  G / HC  C E 

Rl 154  +MGA  + MTDOLF  GIMPAL  ANGLE  ! PE VCLLT ICNS  t + ' ) DP 

Rll^F  DELVLVC  DELTA  VFLCCITY  VECTCR  IN  LV  CCCPD.  METERS/CSFC  (47)  VT 

P1156  MCLVFLAC,  INT  FLAG  - 0 IS  tMGA  CCMPUTfEQ,  1 IS  CELVLVC  COMF.  - E IT 

R11F7  ..  FAILING  SECUENCF  .. 

R 11  = 8 [ CALL  ^ 

Rl 159  L 4 1 MIOGIM 

R116C  L42 (RETURN  - ALWAYS  ) 

P1161  ..  NO  SUBROUTINES  CALLED  .. 

PI  16?  ..  CEERIS  - EPASEABLu  TFi-tPORARV  USAGE 
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BASET  IMF 

ono 

37,3232 

430  14 

0 

BCF 

SFT 

OLOl 

PPF 

3 

■ LAST 

70  4 

37,3233 

04344 

0 

MCONTHI S 

0102 

37,3234 

77236 

c 

+ 2 

01  93 

RPF 

10 

L AST 

7 >5 

37, 3235 

C0Q63 

1 

WCCKFLAG 

Cl  04 

PFF 

9 

LAST 

704 

37  ,3  2 36 

35517 

1 ■ 

STCALL 

TFT 

0105 

REF 

5 

LAST 

704 

37,3237 

27110 

1 

I ^TFGRVS 

0106 

37,3240 

52375 

1 

CCMPOISP  VLCAQ 

VSC 

010  7 

REF 

20 

LAST 

705 

37,3241 

JJOOl 

n 

RATT 

0108 

RFF 

8 

LAST 

705 

’7, 3242 

C22C7 

c 

RCNE 

0109 

37,3243 

65234 

1 

RT8 

PCCL 

01  in 

REF 

2 

1 A ST 

5 89 

37,3244 

21725 

1 

NCRMIJNX  1 

IJN  IT  ( RANC=  ) TC  PC  0-5 

0111 

37,3245 

00045 

c 

360 

0112 

37,3246 

77657 

0 

SL* 

RFSCA  LE  AFTER  NOR^-CM  T 

0113 

37,3247 

2C201 

c 

0 ,1 

0114 

REF 

10 

LAST 

70  1 

37,3250 

2620  1 

0 

STOVL 

RANGE 

SCALEC  2(29)R 

0115 

RPF 

1 i 

LAST 

705 

37,3251 

00CO7 

0 

V ATT 

0116 

37,3252 

6025  1 

1 

VSL 

OCT 

(VCY-  VLN  ) .UNIT (LCS ) , PC=0 

Oil  7 

FEF 

2 

LAST 

705 

37,3253 

02215 

0 

VCNE 

0118 

37,3254 

7 7 752 

1 

SLl 

SCALEC  2(7)M/CS 

0119 

PFF 

6 

LAST 

70  1 

37,3255 

2 6 2 J 3 

1 

STOVL 

RRATF 

0120 

PFF 

9 

LAST 

705 

37  ,3256 

922)7 

0 

RCNE 

0121 

37,3257 

63256 

c 

LM  T 

PCVL 

UM''  ( R ) TO  fC  0-5 

0122 

PFF 

6 

L AS'T 

584 

37,3260 

06516 

0 

UM  TZ 

0123 

37,3261 

77624 

1 

CALL 

0 124 

RFF 

1 

37,3262 

4 766  3 

1 

CCL=!‘NBSP 

0125 

37,3263 

4 1505 

1 

VXM 

PUSH 

LMT  (Z)  /4  TC  FD  6-11 

0 126 

RFF 

17 

LAST 

692 

37,3264 

01734 

c 

REFSMMAT 

0127 

37,3265 

7243  1 

1 

VPRC  J 

VSL2 

UMT(  F )=UNIT  (UZ  - (U  Z ) PRC  J (UR  ! ) 

0128 

37,3266 

0 0 Til 

0 

on 

0129 

37,3267 

53445 

1 

evsL 

UNIT 

013C 

37, 327P 

00007 

0 

60 

0 131 

37,3271 

4 731  5 

0 

FCVL 

VXV 

UNIT(P)  TO  PD  12-17 

0132 

37,3272 

COCO  1 

0 

OD 

UNIT  ( PL  ) 

0133 

PPF 

3 

LAST 

795 

37,3273 

12215 

c 

VCNE 
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EC  S3 

013* 

37,3274 

5C235 

0 

vxv 

DCT 

(UR  * Vl)*UR  . U(P) 

0135 

37,3275 

00001 

0 

00 

0136 

37,3276 

J 

12D 

0137 

37,3277 

777  1 5 

1 

PDVL 

SIGN  TC  12-13  , LCAC  U (P) 

0138 

37,3300 

75241 

1 

COT 

S IGN 

0139 

37, 33C1 

CCCC7 

C 

6C 

014(1 

37, 3302 

00^15 

0 

12D 

0141 

37,3503 

65512 

1 

SL2 

ACCS 

ARCCOS(LP.UZ( SIGN) ) 

0142 

RFF 

8 

LAST 

?F2 

37,3304 

26205 

1 

STGVL 

RTHEOA 

0143 

37,3305 

OOOn  1 

0 

OD 

0144 

37,3306 

51041 

0 

CCT 

BFL 

IF  UR  .UZ  NEC-, 

0145 

37,3307 

OOCO  1 

O' 

6D 

RTHFTA  = 1 - RTFETA 

C146 

37,3310 

7731  5 

0 

+ 5 

0147 

37,3311 

4 5 3^5 

1 

CLCAC 

csu 

0148 

fifF 

Q 

. LAST 

675 

37,3312 

06532 

c 

DPPCSRAX 

0 149 

REF 

c 

LAST 

7C6 

37,3313 

02205 

1 

PTFETA 

0150 

RFF 

10 

LAST 

706 

37,3314 

C2205 

1 

STORE 

RTHETA 

0151 

37,3315 

nnb 

1 

EXIT 

0157 

RFF 

30 

LAST 

616 

37,3316 

3 4747 

1 

CA 

R ITS 

0153 

REF 

11 

1 AST 

70  3 

37, 3317 

7 1043 

0 

RASK 

E XTVBAC.  T 

C154 

37,3320 

0 0 116 

1 

EXTEND 

IF  ANSWERED, 

0155 

RFF 

39 

LAST 

702 

’7,3321 

1 5472 

1 

RZF 

ENDEXT 

TERR  INATE 

0156 

RFF 

12 

LAST 

706 

37, 3522 

4 1343 

0 

CS 

EXTVBACT 

0157 

RFF 

25 

LAST 

7C3 

3 7 , 5323 

7 4740 

1 

RASK 

B IT12 

0158 

REF 

13 

LAST 

706 

37, 3324 

2 7 ' 0 4 3 

c 

ADS 

EXT VPACT 

SET  BIT  12 

0159 

REF 

1 

37 ,3325 

1 3155 

1 

TCP 

RFV83 

AND  START  AGAIN. 

016F 

RFF 

1 

LAST 

536 

37,3326 

3 77  1 3 

C GETRVN 

CA 

ppir22 

INFien  SERVICER 

0161 

REF 

10 

LAST 

498 

37, 3327 

0 5146 

1 

3C 

PRinCHNO, 

C 162 

RFF 

85 

LAST 

70* 

57,333C 

0 6 04  2 

1 

TC 

INTPRET 

0163 

37,3331 

403  75 

1 

VLCAC 

SETPC 

0164 

REF 

5 

LAST 

32  1 

37 , 5332 

0122J 

0 

RN 

LR  STATE  VECTCR  IN  RN,VN 

0165 

37,3333 

0000  1 

0 

0 

0166 

REF 

10 

LAST 

70  5 

37,  3 534 

26207 

r 

STCVL 

RCNE 

0167 

REF 

5 

1 AST 

321 

37,3335 

01226 

0 

VN 

0168 

RFF 

4 

LAST 

705 

37, 3336 

26215 

Q 

STC\,L 

VCNE 

LCAC  F (CSM  ), V (CSM  ) IN  CASE  RUNFLAG  SET 

0169 

RFF 

2 

LAST 

60  1 

37,3337 

0 1 726 

0 

V(C SR) 

(TC  INSLPF  TIRF  CCRFAT a FI L ITY ) 

0170 

37,3340 

65315 

0 

PDVL 

PCDI 

017! 

REF 

2 

LAST 

60  1 

37,3341 

01723 

0 

R (C  SR  ) 

0 172 

REF 

c 

LAST 

600 

37 ,3342 

01234 

0 

P IPTIRE 

0173 

37,3343 

7 7776 

1 

EXIT 

0174 

REF 

M 

LAST 

7 03 

37,3344 

3 50  1 5 

c 

CA 

PPIC3 

01  75 

REF 

11 

LAST 

706 

37,3345 

0 5146 

1 

TC 

PRinCFNG 

0176 

RFF 

86 

LART 

706 

37, 3346 

C 6C42 

1 

TC 

I M FRET 

0177 

37, 3347 

772  14 

0 

BOFF 

VLQAD 

CUB 

RFF 

2 

1 AST 

23C 

37,3350 

05347 

1 

WUNFLAG 

0179 

REF 

1 

37,3351 

77363 

1 

GETRVN2 

IF  RUNFIAG  RESET,  DC  CR  DELTA  PRECISION 
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5 

EO  S3 

0180 

37,3352 

6C5I5 

1 

VXP 

VSP4 

CHANGE  TC  PPFERENCE 

SYSTE  A 

AND  RESCALE 

0181 

PFF 

18 

1 AST 

705 

37,3353 

017  3 4 

C 

PEFSl'NAT 

0182 

37,3354 

777  15 

1 

PCVL 

R TC  FD  r-5 

0183 

37,3355 

7 6 5 C 5 

C 

\|  xw 

VSLl 

01  84 

PEF 

19 

1 AST 

707 

37, 3356 

0 1 71>6 

0 

REFSPVAT 

018*^ 

37 ,3  357 

60  2 16 

1 

PUSH 

SETPD 

V TO  PC  5-11 

0186 

37,3360 

OCCGl 

r 

D 

0187 

37, 3361 

77650 

1 

GOTC 

0188 

REF 

1 

37,3362 

77240 

1 

CC^PC  ISP 

0189 

37, 3363 

77624 

1 

GFTR\/N2 

CALL 

019C 

PFF 

23 

LAST 

705 

37 ,3364 

27412 

0 

INTSTALL 

0191 

37, 3365 

52C14 

C 

CLEAF 

GCTC 

019? 

PFF 

12 

LAST 

70  ^ 

37,3366 

01673 

1 

I NTYPFLG 

FREC  EXTRAF  FCR  other 

0193 

REF 

1 

37,3367 

77222 

0 

othin-6 

0194 

REF 

87 

LAST 

706 

37,3370 

C 6C42 

1 

P31SLRF 

TC 

I FTPPET 

0195 

37,3371 

77634 

0 

RTB 

LN  IS  CN  SLRFACE,  SC  FFECISICN 

0196 

REF 

18 

LAST 

7C4 

37,3372 

21574 

1 

LCADT IMF 

integration  uses  planetary  inertial 

0197 

RFF 

36 

LAST 

705 

37, 3373 

34C41 

c 

STCALL 

TCFCl 

cpientaticn  subroutine 

C198 

REF 

6 

1 AST 

704 

37,3374 

27060 

1 

LEMPR EC 

0199 

37,3375 

776  5C 

1 

GCTC 

EC  eSN  CCNIC 

0200 

PEF 

1 

37, 3376 

772  11 

0 

CTHCCMC  . 

02"! 

REF 

2 

LAST 

187 

37,3377 

4 0102 

0 

ML'NG? 

CS 

FLAGWRD6 

0 20  2 

R>^F 

2 

LAST 

187 

37,3400 

7 4744 

c 

»-ASK 

NUNFLEIT 

0203 

37, 3461 

F 0006 

1 

EXTEND 

0204 

REF 

2 

LAST 

704 

37,3402 

1 3326 

1 

EZF 

GETRVN 

IF  MUNFLAG  SEI,  CSM  BASE  ACT  NEEDED 

0205 

RFF 

88 

LAST 

707 

37, 3403 

0 6042 

1 

ONEBASE 

TC 

I M PRET 

GET  eSN  EASE  VECTOR 

02G6 

37,3404 

52034 

1 

RTB 

GCTO 

0207 

RFF 

19 

LAST 

707 

37,3405 

21574 

1 

LCACTIME 

0208 

REF 

1 

37, 3406 

77  144 

c 

ncCPBASE 

0209 

37,3427 

04066) 

0 

V 1 6N54 

VM 

1654 
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L 

P76 

USER'S  PAGE  NO.  1 EO  S3 

P50DO 

R8C0I 

R5003 

1 ) 
2 ) 

PRCGPAA'  NAME  - TARGET  DELTA  V 
pUNCTICNAL  DFSCPIFTIEN  - tlFCP 
TC  PROVIDE  VIA  DSKY  (1) 

PROGRAM  (P76). 

entry  EY  ASTRONAUT  ACTION, 

THE  DELTA  V TO  BE  APPLIED 

P76  FLASHES 
TC  THE  OTHER 

DSKY  REOLESTS  TO  IHF  ASTRCNALT 
VEHICLE  STATE  VECTOR  ANC  (2)  THE 

R5005 
R 5007 
P,  5000 

TIPE  (TIG)  -AT  WHICH  THE  OTHER  VEHICLE  VELOCITY  WAS  CHANGED  RY 
OTHEP  vehicle  state  VECTOR  IS  INTEGRATED  TC  TIG  AND  UPCATEC  0Y 
BEEN  TPANSFORME-r  ERCP  LV  TC  PEP  CCSYS).  LSING  TNTEGRVS,  THE 

EXECUTION  CP  A THRUSTING  PANEUVEP.  THE 
THE  ADDITION  CF  DELTA  V (DELTA  V HAVING 
FPCGRAP  THEN  INTEGRATES  THE  OTHER 

RSni  VEHICLE  STATE  VECTCR  TC  THE  STATE  VECTCP  C THIS  VEHICLE,  THIS  INSLRING  THAT  1HE  H-'-ATPIX  ANC  ECTH  VEHICLE 
R50n  STATES  COPRESP^^D  TC  THE  SA«E  TIVE. 

RSni^  T)  FpasaELE  IMT  IALI  ZATTCN  RECUIREE  - NONE. 


R5015  4)  CALIING  SEOLIENCES  AND  EXIT  HCDES  - CALLFC  EY  ASTRCAAUT  PECUEST  THRU  CSKY  V E7  E 7fc  t. 

R5017  EXITS  ev  TCP  ENOGEJC'’. 

R5C18  5)  CLTFLT  - OTHER  VEHICLE  STATE  VECTG’R  INTEGRATED  TO  TIG  AND  INCRE^'ENTEO  BY  DELTA  V lA  REF  CCSYS. 

R50?i)  THE  PLSHLIST  ^^^TAI^S  TH'=  PATPIX  EY  WHICH  THE  INPUT  CELTA  V ^UST  BE  POST-MULTIPLIED  TC  CCNVERT  FROM  LV 

P50??  TO  PEE  CCSYS. 

REC23  6)  DEPP'iS  - rTHP°  VEHICIF  STATE  VECTCP. 

R5C24  7)  SL0RULTINES  CALLED  - BAN KC A L I , G C XD S PE , r S MP P c c (QR  L E P P PE C ) , AT C P C SP  (OR  ATO PL E R ) , IN T ST  ALL , I N T H AK E , PHASCHNG”  ‘ 

R5n26  INTPPET,  INTEGPVS,  ANC  MINIRECT. 


R5C27  8)  FLAG  USE  - P C C PE L AG  , C P C C N F L A C , I N ^ y p F L C , R AS F L A G , ANC  PAPKCTP. 


5028 

30,2961 

BANK 

30 

5C29 

PEE 

1 

13,2000 

SETLCC 

P 76LOC 

503C 

I 3 ,22  17 

BANK 

50  31 

REF 

1 

CCLMX- 

/P76 

5f  32 

RFF 

17 

LAST 

675 

UJ 

FBANK= 

T IG 

5C3? 

REF 

43 

LA,  FT 

68  1 

13  , 22'’7 

C 55C4 

C F76 

TC 

UFFLAC 

5034 

PEE 

6 

L AST 

632 

13,2210 

0GC3  1 

C 

ADRES 

TRACKFLG 

5C34  1 

RRF 

69 

LAST 

7C7 

13,2211 

0 6042 

1 

TC 

INTPRFT 

50342 

13,2212 

7 7 7 7 5 

1 

VLCAC 

5U343 

PEE 

20 

LAST 

692 

13,2213 

03434 

1 

OEl  VLVC 

50344 

RFF 

4 

LAST 

317 

13,2214 

02223 

0 

STCRE 

DELVCV 

50345 

13,2215 

7 7 7 7 6 

1 

FXI  T 

5C35 

*PEF 

1 

13,2216 

3 2337 

1 

CAE 

V06N84  Hi 

FLASH  VERB  06  NOUN  33,  DISELAY  LAST  TIG, 

5040 

REF 

179 

LAST 

703 

13,2217 

0 4616 

1 

TC 

BANKCALL 

ANE  WAIT  for  KEYBOARD  ACTION. 

5041 

PEE 

18 

LAST 

6 83 

13, 2220 

20477 

1 

CADR 

GCFLASH 

504? 

REF 

1 

13,2221 

■ 1 2333 

1 

TCF 

ENCP76 

5043 

13,2222 

C 2224 

1 

TC 

H2 

FRCCEEC 

5C44 

13,2223 

0 2216 

0 

TC 

C 

STCRE  DATA  AND  REPEAT  FLASHING 

5045 

4P  F F 

7 

LAST 

709 

13,2224 

3 2 33  6 

0 

CAE 

V06N84 

FLASH  LAST  CELTA  V, 

5 146 

R£F 

180 

L AST 

709 

13,222= 

C 46  16 

1 

TC 

BANKCALL 

AND  WAIT  FCR  KEYPCARC  ACTICN. 

5C47 

RRF 

19 

LAST 

709 

13,2226 

2)477 

1 

CADR 

GOFL ASH 

5048 

REE 

2 

LAST 

709 

13,2227 

1 2333 

1 

TEE 

ENDP76 

5049 

13, 2230 

0 2232 

0 

TC 

+ 2 

5050 

13,2231 

C 2224 

1 

TC 

• C 

505  1 

REF 

Cj  o 

( AST 

709 

.13,2232 

C 6C42 

1 

TE 

I NTPRET 

RETURN  TC  INTERPRETIVE  CODE 
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505? 

13,2233 

77745 

1 

CLCAF 

SET  C(PPAC)=TIG  IN  CSEC  628 

5T5’ 

REF 

18 

LAST 

709 

13, 2234 

C 3 4 4 2 

0 

TTG 

5054 

Rcp 

37 

LAST 

707 

13,2235 

34041 

0 

STCALL 

TOC-C  1 

SET  TCEC1=TIG  FCP  ORBITAL  INTEGRATICN 

5055 

REF 

2 

LAST 

70  1 

13,2236 

27C44 

1 

CTFFPEC 

5056 

13, 2237 

53  5 75 

0 

COMPMAT 

VLOAC 

UNIT 

5C57 

REF 

21 

LAST 

70  5 

13,2240 

OCCOl 

0 

RATT 

5050 

13,-2241 

7 7 6 7 6 

r 

VCCRF 

U (-R  ) 

5050 

13, 2242 

00C31 

0 

STORE 

2 40 

U(-R)  TC  24C 

50fC 

13,2243 

53435 

0 

VXV 

UN  IT 

U(-R) XV  = L(VXR  1 

5061 

REF 

1 7 

LAST 

705 

13,2244 

CCCC7 

0 

VATT 

5C6? 

1 3,2245 

00023 

n 

STORF 

180 

5C63 

13,2246 

53435 

0 

VXV 

UNIT 

U( VXP  IXU  (-R  ) = U(  (P  XV)  XR  ) 

5064 

13, 2247 

00C3  I 

0 

2 40 

5065 

13,2250 

24  115 

0 

STCVL 

120 

5066 

REF 

5 

LAST 

709 

13,2251 

02223 

c 

OELVCV 

5067 

13,2252 

76  505 

c 

VXN 

VSLl 

V(NPAC)=CELTA  V IN  RFFCCSYS 

5068 

13,2253 

00015 

0 

1 2C 

5069 

13,2254 

776  5 5 

1 

VAC 

5C7C 

PCF 

IR 

LAST 

710 

13,2255 

00  00  7 

0 

VATT 

50  7 1 

13,2256 

0000  7 

0 

STCPE 

6 

V(PC6)=VATT  + DELTA  V 

5072 

13,2257 

77624 

1 

CALL 

PREVENT  hCULC-EF  USER  CF  CPPITAL 

5073 

REF 

24 

LAST 

707 

13,2260 

27412 

0 - 

INTSTALL 

INITEG  FRCM  INTERFERING  V.ITH  LPCATING 

5074 

13, 2261 

77624 

1 

CALL 

5075 

PEE 

1 

13, 2262 

26340 

1 

P76SLB1  ■ 

50  76 

13,2263 

53775 

1 

VICAC 

VSR* 

5077 

13,2264 

CCC07 

0 

6 

5C78 

13,2265 

57176 

0 

0,2. 

50  79 

REF 

9 

LAST 

7C5 

13,2266 

25  543 

1 

STCVL 

vcv 

5080 

REF 

7? 

L AST 

7 1'! 

13,2267 

coca  1 

0 

RATT 

5C81 

IT  ,2270 

77657 

0 

VS.R=i 

5082 

13,2271 

57176 

c 

0 ,2 

5083 

PEE 

in 

LAST 

7o5 

13, 2272 

1 5535 

0 

STOOL 

RCV 

5084 

REF 

19 

1 AST 

7ir 

13,2273 

03442 

0 

T IG 

5085 

REF 

10 

1.  AST 

705 

13,2274 

C 1 5 1 7 

0 

STORE 

TET 

5C86 

13,2275 

71214 

0 

CLEAR 

DLOAC 

5C67 

REE 

13 

1 AST 

707 

13,2276 

016  7 3 

1 

INTYFFL  G 

5088 

REF 

1 

13,2277 

0 1643 

1 

TETTHIS 

508  9 

REF 

38 

1 AST 

7 IL 

13,?3'i0 

34041 

0 

INTOTF  IS 

STCALL 

TDFC  1 

5090 

REF 

6 

LAST 

705 

13,2301 

27110 

1 

I NTEGRVS 

5091 

13, 2302 

77624 

1 

CALL 

5092 

REF 

25 

LAST 

710 

13,2303 

2741  2 

0 

INTSTALL 

5094 

13, 2304 

777  75 

1 

VLCAC 

50  = 5 

REF 

8 

1 AST 

704 

13 ,23'’' 5 

00017 

1 

RATTi 

5096 

RFF 

3 

LAST 

497 

1.3 ,2306 

0 1 5U  3 

0 

STCRF 

PPECT 

5097 

PEF 

1 1 

LAST 

7 10 

13,  23''7 

15535 

c 

STOOL 

RCV 

5C98 

REF 

13 

LAST 

70  5 

13 ,2310 

00015 

0 

TAT 

5099 

RFF 

1 1 

LAST 

7 U 

13,2311 

255  1 7 

L 

STCVL 

TET 

5100 

REF 

1 1 

LAST 

704 

13,2312 

00025 

0 

VATT  1 

5101 

n,?3l3 

77624 

1 

CALL 

5102 

REF 

2 

LAST 

497 

13,2314 

2 7 707 

1 

RIM  RECT 
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5103 

5104 
51C5 

REF 

27 

LAST 

68  1 

13.2315 

13.2316 

13.231 7 

77776 
C 5353 
04024 

1 

1 

0 

EXIT 

TC 

OCT 

PFASCFNG 

04024 

5106 

REF 

44 

LAST 

7C9 

13,2320 

C 55C4 

C 

TC 

U P F L A G 

51  37 

RFF 

1 

13,2321 

102  36 

r 

APRES 

rfintflg 

51C9 

PFF 

91 

1 AST 

709 

13,2322 

0 6042 

1 

TC 

I atpret 

5110 

13,2323 

77624 

1 

CALL 

5111 

REF 

1 

13,2324 

26662 

1 

A TCPCTH 

5116 

13,2325 

77531 

0 

SSP 

FX  IT 

5117 

REF 

"3 

LAST 

613 

13,2326 

CCC53 

.1 

CFPET 

5116 

REF 

1 

13,2327 

26332 

1 

OLT 

5119 

RRF 

161 

LA  ST 

709 

13,2330 

C 4616 

1 

TC 

BANKCALL 

PERMIT  USE  CF  ORBITAL  INTEGRATION 

512'> 

PEE 

1. 

13,2331 

27443 

1 

CADR 

I NTWAKFl 

5121 

1 i ,2332 

77776 

1 

OUT 

EX  IT 

512  5 

REF 

128 

1 AST 

70  1 

13,2333 

3 4755 

1 

EN0P76 

CAE 

ZERC 

5126 

REF 

5 

1 AST 

589 

13,2334 

55'462 

1 

TS 

MARKCTP 

CLEAR  RR  TRACKING 

WARK  CCUNTER 

5129 

REF 

18 

LAST 

68? 

1 3 ,2335 

1 6001 

1 

TCF 

GCTCFCOF 

5130 

13,2336 

C 1524 

c 

VF6NF4 

NV 

0684 

5131 

13,2337 

0144  1 

1 

NV 

0633 

513? 

1 3 ,2340 

43  174 

1 

P76SUE1 

AXT  ,2 

SET 

5133 

13, 2341 

00002 

r 

2 

5134 

REE 

11 

LAST 

70  5 

13,2342 

00063 

1 

MCCNFLAG 

SET  MEANS  MOON  IS 

SPHERE  CF  INFLUENCE. 

5135 

13,2343 

770  1 4 

1 

ecN 

AXT  ,2 

5136 

REE 

6 

LAST 

693 

13,2344 

04  303 

0 

C FCCAFLG 

SET  MEANS  PERN  CM 

STATE  IN  LUNAR  SPFERE. 

5137 

REF 

4 

LAST 

7 1 1 

13,2345 

00052 

0 

OFRET 

5138 

13,2346 

CCOOO 

1 

n 

5 139 

13,2347 

43414 

1 

CLEAR 

RVQ 

5U9  REF  12  LAST  711  13,2350  0C263  0 i^CrNFl  AG 
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pconi 

P0002 

ROOOA 

SLBPCLTINF  NAPE:  V82CALL 

PCCNC:G  DATE: 

PCD  EV:  PR  6AIPNSFATI-EP  LOG  SECTION: 

16  FEE 
R30 

67 

R0006 

R00H8 

RCCIO 

MOP  NC:  1 PCO  8V:  PR  eaiRNSFATFFP  CATE:  11  AFP  67  SPBO.l  CHANGED  TC  ALLCH 

MQC  NO:  2 '^QD  BY  ALONSO  DATE  : 11  DEC  67  VB82  FPCGRAm  REWRITTEN 

Pro  NC:  3 PCD  BY  ALCNSC  DATE:  26  PAR  68  PRGG  POD  TO  HANDLE  DIF 

MCNITOR  OFEPN 
EAPTH/MCCN  SCALE 

R0ni2 

R 101  3 

NEW  FUNFTinNAL  DESCRIPTION:  CALLED  BY  VERR  82  ENTEP.  PRICRITY  10 

LSEC  THRCUGHOUT.  CALCLLAJE  AND  DISPLAY  CRBITAL’  PAPAMETEPS 

ROOIA 
Ronis 
R'1'’l  6 

1 . IF  AVERAGE  G I ' CFF  : 

FLASH  DISPLAY  VCAN06.  R2  INDICATES  WHIPH  SHIP'S  STATE  VECTCR  IS 
TO  PE  UFCATED.  INITIAL  CHCICE  IS  THIS  SHIP  ( R 2=  1 ) . ASTRONALT 

POP!  7 
RlfUB 
POni  9 

CAN  CHANGE  TO  CTHER  SHIP  8Y,V22EXF,  kHEPF  X NPT  EQ  1. 
SELECTED  STATE  VECTCP  UPDATED  0Y  fHlSPREC  (CTHPREC). 

CALLS  SR30.1  (WHICH  CALLS  TFFCCNPU  * TFFFP/RA)  TO  CALCULATE 

Rn02n 
R002  1 
R0n27 

RPEP  (PERIGEE  PADILS),  RAPC  (APCGFE  RADIUS),  HFEP  (FEFIGEE 
HEIGHT  ABCVE  LAUNCH  PAr  OR  LUNAR  LANDING  SITE),  HAPO  (APOGEE 
HEIGHT  AS  ABOVE),  TFER  (TIPF  TC  FEPIGEE),  TFF  (TIMF  TO 

P1023 

RH02A 

R0025 

INTERSECT  30D  KPT  ABOVE  PAD  GP  35KFT  ABOVE  LANDING  SITE). 

FLASH  PGNITCR  V16N4A  (HAPC,  HFER,  TFF). TFF  IS  -59I«I59S  IF  IT  WAS 
NOT  COPPLTABLE , CTHFPWISE  IT  INCPEPENTS  CNCE  PER  SECOND. 

R002  6 
RG027 
R3028 

ASTRONAUT  HAS  CPTIGN  TO  MONITOR  TPER  BY  KEYING  IN  N 32  E. 
DISPLAY  IS  IN  hPS,  IS  NEGATIVE  (AS  WAS  TFF),  AND  INCREMENTS 
ONCE  PFR  SECOND  ONLY  IF  TFF  DISPLAY  WAS  -59N59S. 

Rf)029 

R0033 

2.  IF  AVERAGE  G IS  CN: 

CALLS  SR30.1  APPPCX  EVERY  TWC  SECS.  STATE  VECTCP  IS  ALWAYS 

ROOBI 

R003? 

R0O33 

FOR  this  vehicle.  V82  DOES  NGT  DISTURB  STATE  VECTOR.  RESLLTS 
OF  SP30.1  ARE  PARC,  PPER,  HAPC,  HPER,  TPER,  TFF. 

FLASH  PONITCR  V16NAA  (HAPC,  HPER,  TFF). 

R003  6 
R0037 

addendum:  HAPP  AML  HPFR  SHOULD  EE  CHANGED  TO  READ  HAPOX  AND  HPERX  IN  THE 
ABOVE  RFNAPKS. 

RO038 

GALLING  SEQUENCE:  VERB  62  ENTER. 

R0039 

R0040 

R3n4! 

S(;BRCUTINHS  CALLED:  SR3'i.1,  GOXDSPf 

PAVRE  - THISFREC  , CTHPREC,  LCACTIRF,  DELRSPL 
NCFYAL  exit  MODES:  TC  INDEXT 

ROOA2 

ALARMS:  NONE 

RO'IA? 

R0O44 

RCC45 

nuTPUT:  HAPOX  (-29)  M 

HPERX  (-29)  M 

RAFO  (-29)  M EARTH 

R10A6 

R00A7 

R00A8 

(-27)  M MOON 
RPFR  (-29)  M PAPTH 

(-27)  M MCCN 

R30A9 

R009C 

TFF  (-2B)  CS  CONTAINS  NEGATIVE  CLANTITV 

-TPER  (-28)  CS  rCNTAINS  NEGATIVE  QUANTITY 
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R0051 
R00  52 

ERASflELP 

IMTIAI  I 2ATICN  REOUIREC:  STATE 

VECTOR. 

R0053 

CEBR  TS; 

OPRET , 

, RCKE 

, VONE , TFF/RTRU , 

hfermn,  pfactep. 

V82FMFLG. 

RT054 

MAYBF : 

: TSTART82,  V82 

FLAGS, 

TOECl. 

OCSS 

REF 

3 

1 AST 

31.  5 

F4, 1517 

F8AAK= 

HAPOX 

0056 

31.2144 

BAN  K 

31 

0057 

REF 

2 

LAST 

44 

22,2000 

SETLCC 

R 3CL0C 

0058 

22 , 3242 

BANK 

0056 

REF 

2 

1 AST 

44  TO 

44  : 

4 

4* 

CCLNT>1- 

$$/R3(' 

CC6C 

REF 

92 

LAST 

7 1 1 

22,3242 

0 6042 

1 

V82CALL 

Tf 

INTPRET 

0061 

22,324’ 

52C14 

0 

BON 

GCTC 

006? 

REF 

2 

LAST 

229 

22,3244 

03  7 1 2 

c 

AAEGFLAG 

0C63 

REF 

1 

22 , 3245 

45465 

1 

V82GCN 

IF  AVERAGE  G CN 

0064 

RTF 

1 

22,  3246 

45247 

1 

V82GCFF 

IF  AVERAGE  G OFF 

0065 

22,3247 

77776 

1 

V82G0FF 

EXIT 

ALLCW  ASTRCAALT  TC  SELECT  VEHICLE 

0066 

RFF 

39 

LAST 

567 

22,3250 

3 4752 

0 

CAF 

Twr 

CESIREC  FOR  ORBITAL  PARAPETFRS 

0067 

REF 

1 1 

L AST 

34C 

22,3251 

55  'C50 

1 

TS 

OFTI CNX 

CALCUIATICA  AAC  OISPLAV. 

0C68 

REF 

81 

LAST 

655 

22,3252 

3 4753 

1 

CAF 

ONE 

0C65 

REF 

12 

LAST 

713 

22,3253 

c c 1 c 5 1 

c 

TS 

nPTlCAX  +1 

0070 

REF 

1 

22,3254 

3 33  16 

CAF 

OPTT  CNVN 

V C4  N C6 

0C7] 

REF 

1 E2 

LAST 

7 1 1 

22,3255 

0 4616 

i 

TC 

PANKCALL 

0072 

RFF 

8 

LAST 

6 1 1 

22,3256 

20334 

1 

CACR 

GCXDSFF 

0073 

REF 

40 

LAST 

706 

22,3257 

0 54  72 

0 

TC 

ENDEXT 

TEPPI AATF 

0074 

22,3260 

0 3262 

1 

TC 

+ 2 

PROCEED 

0075 

22,3261 

0 3254 

1 

TC 

-5 

CATA  IN.  CFTICM  + 1 = 1 FOP  THIS  VEHICLE. 

A0C76 

UNEG  1 FCP  CTHEF  VEHICLE. 

00  7 7 

REF 

29 

LAST 

607 

22 ,3262 

3 4 750 

1 

CAF 

B IT4 

80  PS 

0078 

REF 

30 

LAST 

653 

22,3263 

0 52  )3 

c 

TC 

WAITLIST 

0C7S 

R=F 

3 

LAST 

315 

F4, 1540 

EBANK= 

TFF 

0080 

REF 

1 

23,3264 

0343C 

c 

2CACF 

T ICKTEST 

0080 

REF 

1 

22, 3265 

44064 

n 

3081 

22 . ’266 

C 000  3 

1 

RFL  lAT 

11382 

REF 

1 

22, ’267 

3 3 3 20 

0 

V82G0FLP 

CAF 

TFFBANK 

PAJCR  RECYCLE  LCOF  ENTRY 

0CP3 

RTF 

20 

LAST 

678 

22 , 3270 

54  003 

0 

TS 

EBANK 

00  84 

P EF 

1 29 

LAST 

71  1 

22 ,3271 

3 4 7 5 5 

1 

CAF 

ZERO 

0085 

REF 

2 

LAST 

1 16 

22, 3272 

C C 1 C 0^  -J 

c 

TS 

V62FLAGS 

ZFFC  FLAGS  FCF  TICKTEST.  INHIBITS 

A0C86 

DECREMENTING  CF  TFF  ANC  -TPER. 

3087 

RFF 

6 

LAST 

293 

2 2 , 3 2 7 3 

’ 5C21 

1 

CAF 

PRI  C7 

3088 

REF 

25 

LAST 

70  3 

22,3274 

C 510  5 

0 

TC 

F INDVAC 

V82G0FF1  WILL  EXCCUTE  STATE.  VECTCP 

0089 

RFF 

4 

LAST 

71  3 

E4, 154C 

ERANK= 

TFF 

UPDATE  AND  ORBIT  CALCULATIONS  FOR 

0090 

REF 

1 

22, 3275 

0332  1 

1 

2CADR 

V82GCFF1 

SELECTED  VEHICLE  ABCUT  FRCFER  EDDY. 

0090 

REF 

1 

22,3276 

AA  )6A 

1 

000  2 


22,  3300 


C 0003  1 
3 C250  0 


PEL  lAT 

V£2STALL  CAP 


RF.P  20  LAST  60A 


THREE 


STALL  lA  THIS  LCOF  ANC  UITHCLC  V 16  N AA 


G4P: 
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PFF 

3 

LAST 

713 

22.3301 

7 1537 

C 

NASK 

V82FLAGS 

UNTIL  STATE  VECTOR  UPDATE  SETS  ONE  CF 

3094 

RTF 

218 

LAST 

676 

22,3302 

10  000 

0 

CCS 

A 

CLP  FLAG  PITS. 

QCS5 

RFF 

1 

22. 3 3 (.’3 

0 3310 

0 

TC 

FLAGGCN 

EXIT  FRCN'  STALL  LCOP. 

0094 

RFF 

7 

LAST 

680 

22, 33C4 

5 477  7 

1 

CAF 

ISEC 

0097 

RFF 

183 

LAST 

713 

22,3305 

0 4616 

1 

TC 

BANKCALL 

0098 

RFF 

10 

LAST 

68C 

22,3306 

01736 

1 

CACP 

CEL  AY  JOB 

0099 

PFF 

1 

22,3307 

C 3 300 

1 

1C 

V82STAL  L 

oino 

RFF 

1 

22,3310 

3 3 31  7 

1 

FLAGGCN 

CAF 

V 16N)4'4 

ROMTCR  FAFC  ,t-FEp,TFF. 

01  Cl 

RFF 

184 

LAST 

7 14 

22,33  1 1 

C 4516 

1 

TC 

PANKCALL 

0112 

REF 

P 

LAST 

713 

22,3312 

20334 

1 

CARP 

GfXDSFF 

01C3 

RPF 

1 1 

1 AST 

703 

22,3313 

0 5563 

1 

TC 

R5CFF 

TFRM  THIS  TELLS  TICKIEST  TC  KILL  ITSELF 

0104 

RFF 

12 

LAST 

7 1 A 

22,3314 

C 5563 

1 

TC 

B5CFF 

PPCCFEC  CITTC 

0105 

RFF 

1 

22,3315 

0 3267 

L 

TC 

VE2G0FLP 

RECYGLE  RECC»'FUTE  STATE  VECT  ♦ CISFLAY 

01C6 

22 ,3316 

01014 

0 

CFTIFNVN 

VN 

412 

010  7 

22,3317 

C4Q54 

1 

V 16N4A 

TN 

1 644 

0108 

RFF 

5 

LAST 

713 

22 ,3320 

02  140 

0 

T FFFANK 

f CAGR 

TFF 

0109 

REF 

c ^ 

LAST 

713 

22,3321 

C 6C42 

•1 

V82GCFF1 

TC 

INTFRET 

Olid 

22, 3322 

77634 

0 

RTB 

0111 

REF 

20 

LAST 

707 

22  ,3323 

21574 

1 

LCADTIME 

1112 

PFF 

39 

LAST 

71C 

22,3324 

00C41 

1 

STCPE 

TDECl 

TIRE  FCP  STATE  VECTOR  UPDATE. 

01  1 3 

PEE 

3 

LAST 

340 

22, 3325 

C2205 

1 

STGPE 

TSTART82 

TINE  FOR  INTERNAL  USE. 

0114 

22,3326 

77776 

1 

EX  IT 

1115 

REF 

13 

LAST 

712 

22,3327 

4 1C5  1 

0 

CS 

GF-'I  CNX  +1 

1 FCR  THIS  VEHICLE,  NOT  1 FCR  OTHER. 

0116 

RFF 

82 

LAST 

7 13 

22,3330 

6 4753 

1 

AO 

ONE 

0117 

22 , 3331 

C 0006 

1 

EXTEND 

0118 

PEF 

1 

22,3332 

1 3 35  f 

c 

BZF 

THI SSHI F 

0119 

RFF 

94 

1 AST 

■ 714 

22 ,3333 

0 6042 

1 

DT  HSH  IP 

TC 

INTPPET 

012n 

22,3334 

77624 

1 

CALL 

CALL  STATE  VECTOR  UPDATE  FOR  OTHER  SHIP. 

1121 

PFF 

3 

1,  AST 

710 

22,3335 

27044 

1 

OTHPREC 

012? 

22 , 3336 

77775 

1 

eCTHSHI F 

VLCAC 

MOVE  RESULTS  INTO  TFFCCMC  STCR/GE  AREAS 

0 123 

REF 

23 

LAST 

710 

22, 3337 

COCCI 

0 

RATT 

TC  BE  CALLED  BY  SR30.1. 

0124 

PEF 

11 

1 AST 

706 

22 ,3340 

26207 

0 

STOVL 

RONE 

RATT  AT  (-29)N  FCR  EARTH  CP  RCCN 

0125 

REF 

19 

LAST 

710 

22  ,334  1 

0000  7 

c 

VATT 

0126 

PEF 

■ 5 

LAST 

70  6 

22,3342 

022  15 

r 

STORE 

v':ne 

VATT  AT  (-7)N/CS  FTP  EAPTH  CR  N'OCN 

0127 

2? ,3343 

77743 

1 

CLOAD* 

>128 

RFF 

1 

22,3344 

73774 

1 

1 /RTYUE  ,2 

X2  IS  0 FOP  EARTH  CENTERED  STATE  VFC 

0129 

REF 

1 

22,3345 

00037 

0 

STORE 

TFF  /RTML 

X2  IS  2 FCP  NCCN 

0130 

22,3346 

77743 

1 

CLCArx-. 

AS  CEFT  BY  THISPPEC  OR  CTHPREC. 

0131 

REF 

1 

22,3347 

7241  1 

c 

NINPEPE  ,2 

0132 

REF 

7 

LAST 

1 16 

22,3350 

02201 

0 

STORE 

HPFRM  IN 

TFFPTML,  HPERNIN  ANC  PFAC7EM  ARE  ALC 

0133 

22  , 33  '=! 

46  135 

1 

SLCAC 

6HI  Z 

EAPTH/MrcNI  PARAMETERS  AS  SET  HERE. 

0134 

REF 

12 

LAST 

696 

22, 3352 

CC050 

1 

X? 

0135 

RFF 

1 

22,3353 

45^67 

1 

EARTHPAD 

0136 

22,3354 

7 7 6 5 0 

1 

GCTC 

0137 

REF 

1 

22, 335= 

4‘=373 

1 

PCGNFAD 
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913<? 

ORE 

95 

LAST 

71A 

22,335ft 

C 6CA2 

1 

ThI SSEI  P 

TC 

1 NT  FRRT 

0139 

22,3357 

7762A 

1 

CALL 

CALL  STATF  VEGTCR  UPDATE  FCR  TEIS  SLIP. 

01A(J 

PFF 

2 

LAST 

7C1 

22,33bC 

2 7 J69 

1 

TEl SPPEC 

OlAl 

22, 33fc  1 

77(50 

1 

GCTC 

OlA? 

REF 

1 

22,3362 

A5336 

0 

BOTHSEI P 

P H A3 

TEE 

FCLl OEI NG 

CONSTANTS  ARE 

PATRUISF 

INCEXED.  CC 

NCT  SEPARATE  PAIRS. 

01A6 

22,3363 

OOOOl 

0 

MINPFRM 

2DEC 

10668  B-27 

35  KFT  MN  PERIGEE  EEIGET  FCR  NCCM-27)E 

01A6 

22 ,336A 

11530 

1 

01  A7 

22,3365 

0C''C2 

C 

NINPERE 

2CEC 

91AA0  6-29 

300  KFT  (-29)AA  FOR  FARTE 

01A7 

22, 3366 

3123  J 

1 

01  AS 

22,3367 

A31A5 

0 

E ARTE  FAC 

CLCAC 

CLFGC 

RAC  37-8  RADIUS.  SCALED  AT  t-29)»'. 

01A9 

R Ef 

2 

LAST 

60ft 

22,3376 

06  3AQ 

c 

RFAO 

0150 

RFF 

1 

22,3371 

03635 

1 

VE2FEFLG 

INDICATE  EARTE  SCALING  FCR  SR30.1 

015  1 

REF 

1 

22,3372 

' 5 3 7 7 

c 

RCTHFAC 

J152 

22, 3373 

51575 

1 

MOONPAO 

VLCAD 

ABVAL 

rCNFUTE  NCCN  FAC  RADIUS  FPCE  RLS  VECTOR. 

0 153 

REF 

A 

LAST 

696 

22 , 33  7A 

02023 

1 

RLS 

SfALEC  AT  (-271M. 

01  5A 

22,3375 

77ft  lA 

1 

SET 

0155 

REF 

2 

L AST 

715 

22,3376 

03A75 

1 

VE2EEFLG 

INDICATE  RCFN  SCALING  FCR  SF30.I 

0 1 5ft 

REF 

2 

LAFT 

lift 

22  ,33  77 

36203 

0 

eCTHPAC 

STCALL 

RFADTEM 

)157 

REF 

1 

22, 3A0C 

A5  55  1 

1 

SP30.1 

CALCULATF  CRBITAL  PARANETEPS 

0158 

2? ,3A0  1 

A523A 

0 

RTB 

DSU 

0159 

REF 

2 1 

LAST 

71  ^ 

22 ,3A02 

2157A 

1 

LCACT  IME 

0160 

REF 

A 

LAST 

7 lA 

22, 3A03 

02205 

1 

T STAPT82 

PRESENT  TINE  - TINE  V82GCFF1  BEGAN 

0161 

RFF 

5 

LAST 

715 

22  ,3A'jA 

02205 

1 

STORE 

TSTAPT82 

SAVE  IT 

0 16? 

22.3A05 

53  1A5 

1 

CLCAC 

BZE 

SF30.1  SETS  -TPER=0  IF  EPER  L/ 

0163 

RFF 

2 

LAST 

30  7 

22, 3A  16 

021A3 

0 

-TPER 

HFERNIN  (300  CR  35)  KFT. 

016A 

RFF 

1 

22 ,3A'’7 

A5A2  1 

0 

T If KTFF 

(-TPER  = 0) 

»165 

??,3AK 

3 2 4,  5 

1 

TICKTPER 

CLCAC 

DAD 

(-TPEP  NCN  ZERO  TFF  1^AS  NCT  CCMPL7FC, 

0166 

REF 

3 

LAST 

715 

22 ,3A1  1 

021A3 

0 

-TPFR 

BLT  EAS  SET  TC  59N69S.CCNT  TICK  TEE,  CC 

0167 

REF 

ft 

LAST 

715 

23,3A12 

02205 

1 

TSTART82 

TICK  -TFER.  CISPLAV  ROTE. 

016B 

REF 

A 

LAST 

71F 

22, 3A1  3 

02  IA3 

0 

STORE 

-TPER 

-TRER  CCRRECTEC  FCR  TINE  SINCE  V82GCEF1 

0169 

22,'^AIA 

77776 

1 

EX  IT 

BEGAN. 

0170 

RFF 

3A 

LAST 

57f 

22, 3A15 

3 A753 

1 

CAF 

PITl 

0171 

RFF 

A 

LAST 

71A 

22, 3A16 

55 ' 537 

0 

TS 

V62FLAGS 

INFORNS  TICKTEST  TC  INCPENENT  CNLY  -TRER 

0172 

RFF 

105 

LAST 

fclO 

22  ,3A1 7 

0 5155 

') 

Tf 

FNCCFJOP 

0173 

22, 3A20 

^ 3 ^ A 5 

1 

TICK  TFF 

CLOAC 

DAD 

(-TPEP=0)  TFF  EAS  CC N F CT E C . T I C K TFF. 

017A 

REF 

6 

LAST 

71  A 

22,3A21 

02  lA  1 

1 

TFF 

DC  NOT  TICK  -TFER. DI SPLAY  TFF,  BUT  NCT 

017“= 

RFF 

7 

LAST 

7 15 

22 ,3A22 

C22C5 

1 

TSTART82 

-TRER  . 

0176 

REF 

7 

LAST 

715 

22, 3A23 

02  lAl 

1 

STFRE 

TFF 

TFF  CCRRECTEC  FOR  TJNE  SINCE  V82GCFF1 

017  7 

22 , 3A2A 

77776 

1 

EX  IT 

BEGAN  . 

0178 

REF 

37 

LAST 

655 

22, 3A25 

3 A752 

c 

CAF 

e IT2 

01  79 

RFF 

5 

L AST 

7 15 

22,3A26 

55*537 

0 

TS 

V82FLAGS 

INFCRNS  TICKTEST  TC  INCRFNENT  CNLY  TFF. 

0180 

REF 

1 T6 

LAST 

715 

22 ,3A2  7 

0 5155 

0 

Tf 

ENCCFJOB 

GAP 
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018  1 
0 18? 
0183 

PFF 

REF 

REF 

’1 

lA 

210 

LAST 

LAST 

LAST 

706 
706 
7 lA 

22,3830 
22  ,340  1 
22,3432 

3 4747 
7 10  4 3 
10  000 

1 

0 

0 

T ICKTEST 

CAF 

RASK 

CCS 

B IT5 

FXTVBACT 

A 

THIS  UAlUIST  FfiCGRAR  PERPETUATES  ITSELF 
CNCE  A SEC  UNTIL  BIT  5 OF  ExTVBACT  =0. 

01  EA 

PFF 

1 

22 , 3433 

0 3441 

0 

TC 

DCTICK 

0188 

REF 

o 

LAST 

595 

22,3434 

3 77  1 6 

c 

CAF 

PRTC25 

0166 

REF 

15 

LAST 

70  2 

22,2435 

C 5072 

1 

TC 

^CVAC 

TEPRINATE  V 82. CANT  CALL  ENCEXT  IN  RUFT. 

0 167 

REF 

1 f 

LAST 

716 

1043 

E8AAK= 

EXTVEACT 

)188 

RFF 

A 1 

LAST 

712 

22,3436 

05472 

c 

2CACR 

ERDEXT 

0168 

22,3437 

04062 

1 

0189 

REF 

2 1 

LAST 

702 

22,3440 

0 5 261 

1 

TC 

TASKCVER 

0 100 

PEF 

8 

LAS"P 

7 lA 

22,3  44  1 

3 A 7 7 7 

1 

COT! CK 

CAF 

1 SEC 

RE-REGUEST  TICKTEST. 

0191 

PEF 

31 

1 AST 

713 

22 ,3442 

n 5?'J3 

0 

TC 

waitlist 

019? 

RPR 

8 

LAST 

71  S 

E4,  154C 

EBAM<  = 

TFF 

0193 

RPF 

2 

LAST 

7 13 

22,3443 

C3430 

0 , 

2CADP 

TICKTEST 

0193 

22,3444 

44  0f>4 

0 

0 lOA 

REF 

21 

LAST 

7 13 

22, ’445 

3 62  50 

0 

CAF 

ThPEE 

C195 

REF 

6 

.LAST 

7 15 

22 ,3446 

7 1537 

0 

RASK 

V82FLAGS 

0196 

REF 

22G 

LAST 

7 16 

22  ,3447 

5C  000 

1 

INCFX 

A 

01  97 

22, 3450 

C 34  5 1 

1 

TC 

+ 1 

0198 

REF 

3? 

LAST 

716 

22,3451 

0 5261 

1 

TC 

TASKGVEP 

IF  NO  FLAGBITS  SFT  DONT  CHANGE  TFF  CR 

AO  199 

-TPEP,  BUT  continue  LOOP. 

0200 

PFF 

1 

22,3452 

C 3460 

0 

TC 

TFERTICK 

ONLY  BIT  1 SET.  INCP  -TPEP  EY  1 SEC. 

0 20  1 

REF 

c 

LAST 

7 16 

22,3453 

3 4777 

1 

TFFTI  CK 

CAF 

ISFC 

CNLY  BIT  2 SET.  INCP  TFF  BY  1 SEC. 

0202 

RFF 

99 

LAST 

702 

22,3454 

54  00  1 

1 

TS 

L 

0203 

PPF 

130 

1 AST 

7 13 

22 ,3455 

3 4755 

1 

CAF 

ZERO 

020A 

RFF 

9 

LAST 

716 

22  ,3456 

21' 541 

1 

CAS 

tff 

0205 

PEF 

33 

LAST 

7 16 

22, 3457 

C 5 26  1 

1 

TC 

TASKCVFR 

02C6 

RFF 

10 

LAST 

716 

22 ,3460 

3 477  7 

1 

TPERT  ICK 

CAF 

ISEC 

0207 

RPF 

100 

LAST 

7 16 

22,346  1 

54  CCl 

1 

TS 

L 

0?08 

REF 

131 

LAST 

716 

22,3462 

3 4755 

1 

CAF 

ZERO 

02C9 

PFF 

e 

LAST 

■7lf 

22,3463 

21  ' 543 

0 

CAS 

-TPEP 

0 210 

REF 

3A 

LAST 

7 16 

22, ?464 

C 526  1 

1 

TC 

TASKC\/F.R 
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3Z11 

22 ,3665 

7 7776 

1 

ve2GCN 

EXIT 

AVERAGF  G ON.  USE  CURRENT  STATE  VECTCR 

A0212 

FCP  fPenAL  PARAMETER  CALCULATIONS. 

0213 

RTF 

7 

LAST 

713 

22,3666 

3 5021 

1 

CAF 

PRI07 

LESS  THAN  LAMBERT 

• 21A 

REF 

26 

LAST 

7 1? 

22, 3667 

C 51C5 

C 

TC 

F INDVAC 

V82GCM  WILL  FERFCRM  ORBIT  C AL  C LL  A T ION  S 

9215 

RFF 

r> 

1 AST 

716 

F6,  1 56'7 

EBANK= 

TFF 

ABCLT  PRCPER  BCCY  APPRCX  CNCE  PER  SEC. 

021t 

REF 

1 

22 ,367C 

03503 

1 

2f  AFR 

V82GCM 

9216 

RFF 

1 

22,3671 

66066 

0 

0217 

22,3672 

0 0 90  3 

1 

REL  IN'T 

021P 

RFF 

6 

LAST 

c c ^ 

22  ,3673 

10  167 

1 

CCS 

NEW jce 

WITFOLD  V16  N'66  UNTIL  FIRST  ORBIT  CALC 

0219 

REF 

3 

LAST 

556 

22,3676 

0 5122 

0 

TC 

C HANOI 

IS  CCNE.  NCTE:  V82G0N1  (PRIC7,  FINCVAC 

A022C 

JOB)  IS  CCMFLETEO  BFECPE  \,82GCN  (FRIC7, 

A9221 

NCVAC  JCE) . 

0222 

RFF 

2, 

L AST 

7 16 

22,3675 

3 331  7 

1 

V82RECSP 

CAF 

V 1 6 N 6 6 

MOMTCR  FACC,  hPRR,  TFF 

9 22  3 

REF 

1 E5 

LAST 

71  6 

22 ,3676 

0 6616 

1 

TC 

PANKCALL 

9226 

RFF 

\C 

L AST 

7 IF 

22,-677 

2C336 

1 

CACR 

GfXDSFF 

9225 

REF 

13 

LAST 

716 

22 ,3500 

0 5 56  3 

1 

TC 

8 50FF 

TERM  THIS  TELLS  VE2GCM  TC  KILL  ITSELF. 

9226 

REF 

16 

LAST 

717 

22  ,35!1 

0 5563 

1 

TC 

05CFF 

PPCC  DITTO. 

0227 

RFF 

1 

22, 3 51'2 

0 36  75 

1 

TC 

VE2REDSF 

REGYC  1 E 

0228 

REF 

96 

LAST 

715 

■’2 ,35  13 

0 606  2 

1 

V82GQM 

TC 

INTRPET 

THIS  EXEC  PROGRAM  PFPPETLATES  ITSELF 

A0229 

CNCE  A SEC  UNTIL  BIT  5 OF  EXTVPACT  =0, 

0239 

22, 3596 

52175 

0 

VLCAD 

GOTO 

priDS  CFF  CCS  NEWJCB  BETWEEN  RN  ANC 

9231 

RFF 

6 

LAST 

7C6 

22 ,3505 

01220 

0 

RN 

VN  FETCH  SO  RN  , VN  ARE  FROM  SAME 

0232 

RFF 

1 

22,3506 

65507 

1 

N F X T L I N E 

STATE  VECTLF  UPDATE. 

0233 

RFF 

12 

LAST 

716 

22  ,35i>7 

262.-7 

n 

NIFXTL  INE 

STHVL 

RCNE 

RN  AT  1-29)M  RCR  EARTH  CP  MPCN 

0236 

REF 

6 

LAST 

7F6 

22,3510 

C1226 

c 

VN 

0235 

RFF 

6 

LAST  ■ 

716 

22,351  1 

022  15 

0 

STCRE 

VCNE 

VN  AT  (-71N/CS  FCR  EARTH  DR  MCCN 

0236 

22,3512 

52016 

0 

SON 

GCTO 

0237 

RFF 

6 

LAST 

705 

22,3513 

06306 

1 

»!CrNTHIS 

FLAG  INDICATES  BODY  ABOUT  WHICH  ORBITAL 

9238 

REF 

1 

22,3516 

65516 

1 

MCCNGCN 

CAICLLATICNS  ARE  TO  EE  PEPFCRMED. 

9 2 39 

RFF 

1 

22 , 3 5 1 5 

65527 

c 

EARTFGON 

IF  SET  - yorp)  , IF  RESET  - EARTH. 

0260 

22, ’ 5 16 

7 1 2 1 F 

c 

PCCNGCN 

SFT 

DL(  AO 

0261 

RFF 

3 

LAST 

715 

22,3517 

03675 

1 

V82EMFLG 

INDICATE  MCCN  SCALING  FCR  SR30.1 

0267 

REF 

1 

22,3520 

C6QQ1 

1 

1 /PTPLP 

LUNAR  parameters  LOADED  HERE  FCR  SR30.1 

0263 

REF 

2 

LAST 

7 16 

22, 3521 

16037 

c 

STOOL 

TFF  /RTN-l 

026-!. 

RFF 

1 

22 ,3522 

05366 

0 

P INPER*' 

9265 

REF 

3 

LAST 

7 16 

22, 3523 

262C1 

0 

STCVL 

HFFRMN 

0266 

RFC 

5 

LAST 

715 

22, 3526 

92023 

1 

RLS 

SCALED  AT  (-27)m. 

0267 

22,3525 

• 52066 

1 

APVA  L 

GCTC 

9268 

RFF 

1 

22,3526 

^5536 

c 

V82GCN2 

026C 

22,3527 

7 12  16 

0 

EARTFGON 

CLRAR 

CLOAD 

025f 

rff 

LAST 

717 

22 ,3530 

03675 

0 

V82EMFLG 

INDICATE  GARTH  SCALING  FOR  SR3C.1 

0251 

RC-F 

2 

LAST 

716 

22,3531 

0 6003 

0 

1 /RTfFLE 

EARTH  parameters  LEADED  HERE  FCP  SR30.1 

02‘=2 

REF 

3 

LAST 

717 

22 , 3532 

16037 

0 

STOOL 

tff/rtml 

9253 

REF 

2 

LAST 

71F 

22,353? 

C 5366 

1 

PINPEPE 

0256 

Rcp 

6 

L AST 

7 17 

22,3536 

1620  1 

0 

STCDL 

H PFRPIN 

9255 

R'^F 

3 

LAST 

715 

22,3535 

06  36.7 

0 

RPAC 

0256 

RFF 

3 

LAST 

7 15 

22,3536 

36203 

c 

\F2GCN2 

STCAll 

RFAOTEM 

CCMMON  CEDE  FDR  EARTH  E MCCN. 

0257 

RFF 

2 

LAST 

715 

22,3537 

65551 

1 

SR  30. 1 

i 
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0?58 

22, 3 56C 

77776 

1 

EXIT 

025C 

PEF 

32 

LAST 

716 

22,3661 

3 6 76  7 

1 

V82GCN3  CAF 

BITS 

0260 

PFF 

16 

LAST 

7 16 

22,3562 

7 1363 

0 

^ASK 

EXTVefiCT 

SEE  IF  ASTRONAUT  HAS  SIGNALLED  TERMINATE 

0261 

22,3563 

C C006 

1 

EXTEND 

0262 

PFF 

62 

LAST 

716 

22 ,3566 

1 56  72 

1 

EZF 

ENDEXT 

YES,  TERMINATE  VB  82  LCCP 

0263 

REF 

11 

LAST 

7 16 

22,3565 

3 6777 

1 

CAE 

1 SEC 

0266 

RFF 

1 36 

1 AST 

717 

22,3566 

0 6616 

1 

TC 

P ANKCALL 

WAIT  CNE  SECCNO  BEFCRE  REPEATING 

0 26  6 

PEF 

1 1 

1 AST 

716 

22 ,3567 

01736 

1 

CACP 

CEL AYJGP 

ORBITAL  PARAMETER  CCnFLTATICN. 

0266 

PEF 

2 

LAST 

717 

22,2550 

0 3 50  3 

1 

TC 

VE2GCM 

0267 

PEF 

1 

22,3561 

SFLRET 

V82GCN3 
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P0268 

R026P 

R0271 

SLPRCLTINE  NAPE:  '^P3D 

MOD  NO:  0 

PCD  BY:  RR  RAIPNSFATHEP 

.1 

CATE:  16  FEB  67 

ICC  SECTION:  P32 

P0273 

f/rn 

NC: 

1 

POD 

BY ; 

: BR  BAIRNSFATHER 

CAT  F: 

1 1 

AFP 

67 

SP30.1  CHANGED  TC  ALLCR  PCMTCR  CFEPN 

Rn27S 

PCD 

N'': 

2 

NOD 

BY: 

RR  BAIRNSFATHER 

CATE  : 

lA 

APR 

67 

ACC  OVFL  CK  FCR  PARC 

RC277 

PCD 

NC  : 

3 

prr 

BY 

Al  CNSC 

CATE: 

1 1 

CEC 

67 

SUBPCLIINE  RENRITTEN 

R0279 

•^DD 

NC: 

A 

NOP 

BY 

ALCNSC 

CATF  : 

26 

PAR 

68 

FfiCG  nqc  TC  HANDLE  DIF  EARTH/NCQN  SCALE 

P7781 

PCC 

NC  : 

S 

NOD 

BY; 

: RR  BAIRNSFATHER 

DATE: 

6 

AUG 

68 

CVFL  CK  FCR  HAFC  6 HPEP.VCICS  PCC  A2. 

PC263 

R)28A  MFR  FUNCTIONAL  DESCRIPTION:  ORBITAL  FARANETERS  DISPLAY  FCR  NOUNS  32  AND  AA. 

R0286  SR30.1  CALLS  T^FCCNNU  AND  tffPP/RA  TO  CALCULATE  RPER  (PERIGEE  RADIUS), 


R0287 
R0288 
pn2  3F 

RACC  (AFCGFF  RACILS),  KPCR  (PERIGFF  HEIGHT  APCVE  LAUNCH  PAC  CR  LUNAR 
IANCTNG  SITE),  FAPC  (APOGEE  HEIGHT  AS  ABOVE),  TFEP  (TIPE  TC  FFPIGEF), 
TFF  (TTPF  TC  tnTFFSFCT  3PU  KFT  ABCVF  PAC  CP  35KFT  ABOVE  1.  ANDING  SITF). 

R02  90 
R0291 
R0292 

IF  HPEP  IS  GREATFR  than  CR  ECLAL  TO  HPERPIN,  CAICLLATFS  TPER  AN C STCRES 
NEGATIVE,  IN  -TPFR.  fthERWISE  STORES  fO  IN  -TPER.  WHENEVER  TPER  IS 

CALCULATED,  TFF  IS  NCT  CCPFUTABLF  ANC  DEFAULTS  TC  -59M  IN  59SEC.  IF  FAPO 

R >293 

WOULD  EXCFEO  9999. S NM,  IT  IS  LIPITED  TC  THAT  VALUE  FCR  DISPLAY. 

R )29A 

ACCENCUP:  haft  ANC  HFER  SHOULD  EE  CHANCED  TO  READ  HAPQX  AND  HPERX  IN  THE 

R0295 

ABOVE  PFPAPKS. 

R0296 

CALLING  SEQUENCE:  CALL 

PT?F7 

P0298 

P">299 

SR  30.1 

SUPROLTINES  CALLED:  TFFCCNNL,  TFFPF/PA,  CALCTFEP,  CALCTFF 

NORMAL  EXIT  MODE:  CALLING  LINE  +1  (STILL  IN  INTERPRETIVE  MCCE) 

P C3C0 
RD3D1 
R13'1? 

ALARNF:  NCNT 

OUTPUT:  RAPO  (-29)  M FARTH  APOGEE  RADIUS  FARTH  CFNTEREC  CCCRC. 

(-27)  P)  MOON  PGDN  CENTERED  CCOPC. 

P 7 30  3 
R03TA 
RJ305 

RPRR  ' (-29)  M FARTH  PFRIGEE  RACILS  FARTH  CENTFREC  CCCFC. 

(-27)  P MCON  PCCN  CFNTEREC  CCCRC. 

HAFCX  (-29)  1 AFCC-EF  ALTITUDE  ABOVE  PAD  OR  LAND.  SITE  PAX 

VAILE 

LTPI7F0 

TC 

9999.9 

N P . 

R0307 

R03';')9 

R031D 

HPERX  (-29)  P PERIGFF  ALT.  ABCVE  PAD  CR  LANC.  SITE  PAX 

TFF  (-28)  CS  TIME  TO  300KFT  OR  3EKFT  ALTITUDE 

-TPFR  (-28)  (,S  TIPE  ^ c PERIGEE 

VALUE 

LIMITED 

TO 

9999. 9, 

NP  . 

RO  3 1 1 
R7312 

R03I  B 

RPASAELE  INITIAL  IZATICN  RFQLIRRC- 

TFF/PTPU  (+17)  EARTH  RECIPROCAL  CF  PROPER  GRAV  CONSTANT  FCR 

(+1A)  PCCN  EARTH  CR  "CCN  = 1/SCPT(PU). 

R‘'31A 
R031  S 
R0316 

PONF  (-29)  M STATE  VcCTCR 

VONE  (-7)  M/CS  STATE  VECTCR 

RPADTEP  (-29)  M EARTH  RADIUS  CF  LAUNCH  FAC  CR  LUNAR  LANCING 

R031  7 
R031  e 
R0319 

(-27)  ■■  MOON  SITE. 

HPERPIN  (-29)  P EARTH'  (300  CR  35)KFT  P IN  Imlp  PERIGER  ALTITUDE 
(-27)  P PCCN  ABCVe  LAUNCH  FAC  DR  LUNAR  LANCING  SITE. 

R'J320 

V82EMFLG  (INT  SW  BIT)  RESET  FOR  EARTH,  SET  PCR  PCCN. 

R032  1 

DEBRIS:  CPRET , FPL  , S2 

gap:  Rt:^isipnj  CF  AGC  PRCC-PAV  LU^lNfPY  EY  KflSA  2021112-071 


1S:C9  ^UG.  KISSI^G  .C53  PAGE  720 


R3C 


LSER'S  PAGE  NO. 


EA  S3 


03?2 

REP 

1 

COUNT’* 

$ $ /SR  30S 

032  3 

22  ,3551 

44001 

0 

SR30. 1 

SET  PC 

STO 

INITIALIZE  PUSEOCWN  LIST. 

032A 

22,3552 

0000  1 

0 

0 

032*5 

PEE 

7 

LAST 

613 

22,3553 

OO051 

0 

S 2 

f^l32f> 

SR30.1  INPUT:  RONE  AT  (-2918  EARTE/8CCN 

A0327 

VCNE  AT  (-718/CS 

4C3P9 

TFFCCNML,TFFRP/RA,CALCTPER  AFC  CAICTFF 

A )329 

CALLS  RECUIRE  : 

A'»33ri 

EARTH  CENTERED  ( NC  PESCAIIAG  FECUIFEC) 

A03^1 

RONE  scale:  to  B-29  8 

A '332 

VCNE  SCALEC  TC  E-7  M/CS 

A0333 

8CCN  CENTERED  (RESCALING  RFCLIRECl 

A0334 

RONE  SCALEC  TO  B-27  8 

A'J335 

VCNE  SCALEC  TC  8-5  8/CS 

0336 

22,3554 

77214 

0 

eCFF 

VLCAC 

0337 

REE 

5 

LAST 

717 

22,3555 

C3  7 55 

C 

V82E8FLG 

CFF  FCR  earth  , CN  FCR  MCON . 

:)3  3R 

REE 

1 

22,3556 

4 5 565 

0 

TFFCALl S 

0339 

REF 

1 3 

LA  ST 

717 

22,3557 

C2207 

0 

RCAE 

0340 

22, 356C 

7 7 7 5 2 

1 

VSL2 

0341 

REF 

14 

1 AST 

720 

22,3561 

25?  J7 

0 

STOVL 

RONE 

0342 

REF 

7 

LA  ST 

717 

22,3562 

02  2 1 5 

0 

\/CNE 

0343 

22,3563 

77752 

1 

VSL2 

0 344 

PEE 

8 

LAST 

720 

22  ,3564 

02215 

0 

STORE 

VCNE 

1045 

22,3565 

77624 

1 

T EEC  ALLS 

CAI  L 

0346 

R = F 

1 

22,3566 

5 7 361 

1 

TFFCCNMU 

0^47 

22  ,3567 

77624 

1 

call 

TFFRP/RA  CC8PLTES  RAFC.RPER. 

034R 

REF 

1 

22, ’5  70 

5 7 4 2 7 

1 

TFFRP/RA 

40349 

RETURNS  HTH  FAFC  TN  C(8FAC). 

0350 

22,3571 

7 7625 

c 

CSL 

0351 

REF 

4 

LAST 

7 17 

22, 3572 

02203 

1 

RPAOTEM 

0352 

22,3573 

64414 

1 

BOFF 

SR2R 

NEED  HAPC  AT  ( -2 S 1 8 FCR  DISPLAY. 

A1353 

IF  8CCN  CENTERED,  RESCALE  FRC8  (-271M. 

A0354 

IF  EARTH  CENTERED  ALREADY  AT  (-29)8. 

'355 

REF 

6 

LAST 

720 

22,3574 

03755 

0 

V82EMFLG 

OFF  FOP  EARTH  , ON  FCR  8CCN. 

0356 

22,3575 

4 5 5 76 

1 

+ 1 

0357 

22,3576 

77624 

1 

CALL 

IF  HAFC  > 8AXNR,  SET  HAFC  =9999.9  N8. 

0358 

PEE 

3 

LAST 

62C 

22,3577 

45636 

0 

MAXCHK 

CTHE-RWISF  store  (RAP0-RPACTE81  IN  HAPC. 

035S 

REF 

4 

LAST 

713 

22, 3600 

16  120 

0 

S70REAPC 

STOOL 

HAFCX 

C36C 

REF 

1 

22,3601 

07017 

1 

R PER 

0361 

22,3602 

7 7 6 2 5 

0 

CSL 

0362 

REF 

5 

LAST 

720 

22,3603 

02203 

1 

PFADTEM 

GIVES  HPFR  AT  I-2918  EARTH,  (-27)8  8CCN. 

0363 

R^F 

290 

LAST 

70  r 

22 ,3604 

00161 

1 

STORE 

WPAC  +4 

SAV'"  THIS  FCF  CC8PARISCN  TC  HPER8IN. 

0364 

22,3605 

64414 

1 

PCFE 

SR2P 

NEED  HFEP  AT  (-29)8  FCF  DISPIAY. 

A 0 36  5 

IF  8CCN  CENTERED,  RESCALE  FPC8  (-27)8. 

A0366 

IF  PARTH  CENTERED  AIREACY  AT  (-29)8. 

0367 

REF 

7 

LAST 

720 

22 , 3506 

03  755 

0 

V82EPFLG 

CFF  FCP  FAPTH,  CN  FCR  8CCN. 

C36fl 

22,3607 

45610 

1 

+ 1 

0369 

22,3610 

77624 

1 

CALL 

IF  HPER  > 8AXN8,  SET  HPER  = 9999.9  NM. 

0370 

REF 

4 

LAST 

7 20 

22,  361  1 

45636 

7 

*'AXCHK 
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0371 

PFF 

2 

LAST 

315 

22,3612 

16122 

1 

STCRH  PFP 

STCCL 

HPRRX 

STCFE  (RfEP  - FPACTEMl  INTO 

FPERX . 

13  72 

PEF 

291 

LAST 

720 

22,3613 

10  16  1 

1 

MPAC  +4 

1373 

22 , 3614 

51025 

1 

CSU 

BPL 

FPERMIN  at  (-29)M  FDR  EARTH, 

(-271M  MOON 

0374 

PFF 

C 

1 AST 

717 

22,3615 

02  2 1 1 

0 

HFEPMN 

IF  FFEF  L/  FFERVIN  (300  OR 

35  IKFT  , 

0375 

RE'= 

1 

22,3616 

45622 

0 

DOTPER 

THEN  ZERC  INTC  -TPER. 

0376 

22,3617 

52145 

c 

CLCAC 

GCTC 

CTFEPInISE  CALCLLATE  TPER. 

0377 

REF 

4 

LAST 

596 

22, 3620 

06524 

1 

H16ZER0S 

C37R 

OFF 

1 

22,362  1 

45626 

1 

SK  IPTFER 

1379 

22,3622 

45145 

r 

COTPER 

CLCAC 

CALL 

•I3R0 

PFF 

2 

LAST 

7?n 

22, 3623 

00017 

1 

RFFR 

0381 

OFF 

1 

22  ,3624 

57465 

1 

CALCTPEP 

0 38  2 

22,3625 

77676 

0 

CCCPF 

TPER  IS  PUT  NEC  TNTC  -TPER. 

03R3 

PFF 

6 

LAST 

716 

22  ,3626 

16  143 

0 

SK JPTPER 

STOCL 

-TPER 

03R4 

PEF 

6 

LAST 

721 

22,3627 

02201 

0 

HPERMN 

FPERMIN  AT  (-291M  FOR  EARTH, 

(-271M  MOON 

0385 

22, 3630 

45015 

1 

DAD 

CALL 

0386 

RPF 

6 

LAST 

720 

22 ,3631 

022')3 

1 

P PADTFM 

RPACTEM  AT  (-2SIM  FGP  EARTH, 

(-271P  PCCN 

9387 

R FF 

1 

22,3632 

5747C 

0 

CALCT  FF 

GIVES  59P59S  FOR  TFF  IF  RPER 

G/ 

0388 

22,3633 

77676 

0 

DCOPF 

FPFRPIA  + PFADTEM.  (TFFP  WAS  NCN  ZERC) 

0389 

REF 

1 1 

LAST 

717 

22,3634 

36141 

0 

STCALL 

TFF 

CTFEPWISF  CCMPUTFS  TFF. 

(GCTC ) 

039f| 

REF 

,8 

LAST 

72f 

22,3635 

0005  1 

c 

S2 

0391 

22 ,3636 

51025 

1 

MAXCFK 

rsu 

6PL 

IF  C(PPAC)  > 9999. 9 NP,  MFAC 

= 9999.9  NP 

039? 

REF 

1 

22,3637 

05646 

c 

PAXNP 

0393 

22, 3640 

45643 

1 

+ 3 

CTFFPWISF  C(PFAC)  = 6(PFAC). 

C394 

22,3641 

43415 

0 

CAD 

RVC 

0395 

REF 

2 

LAST 

72  1 

22,3642 

05646 

c 

PAXNP 

0396 

22,3643 

43545 

1 

+ 3 

DLCAD 

RVO 

(LSFD  e\  P30  - P37  ALSO 

0397 

REF 

3 

LAST 

721 

22,3644 

05646 

0 

PAXNM 

0398 

22,3645 

01065 

0 

PA  >NM 

20CT 

01C65  05603 

22,3646 


C398 


05603  1 
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OCOl  36,7''i2A  BANK  3t 

0012  REF  3 LAST  AG  36,?C0C  SFTLCC  R40S 

0003 36.2024 BANK 

0CG4  PPF  2 LAST  f53  F7.1455  EBANK=  WFICF 

0009  PEE  3 LAST  40  TO  40;  2 20*  CCUM*  1$/P4C 

P0006 TFF  MASTER  IGMTIGN  PCUTINF  IS  CESIGNEC  FCR  USE  BY  THE  FOLLCUING  LFR  PPCGRANS:  F12,  F40,  E42  , P61  , P63 . 

ROOOB  TT  PFRPORMS  ALL  FUNCTIONS  TmpeOIATELY  ASSGCIATpc  kITF  APS  CR  FFS  IGMTIGN:  IN  PARTICULAR,  EVERVTFING  LYING 

ROOKi  PRTwEEN  TFE  PFF-IGMTIOH  TINE  CHECK  — ARE  WF  F>ITHIN  45  SFOONDS  CF  TIG?  --  ANC  TIG  + 26  SECCNCS,  RHEN  CPS 

R0C12  PRGGPAPS  THROTTLE  UP. 

ROOM  VAPIATICNS  AMONG  PROGRAMS  ARE  ACCCMOnATEC  EY  MEANS  GF  '^AeLES  CCNTAIMNG  CCNS7ANTS  (FOR  AVEGEXIT,  FCR 

R0015  V>AITLTST,  for  PINPALL)  ANC  TCP  INSTRUCTIONS.  USFRS  PLACE  THE  ADRF5  CF  THE  HEAP  OF  THE  APPRCPPIATF  TAELE 

P0H17  (OF  P61TABLE  FOP  F61LM,  FCR  EXAMPLE)  IN  ERASABLE  REGISTER  'WHICH'  ( E4  ) . tro  IGMTICN  ROUTINE  THEN  INDEXES  BY 

ROfiiP  WHICH  TO  OBTAIN  OR  EXECUTE  THE  PRCP'^R  TABLE  ENTRY.  THE  IGNniCN  RCLTINE  IS  INITIATFC  BY  A TCP  BLRNBAEY, 

R0021  THRCLGH  BANKJUMP  IF  NECESSARY.  THERE  IS  NO  RETURN. 


R0022  the  MAStfR  IGMTICN  polTINE  WAS  CCNCEIVEC  ANC  EXECLTEC,  ANC  (NCTA  GENE)  IS  MAINTAINED  BY  ACLER  AND  EYLES. 


R0O24 


HON  1 son  CLI  MAI  Y PFNSE 


ROU25 

POQ26 

P0C27 


TABLES  FOR  THE  IGMTICN  RCLTINE 


R002H  NCL!  £F  TANGFRF 


0029 

36, 2'^24 

01512 

0 

P12TA8LF  YN 

0674 

(0  ) 

0030 

REF 

1 

36,2025 

1 2327 

1 

TCF 

ULLGNCT 

( 1 ) 

00  31 

RFF 

1 

36,2026 

1 2616 

r 

TCF 

CCMFAIL3 

(2  ) 

OJ32 

Pf  F 

1 

36, 2027 

1 3066 

0 

TCF 

GCCUTCFF 

(3) 

00^3 

RTF 

“ c 

LAST 

716 

36 ,2C30 

1 5261 

0 

TCF 

T ASKCVER 

(4  ) 

0034 

REF 

1 

36,2021 

1 2 1 5 C 

c 

TCF 

P12  SFCT 

(5  ) 

0035 

36,2032 

00030 

1 

DEC 

0 

(6) 

NC  ULLAGE 

0026 

RFF 

4 

LAST 

723 

■■7,  1455 

EBANH= 

WH  ICH 

003  7 

CFF 

1 

36, 2033 

0 2 76  1 

1 

2CADP 

SERVE  XI T 

(7) 

CC37 

REF 

1 

36, 2C34 

64067 

1 

0038 

1 

36, 20.35 

1 2402 

1 

TCF 

niSPCHNG 

(11  ) 

0039 

RFF 

1 

36,2036 

1 2567 

0 

TCF 

WAI TABI T 

(12) 

0040 

RFF 

1 

36 ,2037 

1 2575 

0 

TCF 

P 12 IGN 

( 13  ) 

Ra043 

0C44 

36 , 2040 

0145C 

1 

P40TAELF  VN 

0640 

(f  ) 

0045 

REF 

2 

LAST 

723 

36, 2041 

1 2 2 27 

1 

TCF 

ULLGNCT 

(1  ) 

0046 

REF 

1 

36, 2042 

1 2620 

0 

TCF 

C CMFA 1 L4 

(2  ) 

0C47 

R = F 

1 

36,2043 

1 3053 

0 

TCF 

GCPCST 

( 3 ) 

0048 

Rt^F 

36 

LAST 

722 

36, 2C44 

1 526  1 

c 

TCF 

TASKCVFR 

(^1 

0049 

RFF 

1 

36,2045 

1 2150 

0 

TCF 

P40SPCT 

(5) 
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0090 

36,2046 

C4300 

C 

CFG 

2 240 

(6  1 

0051 

REF 

1 

E6,  1422 

EBANK= 

OYEGAQ 

0052 

REF 

1 

36,2047 

03672 

1 

2CACP 

STEERING 

( 7 1 

0052 

REF 

1 

36, 2C5C 

74066 

1 

0C53 

RFF 

1 

36,2)51 

1 2372 

1 

TCF 

P40SJLNK 

(11) 

0054 

REF 

2 

1A5T 

722 

36,2052 

1 2 56  7 

C 

TCF 

WAITAEIT 

( 12  ) 

0055 

RFF 

1 

36,2052 

1 2510 

C 

TCF 

P40IGN 

(13) 

CC56 

RFF 

1 

36 ,2054 

1 3127 

1 

TCF 

REP4CAI M 

(14) 

R005B 

0060 

RRF 

1 

36,2055 

1 2153 

0 

P41TABLE  TCF 

P41SPCT 

( 5 ) 

006  1 

36  ,2056 

77776 

1 

EEC 

-1 

(6  ) 

006? 

REF 

c 

LAST 

724 

T6, 1 422 

EBANK= 

OPEGAC 

0063 

RFF 

1 

36,2057 

03402 

1 ' 

2CACR 

C ALCN65 

(7) 

0063 

RRF 

1 

36, 2060 

74066 

1 

0064 

RFF 

1 

36, 206  1 

1 2404 

1 

TCF 

C CPPCN 

(11) 

CC65 

RFF 

1 

36,2062 

1 25  73 

0 

TCF 

T IGTASK 

(12) 

R0066 

0067 

36,2063 

01450 

1 

P42TA8LE  VN 

0 6 40 

(C) 

0068 

RFF 

1 

36,2064 

1 2 324 

1 

TCF 

WANTAPS 

( 1 ) 

0069 

REF 

2 

LAST 

723 

36, 2C65 

1 2620 

0 

TCF 

CCPFAIL4 

(2  ) 

CC70 

REF 

2 

1 AST 

723 

36,?066 

1 3053 

0 

TCF 

GOPOST 

( 3) 

0071 

REF 

37 

1 A ST 

723 

36,2067 

1 5261 

c 

TCF 

TASKGVER 

(4  ) 

0072 

REF 

1 

36, 2-:i7P 

1 2 150 

0 

TCF 

P42SPCT 

(5) 

0073 

36,2071 

05120 

1 

EEC 

2640 

(6) 

00  74 

RFF 

■a 

LAST 

724 

E6,  1422 

' 

E6ANK= 

ONEGAC 

0075 

REF 

2 

LAST 

724 

36,2072 

0367? 

1 

2CADR 

STEERING 

(7) 

0075 

36,2C73 

74G6t) 

1 

0076 

REF 

2 

LAST 

•724 

36, 2C74 

1 2372 

1 

TCF 

F40SJLMK 

( 11  ) 

0C77 

REF 

3 

LAST 

724 

36,2075 

1 2 567 

0 

TCF 

WAITABIT 

( 12) 

0078 

RFF 

1 

36 , 2076 

1 2545  C 

TCF 

P42 IGN 

( 13  ) 

0079 

OOPl 

REF 

1 

36, 2077 

1 3424  I 

TCF 

P42STAGE 

(14) 

008? 

^6,21CC 

C1476 

0 

P63TAELE  \,l' 

U662 

(0  ) 

J083 

REF 

3 

LAST 

723 

36,21''l 

1 2327 

1 

TCF 

ULl GNOT 

( 1 ) 

0CP4 

RFF 

2 

LAST 

723 

36,2102 

1 2616 

(1 

TCF 

CCPFA  IL3 

( 2 ) 

0085 

RFF 

1 

36, 2103 

1 3003 

t 

TCF 

V99PECYC 

(3  ) 

0CP6 

REF 

38 

LAST 

724 

36,3104 

1 526  1 

■J 

TCF 

TASKOYER 

(4) 

0C67 

REF 

1 

36,2  105 

1 2153 

C 

TCF 

P63SFCT 

(5  ) 

0088 

36,  21  )6 

04300 

0 

DEC 

2240 

(6) 

0C89 

REF 

6 

LAST 

72  3 

E7 ,1455 

FEANK= 

WFICH 

0090 

REF 

2 

LAST 

723 

36,2107 

0376  1 

1 

2CADR 

SERVEX IT 

(7  ) 

0090 

36,2110 

64067 

1 

OOOl 

orp 

2 

LART 

723 

36,7111 

1 2402 

1 

TCF 

CISPCFNG 

(11) 

009? 

RFF 

4 

LAST 

724 

36,2112 

1 25  6 7 

TCF 

WAITABIT 

(12) 
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0093 

R0096 

REF 

1 

36,2112 

1 2464 

1 

TCF 

P63  IGN 

(13) 

0112 

36,2114 

01477 

1 

AERTAELF  VN 

0663 

(0) 

0113 

RFF 

4 

LAST 

724 

36,2115 

1 2327 

1 

Tf  F 

LLLG^GT 

( 1 ) 

0114 

RFF 

3 

LAST 

724 

36,2116 

1 2616 

C 

ICF 

CCNFAIL3 

(2) 

0115 

R-^F 

2 

LAST 

723 

36,2117 

1 3066 

c 

TCF 

GCCUTCFF 

( 3 ) 

0116 

REF 

•’9 

LAST 

724 

36. 212C 

1 526  1 

0 

TCF 

TASKCVER 

(4  ) 

on  7 

36,2121 

12  122 

0 

Nnop 

(5  1 

one 

36,2122 

12  123 

1 

NCCF 

( 6 1 

0119 

36,2  123 

12  124 

c 

NCCF 

(7  ) 

0120 

36,2124 

12  125 

1 

NOOP 

0 121 

PEF 

■2 

LAST 

724 

36,2125 

1 2 40  2 

1 

TC  F 

D ISPCFNG 

(11) 

0122 

REF 

5 

LAST 

724 

36,2126 

1 2 56  7 

c 

TCF 

WAITABIT 

(12) 

0123 
PO  126 

REF 

1 

36,2127 

1 2535 

1 

TCF 

ABRTIGN 

(13) 

P0127 

RQI20 

GENEFAL 

FUPPCSE 

IGMT  ICN 

. RCUTINFS 

PU129 

0130 

PEF 

28 

LAST 

71  1 

36,2130 

0 5353 

1 

EURNEAEV 

TC 

PEASCI-MG 

GPCLP  4 RESTARTS  FERE 

0131 

36,7131 

0 4 024 

r 

FCT 

04024 

0132 

RFF 

132 

1 AST 

716 

36, 2 1 32 

3 4 7 55 

1 

GAF 

ZEPC 

EXTIPFATF  JUNK  LEFT  IN  EVTOT/sl 

0133 

RFF 

4 

LAST 

3 16 

36,2133 

55' 507 

0 

TS 

OVTCTAL 

0134 

REF 

C 

LAST 

725 

36, 2134 

55'51C 

0 

TS 

DVTCTAL  +1 

0135 

PEF 

187 

L AST' 

718 

36,2135 

0 4616 

1 

TC 

B ANKCALL 

FAnAUTC  NLST  EE  GANKCALLEC  EVEN  FRCP  ITS 

0136 

PEF 

1 

36,2136 

737J7 

0 

CACR 

P40AUTa 

OWN  BANK  TC  SET  UP  RETURN  PROPERLY 

1141 

36,2137 

C 0 0 6 

1 

B*RNB*B* 

EXTEND 

0142 

REF 

20 

LAST 

710 

36,2140 

3 1442 

1 

CCA 

TIG 

STORE  NCPINAL  TIG  FOR  CSLATENESS  CCNF. 

0143 

PEF 

2 

LAST 

148 

36,2141 

53' 512 

1 

CXCH 

GCRLTT  PR 

ANC  FCR  F70  OP  P71. 

0173 

36, 2 142 

0 0004 

0 

IKHIM 

0174 

REF 

24 

LAST 

•^56 

36,2143 

0 46  74 

0 

TC 

1 BNKCALL 

0175 

RFF 

1 

3 A 1 2 1 ^ A 

75  57C 

1 

CACP 

ENGINCF3 

C176 

36,2145 

0 0003 

1 

PEL  INT 

0179 

REF 

6 

LAST 

724 

36,2146 

51 ' 455 

1 

INCEX 

WR  ICF 

01  80 

36,2147 

1 0005 

c 

TCF 

5 

01  P2 

REF 

? 

LAST 

723 

36,2150 

P42SFCT  = 

P40SF0T 

( 5 1 

0183 

RFF 

3 

LAST 

725 

36.215C 

P12SFCT  = 

P40S  FCT 

(5  ) 

0185 

0186 

RE  = 

pcp 

2 

1 

LAST 

724 

36.2153 

36,2150  4 4762  1 

P63SPQT  = 
F40SFCT  CS 

P41SP0T 

CNTDNCFx 

(5) 
( 5 ) 

IN  P63  CLCKTASK  ALPEACY  GOING 
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018A1 

BPF 

188 

LAST 

725 

36,2151 

0 4616 

1 

TC 

bankcall 

MLST  BE  BAAKCALLEC  FCP  GEAEFALIZEC 

01862 

R9F 

1 

36,2152 

7467C 

0 

CACP 

STCLCK2 

RETURN 

0187 

RPF 

97 

LAST 

717 

36,2153 

0 6042 

1 

F41SPCT 

TC 

INTPPET 

(5  ) 

01  E71 

36 ,2154 

45345 

1 

CLOAC 

OSU 

0188 

REF 

2 1 

LAST 

72  I 

36, 2 155 

03442 

C 

TIG 

0180 

RTF 

1 

36,2156 

35  147 

0 

D29.9SEC 

C18P1 

ppp 

40 

LAST 

714 

36 ,2157 

34041 

0 

STCALL 

TCFCl 

01892 

PPF 

1 

36,216C 

61C7  1 

r 

I MTCCUF 

0190 

36, 2161 

45014 

0 

BOFF 

CALL 

0191 

RFF 

■a 

LAST 

706 

36,^62 

03347 

1 

WUNFLAG 

0192 

PPF 

1 

36,2163 

74202 

1 

GCMCAV 

0193 

PEF 

5 

LAST 

704 

36,2164 

27344 

1 

C SMPREC 

0194 

36,2lo5 

64375 

1 

VLCAC 

yxv 

0195 

REF 

12 

LAST 

710 

36, 2166 

000  2 5 

fl 

VATTl 

0196 

RFF 

20 

LAST 

707 

36,2167 

01  734 

0 

REFSMMAT 

0197 

36, 2 17C 

7 7 762 

1 

VSRl 

0198 

RFF 

3 

LAST 

70  6 

36,2171 

25726 

0 

STCVL 

V (CSM 

CSM  VELCC ITV  - M/CS*2 ( 7 1 

0199 

PEF 

9 

LAST 

71C 

36,2172 

0001  / 

1 ' 

R ATT  1 

02  10 

36,2173 

643  12 

0 

\/Sl4 

y XV 

02‘  1 

PEF 

21 

LAST 

726 

36 ,2  174 

CU  734 

0 

R EFSPRA  T 

0202 

R :F 

3 

LAST 

706 

36,2175 

3 5 72'J 

1 

STCALL 

R (CSM  1 

CSM  FCSITION  - M*2( 24  ) 

0203 

REF 

1 

36, 2176 

6 7 C 6 7 

1 

PLAGPAV 

02C4 

pff 

2 

LAST 

121 

36,2177 

1631  7 

0 

STOOL 

G (CSM  ) 

CSM  GRAVITY  VEC.  - M/CS*2(7) 

02042 

RFF 

14 

LAST 

7 1C 

3 6 , 2 2 0 C 

OOC15 

p 

TAT 

02  '44 

RFF 

41 

LAST 

726 

36,2201 

■300  4 1 

1 

STORE 

TDEC  1 

RELCAC  TCECl  FCR  MDTCAV. 

02'’5 

36,2202 

77624 

1 

GCMCAV 

CALP8 

0206 

REF 

1 

36,2203 

2755  5 

1 

MIDTCAVl 

C207 

REF 

1 

36,2?  )4 

1 22  13 

1 

TCP 

CALLT-35 

MACE  IT  lA  TIME. 

0209 

36 , 2205 

C CCQ6 

1 

EXTEN'C 

TIG  WAS  SLIPPEC,  SO  RESET  TIG  TO  29.9 

0209 

REF 

3 

LAST 

196 

36,  22  '6 

3 1561 

1 

OCA 

PI PTI ME  1 

SECCACS  AFTER  TFE  TIME  TO  WFICF  WF  C ID 

0210 

PEF 

27 

LAST 

726 

36,2207 

53*442 

0 

CXCF 

T IG 

INTEGRATE. 

0211 

36, 221C 

0 0006 

1 

EXT9AD 

02)2 

PEF 

2 

LAST 

•726 

36,2211 

3 3147 

0 

CCA 

D29.9SEC 

0213 

RFF 

23 

LAST 

726 

36,2212 

21 • 442 

0 

CAS 

T IG 

0214 

REF 

292 

LAST 

721 

36,2213 

52  155 

1 

CALLT-35 

CXCH 

MFAC 

0215 

REF 

5 

LAST 

24  1 

36,2214 

53  ' 5 lO 

1 

CXC  F 

SAVET-3C 

OELTA-T  LNTIL  TIG-3C 

0216 

36,2215 

C C0C6 

1 

EXTFAC 

0217 

RFF 

1 

36, 221f 

4 376  2 

c 

DCS 

5 SrCDF 

0218 

RFF 

6 

LAST 
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36,2217 

21 ' 51  ) 

1 

CAS 

S AVFT-30 

OELTA-T  LNTIL  TIG-35 

■3219 

36,2220 
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1 

EXTEAO 

022'' 

RFF 

7 
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36,2221 

3 1501 

0 
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RFF 

Q 
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0 5277 

0 

TC 
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RFF 

17 

1 AST 
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F7 , 1453 
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0223 

RFF 

3 

LAST 

241 

36,2223 

02242 

1 

2CACR 
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02  2 3 

36,2224 

74167 

0 

>1224 
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29 
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0 5 3 5 3 
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1 
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63 
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36. 22’1 

1 5155 

1 

TCF 
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NCT  P63 

0229 

RFF 

2 

LAST 
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36,2232 

4 4762 

1 

CS 
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P63  can  START  OISFLAYING 
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RFF 

C 

LAST 
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36,2233 

55' 162 

1 

TS 

C ISPCEX 

0231 

PPF 

SB 

LAST 
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36,2234 

0 6042 

1 

K 
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0232 

36,2235 
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1 
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0233 

RFF 

7 

LAST 
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36,2236 

03553 

1 

VM 

0234 

RFF 

4 
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3 16 

36,2237 
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r 

STORE 

ABV=L 

IMT1ALI2E  AEVEL  FGP  P63 

C ISPL  AY 

0235 

36,2240 

77776 

1 

FX  IT 

1236 

RP^F 

lOfi 

LAST 

727 

36,2241 

1 5 155 

1 

ICF 

EADCF JCE 

R0237 

0238 

RFF 

1 

36,2242 
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1 

T lG-35 

CAF 

5SEC 
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RFF 

9 

LAST 
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36, 2243 

0 5173 

1 

K 

TMDCLE 
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2 

LAST 
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36,2244 
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0 
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RPF 
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LAST 
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36,2245 
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1 
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REF 
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1 
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RFF 
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LAST 
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36,2250 
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1 

T S 

DISPCEX 
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PCf. 

7 
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725 

36,2251 

51  '455 

1 
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WFICH 

0246 

36,2252 

4 0CC6 

0 

CS 

6 

CHECK  ULLAGE  TIMf. 

0247 

36,2253 
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1 

EXTEND 

0246 

RFF 

40 

1 AST 

725 

36,2254 
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1 

EZMF 

TASKOVER 

0249 

REF 

1 
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3 3151 

1 

CAF 

4 .9SEC 

SET  UF  TASK  TC  RESTORE  CISPLAY  AT  TIG-30 
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PFF 

10 

LAST 
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1 

TC 

Tl«TDOLE 
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REF 
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0 
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1 
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0254 

RFF 

18 

LAST 

726 
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0 
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LAST 
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1 
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** 
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1 

36 , 2300 

3 3150 

0 

TIG-30 

CAF 

S29.9SEC 
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LAST 

727 
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1 
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RFF 

3 
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1 
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RFF 

3 
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727 

36,2303 
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1 

CS 
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RFF 

7 

LAST 
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1 

’ 

TS 

01 spcex 
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REF 

8 

LAST 
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36,2305 
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1 
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1 

CAF 

6 
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36, ?3G7 
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1 

EXTEND 

0277 

P'^F 

5 

LAST 

725 

36,23  10 
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0 

eZMF 

ULl  GNOT 

DON'T  SET  UP  ULLAGE  IF  DT  IS  NEG  CR  ZERC 

0278 

RFF 

P 

LAST 

726 

36,2311 

55' 977 

0 

TS 

SAVET-30 

SAVE  CELTA-T  FOR  RESTART 

0279 

REF 

12 

LAST 

726 

36,2312 

0 5173 

1 

TC 

TNI  DOLE 

0200 

RFF 

2 

LAST 

239 

36,2313 

02350 

0 

ACRES 

ULLGTASK 

0281 

RFF 

22 

LAST 

7 16 

36,2319 

3 6250 

0 

CA 

THREE 

RESTART  FRCTECT  ULLGTASK  (1.3SPCT) 
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REF 
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LAST 

716 

36  ,2315 
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1 

TS 

L 

0283 

REF 

23 

LAST 

726 

36,2316 

9 625C 

1 

CS 

TFPEF 

0289 

RFF 

3 
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36,2317 

52  752 

c 

DXCH 

-PHASF 1 

0265 

REF 

5 

LAST 
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36,2320 

9 0025 

1 

CS 

T IHFl 

0286 

REF 

1 

36,2321 

c c # r c 2 

c 
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TEAS  FI 

02  86  1 

REF 

9 

LAST 
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36, 2322 

51 '955 

1 

I MCE  X 

WHICH 

02662 

36,2323 

1 0001 

1 

TCP 

1 

02863 

REF 

1 1 

LAST 

296 

36,2329 

9 010  6 

1 

WAMTAPS 

CS 

F LGWRDl y 

(1)  FCP  F92  ENSURE  APSFLAG  IS  SET,  IF  IT 

02669 

REF 

7 

LAST 

296 

36  ,2325 

7 9737 

1 

MASK 

APSFLBI  T 

WASN'T  SET,  GAP  WILL  BE  IMTIALIZEC  TC 

02665 

RFF 

12 

LAST 

726 

36,2326 

26  1C6 

1 

ACS 

FLGWRCIO 

ASCENT  VALUES  BY  1/ACCS  IN'  2 SECCNCS. 

0287 

36,2327 

C 0CC6 

1 

ULL GNOT 

EXTEND 

(1) 

0288 

REF 

10 

LAST 

7?  6' 

36,233C 

5 1955 

1 

INDEX 

WFICF 

0289 

36,2331 

3 CCIO 

c 

CCA 

7 

LOAD  AVECEXIT  WITF  APFRCPRIATE  2CACR 

0290 

RFF 

3 

LAST 

105 

36,233? 

53 ' 252 

1 

rxr  F 

AVFGEXIT 

0291 

RFF 

90 

LAST 

713 

36,2333 

3 9 7 52 

c 

CAF 

TWC 

9.2SPCT  RESTARTS  IMMECIATELY  AT  REDC9.2 

0292 

REF 

102 

LAST 

728 

36, 2339 

59  on 

1 

TS 

L 

C293 

RFF 

91 

LAST 

726 

36,2335 

9 975? 

1 

CS 

TWO 

AKC  ALSO  AT  TIG-5  AT  THE  CCRRFCT  TINE. 

0299 

RFF 

3 

LAST 

225 

36,2336 

52  76C 

1 
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0295 

RFF 

6 

LAST 
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36,2337 

9 0025 

1 

CS 

TIME  1 
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LAST 
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36,239C 

55*060 

1 

TS 

TBASE9 

SET  TBASE9  FCR  TIG-5  RESTART 

)?961 


36.23A1  0 Cr  16  1 RFnn2.17  FXTENC 


r,ftP:'  ASSPI»QLF  RPVISION  116  OF  C C PROGRAM  LL^^INAPY  Py  NASA  20211  12-f71 


19:09  JUG.  11.1969  FLY 


1^6  p;>GE  ?;s 


L BURN,  BABY,  BURN  — M^RTfP  IGMTIGN  ROUTINF  LSPP'S  P/iGE  NO.  7 E7  S3 


02962 

RFF 
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36,2342 

3 4755 

1 
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02963 

REF 

4 
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36,2343 
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C 

EXCH 

-PHASE2 
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0297 

RCF 

1 

36,2344 

10  762 

0 REC04.2 

res 

PHASES 

IS  SERVICER  GOING? 

0298 

PEE 

43 

LAST 
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36,234^ 
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C 

TCP 

TASKCVEP 
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PEE 

40 

LAST 
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36,2346 
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0 

TC 
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PEE 

1 

36,2347 
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1 
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■ EAST 
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36,2353 
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36,2354 

0 0JO6 

1 

T 1 C-  5 

EXTEND 

03072 

REF 

11 

LAST 

729 

36,2355 

3 4755 

1 
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NEGO 

IN' SUP  E 

THAT  group  3 IS  INACTIVE. 
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PEE 

2 

LAST 

2 1 5 

36,2356 

52  7 56 

1 
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-PHASE3 

03C76 

PCF 

2 
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36 ,2357 

3 3762 

1 

CAF 

9SEC 
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P EF 

13 

LAST 

72F 
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0 5173 

1 

TC 
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0300 

REF 

2 

1 AST 
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36,2361 

02407 

0 
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TIG-0 
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REF 

65 

LAST 
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36,2362 
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C 

TC 

CewNFLAG 
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REF 
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0 
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IGNFLAG 
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66 
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36 ,2364 
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0 

TC 
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P5F 

1 
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1 
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0314 

PEF 
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LAST 

729 
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c 

TC 
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REF 

1 

36,2367 
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LAST 
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REF 
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LAST 
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LAST 
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LAST 
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0332 

36,2413 
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PEF 
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1 
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0334 

REF 
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LAST 
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1 
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REF 
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LAST 
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REF 
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LAST 
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REF 
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LAST 
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0666 

REF 

30 

LAST 

7 39 

36,3067 

0 5105 

0 

TC 

FINDVAC  ■ 

0665 

REF 

C 

LAST 

73  1 

E7,  1516 

FPANK= 

TGC 

0666 

REF 

1 

36,3070 

02616 

0 

2CADR 

CLTOFF 

0666 

REF 

1 

36, 3071 

30067 

0 

0669 

REF 

76 

LAST 

736 

36,3072 

n 5516 

0 

TC 

DCWNFLAG 

0650 

RFF 

3 

LAST 

736 

36,3073 

00175 

1 

ACRES 

FLUNOISP 

06502 

36, 3076 

0 CCC6 

0 

TNHINT 

SET  UP  TFE  CAP  FOR  COASTING  FLIGHT. 

06506 

REF 

28 

LAST 

739 

36, 3075 

C 6676 

0 

TC 

IBNKCALL 

06=06 

PEF 

3 

LAST 

739 

36,3076 

60205 

1 

CACP 

ALL  CCAST 

0651 

REF 

3 

LAST 

739 

36,3077 

0 302  1 

1 

TC 

NLl LCLCK 

06  = 2 

REF 

62 

1 AST 

739 

36 ,31  10 

0 5353 

1 

TC 

PFASCFNG 

0653 

36,3101 

07026 

0 

CCT 

07026 

0656 

36, ? 102 

17000 

1 

CCT 

1 7000 

0655 

RFF 

6 

LAST 

739 

F7  , 1516 

EBANK= 

TGn 

0656 

REF 

2 

LAST 

739 

36, 3103 

C2616 

c 

2CACR 

CLTCFF 

0656 

36,  3 106 

20067 

0 

0657 

PFF 

118 

1 AST 

739 

36,3105 

1 5155 

1 

TCF 

ENDOFJOB 

0658 

RFF 

1 3 

LA  ST 

732 

36,3  106 

6 0103 

1 

IGNITE 

CS 

ELAGWPC7 

(2  ) 

0659 

REF 

2 

LAST 

730 

36,3107 

7 6737 

1 

YASK 

IGNFLBI T 

0660 

RFF 

223 

LA'T 

737 

36,31  1C 

K 000 

0 

CCS 

A 

0661 

REF 

1 

36,3111 

1 3122 

1 

TCF 

IGNITEl 

0662 

REF 

36 

1 AST 

735 

36,3112 

3 6753 

1 

CAF 

B ITl 

0663 

36,3113 

C CCC6 

c 

INHINT 

0666 

REF 

16 

LAST 

736 

36,3116 

0 5173 

1 

TC 

TWIDDLE 

0665 

PFF 

2 

LAST 

26  1 

36,3115 

02632 

0 

ACRES 

IGMTICN 

0666 

RFF 

1 

36,3116 

2 6360 

n 

CAF 

CCT23 

IPRECIATF  RESTART  AT  IGMTICN. 
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L 

PUPN 

, PflBY,  PIJRN  -- 

RASTER  IGMTICN 

ROUT  INF 

L SER'  S PAGE  NC.  18  E7  S3 

C667 

REF 

1C4 

1 AST 

706 

36,3117 

54  001 

1 

TS 

L 

0668 

36, 312C 

4 CCCC 

0 

CCR 

J669 

PCF 

9 

LAST 

733 

36, 312  1 

52  760 

1 

CXCH 

-FHASE4 

0670 

REF 

c 

LAST 

734 

36,3122 

4 4762 

1 IGMTFl 

GS 

CNTONCEX 

RESTORE  CLD  DISPLAY. 

0671 

REF 

18 

L AST 

738 

36, 3123 

55*162 

1 

1 S 

01 SPCEX 

0672 

REF 

1 19 

LAST 

739 

36,3124 

1 5155 

1 

TCF 

ENDOFJOB 

0674 

C675 

RFF 

29 

LAST 

662 

36, 3125 
36,3136 

0 5 567 
01706 

r 

1 

P40ALR  1C 

cr.T 

ALARR 

1706 

PPOGRAw  SELECTICN  NET  CONSISTENT  WITH 
VEHICLE  CONFIGLRATIGN 

0676 

RTF 

4 

LAST 

6 6 2 

36, 3127 

3 5 C G 6 

1 

REP40ALR  CAF 

VC5N'(’9 

(14  1 

C677 

RFF 

1 97 

LAST 

738 

36,3130 

0 4616 

1 

TC 

BANKCALL 

0678 

REF 

20 

LAST 

709 

36,3131 

2047  7 

1 

GACR 

GCFL ASP 

0679 

RFF 

20 

LAST 

736 

36, 3132 

1 6CC1 

1 

TCF 

GGTCPCCH 

V34E  TEFRINATE 

0686 

36,3133 

1 3135 

1 

TCF 

+ 2 

PROCEED  CHECK  FCR  P42 

0651 

REF 

2 

LAST 

724 

36,3134 

1 3127 

i 

ICF 

R F P40  A L R 

V32F  REDISPLAY  ALARM 

0682 

RFF 

18 

LAST 

739 

36, 3135 

51  '455 

1 

INOE  X 

WHICH 

FOR  P42,  ALLCW  CREW  TC  FPCCFEC  EVEN 

06P3 

36,3136 

1 0014 

0 

TCP 

14 

THOUGH  VEHICLE  IS  UN'STAGFC 

80684 

06  65 

31,2144 

BANK 

31 

0686 

RFF 

1 

35, 200C 

SETLCC 

P40S2 

0687 

35,3707 

BANK 

C688 

R = F 

2 

LAST 

73  3 TC 

734  : 

25 

P5’!< 

COUNT  t 

1 1/P40 

0689 

REF 

10 

LAST 

73£ 

35,3707 

C 4645 

1 

P40ALTC 

TC 

RAKECADR 

HEILC  TFERE  . 

0690 

REF 

4 

LAST 

476 

35,3710 

55*163 

0 

TS 

TFMPR60 

FTP  GENERALIZED  RETURN  TC  CTHEP  BANKS. 

0691 

PPF 

198 

LAST 

74C 

35,3711 

0 4616 

1 

P40A/ P 

TC 

BANKCAL  L 

SUBROUTINE  TC  CHECK  PGNCS  CONTROL 

0692 

REF 

3 

LAST 

520 

35, 3712 

5426  1 

c 

CACR 

G+x  ,ALTC 

ANC  ALTC  STAB  IL  IZAT  ICN  RCCES 

0693 

RFF 

224 

LAST 

739 

35,3713 

1>J  000 

0 

CCS 

A 

+ 1'  INniCATES  IN  PGNCS,  IN  AUTC 

0694 

REF 

1 

35,3714 

1 3726 

c 

TCF 

ILRNTTCN 

+ INCICATES  NCT  IN  PGNCS  ANC/OR  ALTC 

0695 

PEF 

8 

1 AST 

728 

35,3715 

3 4737 

0 

CAF 

APSFLBI T 

ARE  WE  CN  THE  DESCENT  STAGE? 

C696 

REF 

1 3 

LAST 

728 

35,3716 

7 C106 

1 

MASK 

FLGWRCIO 

)697 

RFF 

225 

LAST 

74C 

35,3717 

10  ooc 

c 

CCS 

A 

C69P 

REF 

1 

35,3720 

1-  3733 

1 

TCF 

GOBACK 

RETURN 

0699 

REF 

’3 

LAST 

718 

35,3721 

3 4747 

1 

CAF 

BITS 

YES,  CHECK  FCR  AUTOTHRCTTLF  MODE 

0700 

35,3722 

0 0006 

1 

EXTEND 

0701 

RFF 

4 

1 AST 

478 

35,3723 

02  030 

0 

RAND 

CHAN3C 

0702 

35, 3724 

C ''CC6 

1 

EXTEND 

J703 

REF 

2 

LAST 

74v 

35,3725 

1 3733 

1 

BZF 

GCBACK 

IN  AUTCTHRCTTle  RCCE  --  RETURN 

return 
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L 

' BURN 

, ?ABY,  BURN  -- 

PASTFP  tGMTICN 

ROUT  INS 

LSFR'S  PAGE  NC.  19 

E7  S3 

07C4 

PEF  ■ 

1 

35,3726 

3 3 73  5 

C 

TLRM  TCN 

CAF 

P40  A/  FT-C 

CISPLAY  V5CN2S  Rl=203  PLEASE 

PERFCPR 

0705 

RFF 

199 

L AST 

740 

35, ’727 

0 46  16 

1 

TC 

3ANKCALL 

CHECKLIST  203  TURN  CN  FGNCS 

ETC. 

07C4 

P>=F 

3 

LAST 

SIS 

35,3730 

2’624 

0 

r ADR 

GCPFPFl 

0 707 

PFF 

2 1 

LAST 

74C 

35, ’73  1 

1 6CC1 

1 

TCF 

GCTCFCCH 

V34E  TFRRiNfiTS 

0708 

pff 

1 

35,3732 

1 3711 

1 

TCF 

P40A/P 

RECYCLE 

0709 

RFF 

C 

LAST 

74( 

35, 3733 

3 1163 

1 

G C P A C K 

CA 

TFMPR60 

0710 

PPF 

13 

L AST 

736 

35,373a 

j ^6^0 

1 

TC 

BANK  Jlf^F 

GCCCEYE.  CCNE  AGAIN  SCCN. 

C71 1 

35,3735 

00203 

0 

P40A/PMC 

ncT 

0J203 

0712 

36,3137 

BANK 

36 

0713 

REF 

5 

LAST 

734 

36,  20<iO 

SETLCC 

P4fiS 

0714 

36,3137 

BANK 

0715 

RFF 

C 

LAST 

734  TO 

740  ; 

12  1 60  7=# 

CCLNT* 

E$/P4a 

R0716 

R0717 

CCNSTAMS  FCP  tee 

IGMTKN  PCLT  INE 

R0718 

0719 

OFF 

1 

36,2107 

S ERVCACP 

P63TABLE  +7 

07  2' 1 

REF 

1 

36,2137 

C2C4C 

1 

P40ADRES 

ACRES 

P40TAGLF 

0721 

PEF 

1 

36 ,3140 

0205  1 

0 

P41 ACRES 

ACRES 

P41TABLE  -5 

072? 

PEE 

1 

36,3141 

02C63 

C 

F42ACPES 

ACRES 

P42TA8LE 

0723 

REF 

25 

LAST 

734 

E7,  1515 

EBANK= 

DVCNTR 

0724 

REF 

1 

36,3142 

02410 

0 

LUNL  ANAC 

2CACP 

LUNL  AN<n 

0724 

RFF 

1 

36 , ’ 14? 

62C67 

1 

0727 

RFF 

26 

LAST 

741 

P7, 151 5 

EBANK= 

D VCNTR 

0728 

REF 

1 

36,3144 

03372 

1 

AT YAGACR 

2CACR 

ATN'AG 

0728 

REF 

1 

36,3145 

7C067 

1 

0729 

RFF 

2? 

LAST 

741 

611'  1 1 

? 

= 

GCTOPOOH 

073C 

36, ’146 

occnc 

1 

C29.9SEC 

2DEC 

2 990 

0730 

36,3147 

05656 

1 

0731 

36,3150 

04672 

0 

S24.9SEC 

EEC 

2490 

0732 

36,3151 

0C752 

1 

4.9SEC 

CEC 

490 

073^  3A  TaTT  7^ 


A747 


0CT20 


8 ITS 


GAP: 

AS'^FNBL'^  RFVISTPN  116 

CF  AGC 

PRCGPAP  LUMINARY  BY  NASA  2021112-C71 

1S:0R  AUG.  11  ,1S6S 

FLY 

. 1 Ab 

FACE  7A2 

L 

BURN,  BABY,  BUR^  -- 

PASTER 

IGMTICN  RCUTIPE 

USER'S  PAGE 

NO. 

2C 

E7  S3 

07331  36r3  152  0M75  0 VC6N61  \/N  C661 
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L 0UP^1,  PABY,  RUKM  — MASTPR  IGMTICN  RGLTINF  USER'S  PAGE  NO.  21  E7  S3 


P0735  KTUTASK 

PC736  ►'CD  NC:  NEU  FP^G‘^A^ 

RQ737  »«0C  by:  COVai  I 


PD73P  FL^C^Ir^^L  CCSCPIFTTCN: 


R0739  KTIITASK  IS  USED  7C  PFYOVE  A TASK  FFCY  THE  WAITLIST  PY  SUBSTITUTING  ANULL  TASK  CALl.rO  'NULLTASK*  (CF  CCLPSEI,' 

P’1741  tvHT''H  YgpptY  rCFS  A TC  iR , IF  THE  SANF  TASK  IS  SCHEDULi'D  PCPE  THAN  C^CU,  CALY  THE  PNg  UUCP  WILL  CCCUF 

P.a743  FIRST  IS  PERCVEO.  IF  THF  TASK  IS  NOT  SCHECULFC,  KIILTASK  TAKES  NO  ACTION  ANE  RETURNS  M TH  NC  ALARN.  KILLTASK 

R0745  LEAVES  INTERRUPTS  INPIBITED  SC  CALLER  RUST  RELINT 


P074f  CAILING  SECUFNCF: 


A074P 

L 

TC  KILl TASK 

IN  FIXED-FIKFC 

A0749 

L + 1 

CAOR  ???????? 

CACR  (NCT  2CACP)  OF  TASK  TO  BE  REMOVED 

A C 7 E f 

L +2 

(REL  INT  ) 

return 

P17S1  EXIT  MODE:  AT  |+?  OF  CALLING  SECL'ENCE. 

ROTS?  ERASAELE  INTT TAL  IZAT TCN=  NONF. 


R07S3  OUTPUT:  2CADP  OF  NULLTASK  IN  LST2 


R-.17S4 

EEFRIS: 

ITEMPl 

- 

ITFMP^’,  A,L 

,0. 

0755 

RFF 

19 

L AST 

222 

E3,1410 

EBANK= 

LST2 

0756 

60  32 

PLCCK 

3 

K ILLT  ASK 

MUST  BE  IN  FIXED-FIXED. 

0757 

PFF 

3 

1 AST 

564 

600( 

SFTLCC 

FFTAG6 

0758 

6032 

EANK 

075P 

RFF 

1 

CCLNT* 

5$/KI  LL 

0760 

RFF 

1 

6''32 

3 6041 

1 

K ILLTASk 

CA 

KILI.P8 

076F'5 

6C33 

0 0'JJ4 

n 

INF  I NT 

0761 

RFF 

226 

L AST 

74F 

6034 

22  000 

1 

LXCH 

A 

0762 

PEF 

196 

LAST 

736 

6035 

50  002 

n 

INDEX 

0 

0 763 

6036 

3 O'l  10 

1 

CA 

0 

GFT  CADR 

0764 

RFF 

16 

LAST 

58F 

6037 

22  006 

1 

LXCH 

REANK 

0 765 

REF 

1 

6040 

1 22.10 

0 

TCF 

KILLTSK2 

CONTINUE 

IN  switched  fixed 

0766 

RFF 

20 

LAST 

743 

F3,  1410 

FBANK= 

LST2 

0767 

RFF 

2 

LAST 

743 

604  1 

56063 

1 

K ILLBB 

BBCCN 

KILL  7 SK 2 

0768 

27,2200 

BANK 

27 

0769 

REF 

3 

LAST 

44 

27, 2000 

SETLCC 

P40S1 

077C 

27,2200 

BANK 

0771 

REF 

1 

CCLNT=> 

i l/K  IL  L 

0772 

RFF 

in 

LAST 

546 

27,2206 

22  C62  0 K1LLTSK2  L XC  t- 

I TEMP2 

SAVE  CALLER'S  EBANK 

ROP:  /ISSENBLE  RFVTSinN  116  C=  AC-r  PRCGRA^  ll^'INAFY  PY  ^AS/l  20211  12-C71 
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LSEP' S PAGE  NG.  22  Ei  S3 


0773 

PEE 

197 

LA  FT 

743 

27,220  1 

2 4 C02 

C 

lACP 

C 

0 774 

21,  7 2' 2 

C CC06 

1 

E>TEND 

0775 

REF 

29 

LAST 

615 

27,2203 

22  061 

0 

CXC  F 

ITEMPl 

RETURN  2CADR  IN  I TE P P 1 , 1 TE N F2 

0776 

RTF 

15 

LAST 

56  1 

27,2204 

54  C63 

c 

TS 

I TENP3 

CACP  IS  IN  A 

0777 

REF 

5 

LAST 

457 

27,2205 

7 5012 

0 

MASK 

LOW  1C 

0778 

REF 

2 1 

LAST 

433 

27,2206 

6 4 74  1 

1 

AD 

BIT  1,1 

0770 

REF 

6 

LAST 

5 5 9 

27,2207 

54  064 

1 

TS 

I T0YP4 

GFNACR  CF  TASK 

0780 

PEE 

6 

LAST 

744 

27,2210 

4 5012 

1 

CS 

LCWIO 

078  1 

PEF 

16 

LAST 

744 

27,2211 

7 CC63 

c 

RASK 

ITFNF3 

0782 

REF 

17 

LAST 

744 

27,2212 

54  063 

0 

TS 

I TFNP3 

FBANK  CF  TASK 

C783 

27,2213 

2 2 007 

0 

ZL 

0784 

PEF 

105 

LAST 

74C 

27,2214 

5C  COl 

c 

AGRSCAN 

INDEX 

L 

0785 

RPF 

21 

LAST 

743 

27,  2215 

4 1410 

1 

CS 

LST2 

0786 

REF 

7 

LAST 

744 

27,2216 

6 0C64 

0 

AC 

ITENF4 

CCNPARE  GENADRS 

0787 

27,2217 

0 0006 

1 

EXTEND 

0788 

RRF 

1 

27 ,2220 

1 2232 

1 

ezF 

TSTFBANK 

IF  THEY  NATCH,  CCNPAPE  FRANKS 

0789 

REF 

1 

27,222  1 

4 474? 

t 

K. 

LETITLIV 

CS 

LSTLI N 

0790 

REF 

1 16 

LAST 

744 

27, 2222 

6 ocn 

0 

AD 

L 

C791 

27,2223 

0 0006 

1 

EXTEND 

ARE  WE  CONE? 

0792 

REF 

1 

27,2224 

1 2230 

0 

BZF 

DEAD 

YES  - CCNE,  SC  RETURN 

0703 

REF 

107 

1 AST 

744 

27,2225 

24  00  1 

0 

TNCR 

L 

0 794 

REF 

108 

LAST 

74^ 

27,2226 

24  001 

0 

INCR 

L 

0795 

REF 

1 

27, 2227 

1 2214 

c 

TCF 

ACRSCAN 

CCNTINUE  LCCF. 

C796 

REF 

30 

LAST 

744 

27,2230 

52  '62 

1 

C EAC 

CXC  E 

I TEMP  1 

0797 

27,2231 

52  CC6 

0 

CTCE 

079R 

REF 

7 

LAST 

744 

27, 2232 

4 50  1 2 

c 

TSTFBANK 

CS 

LCHO 

0799 

RFF 

109 

LAST 

744 

27,2233 

50  001 

INDEX 

L 

0 800 

REF 

22 

LAST 

744 

27,2234 

7 1411 

c 

NASK 

LST2  +1 

CCNFARE  FEANKS  ONLY. 

0801 

27,2235 

0 0006 

1 

EXTEND 

08)2 

PEF 

18 

LAST 

744 

27,2236 

60  063 

1 

SU 

ITFMF3 

0803 

27, 2237 

0 C006 

1 

EXTEND 

0804 

RFF 

1 

27,2240 

1 2242 

0 

ezF 

KILLDEAD 

NATCH  - KILL  IT. 

0805 

REF 

1 

27,224 1 

1 2221 

r 

TCF 

lftitltv 

NC  NATCH  - CONTINLE. 

0 806 

Rf-p 

1 

27, 2242 

3 4353 

c 

K ILLOEAD 

CA 

TCTSKC VR 

C8C7 

REF 

UO 

LAST 

744 

27,2243 

50  COl 

n 

INDEX 

L 

0808 

REF 

23 

LAST 

744 

27,  2244  . 

55'41C 

1 

TS 

LST2 

RENCVE  TASK  BY  INSERTING  TASKOVER 

0809 

REF 

2 

LAST 

744 

27,2245 

1 2230 

0 

TCF 

DEAD 

0810 

REF 

•3  C 

L AST 

741 

474.7 

LSTLI*- 

ECUALS 

B ITS 

FEC  16 

GAP:  ASS'^^FL‘=  RFVISI^^  116  CF  &CC  PPCGB^’*'  LiJ^IN/SPY  py  htSfi  20211  1^-071 


IGtCG  AUG.  11,19^9  FLY 


1A6  PAGE  7A5 


L p^r_P^7 
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POO'il  FRCGPAN  CESCPTFTTCN  FAOEOTE  CECF’>'BER  22,  lSf6 

R0002  >^nc  02  PV  PETER  AOI  ER  RflRCh  3,  19o7 

R0003  CALL»=C  VIA  JOB  FRCP  V37E 

PCOCA  FLNCTICNAL  CFSCPIFTTCA 


R0095  1)  TO  rcRPUTE  A PREFERRED  I«U  GPIEMATICN  A^C  A PREFERRED  VEFICLE  ATTITUFE  FOR  4 LM  DPS 

ROD'V  TFPIJSTI^G  MA^1EUVER. 


ROCCH  3)  TC  Cr  TFF  VEFICLE  WANEUVEF  TC  TFF  THRUSTING  ATTITijcE. 

RT009 A)  TO  CONTROL  THE  PGNICS  DURING  CCUNTDCWN,  IGMTICN.',  THRUSTING , AND  THRUST  TERMINATION  OF  A 

ROnii  PGNCS  CCNTFCLLFC  CPS  HANEUVEc. 

POO  1 2 5)  TM  PCSTBLRIV  — ZEFC  RENDEZVCLS  CCLNTER,  MAINTAIN  VG  CALCLLATICNS  FCR  FOSSIELE  RCS  MANFLVER, 

ROOIA  SFT  .'MAXIMUM  DEADBAND  IN  DAP,  RFSET  STEERLAW  CSTEFR  1C  ZFRC. 

R0C16 note:  PA2  , WHICH  IS  IN  THIS  LCD  SECTICN,  DDES  THE  SAN'E  FCF  AN  APS  BURN,  AND  PA  I ODES  1-3  FCF 

R0018  RCS  PLUS  0ISPI4YS  PARAMETERS  FCR  NANLAL  CCNTRCL. 

RCOiq  SIBRCLTIN'^S  USED ^ 


R002D  R02  IML  STATUS  CHECK 

P0021 SAD. I CCMFUTATIDN  OF  THRUST  DTRECTICN 

R0022  S40.13  LENGTH  CF  BURN 

R0>T?3  S40.2,3  FREFFPPED  IMG  CRIENATTICN 

R002A S4D.B  X FRCnuCT  STEERING 

RT025  SAC.q  LAMBERT  VTPGAIN 

RTOPf.  R60LEM  ATTITUDE  MANEUVER 
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318816 

36,3375 

777  76 

1 

Fxn 

018817 

REF 

lA 

1 AST 

7A9 

36,3376 

3 9777 

■1 

CAF 

ISEC 

0 1 8 8 1 8 

R.EF 

2ce 

LAST 

78C 

36,3377 

C 9616 

1 

TC 

BANKCALL 

018819 

PEF 

13 

LAST 

7A9 

36,3900 

01736 

1 

CAOR 

OELAYJO’B  ■ 

01882 

REF 

2 

L AST 

7A9 

36 , 3901 

1 3365 

0 

TCF 

CYNMCISP 

0189 

0190 

RFF 

103 

LAST 

75C 

36.3902 

36.3903 

0 6092 
77629 

1 

1 

CALCNE5 

TC 

C A1  1. 

I NTPRET 

0 19  1 

RTF 

1 

36 , 3909 

7561  5 

1 

UPCATEVC 

0192 

36, 3905 

95  17  5 

0 

VLCAD 

CALL 

0193 

REF 

5 

LAST 

. 750 

36 ,3906 

03701 

1 

VGPREV 

0199 

REF 

o 

LAST 

75C 

36, 3907 

5 7 2 6 7 

n 

S91. 1 

0195 

RFF 

8 

LAST 

7 50 

36,3910 

03  502 

0 

STORE 

VGBOOY 

0196 

36,3911 

77  776 

1 

EX  IT 

0197 

REF 

92 

LAST 

73  3 

36,3912 

C 9635 

0 

TC 

PCST JLMF 

0198 

PEF 

3 

LAST 

729 

36, 3913 

65  76  1 

1 

CADR 

SEP VE  XI T 

0199 

REF 

1 

CCUNT=> 

tl/P92 

0 200 

REF 

23 

1 AST 

798 

E7, 1955 

EBANK= 

WHICH 

0201 

RFF 

95 

LAST 

798 

36,3919 

0 5353 

1 

P92LM 

TC 

PHASCHNC 

0 2012 

36,3915 

C9C29 

c 

CCT 

09029 

32019 

Rcp 

“ 

36,3916 

3 3191 

* 

CAF 

P92ADRFS 

IN  ITI AL I Z AT ICN  FOR  EURNBABY. 

0 20  2 

REF 

29 

LAST 

75( 

36,391 7 

55  ' ^,55 

0 

TS 

WHICH 

02  3 3 

PFF 

15 

LAST 

796 

36, 392C 

9 r 1C6 

1 

CS 

FIC-WRCIO 

0209 

RFF 

10 

LAST 

796 

36,3921 

7 9 73  7 

1 

MASK 

APSFLBTT 

3205 

RFF 

229 

LAST 

796 

36,3922 

10  no 

0 

CCS 

A 

0208 

REF 

2 

LAST 

796 

36, ’923 

0 3125 

1 

TC 

P90ALM 

0209 

PEF 

209 

1 AST 

750 

36 ,3929 

3 9616 

1 

P92STAC  E 

TC 

BANKCALL 

0 A P : 

6S9.FN8LE  REVI'^IPA 

1 16 

CF  AGO  PRCGRAP  luminary  BY  NASA  202 

11  12-C71 

19:09  ALG.  11,1969  F ly 

.146  FACE  751 

L 

P4C- 

P47 

USER'S  PAGE  NO. 

7 E7  S3 

021't 

PEF 

6 

LAST 

748 

36,3425 

11236 

0 

CACR 

RC28CTH 

02101 

RCF 

1 

36,3426 

3 6 00  3 

1 

CAF 

T FPESH2 

INITIALIZE  OVMCN 

02102 

P.FF 

LAST 

746 

36.  34‘>7 

C R 1 7 c 

Q 

TS 

DVTHRUSH 

02103 

PEF 

12 

LAST 

746 

36,3430 

3 4751 

0 

CAF 

FCL'R 

0 210  4 

PFF 

28 

LAST 

746 

36,3431 

55' 515 

0 

TS 

CVCNTR 

1211 

PFF 

104 

LAST 

76f 

36,3432 

0 6042 

1 

TC 

I MPRET 

0212 

36 ,3433 

77214 

0 

SFT 

VLOAD 

LCAC  FAPS,  RCCTAPS,  ANC 

AlCECAY  INTC 

0213 

pep 

C 

LAST 

697 

36,3434 

01C72 

r 

AVFl f G 

F,  ‘'CCT,  ANC  TCeCAY  BY 

VECTOR  LOAD. 

021A 

6PF 

1 

36, 3435 

34007 

1 

FAPS 

021  5 

REF 

5 

LAST 

749 

36  ,3436 

03735 

0 

STCRF 

F 

0216 

36, 3437 

52135 

r 

SLCAC 

GCTC 

02162 

REF 

1 

36, 3440 

26001 

1 

A PSVE  X 

02164 

PEF 

1 

36,3441 

75R'>4 

0 

P40IN 

0 217 

OFF 

25 

LAST 

7 5C 

■^7,1455 

EBANH= 

WEIGH 

0218 

REF 

1 

COUNTS 

$$/P47 

0219 

REF 

2 10 

LAST 

750 

36 ,3442 

C 4616 

i 

F47LM  TC 

pankcall 

022U 

PFF 

7 

LAST 

751 

36, 3443 

11236 

0 

CADR 

R026CTH 

0221 

REF 

1C5 

LAST 

751 

36  ,3444 

0 634  2 

i 

TO 

IMPPET  ■ 

0222 

36 , 3445 

77624 

1 

CALPE 

0223 

REF 

1 

36, 3446 

2755  1 

•0 

MI0TCAV2 

022A 

PEF 

296 

LAST 

736 

36 ,3447 

3 0155 

0 

CA 

MFAC  +1 

0225 

REF 

17 

L AST 

739 

36,3450 

0 5 173 

1 

TC 

TWIDCLF 

0226 

PEF 

1 

36  ,3451 

03453 

c 

ACRFS 

STARTP47 

0226  1 

REF 

122 

1 AST 

75C 

36 ,3452 

1 5 155 

1 

TCF 

ENCCF JOB 

0227 

PEE 

46 

LAST 

750 

•>6, 3452 

0 5352 

1 

STAR1P47  TC 

PhASCHNG 

0 2 39  1 

36,3454 

05014 

1 

CCT 

0 5014 

12392 

36,3455 

7 7777 

c 

CCT 

77777 

12393 

36,3456 

0 0006 

1 

EXTENP 

0240 

REF 

1 

36,3457 

3 3 7 70 

1 

DCA 

ACADN83 

0241 

PEF 

6 

LAST 

748 

36,3460 

C "3  * “P  ^ 2 

1 

CXCH 

AVEGEXI  1 

0 24  2 

REF 

5 

LAST 

729 

36,3461 

3 4736 

1 

CAF 

PRI020 

0243 

REF 

32 

LAST 

749 

36, 3462 

C 5105 

c 

TC 

F INDVAC 

0244 

PFF 

4 

LAST 

317 

F7, 1622 

EBANK= 

DEL VIMU 

0245 

REF 

1 

36,3463 

. 03517 

1 

2CA0P 

P47BCCY 

1245 

PFF 

1 

36,3464 

7 4 C 6 7 

c 

0246 

REF 

2 

LAST 

241 

36, 3465 

1 2344 

1 

TCF 

RED04.2 

CHECKS  phase  5 ANCGCES 

TC  FPERFAC 

A0247 

SFE  T IG-20  IN  BURNBABY. 

0248 

REF 

106 

LAST 

75  1 

36,3466 

0 6042 

1 

CALCNE3  TC 

I MPRFj 

0249 

36,3467 

53375 

0 

VLOAD 

VAD 

0250 

REF 

1 

36,347.- 

03  532 

c 

DELVCTL 

0?5l  PEF  2 LAST  1^8  36,3^71  03527  1 DELVRFF 

» 0252  REF  11  MET  68C  ^b,^‘^^2  03656  1 StCPE  CELVSIN’ 
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L 

P4C- 

■R47 

USER'S  PAGE  NO . 8 

E7  S3 

0?53 

36,3473 

77624 

1 

CALL 

025^ 

R'=F 

4 

LAST 

750 

36,3474 

57367 

C 

S4  1.  1 

0255 

REF 

5 

L AST 

75  1 

36,247= 

C’623 

n 

STGRE 

DEL VI8U 

0256 

36,3476 

77776 

1 

EXIT 

0256  1 

RFF 

47 

LAST 

7n 

36 ,3477 

0 5353 

1 

TC 

PFASChNG 

02562 

36, 3500 

1CC35 

0 

OCT 

1CC35 

REREACAC  A^C  FERE 

02563 

rff 

1C7 

LAST 

75  1 

36,3501 

0 6042 

1 

TC 

I NTPPET 

>2564 

36,35C2 

77775 

1 

VLOAD 

0256S 

pgF 

12 

1 AST 

751 

36,3503 

03656 

1 

OELVSIN 

02566 

RFF 

2 

LAST 

7 = 1 

36,3504 

03502 

•3 

STORE 

DELVCTL 

)2567 

’6,350= 

77  7 76 

1 

EXIT 

0257 

PFF 

43 

LAST 

750 

36,3506 

0 4635 

0 

Tf 

PORT JLMP 

025  8 

RFF 

4 

LAST 

75F 

36,3=07 

65761 

1 

CACP 

SERVEX  IT 

0259 

PFF 

1 

36, 3510 

3 3 7 6 6 

C 

P478CG 

OAF 

V 1683 

C26f 

RFF 

2 1 1 

1 AST 

751 

36,351 1 

0 4616 

1 

TO 

BANKCALL 

' 0 261 

RFF 

2 

1 AST 

747 

36,3512 

20636 

0 

CAOR 

GCFLASHR 

0262 

REF 

24 

•LAST 

748 

36,3513 

0 60  )1 

0 

TC 

GCTOPCOF 

0 26  3 

REF 

25 

LAST 

752 

36,3514 

0 6001 

0 

TC 

GCTOPCCF 

0263  1 

REF 

2 

LAST 

751 

36,3515 

1 35  17 

0- 

TCF 

P47BrOY 

02632 

RFF 

2 

LAST 

748 

36,3516 

1 3242 

1 

TCF 

P40PHS1  ' 

0264 

RFF 

108 

LAST 

752 

36,3517 

0 6042 

1 

P47BCCV 

TC 

I NTPR8T 

026  5 

36,3520 

77775 

1 

VLOAD 

0266 

REF 

c 

1 AST 

721 

36 , 3=2  1 

06  5 24 

1 

H I6ZERCS 

0267 

REF 

6 

LAST 

752 

36,3=22 

03  623 

0 

STORE 

DEL  VI  PC 

0268 

REF 

3 

LAST 

752 

36,3523 

03502 

0 

STORE 

DELVCTL 

0269 

36, ’524 

7 7 7 7 6 

1 

EXIT 

02  70 

REF 

1 

36, 3525 

0 3510 

0 

TC 

P47BCD 

0271 

REF 

6 

1 AST 

741  TC 

743  : 

12  619* 

COUNT  X 

T J/P40 

0272 

REF 

7 

LAST 

739 

36,3526 

3 1517 

0 

1 NPL8LPN 

CA 

TGC  +1 

0272  1 

REF 

1 

36 ,3527 

I)  374  1 

c 

TC 

GETDT 

0273 

REF 

18 

LAST 

751 

36,353C 

0 5 173 

1 

TC 

TtiilDCLE 

0274 

REF 

2 

LAST 

24  1 

36,3531 

02546 

c 

ADRES 

EACCFTSK 

0275 

REF 

76 

LAST 

747 

36,3532 

0 55  16 

0 

TC 

PGWNFLAG 

TURN  CFF  ICNFLAG 

0276 

REF 

3 

LAST 

73  2 

36,353’ 

QC  153 

0 

ACRES 

I G^FLAG 

0277 

REF 

77 

LAST 

752 

36, 3634 

0 55  16 

c 

TC 

DCUNFLAG 

TURN  CFF  ASTNFLG 

0278 

REF 

4 

LAST 

738 

36,3535 

00154 

1 

ACRES 

ASTNFLAG 

0279 

REF 

78 

LAST 

752 

36,3536 

0 5516 

c 

TC 

DCWNFLAC 

TURN  CFF  IPPULSW 

0280 

RFF 

1 

36,3537 

00044 

1 

ADRES 

I PPULSW 

028  1 

PFF 

48 

LAST 

752 

36 , 354U 

0 5353 

1 

TC 

P8ASCFNG 

RESTART  FRCTECT  ENGOFTSK 

(ENGIN'CFF  ) 

0282 

36,3541 

4C  1 14 

1 

CCT 

40114 

0283 

RFF 

13 

LAST 

736 

36  ,3542 

0 5221 

0 

TC 

F IXDELAV 

hAIT  half  a seccnc 

0284 

36,3543 

0CC62 

c 

EEC 

50 
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0269 

RCF 

3 

LAST 

738 

36 ,3544 

0 2657 

1 

TO 

NCUL  LACE 

TUPN  CEP  ULLAGE 

0286 

PFF 

50 

LAST 

73  7 

36,3545 

C 5261 

1 

TC 

TARKCVEF 

0287 

PPP 

39 

LAST 

749 

36,3546 

0 4674 

n 

EMGOFTSK 

TC 

I8NKCALL 

THIS  CODING  ALLOWS  ENGINGEE  ET  AL  TC  BE 

0288 

RFF 

1 

36,3547 

75551 

1 

CACP 

EAGINCFF 

USED  PCTF  BY  WAITLIST  AND  BY  TC  TBNKCALL 

J289 

REF 

51 

LAST 

753 

36,3950 

C 526  1 

1 

TC 

taskcvep 

0290 

FEF 

3 

LAST 

73P 

36,3551 

3 4 644 

c 

ENGINOFF 

CAF 

PRI012 

MLST  BE  ICWFR  PPIC  THAN  CLCCKJCE 

0291 

RFF 

- o 

LAST 

75  1 

26,3552 

C 5105 

c 

7C 

f I NCVAC 

0292 

REF 

9 

LAST 

748 

F7,  1462 

EBANH= 

trkmkcm 

0293 

RFF 

4 

lAST 

747 

36,3553 

03227 

0 

2CACP 

PCSTBURN 

0293 

36,3554 

74C67 

c 

0294 

REF 

37 

LAST 

739 

36,3555 

3 4753 

1 

ENGINCF2 

CAF 

8IT1 

0299 

RFF 

34 

LAST 

721 

36,3556 

C 5203 

0 

TC 

waitlist 

0296 

RPF 

4 

LAST 

724 

E6,  1422 

EBANK= 

CMEGAC 

0297 

RFF 

1 

36,3557 

0 3612 

1 

20.  AOR 

CCASTSF7 

0297 

RFF 

1 

36,3560 

74)66 

1 

0298 

REF 

14 

LAST 

739 

36,3561 

4 0 103 

1 

ENGINCFl 

CS 

FLAGl<RD7 

SET  TFE  IDLE  ETT. 

0299 

REF 

1 

36,3562 

7 4745 

1 

MASK 

I0LEF8I T 

REF 

15 

LASt 

7 = ’ 

36,2563 

26  1C3 

1 

ADS 

FLAGWRC7 

0301 

RRF 

4 

LAST 

793 

36,3564 

0 2657 

1 

TC 

NOULLAGE 

0 302 

36,3565 

C 0006 

1 

ENGI NCF4 

EXT  END 

0303 

REF 

22 

1 AST 

737 

36,3566 

3 Oi.25 

c 

CCA 

TIME2 

0304 

RFF 

9 

LAST 

730' 

36 ,3567 

53  ' 342 

1 

rxcF 

TEVENT 

0305 

RFF 

4 

LAST 

73C 

36,3570 

4 4 74  5 

1 

ENGI  NCF3 

CS 

ENGONPIT 

INSURE  ENGCNFLG  IS  CLEAR. 

Q3C51 

P.FF 

22 

LAST 

73  1 

36, 3571 

7 0101 

c 

MASK 

FLAGWRD5 

03C52 

REF 

23 

LAST 

753 

36,3572 

54  lOl 

0 

TS 

FLAGWRD5 

0309  3 

RFF 

7 

LAST 

7 -30 

36,3573 

4 4355 

1 

CS 

PPIC30 

FNGINCF3  IS  USED  «S  A PRE- ENG  I N E . AP M 

.1306 

36, 3574 

0 0006 

1 

EXTEND 

SLBROLTINE. 

0307 

RFF 

24 

LAST 

73C 

36,3575 

02  Oil 

0 

RAND 

DSAl MCUT 

0308 

REF 

e 

LAST 

■75  1 

36, 3576 

6 4 736 

1 

AO 

PPI C20 

TURN  OFF  TFE  ENGINE  - CFS  OR  APS 

Q3C9 

36,3577 

0 0006 

1 

EXTEND 

03  10 

RFF 

25 

LAST 

753 

36  ,36CC 

01  HI 

c 

KR  ITE 

CSALMCUT 

0314 

RFF 

21 

LAST 

746 

36, 3601 

4 0 111 

1 

CS 

DAPB0OLS 

TURN  CEE  TRIM  GIMBAL 

C31  9 

RFF 

1 

36,3602 

7 4736 

0 

MAS  K 

IJSEORJTS 

0316 

REF 

22 

1 AST 

793 

36, 3603 

26  111 

1 

AOS 

DAPBOCLS 

0317 

REF 

1 

36, 3604 

4 4 73  7 

1 

CS 

HIPTHROT 

ZFRO  AUTC-THRCTTLE  WHENEVER  TFE  ENGINE 

0319 

RFF 

3 

1 A. FT 

733 

36,3605 

54  055 

0 

TS 

TFPUST 

IS  TURNFC  OFF. 

0320 

Rcp 

31 

LAST 

73  2 

36,3606 

3 4750 

1 

CAF 

BIT4 

THE  HAPCWAPF  CCES  SC  CNLY  WHEN  TFE 

0321 

36 ,3617 

0 0 006 

1 

EXTEND 

ENGINE  IS  DISARMED. 

0322 

RFF 

9 

LAST 

734 

36, 36  K 

05  0 14 

1 

RCR 

CHAN'14 

0323 

REF 

2 

1 AST 

563 

36,3611 

0 4707 

c 

TC 

T SWRETRN 
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03  24 

P.FF 

36 

LAST 

753 

36,3612 

0 4674 

C 

CCAST  SET 

TC 

I BN  KG  ALL 

CC  DAP  CCASTING  INITIALIZATION 

0375 

REF 

4 

LAST 

739 

36,3613 

40205 

1 

CADR 

ALLCCAST 

C22f- 

REF 

E2 

LAST 

753 

36,3614 

0 5761 

1 

TC 

T ASKCVER 

0327 

RPF 

5 

LAST 

753 

F6,  1422 

F8AAK= 

CNEGAC 

0328 

36,3615 

45'‘2  ' 

1 

UPOATEVG 

STO 

CALL 

0329 

PEE 

•a 

LAST 

1 43 

36,3616 

03665 

1 

CTEMFl 

0330 

REF 

1 

36,3617 

5644  7 

C 

S40.8  . 

X-FRCCLCT  STEERING 

0331 

36,3620 

43014 

0 

BON 

PON 

0331  1 

REF 

4 

LAST 

69C 

36,3621 

0 130  7 

1 

XCFL  VFLG 

0331  2 

RFF 

4 

LAST 

754 

36, 3622 

0366  5 

1 

QTEMPl 

0331  3 

REF 

3 

LAST 

687 

36,3623 

03  705 

0 

NCPMSW 

03314 

RFF 

1 

36,3624 

7 5 6 3 7 

1 

18'1SFTIJF 

0331  5 

36, 3625 

45345 

1 

CLCAD 

D SU 

033  16 

RFF 

6 

LAST 

706 

36,3626 

01234 

0 

P IPT  TRF 

0331  7 

RFF 

1 

36,  ■‘627 

03763 

c 

TIGSAVE 

0331  f 

36 ,3630 

50025 

c 

rsu 

BRN 

0331  9 

REF 

1 

36,3631 

03432 

1 

TNEWA 

0337 

RFF 

1 

36,3632 

7 5 6 6 2 

1 

GETRANS 

033?  1 

36 ,3633 

43345 

1 . 

CLOAD 

OAO 

03322 

RFF 

2 

LAST 

754 

36,3634 

C3  763 

c 

T TGSAVE 

13323 

RFF 

2 

LAST 

754 

36, 3635 

03432 

1 

TNEWA 

0 3 33 

RFF 

1 

36,3636 

03765 

0 

STGPE 

T IGSAVEP 

0336 

36, 3637 

7 7 7 76 

1 

leOSETtF 

FAIT 

0336  1 

RFF 

1 

36,3640 

10  754 

0 

CCS 

PFASE2 

03362 

RFF 

1 

36,3  6.4  1 

1 3667 

1 

TCF 

N'C.9 

033  7 

RFF 

4 

LAST 

2°8 

36,3642 

2 A737 

c 

CAF 

P R I 0 1 0 

0338 

36,3643 

0 0004 

0 

INF  IKT 

0339 

RFF 

^4 

LAST 

753 

36,3644 

C 5105 

c 

TC 

F INDVAC 

0340 

RFF 

2 

LAST 

1,4  4 

F7, 1706 

EBANK= 

VG 

0341 

R'^F 

1 

36 ,3645 

02  707 

0 

2CACR 

S 40 . 9 

LAREERT  VTOGAIN 

0341 

REF 

1 

36, 3646 

56067 

0 

0347 

REF 

e 

1 AST 

749 

36,3647 

1 53  2 7 

1 

TC 

2PHSCHNG 

0343 

36 ,365C 

00172 

c 

CCT 

00172 

2.  17SPCT  FCR  S40.  9 

0344 

36, 3651 

1 r035 

0 

OCT 

1 0035 

HEFF  ANC  REREACAC  AFTER  RFSTART 

C347 

RFF 

109 

LAST 

752 

36,3652 

C 6042 

1 

EACSTEER 

TC 

INTPRFT 

0347C1 

36,3653 

77745 

1 

OLCAC 

0347C2 

REF 

2 

LAST 

754 

36, 3654 

03765 

0 

TIGSAVEP 

0347  1 

REF 

O 

LAST 

754 

36,3655 

2 7 763 

0 

STCVl 

T IGSAVF 

03472 

RFF 

7 

LAST 

717 
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R044P  FLNClIfNAL  CESCRIPTlfN 

R044P  COMPUTE  INITIAL  THRUST  0 1 RtCT  I CN ( LT ) A^0  INITIAL  VALLE  CF  VG 

PQ4S.T VEGTCR  (VC-TTG  ). 

P0451  CALLING  SEQUENCE 
RT452  I CALL 

R04S3 L+i S40.1 

Pn4S4  NORMAL  EXIT  MODE 

R045S  AT  L+2  CF  CALLING  SECUFNCC  (GOTO  L+2)  NCRVAL  RETURN  OR 

R0456 ERRCP  RETURN  IF  NOSCFLAG  =1 

R14S7  SUFROUTINFR  CALLFC 
RT4SR  LEmppFC 

RQ459 INITVEL 

R04AO  CALCGRAV 

R0461  MOGIM 

PT462  ALARM  OR  ARORT  EX  11  NCnP S 

R 1443  L+2  FF  CALLING  S EGII ENC  = , LNSOL  V A 81.  E CCN  IC  IF  NGS0FLAG=1 

R0464  FRASAEIE  I N I T I A L I 7 A T I C N REGLIPFc 

R 146S MFIGhT/G  ANTICIPATEC  VEHICLE  NASS CP  E16KCN 

R1466  XOELVFLG  l = nELTA-V  M AN EUV E R , 0 = A I M PT  STEER 

P0467  F THPLS1  FCR  ENGINE  LSEC 

P0468 IF  DELTA-V  MANEUVER 

P046S  OELVSIN  SPFCIFTEC  C^LTA-V  RECUIREC  IN 

RJ470  INFRTIAL  CCCROS.  CF  ACTIVF  VEHICLE 

R0471 ^ AT  TTMp  CF  IGNITION VFCTGR  B7M/CS 

R0472  DELVSAR  MAG.  C^  CELVSIN  CP  E7M/CS 

P0473  RTIG  POSITION  AT  TIME  CF  IGNITION  VFCTCR  E29M 

RQATA VTIC, VELOCITY  AT  TIME  CF  IGMTICN VECTOR  B7M/CS 

P047S  IF  AIMPT  STFER 

R0476  TIG  , TIMF  OF  IGMT|ou  DP  e23CS 

P0477 PTAPG  ' PCSITICN  TARGET  TIME VECTOR  E29M 

RT478  CSTFFR  C FOP  STEFR  LAN  CP  82 

R0479  CLTARG  TARGET  T TM E- 1 GN IT  ION  y imE  CP  «2ECS 

R04PO  OUTPUT 

R0481  UT  OESIREO  THRUST  OIRECTICN  VECT.  F2N/(CS.GS) 

P048?  VFTIG  INITIAL  VALUE  CF  VELCCITY 

R0  483 TC  bf:  GAINFC  (INEPT.  CCCRC.) VECTOR  E7M/CS 

R0484  CELVLVC  VGT IG  IN  ICC.  VERT.  COORDS.  B7M/CS 

R048F  BOT'  V PEQUTRHC  AT  TIG  -V  RECUIREC  AT  (TIG-2SEC) 

R0486 -jFiT  FCR  S40.  1 ? ypcT  E7M  / CS 

R0487  RTIG  CALC  IN  S4 C . 1 8 t A IM P 1 ) fqr  $40.2,3  VEGTCR  B29M 

R0488  PGSIyicn  at  TI^e  tf  IGMTICN 

R048P  CEER  IS QTFMPl 

R049C  M FAC,  GPPET  ' 

R0A91  PUSHUIST 

049? 14, 2347 BANK  14 

C493  PFP  4 I AST  743  2 7,?  TOO  SETLCC  P40S1 

0494  27,2246  BANK 
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77656 

1 

LNI  1 

UT  = LMT  (VGT  IG  ) 

0564 

RPP 

a 

1 AST 

759 

27,2377 

17673 

0 

STOOL 

LIT 

0585 

27, 2400 

OCf.45 

c 

360 

0586 

RFF 

3 

L AST 

315 

27,24'U 

37664 

1 

STCALL 

VGDT  SF 

CCNVEPT  VGTIG  (IN  PUSHLIST  ) TC  LCCAL 

0587 

REF 

2 

LAST 

755 

27,2402 

15  741 

1 

GET  .LVC 

VERTICAL  COORDINATES. 

0588 

27,2403 

7 76  50 

1 

C-CTG 

0585 

REF 

5 

LAST 

759 

27,2404 

03632 

0 

QTFMP 

0550 

27,2415 

00707 

1 

EPSl 

2DEC* 

2 .777777778 

E-2*  n CEGPEES  AT  1 REVOLLTION. 

0550 

27, 2406 

C3434 

1 

G<\P: 

«SSFf'3LE  REVISION 

116  OP  AGC  PRCGR4W  lUMINARV  9Y  ^4SA  20211  12-1,71 

19:09  AUG.  11,1969 

FLY  .146 

PAGE  760 

L 

PAC-F47 

LSER'S  PAGE 

NO.  16 

E7  S3 

0591 

0591 

C592 

27,2407 

27.2410 

27.2411 

03170  0 
34344  0 
00024  1 

FPS2  2CfC*  9.722222222 

TPFTACCN  2DEC  .31830989  0- 

E-2*  35  DEGREES  AT  i 

8 

L REVDLITION. 

27,2^12 


05‘32 


1371^  1 
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1A6  PfCt  761 


p^C-PA7  USER'S  PAGE  NO.  17  E7  S3 


P0593  SLEPOLTINE  NAMf;  SA0.2t3  '^OC.  NO.  2 DATE:  APRIL  A,  1967 

PQ59A  PCDIFirATTCN  BY;  JONATHAN  P.  ACCELSTCN  (ACAMS  ASSOCIATES) 

P0599  MOD.  NO.  A:  JULY  18,  1967:  PETER  ADLER  (NIT/IL) 


80996  ACC.  AC.  9:  CCTCRFR  18,  1967:  PETER  ACLER  (YIT/IL) 

R0997  OOIGINALLY  PY:  SAVCEAN  ZELDIN  (PIT  1 A ST PU RENT  AT  I C N LAE)  ANC  RICEARC  TALAVCO  (SYSTEN  PEVELCPAENT  C C R P ) 

P0599  SA  1.2,3  COMPUTES  "PCINTVSM"  WHICH  IS  THE  HALF-UNIT  DESIRED  THRUST  YECTCR  IN  S T A E L E-ME A BE R CQORCINATES  FRON  "UT" 

PQ601  WHICH  IS  THE  SANE  VECTCP  IN  REFERENCE  CCCFCINATES.  IT  CETERMINES  THE  CORRECT  YALLES  FCR  "SCA>IS"  USING  THE  »X 

R0603  AXIS  FOR  DPS,  APS,  AA'D  PCS  BURNS.  THE  "HINGS-LEVEL  HEADS-UP"  LN  CRIENTATICN  IS  THEN  COMPUTED  IN  REFERENCE 

Rn6T5  CCCRDINATES.  THESE  VECTORS  ALSO  DEFINE  THE  "PREFERRED  IRU  CP  I F N T A T I ON " . UPON  CCAPLEIICN  C<=  THIS  CALCULATICN, 
RQ6<"7  THE  "PREFERRED  ATTITUDE  CC^»FU'TEn"  FLAG  IS  SFT  (FFPATFLC). 


RJ608  CALLING  SEQUENCE: 


A06C9 

L 

CALL 

INTERPRETIVE 

call. 

A061P 

L +1 

SA  >.2  ,3 

A961  1 

L +2 

(RETURN ) 

GIMEAL  angle 

VFCTCR  IN  MFAC 

R0612  SUBROUTINES  CALIED:  NCNE. 


R0613  NORMAL  RETURN:  L +2  (SFE  CALLING  SSGLENCF  ABCVF). 


PD61A  Al  ARN/AECPT  MODES:  NONE. 

PJ6I9  INPUT: 


P1616  1.  PFFSMMAT  matrix  FRCM  REFERENCE  TO  ST  A E L E-m E M EE R CCCRDINATES  SCALED  AT  2. 

R0618 2.  U'''  ■ HALF-UNIT  DESIRED  THRUST  DIRECTION. 

R0619  3.  RTIC,  PCSITI^^  iT  TIG  IN  REFERENCE  CCCRDINATES. 

R T621  CUTRUT: 


R 0622 
R )623 

1.  : XSCREF  : 

: YSCREF  : 

WINGS-IEVEL  HEACS-UF  LM  ORIENTATION 
IN  REFERENCE  CCCRDINATES 

R062A 
PD629 
P 1627 

: ZSCRFF  : 

2.  PniNTVSM 

3.  SCAXIS 

(PREFERRED  IMU  ORIENTATION). 

DFciirec  thrust  direct  ICN  in  STAELF-MEMBER  COORDINATES. 
HALF-UNIT  OF  AXIS  TO  ALIGN  IN  S T A 6 L E- m E MB E R CCCRDINATES. 

R0629 

<P.  PFPATFLG 

INTERPRETIVE  FLAG.  ON:  PREFERRED  ORIENTATION  CCMPljTEC;  OFF: 

NCI  CCMPUTEC. 

P0631 

DEER  IS: 

NONF. 

m 
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I. 

P40- 

P47 

USER'S  PAGE  NO.  18  E7  S3 

C637 

RPF 

1 

COUNTS 

M/S4r.2 

9633 

27,2413 

77775 

1 

S40.2  ,3 

VLCAC 

IJT;  CESIFEC  THRUST  CIRECTION  (FALF-LMT) 

0634 

RFF 

9 

LAST 

759 

27, 2414 

03673 

0 

IJt 

(PLT  IMC  TCP  CF  FUSH-CCWN-L  1ST.  ) 

0635 

27,2415 

76521 

0 

RXV 

VSL  1 

TPANSFGRP  TFRLST  CIRFCTICF  TC  STAPLE- 

9636 

REF 

22 

t AST 

726 

27, 2416 

0 1734 

0 

REFSPRAT 

PEF8EF  FFCP  REFERENCE  COORCS  (RESCALE). 

J637 

REF 

5 

1 AST 

520 

27,2417 

27773 

1 

STOVL 

PQINTVSP 

SAVE  FCR  "VECPriNT"  RCLTIFE  (LEPPANU. 

063P 

RFF 

6 

LAST 

5E4 

27, 24  21) 

■J6522 

1 

UMTX 

SCAXIS  SET  TC  +X,  FOR  P40  AND  P42  AND 

0639 

REF 

22 

L AST 

5 20 

27, 2421 

27  765 

r 

STDVL 

SCAXI S 

FOP  P41  IF  PCS  NCT  -X  , -tY, -Y  , +Z  ,-Z  . 

C64C 

REF 

in 

FACT 

76  2 

27,2422 

03  6 73 

0 

UT 

ASSURE  +>  BLP.N  ALWAYS,  EVEN  FCR  RCS. 

0641 

RFF 

1 

27,2423 

C3607 

0 

PLLSX 

STFPE 

XSCPFF- 

XSCREF  = IJT  (CESIPED  THRUST  DIRECTION.) 

0647 

27,2424 

53435 

0 

VXV 

UNIT 

RTIG  = PCSniCN  AT  T I P E-C  F - I G MT  I C N . 

0643 

RFF 

9 

1 AST 

759 

27,9425 

03o42 

1 

RT  IG 

YSCREF  = UNITIUT  X RTIG) 

064  31 

27,2426 

A6  125 

f. 

FDDL 

BUZ 

06432 

27,2427 

0004  5 

0 

36D 

TEST  PAGMTUDE  CF  UT  X RTIG 

064  :>  3 

REF 

1 

27,2430 

56441 

0 ' 

F IXY 

TF  SPALL,  USE  UT  X VTIG  AS  YSC 

06434 

27,2431 

^ C C 7 c 

1 

STORV 

VLQAC 

STADR 

0644 

ppc 

1 

27,243? 

74162 

1 

STORE 

YSCPEF 

’’  0645 

27,2433 

76435 

1 

VXV 

VSLl 

CCPFUTE  (YSCRFF  X XSCREF), BUT  FCR  A 

0646 

REF 

2 

LAST 

762 

27, 2434 

C3607 

0 

XSCPEF 

RIGHT  handed  SYSTEP,  NEED  (X  CRCSS  Y). 

0647 

27,2435 

77676 

0 

VCCRF 

ZSCPEF  = - (YSCREF  X XSCREF) 

0648 

REF 

1 

27,2436 

03623 

0 

STCRE 

ZSCRFF 

= + (XSCRFF  X YSCRFF  ) 

C649 

27,2437 

43414 

1 

SET 

R VO 

0650 

PEF 

1 

27,2440 

01073 

1 

PFRATFLG 

065O1 

27,  244  1 

A 7 3 7 5 

r 

Ft  XY 

VLCAD 

VXV 

IN  THIS  CASE, 

065C2 

REF 

3 

LAST 

76? 

27,2442 

0 3 607 

0 

XSCREF 

YSCREF  = UNITIXSCREF  X VTIG) 

06503 

REF 

7 

LAST 

759 

27,2443 

C365C 

1 

VTIG 

06504 

27,2444 

41456 

0 

L'MT 

PUSH 

06505 

27,2445 

77650 

1 

GCTC 

36506 

REF 

1 

27,2446 

564  3 1 

1 

STCRY 

GAP: 

ASSEN01  E REV  IS  ION  1 16  OF 

AGC 

PROGRAM  luminary  BY  NASA  2C21112-C71 

19:09  AUG.  11,1969 

FLY 

.IA6  PAGE  763 

L 

P40-P47 

LSEP'S  PAGR 

NO. 

19  E7  S3 

P )651 
R0652 

SUEROUTINR  SAP. 8 
RCCIFTEC  APRIL  3,  1968 

BY 

PETER  ACLER  MIT/IL 

RP653 

description 

R06S4  UPTftTES  THE  VE  LHC  H Y-Tn-p  g-C- 4 1 N'ED  VECTCR  , VO,  (ANP  FCR  Li«BERT  TARGETTEC  ELRNS  ALSC  EXTRAPOLATES  VG 

ROt56  USING  THE  RPT  VECTCP  I CCPFUTES  THE  TIME  FOR  ISSUING  THE  '^NGINE  ORE  COMMAND,  IGD,  AND  CALLS  THE  CCLTINE 
R06SB  " F INCCPUlu" . WHICH  GENERATES  STEERING  CCHHANDS  FCR  THE  CAP. 


R16E9  CALLING  SEQUENCE 


Rn660  1-1  CALL 

R06A1  L RAC.e 

R0  662  Ltl interpretive  BETUPNI 


R0663 

ALARM 

R066A 
P 0666 

IF  VG  . 
AND  SET  At  ARM 

OELVprF 

1A07. 

IS  NEGATIVE  ( VG  ANC  CELVREF  OVER  90  OFGPFES  APART),  BYPASS 
RFTUPN  TC  CAIUFR  NORMAIUY. 

TGC  ANC  STEERING  CCMPUTATIONS 

R0667 

INPUT  ANC  INITIALIZATION 

R0668 

VGFREV 

REFERENCE 

2(7)  M/CS 

R0669 
P,  1670 
R0671 

DELVPEF 

ECT 

TCr-CAY 

REFERENCF 
REFERPNCE 
TAIL-CFF  TIME 

2(7)  M/CS 
2(7)  M/CS 
2(28)  CS 

R0672 

P0673 

R067A 

XDELVFl  G 
ST  EERSW 
FIRSTFLG 

1 = 
1 = 
1 = 

R>TERNAL  CELTA-v;  0 = UAN8EPT  (AIMFCINT) 

DO  STEEPING  AND  TGO  COMPUTATIONS;  C = VG  UPDATE  ONLY 

GCNF  TO  LAvBERT  AT  UEAST  ONCE;  0 = HAVEN'T  GHNE  TO  UAMBERT 

YET 

R0676 

NOTE:  VGTIG 

HGUAl  S 

VGPRE V 

R0677 

OUTPUT 

RP678 

STEERSN 

SEE 

INPUT 

R0679 

R06Ef 

R0681 

IMFULSW 

TGC 

SEE  FINCCOUW 

1 = ENGINE  OFF  IN  TGO  CENT  I SECC ND S ; C = CONTINUE  EURN 
TIME  TO  CUT-CF'  2(28)  CS 

FOP  STEERING  CUIFUTS. 

R0682 

SUBROUTINP  CALLEC 

RC683 

FINOCOUH 

R068A 

CEBP  IS 

ROf>85  MACS,  FUSHLIST 


REF  I 


0686 


rruNT^  fs/SAO.8 


4 


GftP  : 

/»S9F8eLF 

PFVISTnN  116 

CF  AOC  FRCGPA*'  LUVINARY  8Y 

NASA  2021112-071 

19:09  AUG.  11,1969  ElY  .166  FAGE  766 

L 

P60- 

P67 

USEP<s  PAGE  NO.  20  E7  S3 

0687 

27, 2667 

77616 

1 S60.8 

BCF 

GENERATE  VR  IF  NOT  EXTERNAL  CELTA-V  BURN 

0668 

P.EF 

6 

L6ST 

7^t 

27,2650 

01367 

0 

XCEL  VFLG 

0689 

PEF 

1 

27,2651 

56  73  1 

1 

RASTEERl 

C6  9C 

27,2652 

52  375 

1 

VI  TAG 

VSL 

0691 

REF 

6 

LAST 

75C 

27,2653 

0 3 70  1 

1 

VGPRE V 

0692 

PEF 

3 

LAST 

75  1 

27,2656 

C ' 5 2 7 

1 

DEL VREF 

0693 

REF 

3 

1 AST 

756 

27,2655 

037  >7 

1 VGAIN* 

STORF 

VG 

VELOCITY  TO  BE  GAINED  SCALED  AT  (71P/CS 

069A 

27, 2656 

76521 

C 

NXV 

VSL  1 

0695 

PEF 

23 

LAST 

762 

27,2657 

01736 

0 

REF  S^'PAT 

0696 

PEF 

2 

LAST 

201 

27,2660 

03256 

1 

STCRE 

UNFC/2 ■ 

0707 

27,2661 

51575 

1 ecTOK 

VLCAC 

A8VAL 

07C8 

PFF 

6 

t AST 

766 

27,2662 

03  70  7 

1 

VG 

070  9 

REF 

6 

LAST 

759 

27,2662 

03666 

0 

STCRE 

VGPISP 

0710 

27,2666 

77  2C  1 

1 TGOCALC 

setpd 

VLCAP 

0711 

27,2665 

03001 

0 . 

0 

0712 

REF 

5 

LAST 

766 

27,2^66 

0 3 7C7 

1 

VG 

071  3 

PEF 

7 

LAST 

766 

27,2667 

27701 

1 

STOVL 

VGPREV 

0716 

REF 

6 

LAST 

766 

27.267C 

0352  7 

1 

OELVFFF 

' 0715 

27, 2 6.7  1 

5 76  16 

1 

ECFF 

vcrvp 

0716 

REF 

1 

P7.2672 

01366 

0 

STEERSW 

0717 

REF 

C 

(AST 

711 

27,2673 

J3052 

0 

CFRET 

0718 

27,2676 

7 76  56 

1 ■ 

LNIT 

071  9 

27,2675 

61661 

0 

COT 

PUSH 

0720 

REF 

6 

LAST 

766 

27,2676 

03707 

1 

VG 

0721 

27,2677 

56266 

0 

BPL 

DOV 

0722 

RFF 

1 

27,2500 

56526 

c 

ALARM  TT 

CELV  IS  PORE  THAN  90  DEGREES  FRCP  VG. 

0723 

REF 

2 

LAST 

76  7 

2 7 , 2 5 n 

02763 

1 

VEX 

0 726 

77,2502 

61215 

1 

CAO 

DMP 

0725 

REF 

12 

LAST 

669 

27,2503 

06522 

1 

DFHAL  F 

0726 

27,2506 

5626  1 

1 

SR 

DOV 

C127 

27,25  )5 

20613 

1 

lOD 

0728 

27, 2506 

orr.65 

c 

360 

0779 

27,2507 

63205 

1 

DPP 

DAO 

073C 

REF 

1 

27,2610 

16535 

0 

-FCURCT 

0731 

RPF 

1 

27,2511 

0 3 7 6 1 

c 

TCECAY 

0732 

PEF 

10 

LAST 

756 

27,2512 

035  17 

1 

STORE 

TGO 

0733 

27, 251  3 

7 7615 

0 

CAC 

0736 

PEF 

8 

L AST 

756 

27,2516 

0 1236 

0 

PI PTI PE 

0 73  5 

Rtrp 

32 

LAST 

759 

27,2515 

1 766? 

0 

STOOL 

TIG 

0736 

REF 

11 

LAST 

766 

27,2516 

0351  7 

1 

TGC 

0737 

27,2517 

51025 

1 

DSU 

BEL 

0738 

REF 

1 

27,2520 

16537 

1 

FCliRSECS 

60C  CS 

0739 

RPF 

1 

27,252  1 

6 1076 

1 

FINPCCUk'  -2 

C76C 

27,2522 

63016 

n 

SET 

C LBGD 

0761 

RFF 

“3 

1 AST 

c c 

27,252? 

01366 

c 

IPPULSW 

0762 

PEF 

2 

1 AST 

766 

27, 2526 

0 1 2-2  6 

1 

STEFRSW 

C763 

RFF 

6 

LAST 

766 

27 , 2525 

00052 

0 

QPRET 

07A4 


27,252f 


77776  1 AlflR^IT  EXIT 
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L 

F4.r-P47 

CSFR'S  FACE  NO.  21  E7  S3 

C7A5 

REF  30 

LAST 

?4C 

27,2527 

0 5667 

0 

TC 

ALARM 

07A6 

27,253C 

C14C7 

C 

CCT 

01407 

0747 

PPF  112 

L A'T 

755 

27. 2531 

0 604  2 

1 

TC 

I NTPPET 

0 74  8 

27,2532 

77650 

1 

GCTC 

SKIP  TGC  COMPCTATICN  BLT  CALL  FIKCCCCK. 

0748  5 

REF  2 

LAST 

764 

27.2533 

61076 

1 

FTNOCCL'l^  -2 

FINCCCUV^  WILL  EXIT  TO  CFCATEVG  O. 

0749 

27,2534 

777  15 

1 

-FOUPCT  2CFC 

-ECO  B-18 

-4  ( 200  CS. ) B (-18) 

0749 

27,2535 

77777 

C 

0751 

27.2536 

00^00 

1 

FOLRSECS  2nEC 

4t0 

400  CS  SCALEC  AT  2 (+28  )CS 

27,2537  00627  0 

3 LAST  76A  F7.17A2 


r 751 

07515  REF 


2VEXHLSI 


VEX 


r,4P:  fSSE^Bt?  PrVTSTPN  116  CP  ACC  PRPGRA«<  LL>^INAPV  BV  NASA  20;ill2-C'?l 
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14i6  FtGE  766 


pi,r-pe,l 


LSFR'S  P&GE  NO. 


PIS? 


P?75? 

PT7‘5^ 


^^PE 

Ft^CT  ITN 


SAC. 13 


- 7IMF8LPN 

( 1 ) CPTERMINE  WHETFFR 


A GIVEN  CCMEINATICN  OF  VELPCHY  TO 


R075A 

PF  GAINFC  ANC 

ENGINE 

ghctce  result  in  a 

BURN  time 

P075S 
RO  756 
RC757 

SUFFICIENT  TO  ALLCl< 

BURN 

( 2 1 TRC  RAGNI TUOE  OF 

STEERING  AT  THE  VEHICLE  DLRING  THE 
THE  PESLLTING  BLRN  TIpF  __  if  it 

P075H 

IF  SFCRT  — 

ANC  THE 

ASSOCIATEO  time  CF 

THE  ENGINE  CFF 

R0759 

SIGNAL 

P0760 

CALLING 

SEOUENCF  VIA  FINCVAC 

AS  A NEW  jre 

RT761 

INPUT 

VGT  IG  velocity  TC  BE 

GAINED  VECTOR  (metfps/CSI  AT  +7 

R076? 

UFIGHT/G  RAFF 

CF  VFHICLE  IN  HGN  AT  +16 

R0763 

F APS  FNGINF 

thrift 

IN  M.NFWTONS  AT  +7 

R076A 

ANF 

AISC  FCR 

pcs  engine 

P :i76  5 

YDCT 

RATE  OF 

CFGREAFf  CF  VFHICLE  NASS  CURING  ENGINE 

PJ766 

BURN 

IN  KILCGPAMS/CS 

AT  +3  . THIS  SCALING  MAY 

R0767 

RFCUIRE  RCCIFICATICN 

FCR  SATURN  BURNS. 

R0768 

■FN GIF  LAG 

SWITCH 

TO  GECIOE  whether  aps  CR  CPS  ENGINE  IS  LSEG 

R0769 

=0 

OPS 

R0770 

= 1 

APF 

Pn771 

OUTPUT 

IRPULSW  ZERO 

FOR  STFERING 

P.C772 

CNF 

FOR  ATTIT'UCE  HOLE 

R0  7 73 

NTTHRCll  ZFRC  FOR  THRCTTIING 

Ri^77A 

ONE 

TO  INHIBIT  THROTTLING 

R0775 

TGC 

TT  RF  TC 

ELPN  IN 

CS 

P1776 

THF 

QUANTITY  M.N9WT0N  = lOCOO  NEI.TCNS  ULL  EE 

LSED  TC  EXPRESS 

RV77 

FCRCF 

0778 

REF 

12 

LAST 

7 64 

T7,  1516 

FBAN  K = 

TGC 

077P 

REF 

1 

COLNTW 

t$/40. 13 

C7PC 

P'=F 

113 

LAST 

765 

27 ,2540 

0 6 142 

1 S4.1.1T  TC 

1 ntpret 

0781 

27,2141 

43CG1 

1 setpg 

C LEAP 

0782 

27,2542 

ilOOOl 

0 

OOD 

0783 

RFF 

4 

1 AST 

76  4 

27,2543 

01266 

1 

I NPULSW 

ASSUME  NC  STEERING 

UNTIL 

FCLNO 

CTHEFWI SE 

0784 

27,2544 

51575 

1 VLCAC 

ABVAL 

0785 

PEF 

10 

LAST 

759 

27,2545 

0^7)1 

1 

VGT  IG 

VELCflTY  TC  BE  GAINED 

AT 

+ 7 

0 786 

27,2546 

41325 

C FCCL 

DPP 

OOC  = mag  CF  VGTIG 

AT 

+ 7 

0787 

PFF 

1 

27, 2547 

2 1Q06 

1 

4SEC (17) 

CCRRFCT  VG  FCR  4 SFCS 

C F 

2 JET 

ULLACE 

C788 

OFF 

2 

1 AST 

749 

27,2550 

34021 

0 

FRCS2 

078P 

27,2551 

72471 

0 GOV 

S L1 

scale 

0790 

PEF 

2 

L AST 

758 

27,2552 

01244 

1 

WEIGHT/G 

0791 

27,2553 

41421 

0 ECSU 

PUSH 

0792 

27,2554 

43C14 

0 BCFF 

SET 

C793 

REF 

1 

27,2555 
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1C25 

RFF 

9 

LAST 

77C 

27,3056 

0?673 

1 

GECMSGM 

1026 

REF 

2 

LAST 

77  1 

27, 3C57 

17216 

1 

2 FI  +3 

1027 

27,3060 

95302 

1 

SR? 

DSU 

ic;?R 

27,3061 

652J5 

3 

LMF 

PCCL 

1029 

RFF 

fl 

LAST 

77  I 

27,-^Zb2 

0 3 7 33 

0 

SS 

1030 

REF 

9 

LAFT 

771 

27,3363 

0 3 7 J 3 

0 

s s 

1031 

27  ,3069 

75992 

1 

SR3 

SCPT 

1032 

27,3065 

77605 

1 

CMP 

1033 

27,3  )66 

52525 

1 

POOL 

SL3 

1034 

RFF 

C 

LAST 

77C 

27,3367 

02  71  7 

c 

MUASTEFR 

1035 

27,3070 

55366 

1 

SORT 

BDL'V 

1036 

?1  ,^(>11 

93225 

0 

rsu 

CAT 

1037 

RFF 

9 

LAST 

759 

27,3072 

0363  1 

0 

TFASS9 

103P 

REF 

9 

1 AST 

769 

27,3073 

31239 

0 

P TPTIME 

1C39 

27,3079 

19037 

0 

STCCL 

30D 

1090 

27, 3'75 

7776  5 

0 

SIGN 

1091 

27,3076 

0303  7 

0 

300 

8 UITF  SIGN 

1092 

27,3077 

0CC37 

c 

STORE 

30D 

1093 

27,3130 

77219 

0 

BON 

VLCAD 

1099 

RTF 

6 

1 AST 

769 

27,3101 

037  15 

0 

NCPMSH 

1095 

RPF 

1 

27, ’ 102 

57  123 

0 

1 eoMFss 

1C96 

REF 

2 

LAST 

769 

27,3103 

03656 

1 

IC 

1097 

2 7,3  104 

5395  1 

1 

VSL 

UNIT 

1098 

REF 

3 

LAST 

759 

27, 31.'5 

■03  5 3 7 

0 

UM  T/R/ 

1 C99 

27,3136 

63361 

3 

VXSC 

PDVL 

1050 

27,3107 

0CC37 

c 

30D 

1051 

REF 

3 

LAST 

77  1 

27,  31U 

03656 

I 

IC 

105? 

27,3111 

53955 

c 

VAC 

UNIT 

1053 

REF 

9 

LAST 

77  1 

27,3112 

0353  7 

r 

UMT/P/ 
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L 

F40- 

PA7 

1 SPP*  s 

PAGE  NC.  28  E7  S3 

I05A 

27,3113 

53361 

0 

GETVRV/Gl 

VXSC 

VAD 

1055 

27,  M lA 

0004  1 

1 

320 

1056 

27,3115 

537AA 

0 

GETVRV/GZ 

LXC  , 2 

VSR  * 

IC57 

PEE 

13 

LAST 

76  S 

27,3116 

02777 

1 

PTX2 

105fl 

27, 3117 

57177 

1 

0 -1  ,2 

1 C59 

REF 

7 

LAST 

690 

27,3120 

02337 

1 

STORE 

V IPRIME 

1060 

27,3121 

7765C 

1 

GCTC 

1061 

REF 

1 

27, 3122 

57  166 

1 

ASTREND  -2 

1062 

27,3123 

50375 

0 

180MESS 

VLFAC 

CCT 

1063 

REF 

A 

LAST 

771 

27, 3 12A 

03656 

1 

IC 

106A 

REF 

5 

LAST 

771 

27,3125 

03537 

0 

UNIT/R/ 

1065 

27,3126 

77240 

1 

ERN 

VLCAC 

1066 

REF 

1 

27, 3127 

57  146 

r 

NEGPRCn 

1C67 

REF 

5 

1 AST 

772 

27,3130 

03656 

1 

IC 

1068 

27,3131 

6336? 

c 

\,SP1 

PCVL 

1060 

PFF 

6 

LAST 

772 

27,3132 

03537 

0 

UM  T/P/ 

1070 

27,3133 

53362 

0 

VSR  1 

VAC 

1071 

27.313A 

77656 

1 

LMT 

1C72 

27,3135 

57406 

1 

PLSH 

VCOMP 

FCR  A 

1073 

27,3  136 

75235 

1 

VXV 

S IGN 

107A 

REF 

A 

1 AST 

687 

27,3137 

02674 

0 

UN 

1C75 

REF 

5 

LAST 

771 

27,3140 

02673 

1 

GEOMSGN 

1076 

27,3141 

74256 

c 

LL  I T 

VXSC 

1077 

27,3  IA2 

OC037 

0 

3CD 

1078 

27,3143 

77715 

1 

FOVL 

UNI  1T(  1C-  IR  ) 

+-B 

1079 

27,3144 

77650 

1 

GCTC 

1C8C 

REF 

1 

27,3145 

87113 

0 

C-FTVPVGl 

1081 

27,3  146 

74575 

0 

NFG9RCC 

VLCAC 

VSRl 

108? 

REF 

7 

LAST 

772 

27,3147 

03  537 

c 

UM  T/R/ 

1C83 

27,3150 

74515 

0 

ODVL 

VSRl 

108  A 

RFF 

6 

LAST 

772 

27,3151 

03656 

1 

IC 

1085 

27,315? 

53451 

1 

VSU 

UM  T 

1086 

27,3153 

77606 

1 

FIJSF 

1087 

27,3154 

75235 

1 

VXV 

SIGN 

1C88 

PFF 

5 

LAST 

772 

27,3155 

02674 

0 

UN' 

FCP  P 

1C89 

OFF 

6 

I AST 

772 

27,3156 

0 2 6 7 3 

1 

GFCMSGN 

1090 

27, 3157 

74256 

c 

LNIT 

VXSC 

1091 

27,3160 

00041 

1 

320 

1092 

27,3161 

77715 

1 

FDVL 

1093 

27,3162 

53361 

c 

VXSC 

VAO 

109A 

27,3163 

00037 

0 

300 

1095 

27,3164 

7765C 

1 

GCTC 

1C96 

REF 

1 

27,3165 

57115 

0 

GETVR VG2 

1C97 

27,31o6 

77651 

0 

VSL 

1098 

RFF 

3 

LAST 

727 

27,3  167 

03553 

1 

VM 

1C99 

RTF 

12 

LAST 

759 

27 ,31 70 

02  366 

0 

ASTRENF 

STORE 

DFL  VCFT3 

1 lOT 

27,3171 

53135 

r 

F IRSTTPE 

SLCAC 

BZE 

1 101 

RFF 

lA 

LAST 

772 

27,3172 

03000 

1 

RTX2 

110?  RFF  1 27,3173  57177  1 GETCCRL 

1103  27,31  7a  52  175  f!  VLCAC  GCTC  NT  fPLATENESS  CCMF  IF  IN  PCCN  SPHERE 


nAP:  F PFVTSinN  116  TF  fC-r  PROGRAW  LUN'INAPV  BV  ^ASA  ?r?1112-071 
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1 lOA 
1 1 >5 
1 1C6 

REF 

PCf 

13 

1 

LAST 

772 

27.3175 

27.3176 

27.3177 

02366 
57  2 1 2 
53575 

0 

1 

0 

GETG0  8L 

VLOAC 

CELVEET3 

MCGCBL 

UNIT 

CALCULATE  CELATENESS  TERM. 

1 107 

REF 

10 

LAST 

76S 

27,3200 

C122C 

r 

R N 

1108 

27, 3201 

6 536  5 

1 

niOAD 

DSL 

lies 

RPF 

10 

LAST 

771 

2? ,3202 

0 12  36 

0 

P IPT  IMF 

2 

11)0 

PFF 

3 

LAST 

725 

27,3203 

C3512 

1 

GCPLT IRE 

G = -(MU/R  1 (UMTGOBL  ) ( T - TIG) 

nil 

27,3206 

56  20  5 

0 

DRF 

ODV 

CEL 

1112 

RFF 

1 

27,32C5 

16023 

1 

FAPTFMU 

1113 

27,3206 

OOC63 

0 

36P 

36C  = /PN/  (2)  FROM  UMT  CPERATION. 

1116 

27,3207 

53361 

0 

VXSC 

VAD 

1115 

PEF 

1 

27,3210 

0352  1 

1 

UMTGCBL 

1116 

RFF 

16 

LAST 

773 

27,3211 

0 2 3 6 6 

c 

0ELVEET3 

CUTPLT  FRCP  IMTVEL  VG  = VR  - VN 

1117 

REF 

15 

LAST 

773 

27,3212 

02366 

0 ' 

NCGOEL 

STORE 

0ELVEET3 

VG  = VR  + GCBL  - \/N 

1118 

27,3213 

7765C 

1 

GCTC 

1 119 

REP 

1 

27,3216 

566  55 

n 

VGA! N* 

1120 

1120 


27.3215 

27.3216 


3L103  1 2PI+3 

36  6 52  0. 


PCEC 


3.1A1592653  B-2 
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P1171  TRI^GIPE  (FOFf'ERLV  SA0.6) 

R1122  RCr  C 24  FEP  67  PETER  AOLER 

R1123  FUNCTTON: 

R1124  TRIMS  CPS  ENGINE  TC  MM-^IZE  THRLST/CG  OFFSET.  ENGINE  IS  GINEALLEC  TC  FLLL  ♦ PITCE  ANC  * RCLL  (TC  LOCK) 

R1126  FOR  REFFFFNCF  ANC  IS  THEN  BROUGHT  PACK  tq  TRIM  POSITION  BY  PUNNING  FCR  THE  PROPER  TIMES  ( TC  PE 

P 1 128 PPECIPIFO  BY  GAEC)  IN  - PITCH  ANC  - RCLL. 


R1129  CALI  ING  SFCUFNCE: 

R1130  VIA  WAITLIST  PPCM  P03 

P1131  INPUT: 


R 1 13? 
R1  133 
PI  134 

PITTIMF 
ROU  TIMF 
SUEROUTINFS  used: 

TIFF  TC 
TIME  “^C 

FUN  FPCM  Full  F PITCH  TQ  TRIM  (CS) 
PUN  FPCM  FULL  + FCLL  TC  TRIM  (CS) 

8113-= 

1136 

RFF 

1 

WAI TL 1ST  , 

F IXPE 1 ay  , 

VAPCELAY,  FLAGUP,  FLAGCCWN 
COUNT* 

, NOVAC 
F t/S43.6 

1137 

REF 

3 

LAST 

315 

E6  , 1 4'*  1 

EBANK= 

RC  LLT I ME 

OCTAL  MASKS:  PRIC5=05000  EEANK5=n2400 

1138 

PFF 

EC 

LAST 

755 

27,3217 

0 5 516 

0 TRINGIME 

TC 

DCWNFLAG 

GMBDRVSW  FLAG  IS  SET  WHEN  EITHER  RCLL  CR 

1139 

PEP 

I 

77,3220 

00137 

1 

AORE  S 

GMPDR VSW 

FITCH  IS  CCMPLETFC,  WHICHEVER  IS  FIRST. 

1140 

R<=F 

8 

LAST 

75C 

27,3221 

4 5017 

0 

CS 

PRI05 

TURN  CFF  - FITCH,  - RCLL,  IF  CN. 

114  1 

27,3222 

C C0C6 

1 

EXTEND 

1 142 

REF 

44 

LAST 

6119 

27,3223 

03  '•12 

1 

WAND 

CHAM  2 

1143 

RFF 

3 

LAST 

598 

27,3224 

3 5014 

1 

CAF 

E BANK  5 

TURN  CN  + PITCH,  + POLL. 

1 1 44 

27,3225 

C CCC6 

1 

EXT'^ND 

1 149 

PEF 

45 

LAST 

774 

27,3226 

05  0 1? 

1 

NCR 

CHAN12 

1146 

REF 

14 

LAST 

75? 

27,3227 

0 5221 

0 

TC 

F ixoelay 

WAIT  ONP  MINUTE  TC  MAKE  SURE  ENGINE  IS 

1147 

27,3230 

1356C 

c 

CEC 

6Ct  0 

AT  FULL  T FITCH  AND  FULL  + RCLL 

1148 

PEF 

4 

LAST 

774 

27,3231 

4 5 314 

0 

CS 

FBANK5 

TLPN  CFF  + FITCH,  + RCLL. 

1149 

27,3232 

0 0006 

1 

EXTEND 

1190 

R F f 

^6 

LAST 

774 

27,3233 

S3  .’12 

1 

WAND 

CHAN12 

1151 

RFF 

9 

1 AST 

774 

27  ,3234 

3 501  7 

1 

CAF 

PR  105 

TLPN  CN  - PITCH,  - ROLL. 

1 1*=2 

27,3235 

C 0006 

1 

EXTEND 

1193 

PEF 

47 

LAST 

774 

27,3236 

C5  012 

1 

WOR 

CHAM  2 

1194 

RFF 

2 

LAST 

31  = 

27,3237 

31'402 

0 

CAE 

PITT  IMF 

CFT  T1M>^  TO  SHLT  OFF  - FITCH  ANC  SET  LF 

1159 

REF 

20 

L AST 

755 

27, 2240 

0 5173 

1 

TC 

TWIDOl E 

TWICCLE-TASK  TC  TURN  IT  OFF  THEN 

1 156 

REF 

1 

27  ,324  1 

)3260 

0 

ACRES 

P ITCHCFF 

1157 

REF 

4 

LAST 

774 

2 7 , 3 24  2 

3 1 ' 40  1 

c 

CAF 

PCILT  IME 

GET  TIME  TO  SHUT  OFF  - ROLL  AND  GC  AWAY 

1158 

REF 

6 

1 AST 

608 

27,3243 

0 5224 

c 

TC 

VARDC  LAY 

LNTIL  THEN 

1159 

REF 

26 

LAST 

706 

27  ,3244 

4 4740 

1 

CS 

B IT  12 

1I6'I 

27, 3245 

C CQ06 

1 

EXTEND 

1161 

RFF 

48 

LAST 

774 

27,3246 

03  012 

1 

WAND 

CHAN12 

SHLT  CFF  RCLL 

1162 

REF 

3 

1 AST 

7C7 

27,3247 

3 01)2 

1 RCLLCVEF 

CA 

FLAGWRC6 

IF  here  inline  (RCLL  OCNE)  IS  PITCH  CCNE 

1 163 

Rpp 

1 

27,3250 

7 4 742 

0 

MASK 

GMBnPEIT 

IF  HERE  FRCM  FITCHCFF,  is  rclL  C0NE< 

1164 

27,3251 

0 ’'006 

1 

EXTEND 

1 165 

REF 

2 

1 AST 

774 

27,3252 

1 3 26  4 

0 

EZF 

PTTCHCFF  +4 

NO.  SET  FLAG,  ROLL  OR  PITCH  CONE. 

1166 

REF 

5 

LAST 

754 

27,3253 

3 4 737 

0 

CAF 

PRI 010 

RETURN  TC  R03 

1167 

PEF 

?0 

LAST 

736 

27,3254 

0 5072 

1 

TC 

NCVAC 

1 1 68 

RFF 

■a 

LAST 

596 

FT,  1471 

EBANK= 

WHCCARE5 
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L 

P60- 

P47 

USER'S  PAGE  NO.  31 

E? 

S3 

1169 

REF 

1 

27,3255 

02  32  5 

1 

2CACP 

TRIMDCNE 

1169 

• DEF 

1 

21,-^2'it 

32067 

1 

1170 

Pt-F 

53 

LAST 

754 

27.3257 

0 5261 

1 

TC 

TASKCVFR 

117  1 

REF 

3C 

LAST 

609 

27,3260 

4 4742 

0 

FTTCFCFF  CS 

e IT  10 

117? 

27,326  1 

C 0006 

1 

EXTEAD 

1 1 73 

REF 

49 

LAST 

774 

27 ,3262 

0 3 312 

1 

WANC 

C FAN  12 

SHLT 

CFF  PITCH 

1 17A 

RFF 

1 

27,3263 

1 3247 

1 

TCF 

RCLLCVER 

SEE 

T F RCLL  HAS  F INI  SPEC 

AL  SO. 

1175 

REF 

52 

L AST 

755 

27,3264 

0 5 504 

C 

TO 

UPFLAG 

RCLL 

CCAF;  CP  PITCH  CCAE! 

; BUT 

NCT 

PCTH  . 

1176 

oc  p 

? 

LAST 

774 

27,3265 

3 U37 

1 

ACRES 

GMBCR VSW 

1177 

RFF 

54 

LAST 

775 

27, 3266 

0 5261 

1 

TC 

TASKOEP 
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L 

P 4 C-  P A 7 

LSER  •$  PAGE  NO. 

32 

E6  S3 

PI  178 

SUPFOLTINF  NAME:  S41.1 

MCn.  NC.  C CATE: 

feeflary 

28  , 

1967 

R1179 

NCO.  NC.  1 CATE:  JANUARY 

23,  1968: 

BY 

PETER  ADLER 

(MIT/IL) 

RUfil  AU7l-nR;  JONATHA'^  C.  ADOELSTCN  (ADAr'S  ASSCC!ATES» 


R I 1R2  S4rn~PEFFrpvs  the  CCOROIN'ATE  SYSTEM  7 R AN  FOR « AT  1C  ^ FRCR  THE  pFFERENCE  FPARE  TC  IFF  PCCY  CF  THE  LR. 

P118A  SPECIFICALLY,  If  IS  LStriO  TFANSFCOR  A VELCCITY  (SCALEE  AT  2(  + 7)  M ETER S /C ENT  I SECOND ) FRON  REFERENCE  TC  LN  AXIS 

P1186  COCRCINATES.  FIRST  THE  VECTOR  IS  TRANSFCPREC  TC  THE  STABLE  RE»EER  (CCPCINATES  EY  THE  RATFIX  REFSRWAT.  TUS 

PL188  LEAVES  TEE  VFCTCR  IN  MPAC,  SCAIEC  AT  2(48)  METE  P S /C  EN' 7 I S ECONC  . THEN 

RI1B9  THF  SL6PQLTINF  COLTRIG  IS  CALLED  TC  SFT  UF  THE  CCU E L E- FR E C IS  I CN  CCU  VECTOR  ALCNG  WITH  ITS  SINES  AND  COSINES. 

RIlRl  THE  VECTOR  IS  THEN  TRANSFORMED  FROM  STABLE  MEMI3ER  COCRDINATES  TC  SPACECRAFT  (CP  LP)  CCCRCINATES  EY  THE 

R1 1<53  SLEIROLTTNF  «SMNB*.  FTNAllV  ( THF  VICTOR  IS  RESCALED  TO  21+7)  METE  R S /CENT  I SECOND  , AND  CCNTROL  IS  RETLRNEC  TC  THE 

P119S  CALLEP  with  C(MPAC)  = VF LCF I T Y ( LM) . 


R1196  CALI  I NG  SECUFNCF: 


A1197 

L 

VLCAC 

CALL 

A1198 

L + 1 

VELOCITY(RFF) 

SCALED 

AT  2(47)M/CS 

IN 

REFERENCE  COCRCS. 

A 1199 

L 42 

941.1 

A 1200 

L 43 

STORE 

VELCCITYILM  ) 

SCALED 

AT  2(4?)M/CS 

IN 

LM  BCDY  AXIS  SYS. 

P I 2n  RLFPnuT  INFSCAL  LET: 


P I2C?  1.  CCUTP  IG  , 

P I 203 WHICH  calls  CCLLCGIC. 

R12N4  2.  «SPNR« 

R120S  NORMAL  RETURN;  L 43  ( fee  CALLING  SECUFNCE,  A8CVE.) 


R12:)6  ALARM/AECPT  MC>0ES:  NONE. 


P 1 2 C 7 


R'-STAPT  PROTECTION:  NCNT 


gap:  ASSrf'BLc  RFVISION  U6  CF  ACT  FPrGPfl^  LUMN/'FY  BY  N/'SO  202  1 ll2-r^71 
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P1278  INPUT: 

R1209 1.  PEPSNPAT. 

RI210  ?.  CCUX,  cnuY,  COUZ. 

R1211  3.  VeiCriTY  (PFP)  IN  NPAC. 


R1212  OUTPUT; 

P1213 1.  CCUSFCT;  rrURLF  PR’^'CISION  CD.I  VECTCR,  CRCEPFU  Y,Z,-X. 

P12M  2.  SINCrU;  HALF  SINES  CF  CCUSFCT  CCNPCNENTS. 

R121S  3.  COSCCU:  HALF  CCSINES  CF  CDLSPCT  CCNFCNENTS. 

P121F A.  PFAC: VE  L C C I T Y ( L >> ) (SCALEC  AT  2(-»7)  N ETER  S /CEN  T I SECONC  ) 


R1217  CEERIS:  NONF. 


R1218  CHfCKCUT  STATUS:  CFCEC. 


121S 

pff 

1 

COUNT  X 

T3/SX.1.  1 

1220 

27, ’267 

76521 

C S ^ 1 . 1 

PXV 

VSLl 

CCNVEPT  VECTOR  IN  MPAC  FRCM  REF  AT  2(+7) 

1221 

1222 

RFF 

2A  LAST 

76A 

27. 3270 

27.3271 

01  73A 
77650 

0 

1 . 

GOTC 

RFF  SRIXAT 

TC  SM  ANC  rescale  CUE  TC  HALFUNIT  R7TR1X 
CONVERT  TO  body  AT  2(+7)  LSING  PRESENT 

1223 

A1224 

RPF 

2 LAST 

52C 

27,3272 

A76  50 

1 

CCL*SRNB 

CCL  ANGLES.  CCU*SPNE  RILl  RETURN 
VIA  RVG  TO  THE  CALLER  CF  S41.1 
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ccri 

oor2 

0003 

PPF 

; 

LA  ST 

60? 

32,2777 

32,2000 

32,2777 

RANK 

S=TLCC 

BANK 

32 

F2CPSX32 

OC04 

RFF 

1 

F7,  1621 

EPANK= 

E2CPS 

RDO'15 

R63: 

TFF 

lUNAR  LANDING, 

BRAKING  PHASF 

P0CC7 

0008 

R:^F 

1 

CUUM* 

. 

CCC9 

RFF 

51 

1 AST 

769 

32,2777 

0 5353 

1 V 

P63LR  \ ( TC 

PFASCFNG  J) 

001  0 

32, 3Cor 

04C24 

c " 

0 4024 

001  ! 

RFF 

212 

1 AST 

752 

32,3  101 

0 4616 

1 

TC 

8ANKCALL 

DO  IML  STATES  CHECK  RCLTINE  P02 

0012 

PFF 

8 

1 AST 

751 

32 ,3002 

11236 

0 

CAER 

RC2PCTH 

0013 

PPF 

1 

32,3003 

3 3254 

1 

CAF 

P63ADRF  S 

INITIALIZE  WHICH  FCR  FUPMEAEY 

0"1  A 

RFF 

26 

LAST 

751 

32,3034 

55  '455 

c 

TS 

WEIGH 

OOIF  1 

REF 

1 

32,3005 

3 2C00 

0 

CAF 

DFSTHRSF 

INITIALIZE  CVPQN 

00142 

REF 

4 

LAST 

75  1 

32, 3006 

55 ' 250 

r, 

IS 

D VTHPLSH 

CCl  43 

REF 

13 

LAST 

75  1 

32,3007 

3 4751 

c 

CAF 

FCUR 

JO  14  4 

RTF 

30 

LAST 

755 

32,  ’010 

CCl  C J c 

c 

TS 

nVCNTR 

0019 

P'=F 

84 

LAST 

756 

32,3311 

4 4753 

0 

CS 

ONE 

initialize  WCHFHASE  ANC  FLPASSC 

30  16 

RFF 

2 

LAST 

73  1 

32,3012 

55*  346 

0 

TS 

WCHPF  AS  F 

0017 

REF 

141 

LAST 

767 

32,3013 

3 4 7 5 5 

1 

CA 

ZERO 

CC17E 

RFF 

3 

LAST 

731 

32,3  U4 

55*623 

0 

TS 

FLPASSO 

0016 

RFF 

56 

LAST 

609 

32, 30  15 

4 4136 

c 

CS 

BIT14 

3019 

32,  3:  16 

C C006 

1 

EXTEND 

0020 

RFF 

50 

LAST 

775 

32,3017 

0 3 012 

1 

WAND 

CHAN  12 

REMOVE  TRACK-ENABLE  DISCRETE. 

0023 

REF 

11  = 

LAST 

769 

32,3020 

C 6C42 

1 

FLAGCPGY  TC 

I NTPPET 

CICNYSIAN  FLAG  WAVING 

0024 

32,3021 

43014 

0 

CLEAR 

CLEAR 

0025 

R = F 

C 

LAST 

766 

32,3022 

02663 

0 

NCTHRCTL 

0026 

OFF 

1 

32,3023 

0 3 2 7 1 

c 

RECFLAG 

0030 

32,3024 

43014 

0 

CLEAR 

SET 

0031 

RFF 

1 

32 ,3025 

0566  t 

1 

LRBYPASS 

0032 

REF 

4 

LAST 

726 

32,3026 

0 3?67 

0 

NLNFIjAG 

CC33 

32 , 302  7 

43014 

0 

CLEAR 

CLEAR 

0034 

RFF 

•a 

LAST 

504 

32,3030 

00266 

0 

P25FLAG 

TERMINATE  P25  IF  IT  IS  RUNNING. 

0035 

RFF 

5 

LAST 

569 

32, 303  1 

00270 

1 

RNDVZFLG 

terminate  F20  IF  IT  IS  RUNNING 

AJ036 

J137 
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003  8 
703P 

004  0 

PEF 

LAST 

717 

32,3033 
32, 3G34 
32,  3 135 

OCOOl 

02023 

41525 

0 

1 

0 

POOL 

0 

RLS 

PUSH 

AT  OC  LANCING  SITF  IN  MOON  FIXED  FRAPE 
AT  6C  ESTIPATEC  TIME  CF  LANDING 
PFAC  NCN'-ZFRC  TC  INCIGAIE  LLNAR  CASE 

004  ' 

REF 

*3 

LAST 

2G  1 

32, 3C36 

024C1 

c 

TLANC 

0042 

PFF 

2 

LAST 

150 

32, 3037 

3/625 

1 

STC ALL 

TPI  P 

AISC  SET  TFIP  FCF  FIRST  GLICANCE  PASS 

0043 

RFF 

1 

32,3u40 

55716 

1 

R F-TC-R 

0044 

32,  3C.41 

64312 

0 

\,SL4 

WXV 

004  5 

REF 

25 

LAST 

777 

32, 304? 

01734 

0 

REF  SPRAT 

0046 

PEF 

“a 

LAST 

20  1 

32 ,3C43 

37635 

0 

STCALL 

LAND 

0047 

REF 

1 

32, 3044 

71343 

0 

GUiniMT 

GUICIMT  INITIALIZES  WP  AND  /LAND/ 

CC46 

32 ,3045 

45345 

1 

CLOAC 

DSL 

0049 

REF 

4 

LAST 

77S 

32 ,3'’46 

02  40  1 

0 

Tl  ANC 

0050 

RFF 

1 

32, 3047 

2 5 26  1 

0 

GLIDDLPN 

0051 

RPC 

43 

LAST 

759 

32 ,3050 

34041 

0 

STCALL 

TCFOl 

INTECRATF  STATE  FCRWARO  TC  THAT  TINE 

009? 

RFF 

8 

LAST 

759 

32,3351 

27G60 

1 

LFPRREC 

0053 

32, 3052 

7733  1 

0 

SSP 

VICAO 

005  3 1 

REF 

1 

32,3053 

03647 

1 

N IGNLCOF 

00532 

32,3054 

CCG50 

1 

4CD 

0G57 

REF 

7 

LAST 

76  2 

32,3055 

06522 

1 

UNITX 

0058 

REF 

2 

LAST 

123 

32 ,3C56 

2 6 5 7 5 

1 

STCYL 

GG 

0059 

REF 

4 

LAST 

584 

32, 3057 

C6  520 

0 

UM  TY 

0C60 

REF 

3 

LAST 

779 

32 ,3060 

2660  3 

0 

STGVL 

C G +6 

0061 

RFF 

7 

LAST 

705 

32,3061 

06516 

c 

UMTZ 

0062 

REF 

4 

LAST 

779 

32,3062 

16611 

0 

STCDL 

CG  +14 

0062  1 

REF 

1 

32,3063 

25257 

0 

99999G0N 

0062  2 

PEF 

4 

LAST 

3 16 

37, 3064 

27665 

1 

STG\/L 

DFITAI- 

initialize  CELTAF  FCR  V16N68  DISPLAY 

00623 

RFF 

12 

L act 

759 

32 , 3-I65 

06524 

1 

ZEPOVFCS 

006?^ 

REF 

4 

LAST 

764 

32,3066 

1 72  54 

1 

STCCL 

UAFC/2 

INITIALIZE  TRIM  VFLnCIlY  CORRECTION  TERN 

0063 

PEF 

7 

LAST 

769 

32, 3067 

06  524 

1 

HI6ZEP0S 

0C65 

REF 

3 

LAST 

20  1 

32 , 3070 

03643 

0 

STORE 

TTF/R 

0066 

32,3071 

7 7 7 4 5 

1 

IGNALCCF  CLCAC 

0067 

REF 

15 

LAST 

726 

32,3072 

00015 

T 

TAT 

0068 

RFF 

4 

LAST 

726 

32,3073 

27561 

0 

STGVL 

P IPT  IPEl 

0073 

RFF 

10 

LAST 

726 

32, 3074 

000  1 7 

1 

PATTI 

0C74 

32, 3:>7  5 

64312 

0 

VSL4 

MXV 

0075 

RPF 

26 

LAST 

779 

32  ,3076 

0 17  3 4 

c 

REFSMM AT 

0076 

REF 

5 

LAST 

6>'  1 

32,3077 

3752  1 

c 

STCALL 

P 

C^'77 

RFF 

2 

LAST, 

726 

32,31TO 

67067 

1 

MUHGRAV 

0078 

RFF 

4 

LAST 

67F 

32,3101 

35236 

c 

STCALL 

GCT/2 

0079 

REF 

1 

32, 3102 

6 240  2 

J 

?GUI Dsue 

1>FICH  DFLIVFRS  N PASSES  CF  GUIDANCE 

R0C8O 

DOlMCnC 

IS  PROGRARYFO  AS  FCLLCUS:- 

POOP] 2 

(RIGAZ  - RGM  )/16  ♦ 16(RGU  )KIGNY/ee  + (RGL  - R I GN  X ) K I GN  X /B  A + (AeVAl(\,GL)  - V I G A ) K I G A V / EA 
RDOflS  21  n 

R0086 ^CUP  = 

To 


R0C8R 

RC089 
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( VGL 
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L 
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Rcccr 

2 

r 

R3091 

THE 

NUNFRATOR 

IS  SCALED  IN  '^ETFRS  AT 

2(26)  . 

THE  OENORINATOR  IS  A 

VELOCITY  IN  UNITS  CF  2(10IY/CS. 

POO<33 

THE 

CUCTIENT 

IS  thus 

A T IME 

IN  UNITS 

OF 

2(18)  CFNTISECCNOS.  THE 

FINAL  SHIFT  PFSCALES  TO  UMTS  CF  2(28  1 

OS. 

R0095 

THERE  I 

S FC  DAWFTFG 

FACTCF. 

TFE  CONSTANTS 

K IGNX/P4  , 

KIGNY/P8  ANC 

KIGNV/84  ARE  ALL  NEGATIVE  IN  SIGN. 

0097 

REF 

2 

LA9T 

779 

32,310? 

55*646 

0 

CrtRCALC  IS 

MGNLCGF 

00971 

RFF 

116 

LAST 

778 

32,3114 

0 6042 

1 

TO 

INTPRET 

OC972 

32,3115 

( 57345 

l\ 

CLCAC 

CRPR 

FCRN  CENCN’INATOR  FIRST 

009R 

REF 

3 

LAST 

2"  1 

32, 3106 

i'TETT 

T 

VGL' 

CC99 

REE 

2 

LAST 

122 

32,3107 

02501 

1 

K IGNX/84 

0100 

32,311C 

44232 

1 

SL4R 

8CSU 

■U'i 

P^^F 

4 

L AST 

780 

32, ’1  1 1 

03633 

1 

VGU  +4 

0102 

32,3112 

45325 

1 

FOOL 

DSU 

0 103 

REF 

2 

LAST 

122 

32, ’113 

02477 

1 

R IGNZ 

010^ 

REF 

3 

1 AST 

201 

32  ,3114 

02633 

0 

RGL  +4 

0109 

32  ,3115 

65222 

c 

SR4R 

PCCL 

0106 

RFF 

4 

1 AST 

780 

32,2116 

0263  1 

1 ' 

RGL  +2 

0107 

32,3117 

573  16 

1 

cso 

DRPR 

(1  lOR 

REF 

2 

LAST 

122 

32, 2120 

02  5C3 

0 

KIGN'Y/B8 

0109 

32,3121 

65232 

1 

SL4R 

POOL 

0 1 lO 

REF 

9 

HAST 

78C 

32,3122 

02627 

0 

RCU 

on  1 

22,2123 

5 7 2 2 5 

n 

CSL 

DNFR 

0112 

REF 

2 

1 AST 

122 

32,3124 

02475 

0 

R IGNX 

0113 

REF 

■3 

LA  ST 

78C 

32 ,3125 

0 2 5J  1 

1 

K IGNX/84 

01 1 4 

22,2126 

51515 

1 

PDVL 

ABVAL 

Oil  5 

RPF 

5 

LAST 

780 

32  ,3  127 

03627 

1 

VGU 

0116 

22,3130 

57225 

u 

CSL 

ON  PR 

01  1 7 

REF 

2 

1 AST 

122 

32,3131 

02473 

0 

VIGN 

01  15 

REF 

2 

LAST 

122 

32  ,3132 

02505 

0 

K IGNV/84 

0119 

32,2132 

43  2 1 5 

0 

CAC 

DAD 

0120 

32,3134 

56215 

1 

OAC 

DDV 

0121 

32 ,0 125 

77661 

0 

SRP 

0122 

32,3136 

2 16  13 

0 

lOD 

0123 

32,3137 

43206 

1 

PUSH 

DAD 

0124 

REF 

5 

LAST 

779 

32,3140 

03  56  1 

0 

PIPTIREl 

0125 

REF 

44 

LAST 

779 

32,3141 

14041 

1 

STOOL 

TCFCl 

STCPF  NEk«  GUESS  FOR  NEXT  INTEGRATION 

0126 

32  ,3142 

45246 

0 

ABS 

DSU 

0127 

REF 

1 

22,3143 

25263 

1 

DCLRO  FIT 

0125 

32,3144 

45040 

1 

EMN 

CALL 

0129 

RPF 

1 

32  ,3  145 

6 5 16  4 

1 

DCUMGCOC 

0130 

REF 

26 

L AST 

710 

32,3  146 

274  12 

0 

I NTSTALL 

0131 

32,3147 

43J14 

0 

SFT 

SET 

0132 

RFF 

14 

LAST 

7 1C 

32,3150 

01473 

c 

I NTY  FFLG 

0133 

REF 

13 

LAST 

711 

32,3151 

OC063 

1 

MCONFLAG 

0134 

32,3152 

77745 

1 

CLCAC 

0136 

RFF 

6 

L AST 

7 8 0 

32,3152 

03  56  1 

c 

PIPTIRFI 

0137 

RFF 

1? 

LAST 

710 

37,3154 

25517 

0 

STOVL 

TET 

HOPEFULLY  ?GUlDSUe  DIO  NOT 

0138 

REF 

1 1 

LAST 

779 

32,3155 

000  17 

1 

PATTI 

OLCEEFP  RATTl  AnC  VATTl 

G<\P 
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3139 

PFF 

12 

LAST 

710 

32,3156 

25535 

3 

STOVL 

RCV 

0 190 

OFF 

13 

LAST 

726 

32,3157 

CCC25 

C 

VATTl 

0191 

PFF 

10 

LAST 

710 

32,316'' 

3 p c ^ 3 

0 

STCALL 

VCV 

C19Z 

RCF 

7 

LAST 

7 1C 

32,3161 

27110 

1 

I ATEGRVS 

0193 

32, ’ 162 

776  5C 

1 

GCTC 

0199 

PbF 

1 

32,316? 

65071 

1 

IGAALCCP 

0195 

32,3169 

59335 

0 

CCUMGCCC 

SLCAC 

SR 

0196 

PEF 

9 

LAST 

73  1 

32.3165 

C3923 

1 

ZCCPT I ve 

C19  7 

32 ,3166 

20617 

0 

19D 

3198 

32 ,3  167 

77621 

1 

BCSL 

0199 

REF 

95 

L AST 

780 

32, 2170 

0CC9  1 

1 

TOECl 

0150 

RFP 

33 

LAST 

769 

32  ,3 17  1 

27992 

0 

STOVL 

TIG 

COMPUTE  DISTANCE  LANDING  SITE  RILL  8E 

0191 

RFF 

•3 

LAST 

60  1 

32,3172 

0352? 

1 

V 

fUT  CR  LM'S  ORBITAL  FLAAF  AT  IGAITICN: 

0152 

32,3173 

53935 

r- 

VXV 

UNIT  __ 

SIGN  IS  + IF  LANCING  SITE  IS  TC  TFE 

0150 

R'^F 

6 

1 AST 

779 

32 , 31 79 

03521 

1 

R 

c RIGFT,  NCRTH;  - IF  TC  THE  LEFT,  SCUTF. 

0159 

32,3175 

729A  1 

C 

CFT 

SLl 

0155 

REF 

9 ■ 

LAST 

779 

32,3176 

03635 

1 

LAND 

0156 

PFF 

3. 

LAST 

316 

32 ,T 177 

2661  7 

c 

R60I A I 7 

STCVL 

CUTOFFLN 

INITIALIZATION  FOR  CALCMAM 

0157 

REF 

5 

1 AST 

779 

32,3200 

0 3259 

1 

UAFC/2 

0156 

RFP 

9 

LAST 

123 

32,3201 

02621 

0 

STORE 

R60VSAVE 

STORF  L'NFC/2  TFMPCPARILT  in  P60SAVE 

016? 

32,2202 

77  776 

7 

EX  I T 

40163 

0 169 

REF 

52 

LAST 

778 

32 , 3203 

0 5353 

1 

IGNALGRT 

TC 

PFASCFAG 

PREVENT  repeating  IGNALG 

0165 

32,  32''9 

C9029 

0 

OCT 

09029 

0166 

RFF 

1 

32,3205 

9 9362 

0 

ASTNCLOK 

CS 

ASTNCEX 

0167 

RFF 

213 

LAST 

77E 

32,3206 

C 9616 

1 

TC 

8 A A K C A L L 

016B 

PEF 

2 

LAST 

726 

32, 2207 

7 9 6 7 0 

0 

CAOR 

STCI CK2 

C169 

REF 

126 

LAST  , 

76  9 

32,3210 

1 5155 

1 

TCF 

F ACOF JOB 

RETURN  IN  NER  JOB  AND  IN  EBANK  FIVE 

3170 

REF 

117 

1 AST 

780 

32,2211 

C 6C92 

1 

ASTNRET 

TC 

T ATPRET 

0171 

32,3212 

97131 

1 

SSP 

RTB 

GC  PICK  LP  display  AT  END  CF  R51: 

0172 

REF 

2 

LAST 

125 

32,3213 

02797 

1 

GPAJ 

"prcceed"  r/ill  do  a fine  .alignment 

0173 

REF 

1 

32,3219 

6 52  16 

1 

FCAOR 

P63SPFT2 

" ENTER  " R/lLL  RETURN  TC  R63SF0T2 

0179 

RFF 

1 

32  ,3215 

31127 

1 

R51P62 

0175 

32,3216 

53575 

c 

P63SPCT2 

VLFAF 

UAl  T 

INITIALIZP  KALCMANU  FOR  BURN  ATTITUDE 

0175  1 

PFF 

5 

1 AST 

78  1 

32,3217 

0262  1 

0 

R 6G VSAVE 

Cl  752 

PEF 

6 

LAST 

762 

32,3220 

27773 

1 

STCV  1 

PCIA'TVSP 

0175? 

RFF 

8 

LAST 

779 

32, ’221 

06522 

1 

UAITX 

01759 

REF 

23 

LAST 

762 

32,3222 

03765 

0 

STORE 

SCAXIS 

01755 

32,3223 

7T776 

1 

EXIT 

01756 

RFf 

6 

LAST 

75  5 

32,3229 

3 5C16 

r 

CAF 

EPANK7 

017  5 7 

REF 

29 

1 AST 

755 

32  ,3225 

54  0 13 

0 

TS 

EBANK 

0176 

32, ’226 

C CCC9 

f 

lAHI AT 

0177 

REF 

38 

t AST 

755 

32,3227 

C 9679 

0 

TC 

IBAKCALL 

0178 

RTF 

2 

LAST 

797 

32, 3230 

90193 

0 

CACP 

PFLITECe 
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017<? 

32,3231 

0 0903 

1 

RFL  INT 

'•180 

P.FF 

214 

LAST 

781 

’2,3232 

0 4615 

1 

TC 

PANKCALL 

0181 

REF 

5 

LAST 

7 4 7 

32, 3233 

54  123 

0 

CACR 

R60LE*' 

0182 

REF 

53 

LAST 

78  1 

32,3234 

0 5353 

1 

TC 

PFASCFN'G 

PREVENT  RECALLING  R6C 

0183 

32,3235 

C4C24 

c 

CCT 

94024 

018^, 

PPf 

41 

LAST 

68  1 

32, 2236 

3 4 74  6 

c 

P63SPCT  3 

CA 

BIT6 

IS  THE  LP  ANTENNA  IN  PCSITICN  1 YET 

0185 

32,3237 

C 0006 

1 

EXTEAC 

0186 

REF 

22 

LAST 

607 

32,3240 

C2  C33 

0, 

RANG 

CHAN33 

0187 

32,3241 

0 C0(i6 

1 

EXTEND 

0188 

RRF 

1 

32,3242 

1 3 2 50 

1 

ezF 

P63SPCT4 

ERANfF  IF  ANTENNA  ALREADY  IN  POSITICN  1 

0189 

RFF 

1 

32,3243 

3 32  5 5 

c 

CAF 

CC0E5C0 

ASTPCNAUT:  PLEASE  CRANK  TFE 

0190 

REF 

215 

1 AST 

782 

32,3244 

0 4616 

1 

TC 

RANKC ALL 

SILLY  THING  APCLNC 

0191 

RFF 

4 

LAST 

74  1 

32,3245 

2C624 

0 

CACR 

CCPFPFl 

0192 

REF 

26 

L AST 

752 

32,3246 

1 6001 

-1 

TCF 

GCTOFCOH 

IFRPI NATE 

0193 

Rl^F 

1 

3? , 3247 

1 3236 

1 

TC  F 

P63SPCT3 

PROCFEC  SEE  IF  HE ' S LYING 

1194 

RFF 

2 16 

LAST 

782 

32, ’250 

C 4616 

1 

F63SFCT4 

TC 

8ANKCALL 

ENTER  initialize  LANDING  RADAR 

0195 

REF 

1 

32,3251 

6 7 793 

1 

CACR 

SFTPO':i 

0196 

REF 

45 

LAST 

755 

32,3252 

C 4635 

0 

TC 

PCSTJUMF 

CFF  TC  SEE  TFE  wizard. .. 

0197 

REF 

2 

LAST 

747 

32,3253 

74  130 

0 

CAOR 

BLPNBABY 

ROl  9fc 

R0199 

CCN 

STANTS  FCP  P63L^ 

' AAC  IGAALC 

020C 

REF 

2 

LAST 

74  1 

32,1254 

02  190 

1 

F63ACRES 

CFNACR 

P63TABLE 

0?H2 

REF 

2 

LAST 

46C 

4362 

ASTNCEX 

PCI 

CCT  25;  INDEX  FOR  CLOKTASK 

0293 

32,3255 

00500 

1 
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6 0030 

1 

COUPLE 

0137 

REF 

■a 

LAST 

766 

31  , 2302 

53' 61 1 

1 

cxr  F 

R1«E  IGFT 

013P 

FEF 

8 

L AST 

789 

3 1 , 2 36J  3 

1 1 ' 6 12 

1 

C.C  s 

PIF 

C13<; 

REF 

P5 

1 AST 

778 

31  ,2304 

6 4753 

1 

AD 

ONE 

3140 

31,2305 

1 23C7 

0 

TCF 

+ 2 

0141 

RRF 

86 

L AST 

789 

31 , 2306 

6 4753 

1 

AO 

ONF 

014? 

31 ,2337 

0 0006 

1 

EXTEAO 

■3143 

REF 

0 

LAST 

789 

31,2310 

7 1612 

1 

V p 

PIF 

C144 

31,2311 

0 000  6 

1 

EXTEND 

0 14*^ 

pop 

5 ^ 

LAST 

788 

31  ,2312 

10  131 

c 

rv 

eUF  +1 

0146 

31, 2313 

22  007 

c 

ZL 

0147 

REF 

LAST 

789 

31,2314 

21 '61  1 

1 . 

CAS 

FWF  IGFT 

0148 

REF 

a 

• LAST 

786 

31,2^15 

0 1607 

1 

THDU^'  F 

TG 

PTNHCLC 

R0149 

FLATCUT  THP.CTTIES 

UP  the 

CFSCENT 

ENGINE,  AND 

IS  CAILEC  AS  A 8ASIC 

SLBRCLTINE. 

0151 

REF 

29 

LAST 

733 

31  ,2316 

3 4737 

0 

FLATCLT 

CAF 

8 IT13 

4096  PULSES 

0152 

RFF 

5 

LAST 

788 

31,2217 

55 '606 

1 

WHATOLT 

IS 

PIFPSET 

USE  PIFFSET  SC  FWEIGFT  l«  I L L FE  ZFRC 

C153 

P^F 

1 43 

LAST 

787 

31 ,2320 

4 4755 

0 

CS 

Z EPO 

0154 

RFF 

4 

LAST 

787 

31,2321 

55  ' 62C 

C 

1 S 

FCCLC 

0155 

RRr 

U) 

LAST 

789 

31,2322 

5 f ' 6 1 2 

1 

TS 

PIF 

C156 

31,2323 

0 CC06 

1 

extend 

0157 

RFF 

4 

LAST 

789 

31,2324 

23 ' 6C7 

1 

CXCH 

RTNHCLD 

0158 

REF 

1 

31 , 2325 

1 2240 

1 

TCF 

DOIT 

ROl^^q MASSMUT  SCALES  AFCE I 4T  T CN  i ARRIVING  IN  t ^^C  L IN  UMTTS  OF  2 (-4  ) M/CS/CS,  TC  FCRCF  IN  PUSE  LNITS. 


0161 

C162 

RFF 

54 

LAST 

789 

31,2326 
31  ,2327 

C 0CO6 
22  130 

1 

0 

MASSPLLT  EXTEND 
GXCF 

euF 

0163 

RFF 

301 

LAST 

767 

31 , 233C 

52  155 

1 

CXCF 

R FAC 

0164 

RFF 

16 

LAST 

437 

31,2331 

0 7106 

1 

TC 

ORP 

CU5 

RFF 

c 

LAST 

296 

31,2332 

01243 

0 

ACRES 

RASS 

0166 

RFF 

17 

1 AST 

789 

31,2333 

0 7106 

1 

TC 

DRP 

LEAVES  FRCFEPLY  SCALED  FFRCE  IM  MPAC 

0167 

REF 

1 

31 ,2334 

D20O5 

0 

ACRES 

SCALEFAC 

0168 

RFF 

IF 

LAST 

767 

31  ,2335 

0 7 26  2 

0 

TC 

TFAGPEE 

0169  REF  302  LAST  789  31,2336  3 C154  1 CA  RPAC 

017C  31,2337  n C0U6  1 EXTEND 

0171  31,234F  1 2343  0 PZF  +3 

r 

0172  REF  15  LAST  786  31,2341  3 473’  1 CAF  PCSRAX 

017’  RTF  55  LAS’’  789  31  ,2342  o 0130  0 TC  BU  F 

0174  REF  303  LAST  789  31,234’  52  156  1 CXCH  RFAC  +1 

/ 

1175  REF  56  LAST  780  31,2344  0 0130  0 7C  BUF 

K 
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POOOl 
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ROOOA  LUNAP  LANCING  FLICET  SEQUENCE  TABLES 
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R0009  FLIGHT  SEQUENCE  TABLES  ARE  ARRANGED  PV  FLNCTICN.  THEY  ARE  REFEPENCFC  USING  AS  AN  INCEX  THE  REGISTER  kCHPHASE: 


AOOll  UCHPHASE  = -1  > IGNALG 

ACCU  WCHFHASE  = C > PRAKQLAC 

A0013 ^iCHPHASE  = 1 > APPPQUAC 

A0014  WCHPEASE  = 2 > VFRTICAL 
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P0017  ROUTINES  FOR  STARTING  MEW  GUICANCE  PHASES: 


CC18 

REE 

1 

3 1 ,2346 

1 

2603 

1 

TC  F 

TTFINCR 

ignal  G 

0019 

REF 

2 

LA  ST 

791 

31,2347 

1 

2603 

1 

NEW  PHASE 

TCF 

TTFTNCR 

ERAKCUAC 

0020 

REF 

1 

31,2350 

1 

2566 

1 

TCP 

STARTP64 

approlad 

002  1 
R0O22 

REF 

1 

31  ,2351 

1 

2557 

0 

TCF 

P65START 

VERTICAL 

R0023 

PRE- 

CL  1 CANCF 

CCA'FLTATTCNS  : 

0024 

REF 

1 

31,2352 

1 

2 7 63 

C 

7CF 

CALCRGVG 

IGNAL  G 

0025 

REF 

1 

31,2353 

1 

2 7 7 3 

1 

PRFGL  IDE 

TCF 

PGVGCALC 

EPAKCUAE 

0026 

REF 

1 

31  ,2354 

1 

2664 

0 

TCF 

RFDESTG 

APPROLAD 

0027 

PEE 

2 

LA'T 

79  1 

. 31,2355 

1 

2 7 73 

1 

TCF 

RGVGCALC 

VERT  I CAL 

R002R 

R0029 

GUIDANCE 

EQLATICNS; 

103T 

PEE 

1 

31,2356 

1 

3C41 

G 

TCF 

TTF/8CL 

IGNALG 

0031 

PEE 

7 

LAST 

7P  1 

31  ,2357 

1 

304  1 

0 

WHATGU IC 

Tcr 

TTF/8CL 

BRAKOLAD 

0032 

PEE 

2 

LAST 

79  1 

31,2360 

1 

3C41 

r 

TCF 

TTF/eri 

APFPCU  AC 

003  3 
RCC34 

REF 

1 

31,2361 

1 

3514 

0 

1 

TCP 

VERTGLID 

VERTICAL 

R0035 

POST 

GUIDANCE 

EGUATICN  COMPLTAT  ICN’S  : 

0036 

PEE 

1 

31 , 2362 

1 

3240. 

0 

TCF 

CGC ALC 

IGNALG 

0037 

REF 

1 

31 ,2363 

1 

3225 

0. 

AFTRGUIC 

TCF 

EXTLCC-IC 

PRAKQLAC 

0038 

REE 

2 

LAST 

791 

31 , 2364 

1 

3225 

c 

TCF 

E XTLCGl C 

AFFRtUAC 

0039 

R0C40 

RFE 

1 

31 ,2365 

1 

3411 

1 

TCF 

STEER? 

VCRTICAL 
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0042 

RF.F 

1 

31 , 23tF 

1 

3310 

1 

TCF 

FXGSUE 

IGAiLG 

0043 

RFF 

1 

21,2367 

1 

333  1 

1 

VvFATF)(n  TCF 

E XRRAK 

ERAKCUAC 

0044 

REF 

1 

?l,  2 3 7r. 

1 

3337 

1 

TCP 

EXACRA 

APPPOLAC 

R0Q45 


P0046  CTSFLAY  PCUTIAFS: 


0C47 

RFF 

1 

31 ,2371 

1 3450 

1 

hFATC  ISF 

TC  F 

P63DISPS 

ERAKOLAO 

0048 

RFF 

1 

31, 2372 

1 3453 

1 

TCF 

P64DI SPS 

AFFPCUAC 

0C4S 

REF 

1 

31 ,2373 

1 3502 

1 

TCF 

VFRTDISP 

VFPTTCAl 

R0080 

Pl'TSl 

AL  /RP 

POUTIAE  FCP  TTF  COPPUTATinN: 

0052 

RFF 

1 

31 ,2374 

1 3712 

1 

TCF 

1406FCC 

IGNAL  G 

0053 

RFF 

1 

31,2375 

1 3714 

1 

^iHATALP 

TCF 

1406AI A 

EPAKCUAC 

0054 

R0055 

REF 

2 

LAST  792  31,7376 

1 3714 

1 

TCF 

1406ALM 

APPRGUAC 

R00S6 

I A C I C F R 

FOR  RFFFRFNCIN'G  TARGF 

T parapeter?; 

0C57 

31,2377 

ooooo 

1 

OCT 

n 

IGNALG 

OGEE 

31 ,240C 

OOOOO 

1 

TAPGTCEX 

CCT 

0 

EPAKCUAO 

0050 

R0C6C 

31, 2401 

CC034 

0 

CCT 

34 

AFFPCUAC 

P'1061  3^  4 ^ ^ i ^ K 3t  ^ ^ 4 * ^4!  Jii  4 4 ^ ^ ^ ^ ^ ^ 4 ^ ^ ^ ^ ^ i ^ ^ ^ ^ 4 i ^ ^ ^ ^ 
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CC67 

0068 

RFF 

46 

LAST 

745 

31,2402 
31,  24  >3 

77776 
3 4 7 52 

! 

C 

7GUICSUR 

EXIT 

CAF 

T v.n 

N = 3 

0069 

RFF 

1 

31,2414 

55 '647 

1 

TS 

NGLIOSOB 

CC7C 

REF 

1 

31 ,24.15 

1 2541 

1 

TCF 

GUILDFET  +2 

1071 

RFF 

2 

LA  SI 

792 

31 , 24  16 

55'647 

1 

G L I ; ' L P 

TS 

NGL I !:sue 

CN  5UCFFG1NG  PASSES  SKIP  TTGJcxp 

0072 

RFF 

2 

LAST 

791 

31,2407 

1 2763 

0 

TCF 

C ALCPGVG 

R0073 

NCR^'AL 

FATPV: 

CCMRCL  CCAFS 

FERF  FPCN 

SFFVCUT 

0074 

RFF 

55 

LAST 

784 

:^1  , 2410 

0 5 3 

1 

LUALAND 

TC 

PHASr HNG 

CC75 

31,2411 

0C0  3 5 

1 

OCT 

0 0035 

GRGLP  5:  RETAIN  ONLY  PIFA  TASK 

0076 

RFF 

24 

LAST 

753 

31,2412 

3 ClOl 

1 

CA 

FLAGWPC5 

FAS  TFRCTTLF-IjP  CCMF  YET? 

0077 

RFF 

1 

31, 2413 

7 4 7 4 4 

C 

AASK 

ZCCPBIT 

CC78 

31,2414 

Q CC06 

1 

EXTENT 

00  7Q 

RFF 

1 

31,241^ 

1 3442 

1 

BZF 

DISPEXIT  +3 

NC:  CC  riSFLAYS  ONLY 
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0080 

REF  .56  LAST  7Q2 

31  ,2A16 

0 5353 

1 

TC 

PFASCFNG 

YES: 

Cr  GLICAN'CE 

0081 

31, 2A17 

C5023 

0 

CCT 

05023 

0C82 

31  ,;;t7o 

2T00  ) 

0 

OCT 

2C00C 

R0r,3S  GUI.DENSTEP  N:  AUTC-NGDES  MONITOR  (R13) 

0088  REF  1 COUNT*  tt/R13 


ROOSO  FERE  IS  THF  PFILCSOPFY  FF  GU  I L C ENST ER N : ON  EVERY  APPEARANCE  OR  DISAPPEARANCE  CF  THE  RANLAL  THPCTTIE 

ROnoi  DISCRETE  TO  SELECT  P67  OR  P66  RESPECTIVELY;  CN  EVERY  APPEARANCE  OF  TFE  A TT I TUDE- FO ID  DISCRETE  TC  SELECT  PEE 

R0003  UNLESS  ThF  CURRENT  PROGI’AM  IS  P67  IN  WHICH  CASE  THERE  IS  NO  CHANGE. 


CC5A 

?1  ,2A21 

0 0006 

1 

GU  ILCEN 

RXTENG 

I S 

UN-ALTD-TFPOTTLE  DISCRETE  PRESENT? 

0005 

PPF 

5 

LAST 

7A0 

31.2A22 

CO  030 

1 

■STFRN 

REAC 

CFAN30 

0006 

PEF 

36 

LAST 

7AA 

31,2^23 

7 A 7 A 7 

C 

FASK 

BIT5 

0007 

RPF 

2 3 3 

LAST 

756 

31  ,2A2A 

10  000 

0 

res. 

A 

0008 

PFF 

1 

31, 2A25 

1 2 503 

1 

TCF 

STARTP67 

YES 

0000 

P'^F 

A 

LAST 

733 

31 ,2A26 

0 532  1 

1 

P67NOW? 

TC 

C FECKHM 

NC  : 

APE  WE  IN  F67  NCW? 

0 mo 

31 ,2A27 

0'^103 

0 

CEC 

6 7 

01  n 

PFF 

1 

31, 2A3C 

1 25  11 

1 

TCF 

MABL? 

AC 

0102 

RFF 
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LAST 

787 

31  ,2A31 

0 3717 

0 

STARTP66 

TC 

FASTCHNG 

YES 

0103 

PEF 

2 

LAST 

37A 

31, 2A32 

0 53  1 1 

1 

TC 

NEWHCCEX 

01  >A 

31 , 2A33 

OC  102 

1 

CEC66 

CFC 

66 

0105 

31 ,2A3A 

0 C006 

1 

FXTENC 

T1T6 

PEF 

6 

LAST 

316 

31.2A35 

3 1A7A 

1 

CCA 

HCCTDISP 

SFT 

CESIPEE  ALTITUDF  P/TF  = CURRENT 

0107 

RFF 

1 

31 ,2A36 

53' 6A5 

CXCF 

VDGVERT 

ALTITLDF  RATE. 

0108 

PEF 

120 

LAST 

7EA 

31  ,2A37 

r 60A2 

1 

STRTF66A 

TC 

INTPPFT 

01  )0 

31, 2AAC 

A1535 

1 

SLCAD 

PLSH 

Clio 

RCF 

1 

31 ,2AAl 

01 A57 

0 

PRIASZ 

0111 

3 1 , 2AA2 

A1535 

1 

SLCAC 

PLSH 

0112 

REF 

1 

31, 2AA3 

C1A55 

1 

PBI ASY 

C113 

?l ,2AAA 

55535 

1 

SICAC 

VCEF 

01  lA 

RFF 

2 

LAST 

lie 

?1,2AA5 

Cl  A53 

1 

PRTASX 

0115 

31 ,2AA6 

A3  16  1 

0 

VXSC 

SET 

0116 

PFF 

1 

31 ,’AA7 

255A6 

1 

R lASFACT 

0117 

PEF 

1 

31,2A50 

OCA63 

0 

R CDF  LAG 

on  F 

PEF 

1 

31  ,2A5  1 

26621 

0 

STOVL 

Ve  IAS 

Olio 

PFF 

2 

LAST 

105 

31 , 2 A 5 2 

C125A 

0 

TFNX 

0120 

31 , 2A53 

776  76 

f 

VCOPP 

0121 

REF 

2 

LAST 

1 52 

31  ,?A5A 

2 7 76A 

1 

STCVL 

OLOPIPAX 

J122 

RFF 

13 

LAST 

770 

31 ,2A55 

C652A 

1 

7FRCVFCS 

0123 

RFF 

2 

LAST 

152 

31 ,2A56 

1 7767 

1 

STCDL 

DELVPCD 

012A 

PEF 

2 

LAST 

123 

31  ,?A57 

C25AU 

1 

RCCSCAL  E 

0125 

PFF 

2 

LAST 

152 

31,2A6C 

1 77  5 7 

1 

STCDL 

PCDSCALl 

0126 

REF 

1 A 

LAST 

788 

31  ,’’A61 

0123A 

0 

P IPTIME 

0127 

RFF 

2 

1 AST 

1 52 

31  ,2A62 

03  760 

c 

STCRF 

LASTTPIP 

0128 

31, 2A63 

77776 

1 

EXIT 

01  2S 

REF 

1 AA 

1.  AST 

780 

31  ,?A6A 

3 A755 

1 

CAF 

ZERO 
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013P> 

RFF 

5 

1 AST 

789 

31,2865 

55  '620 

0 

IS 

FCCLD 

0131 

PF^F 

5 

LAST 

789 

31 ,2866 

55 ' 61G 

0 

TS 

FWF  IGHT 

0132 

PFF 

6 

LAST 

798 

31,2867 

55' 61 1 

1 

IS 

FkFIGFT  +1 

ni33 

RFF 

1 

31 ,2870 

55*687 

1 

vrtstart 

TS 

WCHVFRT 

•)13A 

RFF 

A7 

LAST 

792 

31 ,2871 

3 8752 

0 

CAF 

T^,C 

WCFPHASf  = 2 ■>  vertical:  F65,P66,P67 

013“5 

PEF 

2 

LAST 

73  1 

31 , 2872 

55*621 

1 

TS 

WCHPHCLC 

013( 

RFF 

3 

LAST 

773 

31 ,287^ 

5 5 * 38  6 

0 

TS 

WCEPFASE 

01'<7 

RFF 

2 1C 

1 AST 

7f  8 

31,2878 

F 8616 

1 

TO 

PANKC  ALL 

TEPFCRARY,  I HOPE  HOPE  HOPE 

0138 

RFF 

A 

1 AST 

755 

31,2875 

80166 

1 

CADR 

STCPRATF 

TENFCRAPY,  I ECFE  FCPF  FOPE 

0139 

PFF 

81 

LAST 

778 

31,2876 

0 5516 

0 

TC 

DCWNFLAG 

PERMIT  X-AXIS  CVERRIDE 

oi^n 

RFF 

3 

LAST 

230 

31,2877 

CC311 

1 

ADPF  S 

XCVl NFLG 

OlAl 

RFF 

82 

1 AST 

79A 

31,2500 

0 5 516 

r 

TC 

OOWNFLAG 

31A2 

RTF 

2 

LAST 

77f 

31 ,2501 

001'!,3 

1 

ACRES 

RFTFl  AG 

01A3 

RFF 

2 

LART 

79  1 

31,2502 

1 2518 

0 

TCF 

VFRTGLIC 

01  AA 

RFF 

3 

LAST 

793 

31 ,2513 

0 5311 

1 

ST  ART F6 7 

TC 

NFWMUDFX 

NC  HARM  IN  "STARTING"  F67  CVER  ANC  CVFP 

3 1 A5 

31 ,2508 

CC103 

0 

CFC 

67 

SC  NC  NEET  FOR  A FASTCHNG  ANT  NC  NEET 

01  A<S 

RFF 

1 A5 

LAST 

793 

31, 2505 

a ^ c c 

1 

CAF 

ZFRC 

TC  SEE  IF  ALPEACY  IN  F67. 

' 01A7 

ocp 

1 

31,2506 

55  * 746 

1 

TS 

R.  TDCCUNT 

01A8 

KEF 

6 

LAST 

86S 

31,2'=  17 

•c 

CAF 

TEN 

OlAO 

RFF 

1 

31,2510 

1 2870 

1 

uR*r  start — 

0 150 

rff 

1 2 

1 AST 

788 

31,2511 

4 1010 

0 

stabl? 

CS 

MCCP  FG 

ARE  WE  IN  P66  EVEN  THO  WF  MAY  BE  IN 

>151 

RFF 

2 

LAST 

788 

31,2512 

6 2832 

1 

AO 

DEC66 

AUTC  CAF? 

015? 

31,2513 

1 00)6 

1 

EXTEND 

0 153 

RFF 

1 

31 ,2518 

1 2532 

0 

ezF 

RESTART? 

YES.  fC  ANC  check  for  A RESTART. 

7154 

REF 

31 

L AST 

790 

31, 2515 

2 8 73  7 

0 

CAF 

B1T13 

NT.  UN-ATT ITUCE-HCLD  CISCRETE  PRESENT? 

C155 

31,2516 

) J 1 1 6 

1 

EXTENT 

0156 

REF 

2 

LAST 

876 

31,2517 

C2  C31 
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+ 4 

0355  REF  5 LAST  758  31, 2782  1 2773  1 TCP  RGVGrALC 


R0358  CCRPLTF  STATE  IN  GUIEANCF  '‘CrfOTNATES  ^ ~ ^ 


R03M  RGVGCAIC  COMPL'T  AT  r G.N  S ARE  AS  FDLLCWS:- 

R03f  2 \<FLF'CITY  RFIATIVE  TC  THE  SURFACE: 


R037<3  - _ - _ 

R03GA AN'GTERH  = V t R » WM 


R0  3fi5 


■STATE  IN  GUIDANCF  CCCPDIAATFS: 


R0366  - « _ _ 

R0367  RGU  = CG  (R  - L^^C) 


R0368 
R0  369 


« - _ _ 
VGU  = CG  (V  - WM  ♦ R) 


P0370  HCRTZCNTAl  VEICCITY  ECR  CISFLAY: 

RQ371  __  _ VHDRIZ  = £ A8YAL  (0,  VG  , VC,  ) 

RC372  21 

R0373  DEPRESSITA  ANGLE  FCS  CISPLAY: 


R037A  _ _ 

P037F  LCCKANGL  = ARCSIMUMTIP  - L AN  C ) . XM  EP  I P ) 


0376 

0377 

REF 

124 

LAST 

798 

31.2763 

31.2764 

0 6042 
64375 

1 

1 

CALCPGVG  TC 

VLOAC 

I NTpRET 
MXV 

IN  IGNAIC,  CCRFUTE  V FPCM  INTFGRATICN 
CUTFUT  AND  TRIR  CCPRECTICN  TER« 

0378 
03  79 

PER 

RFF 

14 

27 

LAST 

LAST 

78  1 
779 

31.2765 

31 .2766 

CCC25 

11734 

C 

0 

VATTl 
REF  SRMAT 

CCRFUTEC  LAST  PASS 

ANC  LEFT  IN  LNFC/2 

G«p;  fSSFNRLg  RevlSmN  116  OF  APC  PRCGRAw  L^J^'l^aPV  6>  ^A  2021112-071 
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C38C 

3 1 , 2 7 6 7 

53362 

r 

VSPl 

VAC 

3381 

PEF 

6 

IflST 

781 

31 , 277C 

03254 

1 

bNFC/2 

03E2 

PEP 

A 

LAST 

78  1 

31 ,2771 

03527 

1 

STORE 

V 

0383 

31,2772 

77776 

1 

FXIT 

03  84 

RPF 

125 

LAST 

799 

31 , 2773 

0 6 )4  2 

1 

RGVGCALC 

Tf 

I NTPRFT 

ENTER  HERE  TC  RECCNPUTE  RG  ANC  VG 

0 38  5 

31 ,2774 

47375 

0 

VLCAC 

VXV 

3386 

PEF 

10 

LAST 

79F 

31,2775 

C 3 5 2 1 

1 

R 

0387 

PFF 

3 

LAST 

796 

31,2776 

0 2 325 

1 

WM 

0388 

31 , 2777 

70455 

1 

\/AC 

VSR2 

RESCALE  TO  UNITS  OF  2(9)  8/CS 

0389 

PFF 

5 

LAST 

800 

31, 3000 

03527 

1 

V 

0390 

PEF 

2 

LAST 

120 

31,3001 

02265 

1 

STCRE 

ANGTEPM . 

0391 

31  f 3C^2 

7772  1 

c 

RXV 

0392 

RF8 

5 

L AST 

779 

31,30  13 

02575 

1 

CG 

NC  SHIFT  SINCE  ANGTER8  IS  CCUELF  SIZED 

0393 

6 

LAST 

78C 

31 ,3004 

03627 

1 

STCRE 

VGU 

0394 

3 1 , 3005 

5 5 5 2 5 

c 

FOCI. 

VCEF 

FCFN  0,VG  ,VC-  ) IN  UMTS  CF  2(10)  8/CS 

0395 

PEF 

14 

LAST 

793 

31 , 3006 

06524 

1 

ZEPnVECS 

2 1 

0396 

31 ,3007 

52446 

c 

ABVAL 

SL3 

0397 

RFF 

3 

LAST 

316 

31, 3910 

26263 

1 

STCU 

VHCPT 1 

VHCPI2  FCP  DISPLAY  CURING  P65. 

0398 

PEF 

11 

LAST 

800 

31,3)11 

03521 

1 

R 

- 

0309 

31,3012 

41451 

1 

VSL 

PLSH 

PUSH  CCRN  F - LAND 

0400 

REF 

13 

LAST 

799 

31, 3013 

03635 

1 

1 AND 

040  1 

31,3014 

76521 

0 

RXV 

VSL  1 

0402 

REF 

6 

LAST 

80C 

31,3C15 

0257  5 

1 

CG 

0403 

PEF 

6 

LAST 

780 

31  ,3')16 

02627 

0 

STORE 

RGIJ 

0404 

31  ,3017 

7 7646 

0 

ABVAL 

0415 

REF 

3 

L AST 

316 

31,  3')20 

266  17 

c 

STCVL 

RANGEOSF 

04C6 

31,3021 

50234 

1 

RTB 

OCT 

NOW  IN  mpac  is  SINF(LCCKANGL)/4 

0407 

REF 

4 

LAST 

798 

31, 3022 

21727 

c 

NCFRLNIT 

0498 

REF 

2 

LAST 

115 

31,3023 

02  146 

0 

XN8PI P 

0409 

31 , 3C24 

77776 

1 

EXIT 

0419 

REF 

20 

1.  AST 

798 

31,3025 

3 C127 

1 

CA 

F I XLCC 

RFSET  PUSH  DOWN  FCINTER 

0411 

PEF 

7 

LAST 

798 

31 ,3  )?6 

54  166 

1 

TS 

PLSHLOr. 

04  12 

REF 

3C5 

LAST 

796 

31,3027 

3 0154 

1 

CA 

8 FAC 

CCNFUTE  LGCKANGL  ITSELF 

0413 

31,3030 

6 OOOC 

1 

OOLBLE 

0414 

REF 

220 

LAST 

794 

31  ,3031 

0 4616 

1 

TC 

8ANKCAL  L 

0415 

RPF 

1 

31,3032 

61657 

1 

CACR 

SPARCSIN  -1 

0416 

pec 

1 

3 1 , 3 ■ 33 

6 3733 

0 

AD 

1 /2DEG 

0417 

31 ,3C34 

0 C006 

1 

EXTEND 

0418 

REF 

1 

31 ,3C35 

7 3732 

0 

NF 

1 eOOFGS 

041  9 

PfF 

1 

31 ,3036 

5 5 ' 6 6 7 

■TT" 

TS 

LOOKANGL 

LCCKANGL  FCP  DISPLAY  CLFING  P64 

0420 

RFF 

6 

1 A ST 

797 

31,3037 

51' 346 

1 

PPSPrT3 

INDEX 

WCHPF  AS  E 

0421 

PFF 

1 

31 , 3040 

1 2 3 5 7 

c 

TCF 

WHATGLIO 

R0'!|24  7TF/8  COMPUTATION  ^ 
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04?7 

RFF 

1 

31,3081 

0 3656 

1 

TTF/8CL  TC 

I ntrpetx 

0^78 

31 ,3082 

77783 

1 

FLOAC^ 

0428 

OFF 

1 

31 . 3083 

02  83  1 

0 

JDG2TTF, 

1 

0A30 

RFF 

2 

L AST 

150 

31,  3^:88 

2357  1 

0 

STOOL'!' 

TABLT7F 

+ 6 

A(3)  = 8 JCG  TC  TABLTTF 

0831 

REF 

1 

31 ,3085 

02827 

1 

ACG2TTF, 

1 

2 

0832 

RFF 

0 

LAST 

80  1 

31 , 3'’86 

17567 

C 

STCOl 

TABLTTF 

A(2)  = 6 ACG  TO  TABLTTF 

'*833 

REF 

7 

1 AST 

800 

31, 3087 

03633 

1 

VGU 

+ 8 

2 

0838 

31  , 3C50 

82605 

1 

FRF 

OACA 

0835 

RFF 

1 

31.3051 

C 5 6 5 6 

1 

3 /8DF 

0836 

RFF 

1 

31  ,3052 

02825 

0 

VDG27  TF , 

1 

0837 

RFF 

LAST 

80  1 

31 , 3053 

23565 

0 

STGCL* 

TABLTTF 

+ 2 

A(l)  = (6  VGU  + 18  VDG  1/E  TO  TABLTTF 

0838 

REF 

1 

31,  ?'-58 

0 2 807 

r 

PDG  +8, 

1 

2 2 

C83S 

31  , 3'i55 

81225 

1 

DSU 

DRP 

0880 

RFF 

7 

LAST 

8rr 

31 , 3C5E 

02633 

Q 

RGU 

+ 8 

0881 

REF 

1 

31, 3057 

C5658 

0 

3/8DF 

0882 

REF 

5 

LAST 

80  1 

31 , 306C 

03563 

1 

STCRF 

TABLTTF 

A(01  = -28(RGL  - RDG  1/68  TC  TABLTTF 

0883 

31,3061 

77776 

1 

EXIT 

2 2 

0888 

REF 

28 

1 AST 

61  5 

31 ,3062 

3 8788 

1 

CA 

BTTP 

0885 

REF 

6 

LA  ST 

80  1 

31 , 3063 

55 '572 

1 

TS 

TAPLTTF 

+ 10 

FRACTICNAL  PRECISION  FCR  TTF  TO  TABIE 

0886 

3 1 , 3068 

C CC06 

1 

EXTEND 

0 88  7 

REF 

6 

LAST 

797 

31 ,3065 

3 1683 

1 

CCA 

TTF/8 

0888 

RFF 

306 

LAST 

800 

31,3066 

52  155 

1 

CXCFt 

RFAC 

LCACS  TTF/8  (INITIAL  GUESS)  INTO  RFAC 

0889 

RFF 

89 

L AST 

795 

31, 7067 

3 8752 

0 

CAP 

TWC 

CEGREE  - CNE 

0850 

REF 

1 13 

LAST 

7E  7 

31 , 3C7C 

58  001 

1 

TS 

1. 

0851 

RFF 

1 

31,3071 

3 3725 

1 

CAF 

tablttfl 

0852 

Rf  F 

1 

31 ,307? 

0 3532 

0 

TC 

PCOTPSRS 

VICLDS  TTF/E  IN  RFAC 

0853 

REF 

7 

LAST 

8cr 

31 ,3073 

51'386 

1 

INCFX 

WCHPhASE 

0858 

REF 

1 

31, 3F78 

1 237  5 

c 

TCF 

nhatalr 

0855 

31 , 3075 

C 0006 

1 

FXTFMD 

GOGC  RETURN 

0856 

RFF 

30  7 

1 AST 

801 

31 , 3076 

3 0155 

0 

DC  A 

RFAC 

FFTO-  TTF/8  KFEPING  IT  IN  MPAC 

0857 

RFF 

7 

LAST 

80  1 

31  , 3<  77 

53'683 

0 

DXCH 

ttf  /e 

CCRRECTFC  TTF/8 

0858 

RFF 

2 

LAST 

797 

31 ,3100 

0 3663 

1 

TC 

TCISPSET 

A04SO  (CCMINLF  in  OLACGCIDI 


ROA62  MAIN  CUIDANGE  EQUATICN ^ 

RnA6F AS  FLjBLl^HED:- 


R0A66  - - _ _ 

- - 6 (VCC  < VC  1 12(R0G  - RG  1 


R0A6B  ~ ACG  = AEG  + + 

'^'^^<>‘5  ITF  (1TC)  mF) 
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PC^i70 

AS  HERE 

FRCGRARPEO 

R0471 

- 

- 

R0A72 

3 ( 1 /4  ( P C C- 

- RG  1 

- 1 

P0473 

- ( 

VCG  + VG) 

RO^?^ 

- 

4 ( TTF/8 

) 

- 

RO«75 

ACG  = 

■♦ACG 

P0A76 

TTF/e 

04  7 7 

REF 

8 

LAST 

801 

31 ,3101 

4 1642 

1 GUACGUIC 

CS 

TTF/e 

0476 

RFF 

1 

31  ,3  102 

6 1426 

C 

AC 

LFACT  IME 

LFACTIRE  IS  A NEGATIVE  AUPBER 

0479 

REF 

16 

LAST 

789 

31, ’103 

6 4732 

1 

AD 

PCSMAX 

SAFEGLAPC  THE  CCVFUTATICNS  TFAT  FOLLOW 

C4PC 

PPF 

114 

1 AST 

801 

31 , 31'. 4 

54  001 

1 

TS 

L 

BY  FORCING  -TTF +LEAO 1 I R E > CR  = ZERC 

048  1 

REF 

115 

LAST 

802 

31, ’105 

4 CQCl 

1 

CS 

L 

048? 

REF 

1 16 

LAST 

80  2 

31, ’106 

6 cool 

0 

AD 

L 

0483 

31 ,3107 

22  007 

0 

ZL 

0 4 84 

31,3110 

C C0Q6 

1 

EXTEAO 

0468 

RFF 

9 

LAST 

802 

31  ,3111 

1 1 ' 642 

1 

CV 

TTF/6 

0486 

REF 

'7 

LAST 

789 

31 , ? 1 12 

5 4 130 

1 

TS 

BUF 

- RATIO  CF  LAG-CIMIN  ISFED  TTF  TO  TTF 

04  8 7 

31,  ’ll  ’ 

0 0006 

1 

EXTEAD 

04  6 8 

31,3114 

7 10  TO 

0 

SQUARE 

0489 

PEF 

58 

LAST 

8F  2 

31,3115 

54  I’l 

0 

TS 

BLF  +1 

04  90 

PEF 

59 

LAST 

BO  2 

31,3116 

6 0130 

0 

AO 

BUF 

04=1 

RFF 

60 

LAST 

8C2 

31,3117 

56  131 

1 

XCF 

eUF  +1 

RAT  10  SQLARED  - RATIO 

0492 

RFF 

6T 

I AST 

8TJ 

’1,3120 

6 cm 

1 

AT 

BLF  +1 

C493 

REF 

3C8 

LAST 

80  1 

31,3121 

54  154 

0 

TS 

MPAC 

CCEFFICIEAT  FCR  VGU  TERR 

0494 

PFF 

62 

l.AST 

802 

31,3122 

6 0 131 

1 

AC 

BLF  +1 

0495 

REF 

21 

LAST 

800 

31, ’123 

50  120 

1 

INDE  X 

F T XLCG 

C496 

31 ,3124 

54  032 

1 

TS 

2 6D 

COEFFICIENT  FCR  RDG-RGL  TERR 

0497 

PFF 

63 

LAST 

802 

31,3125 

6 0131 

1 

AD 

BUF  +1 

0498 

REF 

22 

LAST 

80  2 

31, 3126 

5C  120 

1 

INDE  X 

F I XLCC 

0499 

31 ,3127 

54  034 

1 

TS 

280 

COEFFICIENT  FCR  VOG  TERR 

0500 

RFF 

64 

LAST 

802 

31,3130 

6 0 1 30 

0 

AC 

BLF 

05C1 

REF 

1 7 

L AST 

802 

31,3131 

6 4733 

1 

AC 

PGSMA  X 

0502 

REF 

65 

1 AST 

8C2 

31 ,3132 

6 0121 

1 

AC 

BUF  +1 

0503 

PEF 

66 

L AST 

80  2 

31,3122 

6 C131 

1 

AD 

BLF  +1 

0504 

PFF 

23 

LAST 

80  2 

31 ,3134 

5.)  120 

1 

INDEX 

F IXl.OC 

0 50  5 

31, 2135 

54  036 

c 

TS 

30D 

GC  EFF  IC  1 EAT  FCR  ACG  TERM 

050  6 

REF 

149 

L AST 

798 

31,3136 

3 4755 

1 

CAF 

ZERO 

0507 

RE  = 

8 

LAST 

606 

’1,3137 

54  163 

1 

TS 

PCCE 

0 5 ) 8 

RFF 

2 

LAST 

80  1 

21,  3 14'“ 

C 3656 

1 

TO 

I ATPRFTX 

0509 

31,5141 

6536  1 

0 

VXSC 

PDDL 

0510 

REF 

6 

LAST 

801 

31  ,3142 

03627 

1 

VGL 

05!  1 

31,3143 

000  3 5 

1 

2 8D 

0512 

31,3144 

62  757 

0 

VXSC* 

PDVL  *1 

051? 

REF 

1 

31,2145 

0241  1 

1 

VCG,1 

0514 

RFF 

2 

LAST 

80  1 

21,3146 

02403 

1 

RDG,  1 

0515 

31,3147 

70251 

0 

VSU 

V/SG 
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0516 

REF 

8 

1 AST 

801 

31,3150 

02627 

0 

RGL 

1517 

PEE 

1C 

LA'T 

80  2 

31,3151 

03693 

0 

TTF/8 

■)51  8 

21.2152 

79392 

1 

VSR2 

VXSC 

051 

31,3153 

00033 

1 

2 6D 

05?r 

31  ,3  159 

5 3 2 5 5 

0 

VAC 

VAC 

0531 

31,2155 

7939  1 

1 

V/SC 

VXSC 

"52? 

REF 

11 

LAST 

803 

31  ,3  156 

13693 

0 

TTF/8 

0523 

REF 

2 

LAST 

80  1 

31,3157 

C5656 

1 

3/9DF 

052A 

31.3160 

73725 

0 

POOL 

V xs  f :-^ 

0525 

31 ,3161 

00-137 

0 

3CD 

0526 

REF 

! 

31,2162 

0291  7 

1 

ACG  ,1 

C8?7 

31 ,3163 

7 7655 

1 

VAC 

0528 

31 ,3169 

7 6 50  5 

0 

AFCCALCl 

VXT- 

VSL  1 

VFRTGUID  CCI'ES  HERE 

0529 

REF 

7 

1 AST 

800 

31,3165 

02575 

1 

CG 

0530 

31 ,3166 

70315 

1 

PDVL 

V/SC 

0531 

REF 

5 

LAST 

■ 779 

31,3167 

01236 

1 

GCT/2 

0532 

REF 

1 

31,317c 

05652 

-1 

G SC  ALE 

0 5 23 

31  ,’171 

9 5995 

0 

EVSU 

STACR 

0539 

RFF 

7 

LAST 

800 

31,3172 

7952? 

c 

STCRE 

U^FC/2 

UNFC/2  NEFC  NCT  BE  UNITIZEC 

0535 

31,3173 

77696 

0 

ABVAL 

0536 

RTF 

■3 

LAST 

786 

31  ,3 1 79 

17969 

1 

AFCCALC2 

STCCL 

/AFC/ 

HAGMTUDF  CF  AFC  FOR  THROTTLE 

0537 

RE-F 

8 

LAST 

80  2 

21,3175 

03259 

1 

UNFC /2 

vertical  CCRPCNENT 

0538 

31,3176 

65316 

0 

CSC 

PCCL 

0539 

REF 

g 

LAST 

802 

31,3177 

C 32  56 

c 

UNr-C/2  +2 

CUT-CF-PLANE 

0590 

31. 3200 

65316 

0 

DSC 

PDDL 

059  1 

REF 

1 

31 , 3201 

05650 

1 

H ICHESTF 

0592 

21,3212 

6397  1 

0 

CDV 

DSC 

0593 

PEF 

6 

LAST 

789 

31,3203 

01299 

1 

MASS 

2 2 2 

05^4 

31,3209 

95225 

c 

CSL 

OSU 

AHAXHCPIZ  = SCRTIATOTAL  - A - A 1 

0595 

31,  321)5 

71299 

0 

BPL 

DLOAD 

1 0 

0596 

REF 

1 

31  ,3206 

63210 

1 

ARCCALC3 

0597 

rff 

15 

LAST 

800 

31,3207 

06  529 

1 

ZEPOVECS 

0598 

31, 3210 

93366 

0 

AFCCALC3 

SQRT 

HAD 

0599 

REF 

10 

LAST 

80  2 

31,3211 

03260 

0 

UNFC/2  +9 

1550 

21,2212 

99299 

0 

GPL 

BCSU 

05  51 

RFF 

1 

31,3213 

6 32  16 

1 

AFCCLEND 

0552 

RFF 

I I 

LAST 

803 

31  ,3219 

03260 

c 

UNFC/2  +9 

0553 

FEE 

12 

1 AST 

8.3  2 

31,3215 

C326Q 

r 

STCRE 

LAFC/2  +9 

0559 

31,3216 

77776 

1 

A FCCl  FNC 

EX  IT 

0555 

RFF 

8 

LAST 

799 

31,3217 

C 3717 

0 

TC 

FASTCHNG 

3556 

REF 

8 

1 AST 

80  1 

31, 3220 

3 1396 

1 

CA 

WCHPHASE 

PREPARE  FCR  PHASE  SWITCHING  LCGIC 

0557 

R'^F 

9 

LAST 

799 

31.3221 

55'6?1 

1 

TS 

^7CHPHCLC 

0558 

REF 

c 

LAST 

79  5 

31, ’222 

25  ’62’ 

1 

INCR 

F LPAS  SO 

INfREHFNT  PASS  CCLNTFP 

0559 

REF 

9 

LAST 

f»3 

c 

00 

31  ,3223 

51  • 396 

1 

ERSP0T9 

INCEX 

WCHPHASE 

0560 

REF 

1 

’ 1 , 3229 

1 2363 

1 

TCP 

AFTRGLIC 

RT5M  "^*^***-^*******«***^****^h*i>^i>t^i*if>i:****4-i^^^**^i*t*******i):*tii:***^*ii:*t**-*******#**il=*1l:*i>:*f!lr**t***^***^^>******li*4**-i-t 
R0563  PHASE  NOW? 
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0566 

RFF 

1C 

LAST 

803 

31  , 3225 

51 ' 346 

1 

EXTLCGIC  lACEX 

WCFPFASE  IS  TTF  NEAPER  ZERC  THAN  CRITERION? 

0567 

PPF 

2 

LAST 

140 

31,3226 

3 1423 

C 

CA 

tenderak 

0568 

REF 

12 

LAST 

P03 

31,3227 

6 1642 

0 

AC 

TTF/e 

0 56  9 

31 , 3230 

0 0006 

1 

EXTEND 

0570 

REF 

2 

LAST 

79  1 

31,3231 

6 3240 

1 

BZPE 

CGCALC  NC 

0571 

R6P 

9 

LAST 

80  3 

3 1 , 32  12 

0 371  7 

0 

TC 

FASTCHNG  YES:  INCREMENT  KCHPHASE,  ZEPC  FLPASSO 

0572 

RRF 

5 

LAST 

803 

31,^233 

3 1621 

0 

CA 

WCHPFCLC' 

0573 

PEF 

87 

LAST 

789 

31 , 3234 

6 4753 

1 

AD 

ONE 

057A 

PFF 

11 

LA'T 

804 

31,3235 

55 ' 346 

0 

TS 

WCHPFASE 

0575 

PEF 

1 50 

LAST 

8C2 

31,3236 

3 4 7 5 5 

1 

CAP 

ZERO 

0576 

REF 

6 

LAST 

803 

31,3237 

55*623 

0 

TS 

FLPASSO 

A0577 

(CCNTINLE  TC 

: CGCALC) 

R0578 

P0580 

ERFCT  GUICANCF 

-STABLE 

: MEMBER 

TRANSFCRNAT ICA  NATFIX 

R0  58  1 
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0563 

RFF 

7 

LAST 

797 

31 ,3240 

3 5014 

1 

CGCALC  CAF 

FBANK5 

056A 

REF 

29 

LAST 

79  7 

31,3241 

5 4 00  3 

0 

TS 

EEANK 

05  85 

RFF 

2 

1.  AST 

122 

E5, 1435 

EBANH= 

TCGI BFAK 

0586 

31,3242 

n 0 )06 

1 

EXTEND 

0587 

RFF 

12 

LAST 

804 

31,3243 

5 1346 

1 

INDEX 

UCHFHASE 

0588 

RFF 

1 

31, 3244 

5 2400 

1 

INDEX 

TAPGTDFX 

058<3 

pep 

2 

LAST 

122 

31 ,3245 

3 1435 

1 

CCA 

TCGFBPAK 

0590 

RFF 

17 

1 AST 

743 

31,3246 

24  006 

1 

INCP 

BBANK 

0591 

RFF 

18 

LAST 

80  4 

31 ,3247 

24  006 

1 

INCR 

BBANK 

0592 

REF 

1 3 

LAST 

804 

E7 , 1642 

Ee«NK= 

TTF/8 

3593 

RRF 

14 

LAST 

804 

31, 3250 

6 1642 

0 

AD 

TTF/8 

0594 

RFF 

117 

LAST 

80  2 

31 ,3251 

56  ool 

0 

XC  h 

L 

0595 

RFF 

15 

LAST 

8C4 

31,3252 

6 1642 

0 

AC 

TTF/8 

0596 

PEF 

235 

LAST 

794 

31,3253 

1C  000 

0 

CCS 

A 

0597 

RRF 

1 1 8 

1 AST 

8C4 

31  ,3254 

10  001 

1 

CCS 

L 

0598 

REF 

1 

31,3255 

1 3306 

0 

TCF 

EXITSFCT 

0599 

PEF 

2 

LAST 

804 

31,3256 

1 3306 

0 

TCF 

FXITSRQT 

0600 

31 ,3257 

13  2 60 

1 

NCCP 

0601 

PEF 

3 

LAST 

80  2 

31, 3260 

0 3656 

1 

TC 

I NTPRFTX 

0602 

31,3261 

53575 

0 

VL  OAC 

UNIT 

0603 

REF 

14 

LAST 

800 

31,3262 

C3  635 

1 

LAND 

0604 

REF 

8 

LAST 

803 

31 , 3263 

1 6575 

1 

STOOL 

CG 

0605 

R'^F 

16 

LAST 

P04 

31 , 3264 

03643 

0 

TTF/8 

0606 

31,3265 

74  203 

0 

CMF* 

VXSC 

C6C7 

RFF 

2 

LAST 

122 

31 , 3266 

02433 

1 

GAINBPAK,!  NUMERC  NYSTEPICSC 

06F8 

REF 

■5 

LAST 

8CC 

01 , 32157 

C2265 

1 

ANGTERM 

06C9 

31, 3270 

77  6 5 5 

1 

VAD 
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0610 

PPF 

I 5 

LAST 

80  4 

31,3271 

03635 

1 

LAND 

0611 

31, 3272 

47F51 

f! 

VSL 

RT8 

0612 

REF 

12 

LAST 

800 

31  ,3273 

03521 

1 

R 

06!  3 

REF 

5 

LAST 

800 

3 1 , 2 274 

217  2 7 

C 

NCPNUMT 

0614 

31 , 3275 

47035 

1 

vxv 

RT6 

0615 

REF 

16 

LAST 

8C5 

31 , 2276 

03635 

1 

LANC 

0616 

REF 

6 

LAST 

80  5 

21 , 2277 

21727 

0 

NCPNLNI T 

0617 

REF 

9 

LAST 

804 

31  ,3  3”>0 

26603 

0 

STOVL 

CG  +6  • SECCNC  PCW 

0618 

PFF 

10 

LAST 

605 

31,330  1 

02575 

1 

CG 

061  9 

31, 2302 

76 '1 3 5 

1 

VXV 

VSLl 

C620 

0621 

REF 

REF 

11 

12 

LAST 

LAST 

805 

805 

31  ,3303 
31,3304 

02603 
0261  1 

0 

c 

CG  +6 
+14 

062  2 

31,3305 

77776 

1 

EXIT 

0623 

REF 

6 

LAST 

804 

?l ,3306 

51'62l 

0 i 

^eXITSFCT 

R.  C E X 

WCHPHCLC***"Nw 

0624 

P0625 

PFP  1 3l,3  3'i7  123t?r\ 

7CF  lyHATEXlT 

R0627 

ROUT  TNES 

FOR  rxlTING  FPrP  lANDING  GUIDANCE 

R0628 

R063f 

1. 

FXGSUB 

IS 

THE  RETURN 

NHEN  GLICSUE  TS  CALLED  BY 

THE  IGN'IT  ifr^ALGOR  ITHV  . 

R0632 

2. 

FXBRAK 

IN 

THE  FXIT  USED  DURING 

THE  braking  FFASE.  IN  TH I S CASE  UNIT(P)  IS  THE  WINDCNi  POINTING  VECTOR. 

RC634 

3. 

EXNCRN 

IS 

THE  FXIT  USED  AT  i 

cthep  tines 

CUP  INC- 

THE  BURN, 

R0635 

( E xnVFLOV, 

IS  A SLBRCLTINE  CF  EXPPAK  ANC 

EXNCRN 

CALLEC  NHEN  0VERFLCV<  CCCURREO  ANYWHERE  IN  GUIDANCE.! 

063  7 

RFF 

1 26 

LAST 

800 

• 31,3210 

0 6C42 

1 

exgslb 

TC 

INTPRET  CCNFUTE  TRIN  VELOCITY  CCRRFCTICN  TERN 

0638 

31,3311 

47175 

1 

VLCAD 

RTB 

06^9 

REF 

13 

LAST 

803 

31,3212 

02254 

1 

UNFC/2 

0640 

PFF 

7 

LAST 

805 

31,3313 

21727 

0 

NCRMLNI T 

064  1 

21 ,3314 

74361 

0 

VXSC 

VXSC. 

064  2 

PFF 

c; 

LAST 

78  1 

31,2315 

82^22 

1 

ZCCNTINE 

0643 

REF 

1 

31 ,3316 

22001 

0 

trimaccl 

0644 

REF 

14 

LAST 

805 

31  ,33  17 

02254 

1 

STCFE 

UNFC/2 

0645 

31, 3320 

777  76 

1 

FXIT 

0646 

R'=F 

3 

LAST 

792 

31,2321 

11 ' 647 

1 

CCS 

NGUIDSUB 

0647 

RFF 

1 

31,2322 

1 2406 

( 

TCF 

GLIDSLB 

0648 

REF 

3 

LAST 

780 

31,3323 

11  '645 

0 

CCS 

NIGN'LCDF 

0649 

21  , 3324 

1 3 327- 

0 

TCF 

+ 3 

06  50 

REF 

31 

LAST 

765 

31,2225 

0 5 56  7 

c 

TC 

ALARN 

C651 

31  ,3326 

0 14  12 

1 

OCT 

01412 

0652 

REF 

66 

LAST 

782 

21,2327 

C 4635 

0 

+ 2 

TC 

PFSTJLNF 

0653 

REF 

1 

31, 333r 

65  103 

0 

CADP 

DOUNCALC 

Of ‘^4 


REF  127  LAST  R05 


31  ,3331  C 6042  I EXEPAK 


TC 


INTPPFT 
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.16SR 

C6';6 

')657 

RFF 

REF 

8 

? 

LAST 

LAST 

77? 

137 

31 . 3332 

31.3333 
31,3336 

77775 

13537 

02262 

1 

0 

1 

VLOAC 

STFRE 

UNIT/R/ 

UNwr/2 

G658 

31,3335 

77776 

1 

EXIT 

0659 

PTF 

? 

LAST 

791 

31,3336 

1 3611 

1 

766(1 

RFF 

128 

LAST 

805 

31,3337 

0 6762 

1 

1 FXNnRN 

TC 

INTPRFT  1 

C661 

31,^360 

523  75 

1 ' 

VLOAC 

VSU  ♦ 

066? 

REF 

17 

LA  FT 

805 

31 ,336  1 

03635 

1 

LAND 

0667 

REF 

13 

1 AST 

80  5 

31,336? 

0352  1 

1 

R 

C66A 

31 ,3363 

77636 

0 

RTB 

0665 

RFF 

8 

LAST 

805 

21 , 2366 

21727 

c 

ncprlmt 

0666 

RFF 

3 

LAST 

806 

31,3365 

C3262 

1 

STORE 

UNWC/2 

LNITUANC  - R)  IS  TENTATIVE  CFCICE 

066  7 

31 , 3366 

50235 

Cl 

VXV 

OCT 

0668 

REF 

3 

L AFT 

80C 

21,2267 

C2166 

c 

XNPPl F 

0669 

RFF 

13 

LAST 

805 

31 , 3350 

02603 

0 

CG 

0670 

31 , 3351 

7 7776 

1 

EXIT 

WITH  FRCJ  IN  RPAC  1/8  PEAL  SIZE 

0671 

REF 

309 

LAST 

80  2 

31, 335? 

6 C 156 

0 

CS 

MFAC 

GET  CCEFFICIENT  FCR  CG  U6 

067? 

REF 

1 

31 , 3353 

6 3736 

1 

AD 

PRCJMAX 

0673 

REF 

IP 

1 A ST 

802 

31,2356 

6 6 72  2 

1 

AO 

PCSRAX 

067A 

REF 

67 

LAST 

80  2 

31 , 3355 

56  130 

1 

7S 

BLF 

0675 

RFF 

68 

LAST 

806 

31 ,2356 

6 0130 

1 

CS 

PDF 

0676 

REF 

69 

LAST 

806 

31, 2357 

26  130 

1 

ADS 

BLF 

RFSULT  IS  0 IF  FPCJRAX  - FRCJ  NEGATIVE 

0677 

RFF 

1 

31 , 3360 

6 3735 

1 

CS 

PRDJMIN 

GET  CCEFFICIENT  FCR  LNimANC  - Rl 

C678 

RFF 

3 1G 

LAST 

8C6 

31,2361 

6 9 15^, 

1 

6C 

RFAC 

067<3 

RFF 

19 

LAST 

806 

31,3362 

6 6733 

1 

AD 

PCSRAX 

C68C 

REF 

7F 

LAST 

806 

31,3363 

56  131 

0 

TS 

BUF  tl 

0681 

REF 

71 

LAST 

806 

21,2366 

6 C131 

0 

CS 

BLF  +1 

068? 

RFF 

7? 

LAST 

806 

21,2365 

26  131 

0 

ADS 

BUF  +1 

RESULT  IS  r IF  PRCJ  - FRCJMN  NEGATIVE 

0683 

RFF 

16 

1 AST 

778 

31 ,3366 

3 675  1 

0 

CAF 

FCUR 

068A 

REF 

15 

LAST 

595 

31 , 2367 

7 6265 

0 

LMiCLCCF 

NASK 

SIX 

0685 

REF 

?01 

1 AST 

789 

31 ,3370 

56  002 

1 

TS 

0 

0686 

REF 

8 

LAST 

8C6 

21,3371 

2 50  16 

1 

CA 

EEAF  K5 

0687 

RFF 

30 

LAST 

806 

31,3372 

56  0C2 

0 

TS 

FRANK 

0688 

REF 

16 

LAST 

806 

E5,1576 

EBANK= 

CG 

7689 

REF 

73 

LAST 

806 

31,3373 

2 C130 

c 

CA 

BLF 

0690 

31,3374 

0 0006 

1 

EXTEND 

0691 

REF 

29? 

LAST 

806 

31 ,3375 

5 0002 

0 

INDEX 

0 

069? 

RFF 

15 

LAST 

806 

31,3376 

7 1610 

0 

NP 

CG  +16 

0693 

REF 

1° 

LAST 

806 

31 ,3377 

26  006 

1 

IMCR 

BBANK 

0696 

REF 

6 

LAST 

8C6 

F6,  166  1 

EBAN(<  = 

UNNC/2 

0695 

REF 

?03 

LAST 

80  6 

31 , ’60i 

50  C02 

0 

INDE  > 

Q 

C696 

REF 

5 

LAST 

806 

31,36(1 

53' 66? 

0 

CXCF 

UNWC/2 

0697 

31,3602 

C 9006 

1 

EXTEND 

7698 

RFF 

76 

LAST 

806 

31 , 3603 

7 C131 

0 

RP 

BUF  + 1 

0699 

REF 

206 

LAST 

806 

31 ,3606 

50  00  2 

0 

INDEX 

C 

7700 

Rcf 

6 

1 AST 

806 

3 1 , ? 6 ■(  5 

21*662 

0 

CAS 

L'NWC/2 
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0701 

070? 

REF 

RFF 

20E 

1 

LAST 

606 

31  ,3AJ6 
31, 3A07 

10  00  2 
1 3 36  7 

1 

1 

CCS 

TCF 

C 

LAFCLCCP 

0703 

P^F 

20 

LAST 

806 

31  ,3AUi 

2A  1H6 

1 

INCR 

BBANK 

070A 

REF 

1 1 

LAST 

78S 

E7,  1612 

EBAA  K = 

PTF 

0709 

REF 

20 

LAS-^ 

755 

31, 3A11 

3 0076 

0 

STEPS  7 

CA 

FLAGViPnZ 

IF  STFEESV<  CCkA  NC  CUTFUTS 

0706 

RFF 

1 

31 , 3A12 

7 A7A1 

0 

NAS  K 

STEFRBI T 

0707 

31. 3A13 

a CC06 

1 

EXTEAD 

0708 

REF 

1 

31 , 3A  lA 

1 3A22 

1 

BZF 

RATESTOF 

0709 

REF 

1 

31  , 3A15 

3 C121 

0 

FXVERT 

CA 

OVF  lAC 

IF  CVERFLOW  ANYWHERE  IN  GLICANCE 

0710 

‘ 

31, 3A16 

0 0006 

1 

EXTEAD 

CCA'T  CALL  TFPCTTLP  CR  FINCCCLW 

0711 

31  ,3A17 

1 3A3? 

0 

ez  F 

+ 13 

0712 

REF 

?2 

LAST 

F05 

31, ya2C 

C 5567 

c 

EXCYFICV- 

TC 

ALARN 

SrUAC  TFE  ALARM  NON- A EOR T I V EL Y . 

0713 

31, 3A21 

OIAIO 

0 

OCT 

OlAlO 

C71A 

REF 

32 

1 AST 

79«. 

31 , 3A22 

3 A737 

0 

PATFSTCF 

CAP 

RIT13 

APE  WE  lA  ATT  I ILDE-HOl C? 

071  9 

31, 3 A? 3 

r rro6 

1 

FXTEAO 

0716 

FEF 

A 

LASY 

79A 

31 . 3A2A 

02  031 

1 

RAAO 

CHAN3 1 

0717 

31 , 3A25 

0 0 )06 

1 

EXTEND 

0718 

REF 

2 

LAST 

792 

3 1 , 3A26 

1 3A37 

0 

EZF 

C ISPFXIT 

YES 

C719 

PEF 

221 

LAST 

800 

31  ,3A27 

0 A616 

1 

TC 

8ANKCALL 

AC:  Cr  A STCPRATE 

0720 

REF 

5 

LAST 

79A  , 

31 , 3A30 

AC  166 

1 

CACP 

STCPRATE 

072! 

RFF 

3 

LAST 

80  7 

31 , 3A3  1 

1 3A37 

c 

TCF 

01 SPEXIT 

0722 

REF 

1 

31 , 3A32 

C 2 1AA 

1 

GCLMP 1 

TC 

THPCTTLE 

0723 

REF 

129 

LAST 

8C6 

31, 3A33 

C 6CA2 

1 

TC 

I ATPRET 

0 7?  A 

31 , 3A3A 

7762A 

1 

CALL 

0726 

Rcp 

2 

LAST 

765 

31.3A35 

61076 

1 

FIADCCUW  -2 

0726 

31, 3A36 

77  7 76 

1 

EXIT 

A0727  (CONTIMUF  TO  DISPEXIT) 


R0730  GUir'\NCF  LCCP  CISFLAYS 


0 733 
073A 

PEF 

lA 

LAST 

736 

31, 3A37 
31 , 3AA'J 

0 CC06 
T A755 

1 

1 

DISPEXIT 

EXTFAC 

CCA 

A'EGC 

KILL  GFrOF  3;  DISPLAYS  WILL  BE 

RESTCPEC  BY  NEXT  GLICAACE  CYCLE 

0735 

RFF 

•a 

LAST 

729 

3 1 , ’AA  1 

52  756 

1 

CXCF 

-PHASE3 

0736 

REF 

A 

LAST 

80  7 

31, 3AA2 

EMOLL  JOB 

= 

DISPEXIT  +3 

0737 

RFF 

12 

LAST 

73  1 

3! ,3A A2 

A ClOA 

0 

+ 3 

cs 

flagwrdb 

IF  FLLA'ClSP  IS  SET,  AC  DISPLAY  THIS  PASS 
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0 73  8 

FEF 

2 

LAST 

73  1 

31, 3443 

7 4742 

0 

MASK 

F LLND8I T 

C7?9 

31 ,3444 

C 0006 

1 

EXTEND 

0740 

REF 

127 

LAST 

78  1 

31,3445 

1 5155 

1 

EZF 

FNDCF JCB 

1741 

REF 

7 

LAST 

805 

31 ,3446 

51*621 

0 

INDEX 

WCHPHCLO 

074? 

REF 

1 

31 ,3447 

1 2371 

1 

TCF 

W FATC  IS  P 

0743 

P = F 

1 

31 , 3450 

3 3 736 

c 

P63DI SP  S 

CAF 

VC6N63 

0744 

REF 

?22 

LAST 

807 

31  ,345  1 

0 4616 

1 

C ISPCCPN 

TC 

BANKCALL 

0745 

PEF 

3 

LAST 

7’ 7 

31 , 3452 

2C466 

1 

CADR 

REGCCSF  , 

0746 

PFF 

3 

LAST 

797 

31 , 3453 

3 1666 

0 

P64DISPS 

CA 

TPEDFS 

HAS  TREDES  PEACHED  ZERC? 

0747 

31 , 3454 

C 0016 

I 

EXT  END 

0748 

RFF 

I 

31, 3455 

1 34  76 

0 

ezF 

REC-CVER 

YFS:  CIFAP  REDES  IGNAT  ICN  FLAG 

0749 

REF 

5 

LAST 

797 

31 ,3456 

4 010  2 

u 

CS 

FLAGKRD6 

NO:  IS  RECFIAG  SET? 

0750 

RFF 

2 

LAST 

797 

31,3457 

7 4 746 

.1 

MASK 

RFCFL8IT 

0751 

31, 3460 

C 0006 

1 

EXTENO 

(17  = 2 

RFF 

1 

31  ,3461 

1 3 5 70 

7 

ez  F 

REPFS-OK 

YES:  DO  STATIC  0ISPLA7 

0753 

RFF 

1 

31,3462 

3 3 73  ? 

1 

CAF 

V06N64 

CTHERWISE  USE  FLASHING  DISPLAY 

0754 

PFF 

223 

LAST 

808 

31 , 3463 

0 4616 

1 

TC 

BANKCALL 

0755 

RFF 

? 

LAST 

737 

31 ,3464 

20460 

1 

CACR 

R EFLASF 

0756 

REF 

29 

1 AST 

785 

31,3465 

1 600  1 

1 

TCF 

GCTCFCOH 

tefninate 

0757 

Q'’F 

1 

31 ,3466 

1 3470 

0 

TCF 

P64CFE0 

PROCEED  PERMIT  R EDE 5 1 G N A 7 1 ON S 

0758 

R<^F 

2 

LAST 

792 

31,3467 

1 3453 

1 

TCF 

P64CISPS 

1 

RECYCLE 

075  9 

PFF 

151 

LAST 

804 

^1, 3470 

3 4 7 5 5 

1 

P 6 4CF.ED 

CAF 

ZERC  j 

0760 

RFF 

3 

LAST 

798 

31,3471 

55 ' 446 

1 

TS 

ELINCRl  1 

0 761 

RFF 

4 

LAST 

798 

31,3472 

55*445 

1 

TS 

AZINCRl  1 

076? 

RFF 

53 
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YIELDS  DERCOF  = I X All)  IN  MPAC 

1166 

31,2567 

0 C006 

1 

EXTEND 

1167 

RFF 

3 

1 AST 

818 

31 ,3570 

5 0117 

0 

INDEX 

PWRPTR 

1 168 

31,3571 

’ C002 

r 

CCA 

1 

116P 

REF 

327 

LAST 

818 

31,2572 

52  155 

1 

CXCH 

PFAC 

AII-1)  TC  PPAC,  FETCHING  CEPCCF 

1 17C 

REF 

2 

LAST 

817 

31  ,3573 

50  161 

0 

INDEX 

DFPPTR 

1171 

31,2576 

52  CC6 

1 

CXCH 

3 

CFRCCF  TC  CER  TABL 

1 1 7? 

REF 

52 

LAST 

816, 

31 ,3575 

6 6 75  2 

1 

CS 

TkO 

1173 

RFF 

6 

LAST 

818 

31 ,3576 

26  117 

1 

ACS 

P^iRPTR 

CECRFPENT  PWP  POINTER 

1176 

PFF 

53 

LAST 

818 

31,2577 

6 6 7 5 2 

1 

CS 

TV>C 

1 1 75 

REF 

3 

LAST 

818 

31 ,3600 

26  161 

1 

ADS 

DERPTR 

DFCREPENT  DER  PCINTFR 

1176 

REF 

2 

LAST 

818 

31, ’601 

10  160 

c 

CCS 

pnrcnt 

1177 

PEF 

1 

31  , 36. '2 

1 3566 

1 

TCF 

DERC  LCCF 

A 1 178 

CnNVFRGF  ON  ROOT 

1179 

31 , ’60’ 

0 C006 

1 

PCCTLCCF 

EXTFNC 

1 1 80 

RFF 

2 

1 AST 

817 

31  ,3606 

3 0127 

0 

CCA 

POOTPS 

FETCH  CLPRENT  RCCT 

1181 

REF 

228 

LAST 

FIE 

31 ,26fr5 

52  155 

1 

CXCH 

~FWr 

LEAVF  IN  MFAC 

118? 

31 , 2606 

0 C0O6 

1 

extend 

1 1 83 

R'^F 

329 

LAST 

818 

31  ,3607 

3 0162 

1 

CCA 

NPAC 

+ 5 

LOAD  A,  1 HTH  DER  TA8L  ACRES,  N-2 

1186 

D F F 

1 

21,361  > ■ 

•o  7220 

{J 

TC 

PCWRSFRS 

YIFLCS  rfD)vA.TIVE  IN  MPAC 

1185 

31,3611 

0 0006 

1 

EXTEND 

1186 

REF 

■a 

LAST 

81  E 

21 ,3612 

3 3127 

0 

CCA 

RCCTPS 

1187 

PEE 

330 

L AST 

818 

31,2613 

5 2 15  5 

1 

CXCH 

P PAC 

CURRENT  RCCT  TC  mfaC,  FETCHING  CERIVTIVE 

1188 

REF 

75 

LAST 

806 

31 ,3616 

52  131 

n 

CXCH 

8LF 

LEAVE  DERIVATIVE  IN  BLF  A<  CIVISCR 

1185 

31  ,3615 

C 030  6 

1 

FXTENC 

1 190 

REF 

331 

LAST 

8 18 

31,3616 

’ 0 161 

0 

DCA 

MPAC 

+ 3 

LCAC  A,  L UITH  PWP  TAEL  ACRES,  N-1 

1151 

REF 

2 

LAST 

818 

31 ,3617 

0 7220 

0 

TC 

POWRSERS 

YIELDS  RESIDUAL  IN  PPAC 

1192 

REF 

3 

LAST 

818 

31, 262C 

0 6 713 

c 

TC 

USPRC  ADR 
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1 1 93 
1 19A 

REF 

1 

31,3621 
31  , 3622 

00353 
C C0C6 

1 

1 

CACR  OCV/PCOV 

EXTENC 

VIELCS  -CX  IN  WPAC 

1195 

REF 

332 

1 AST 

810 

31,3623 

4 C155 

1 

DCS 

RPAC 

FETCH  CX,  LEAVING  -DX  IN  NFAC 

1 196 

REF 

4 

LAST 

018 

31  , 3624 

20  127 

1 

CAS 

PCCTPS 

COPPECTEC  RGCT  NOU  IN  RCOTPS 

1 197 

REF 

4 

1 AST 

01  F 

’1,3625 

0 4 7 13 

0 

TC 

LSFRCACR 

119P 

REF 

2 

LAST 

818 

31 ,3626 

01226 

0 

CACR 

ABS 

VTELDS  APS(CX)  IN  RFAC 

1199 

31.3627 

C CCC6 

1 

EXTEND 

1 200 

rff 

2 

LAST 

818 

31, 363C 

4 C 125 

c 

DC  S 

OXCRI  T 

1201 

REF 

333 

1 AST 

8 19 

31 ,3631 

20  155 

1 

CAS 

RPAC 

APSICXI-APSICXCRIT)  IN  NPAC 

1202 

RFF 

11 

LAST 

8 17 

31,3632 

’ C163 

0 

CA 

RCDE 

1203 

REF 

33 

L AST 

788 

31 , 3633 

7 4 750 

0 

RASK 

BI’4 

KLLRFF  SAYS  GIVE  UF  AFTER  EIGHT  PASSES 

1204 

R = F 

24  1 

Cast 

816 

31 ,3634 

10  T-J,i 

0 

CCS 

A 

1205 

R'^F 

2 

LAST 

617 

31 , ’635 

0 Cl’2 

1 

BACRCCT 

TC 

PFTRCCT 

1206 

REF 

12 

LAST 

819 

31 ,3636 

24  163 

0 

INCR 

MODE 

INCRENENT  ITERATION  CCLNTER 

1207 

REF 

334 

LAST 

8 19 

31,3637 

1C  154 

0 

CCS 

RFAC 

TEST  HI  FRCEP  CX 

120R 

REF 

1 

31 , 3640 

1 2603 

0 

TCF 

RCC’LFCF 

1209 

PFF 

1 

31,3641 

1 3643 

1 

TCF 

TESTLCDX 

1210 

RFF 

1 

31,3642 

1 2647 

0 

TCF 

RCCTSTCR 

1211 

RRF 

335 

LAST 

8 19 

31,364’ 

10  155 

1 

TFSTLOCX 

CCS 

RPAC 

♦ 1 

TEST  LC  CRCEP  DX 

1212 

PEF 

2 

LAST 

819 

31  ,3644 

1 3603 

0 

TCF 

RCCTLCOF 

1213 

PFF 

2 

LAST 

819 

31,3645 

1 3647 

c 

TCF 

RCCTSTCR 

1214 

RFF 

3 

LAST 

819 

31 , 3646 

1 3647 

0 

TCF 

RtOTSTOR 

1215 

REF 

c 

LAST 

819 

31,3647 

52  127 

1 

prCTSTCR 

CXCF 

RCCTFS 

1216 

RFF 

336 

LAST 

ai9 

’1,3650 

52  155 

1 

CXCH 

RFAC 

1217 

REF 

13 

LAST 

819 

31  ,3651 

3 0163 

0 

CA 

MODE 

1210 

PEF 

337 

LAST 

819 

31,3652 

54  156 

1 

TS 

RFAC 

+ 2 

STCPE  SF  TTERATICN  COLNT  IN  RFAC+2 

1219 

RFF 

3 

LAST 

819 

31 , 3653 

50  132 

1 

INDE  X 

RETRCCT 

122^ 

31  ,3654 

1 mo  2 

1 

TCF 

2 

1221 

PFF 

1 

31 , ’655 

CC  147 

c 

DEPTAeU 

ACRES 

DEP.CCFN 

-3 

P122A  TRAShV  LITTLE  SLBRCLTINFE 

R1225  :t^ititiiHi:iitit**^^**’>*4****i>ii:>i‘*ilfi::t:*iiiil‘iiif****!^****^***i^^^*4’^*’^***********i******it<**itit:t 


1227 

1228 

R=F 

RFF 

13 

2 

LAST 

LAST 

804 

804 

31 . 3656 

31.3657 

511 346 
4 240C 

1 

C 

INTFRETX  INDEX 
CS 

W CEPHAS  E 
TAPGTCEX 

SFT  XI  ON  THF  WAY  TC  THE  INTERPRETER 

1229 

RFF 

2^ 

1 AST 

802 

31  ,3660 

50  120 

1 

INCE> 

F IXLGC 

12  30 

RFF 

22 

LAST 

77  1 

31 ,3661 

54  046 

1 

TS 

XI 

1231 

PEF 

134 

LAST 

« 1 3 

31,2662 

1 6C42 

c 

TCF 

I NTPRET 

1232 

REF  17  LAST  804 

31,3663 

3 

1642 

n 

TCISPSET  CA 

TTF/8 

12  33 

31, 3664 

C 

CC06 

1 

EXTEND 

1234 

RFF  1 

21,2665 

7 

4 7 50 

c 

MP 

TSCALINV 
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1235 

R'^F 

A 

LAST 

316 

31  , 3666 

53' A76 

1 

CXCH 

TTFDISP 

1236 

REF 

9 

LAST 

80  6 

31,3667 

3 501 A 

1 

CA 

EBAMK5 

TRECES  BECCi'-FS  ZFFC  TVnC  PASSES 

1237 

REF 

31 

LAST 

806 

31  ,3670 

5A  003 

0 

TS 

EBANK 

BEFORE  TCGFAodr  is  REACHED 

1238 

REF 

2 

L AST 

122 

F5  , 1A7C 

EBAAK= 

TCGFAFPR 

123S 

REF 

3 

LAST 

820 

31  ,3671 

3 1A71 

0 

CA 

TCGFAPPR 

1?A0 

ref 

21 

LAST 

eC7 

31 ,3672 

2A  00  6 

1 

INCR 

BEANK 

12A1 

RFF 

22 

LAST 

8 20 

31 , 3673 

2A  C06 

1 

TNCR 

BBANK 

12A2 

REF 

18 

LAST 

819 

F7.16A2 

EBANK= 

TTF/3 

12A3 

REF 

19 

LAST 

82C 

?1 , R67A 

6 1 6A2 

0 

AC 

TTF/R 

124A 

31,3675 

0 000  6 

1 

EXTEND 

12A5 

REF 

1 

31 ,3676 

7 3731 

0 

RF 

TPECESCL 

12A6 

FRF 

1 

31 , ’677 

6 3726 

1 

AD 

-CFC1U3 

12A7 

REF 

3 

LAST 

600 

31 ,3710 

6 A735 

1 

AD 

NEGMAX 

12A8 

REF 

1 25 

LAST 

815 

31 ,’701 

5A  001 

1 

TS 

L 

12A9 

REF 

126 

LAST 

820 

31, 3712 

A 0001 

1 

C S 

L 

125C 

REF 

127 

LAST 

820 

31,3713 

6 0001 

0 

AD 

L 

1251 

RFF 

1 

31 , 370A 

6 3 730 

c 

AD 

+CEC99 

' 1252 

REF 

2:> 

LAST 

806 

31, ’705 

6 A733 

1 

AO 

PCS8AX 

125^ 

REF 

A 

LAST 

808 

31,3706 

55*666 

1 

TS 

TRECES 

125A 

RFF 

5 

LAST 

82f 

31, ’717 

A 1666 

1 

CS 

TREDCS 

12‘=5 

RFF 

6 

L A'T 

820 

31,3710 

27*666 

1 

ACS 

TREDFS 

1256 

PRF 

206 

I.AST 

80? 

31  ,37! 1 

0 0002 

'} 

TC 

C 

1257 

RFF 

3 

L AST 

AA8 

31,  ’712 

0 56A2 

1 

1 A06PC0 

TG 

PCCOCC 

1256 

31,3713 

21  A06 

0 

OCT 

21A06 

1259 

RFF 

33 

LAST 

807 

’1, 3 71  A 

C 5567 

c 

1A06AL8 

TC 

ALAPR 

1260 

31, 3715 

niA')6 

1 

CCT 

0 1 A06 

1261 

RFF 

2 

LAST 

807 

31,3716 

1 3A22 

1 

TCF 

PATESTOP 

R1262 

♦ t4444’t4444444444*44444’t:t*>H’t444* 

R126A 

SPFGTALIZFD  "PHASCFAG"  SUBRfU 

TINE 

P 1265 

1267 

REF 

1 

F3, lAAO 

EBANK= 

PHSNA8E2 

1266 

REF 

2 

1 AST 

22A 

31,3717 

3 5007 

(.1 

F7STCFNC 

CA 

EEANK3 

SPFCIALTZED  'PHASCHNG*  RCLTINE 

1269 

REF 

32 

LAST 

82E 

31, ’720 

56  CQ3 

1 

XCH 

EEAN'K 

12  70 

REF 

128 

LAST 

82C 

31 ,3721 

5 2 102 

1 

CXCH 

L 

1271 

REF 

1 

31  ,3722 

55*  AA2 

0 

TS 

PFSNA8E3 

1272 

REF 

33 

LAST  ■ 

820 

31,3723 

2 2 00  3 

1 

1 XCH 

EEAMK 

1273 

RFF 

3 

LAST 

79  1 

F7 ,1621 

EBANK= 

E2CPS 

127A 

REF 

2A2 

LAST 

eis 

31, 372A 

c cccc 

1 

TC 

A 

R 1 277  PARAMETER  TABLF  INDIRECT  AOCRESSES  ~ 

1280  RFE  2 LAST  122  E5 , 1402  RDG  ^ RBRFG 

1281  REF  2 lAST  122  E5.1AIC  LEG  = VEPFG 
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L 

LUN^R 

1.  /SNriNG 

GUICANCF  FCLATICNS 

LSEP'S  PAGE  AG. 

2 1 

E7  S3 

1262 

RFF 

2 

LAST 

122 

65  , 1A16 

A TG 

ABRFG 

1283 

RFF 

2 

LAST 

122 

F5 , 1 A24 

VCG2TTF  = 

VEPFG* 

128^ 

RFF 

2 

LAST 

122 

T5. 1A26 

ArC2TTF  = 

A3RFG’» 

1285 

REF 

2 

1 AST 

122 

F5,1A3T 

JCG2TTF  = 

JBRFG* 

R1288  LUNAR  lANCTNG  CCN?T/!N-*-S 


12V1 

REF 

7 

LAST 

801 

31,3725 

01565 

C 

TABL  T7FL 

ADRES 

TABLTOF  • +3 

ADDRESS  FCfi  REFtREACING  TTF  TABLE 

1292 

FEF 

29 

LAST 

815 

-i7A0 

TTFSCALF 

BIT12 

1293 

REF 

3A 

LAST 

819 

A75'' 

T SCAL  INV 

BIT4 

1 2-3A 

31, 3726 

77630 

1 

-CFG  103 

DEC 

-103 

1295 

31,3727 

C0155 

0 

P64DE 

CCT 

OL'155 

0.3  DEGREES  SCALED  AT 

CCt  SCALING 

1296 

31,3730 

CC  1A3 

1 

+DEC99 

CFG 

+ 99 

1297 

31,3731 

75340 

1 

TRFDESCL 

CEC 

- .08 

1298 

31,3732 

CC264 

1 

leCDEGS 

CEC 

+ 180 

1299 

31,3733 

00056 

1 

1/2CEG 

EEC 

+ .00278 

1300 

31 , 373A 

01542 

c 

PPG JR»X 

CFC 

.42262  R-3 

S IN (25’ 1 /«  TO  COMPARE 

l«ITh  PROJ 

1301 

31 , ’735 

C 1 C 2 2 

n 

PRCJM  IN 

CEC 

.25882  e-3 

SIA(  15* ) /8  TC  CCAFAPE 

MTF  PRCJ 

1 302 

31  ,3736 

01477 

1 

V06N63 

VN 

0663 

P63 

1303 

31 , ’737 

Q150J 

0 

VC6N64 

VN 

0664 

F64 

13CA 

31 , 37AO 

01474 

1 

VC6N60 

VN 

0660 

P65,  F66,  P67 

13C5 

1306 

REF 

1 

22, ’6A7 
22, 200C 

BANK 

SETLCC 

22 

LAAOCAST 
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139  7 

22,3697 

BANK 

1308 

PGF  1 

COUNT* 

$t/F2DPS 

1309 

22 , 3697 

00021 

1 

HIGHEST  f 

2CFC 

9.^9596769  E-12 

1309 

22,3650 

19  16  1 

1 

131P 

22 ,3651 

0199  ) 

0 

GSCAL  E 

2CEC 

ICO  B-11 

1310 

22,3652 

ooccc 

1 

1311 

22,3653 

19000 

1 

3/eOP 

2DFC 

.375 

1311 

22  ,3654 

09009 

1 

1312 

22,3655 

3CCC0 

1 

3/9CP 

2DFC 

.750 

1312 

22,3656 

00  700 

1 

1313 

22,3657 

77539 

0 

CFPRCR  IT 

2CEC 

-.02  e-1 

1313 

22,3660 

95C79 

c 

P131^ 

R1316 

gap:  />SSEM6LF  REVTSinN  116  CF  AC  PRCGR'W  LLMNAPV  bv  ^ASA  2021112-071 


l9:Qq  AuG.  11,1969  Fl.Y 


l^fc  PAGE  B23 


L P7fl-071 


LSFR' S PAGE  NO.  1 EO  S3 


0001 

21 ,2006 

BANK 

21 

Oon? 

P'^F 

1 

21 , 2000 

SFTLCC 

R1 1 

00C3 

21 ,20n6 

BANK 

OCOA 

REF 

3 2 

1 AST 

FlC 

F7,  1515 

FBANK= 

CVCNTP 

-nos 

REF 

1 

COUNTS 

$t/P  1 1 

re  P6 

REF 

17 

LAST 

755 

21 , 2306 

A C103 

1 

RlO.Rll 

CS 

FLAGWRD7 

IS  SERVICER  STILL  RLNNING? 

0007 

REF 

A 

LA  ST 

70^ 

21,2007 

7 A7A7 

0 

NASK 

AVEGFRIT 

000  A 

PFF 

2A3 

lAST 

R2f 

21,20in 

10  0 10 

0 

CCS 

A 

0009 

PFF 

57 

LAST 

ei5 

21,2011 

1 5261 

0 

TOF 

TASKCVFR 

LFT  AVGEND  TAKE  CARE  CF  GPOLP  2. 

no  iM 

REF 

3 

LAST 

607 

21,2012 

11  '055 

1 

CCS 

PIPCTR 

0011 

21,2013 

1 20  15 

0 

TC  F 

4 

001? 

PFF 

1 

21  , 20  lA 

1 2125 

1 

TCF 

rhta'.' k’\ 

LAST  PASS.  CALL  LRFTASK. 

0013 

PFF 

1 

21,  2'M5 

55 ' 7 lA 

c 

+ 2 

TS 

VrofTpi 

CCl  A 

REF 

2 

1 AFT 

152 

F7,171A 

PIPCTRl 

- 

LADCSAVE 

0015 

RFF 

Q 

LAST 

50  8 

10  5 5 

PIPCTR 

= 

PF'SPRCT2 

0016 

PFF 

3 

1 AST 

A3E 

21  , 2’U6 

3 6010 

0 

CAP 

0CT31 

0017 

RFF 

73 

LAST 

81  A 

21,2017 

0 5173 

1 

TC 

TwirCLE 

0010 

RFF 

2 

LAST 

2Af 

21 . 2C20 

02006 

0 

APPES 

RlO.Rll 

0019 

PFF 

3 

1.  AST 

615 

21 ,2. >21 

3 A753 

1 

R 10, R 1 17 

CAF 

FFLSHBI1 

00?n 

RFF 

7 

LAST 

615 

21  ,2022 

7 OlJ7 

0 

FI  ASFF? 

NASK 

FLGWRCl 1 

0021 

21  , 2023 

0 0006 

1 

EXTEND 

0022 

ope 

1 

21  , 3»2A 

1 20  30 

1 

ezF 

FLASHV? 

H FLASH  CFF,  SO  LEAVE  ALCNE 

0023 

P£F 

2 

LAST 

615 

21,2C25 

3 A7A7 

1 

CA 

HLTTE 

002A 

REF 

129 

L AST 

820 

21 , 2026 

5A  301 

1 

TS 

L 

0025 

REF 

1 

21 ,2027 

0 A606 

0 

TC 

PL  I P 

FL  IP  F 1 ITE 

0026 

REF 

1 

21,2030 

3 AT5? 

c 

FLASHV? 

CA 

VFLSFBIT 

VFLASFEIT  MUST  EE  PIT  2. 

0C?7 

PFF 

8 

LAST 

823' 

21  ,203  1 

7 0107 

0 

MASK 

FLGWROl 1 

3C2P 

21  ,2032 

C CCf6 

1 

FXTENC 

00?9 

REF 

1 

21,2  133 

1 2037 

0 

BZF 

10,11 

V flash  CFF 

0C3C 

REF 

2 

LAST 

6 1 5 

21 ,2C3A 

3 A751 

0 

CA 

VLITF 

0031 

R = F 

17C 

LAST 

8?? 

21,2035 

5A  OCl 

1 

TS 

L 

003? 

REF 

2 

LAST 

823 

21 ,2036 

0 A606 

f) 

TC 

FLIP 

FL IP  V 1 ITE 

n033 

REF 

3 

LAST 

73  1 

21,2037 

3 0105 

0 

10,11 

CA 

FL  AGWRC9 

IS  THE  LFTAHORT  FLAG  SET  ? 

no  3 A 

REF 

2 

LAST 

73  1 

21,20A0 

7 A7A3 

1 

MASK 

LETA8PI T 

CC35 

21 , 20A1 

0 C006 

1 

FXTFND 

0036 

PFF 

1 

21 ,20A2 

1 21A5 

1 

ezF 

LAND  ISP 

NC.  FPCCEEC  TO  R 1C. 

003  7 

RFF 

lA 

LAST 

79A 

21, 20  A 3 

A 1010 

0 

P7  INOl.? 

CS 

MCDRFG 

YFS.  ARE  WE  IN  P71  NCR? 

0038 

REF 

1 

2l,20AA 

6 210A 

0 

AC 

1CEC7  1 

0039 

21,20A5 

C CC06 

1 

EXTEND 

OOAO 

REF 

2 

LAST 

823 

21,2046 

1 21A5 

1 

8ZF 

LAN'DI  SR 

VrS.  FPCCEEC  TC  PIO. 

GAP;  oSSENBLg  PEVTSTON  116  CF  ACC  PPCGPAM  LUHINJARY  6V  NASA  2021112-''.71 


19:09  AUG.  11,1969  FLY 


lAb  PACE  82^ 


P7C-P71  LSER'S  PAGE  NO.  2 E7  S3 


0041 

0042 

0043 

REF 

6 

1 AST 

793 

21 , 2047 

21 . 2050 

21.2051 

C CC06 
00  030 
4 0000 

1 

1 

Cl 

EXTEAT 

READ 

CCA 

CHAN3C 

NC  . 

IS  AN  AfiCRT  STAGE  C0MMANCEC7 

0044 

REF 

131 

LAST 

F23 

21,2052 

54  COl 

1 

TS 

L 

0045 

PFF 

35 

LAST 

821 

21 ,2053 

7 4750 

0 

RASK 

B IT4 

0046 

RFF 

244 

LAST 

823 

2i  ,2054 

10  000 

0 

CCS 

A 

0C47 

RFF 

2 

LAST 

242 

21,2055 

1 2073 

0 

TCF 

P71A 

YES. 

0C4F 

REF 

15 

LAST 

823 

21 ,2056 

4 1010 

0 

P7UNCW? 

CS 

MCDREG 

ND. 

ARF  WE  IN  P7C  NOW? 

0049 

REF 

1 

21, 2057 

6 2103 

1 

AD 

1 CEC70 

0050 

21, 2060 

0 CC06 

1 

EXTEND 

005  1 

REF 

3 

1 AST 

823 

71 ,2061 

1 2145 

1 

BZF 

LANCISP 

YFS. 

PRCCEEC  TO  RIO. 

0052 

PFF 

132 

LAST 

824 

21,2062 

3 OCOl 

0. 

CA 

L 

NC. 

IS  AN  ABORT  COMMANCEC? 

0053 

REF 

39 

LACT 

816 

21 ,2063 

7 4753 

0 

MASK 

B ITl 

0054 

REF 

245 

LAST 

824 

21,2)64 

10  000 

0 

CCS 

A 

0055 

RFF 

2 • 

LAST 

242 

21, 2065 

1 2070 

c 

ICF 

P70A 

YES. 

0056 

P<=F 

4 

LAST 

324 

21 , 2066 

1 2145 

1 

TCF 

LANOTSP 

NO. 

PRCCEEC  TC  RIO. 

J57 

RFF 

1 

CCUNT* 

$$/P70 

005  fl 

REF 

1 

21 , 2067 

•3  2 10  5 

1 

P70 

TC 

LEGAL  7 

0059 

R'=F 

155 

LAST 

81  1 

21,2070 

4 4755 

0 

P70A 

CS 

ZERO 

0060 

21,2071 

1 20  74 

1 

TCF 

+ 3 

CC61 

REF 

2 

LAST 

824 

21 ,2072 

0 2175 

1 

P71 

TC 

LEGAL? 

0062 

RFF 

54 

LAST 

818 

21,2073 

3 4 7 52 

c 

P71A 

CAF 

T1.C 

0063 

REF 

207 

LAST 

8 20 

21,2074 

54  002 

1 

+ 3 

TS 

G 

CC64 

21,20  75 

0 00  14 

0 

INHINT 

0065 

21,2076 

C CC06 

1 

EXTENT 

0066 

RFF 

1 

21,2077 

3 2102 

0 

OCA 

C NTABTaO 

0067 

21 .2100 

52  006 

0 

CTCP 

006  8 

PFF 

3 ^ 

LAST 

823 

E7,  1515 

EBANK= 

OVCN'TR 

0069 

RFF 

1 

21,31  ll 

03400 

0 

CNTAETAC 

2CACR 

CONTABRT 

0069 

REF 

1 

21,2102 

12067 

0 

0070 

21,2  113 

OC  106 

c 

1CEC7C 

DEC 

7C 

0071 

21  ,2104 

0010  7 

1 

1CEC71 

CEC 

71 

0072 

05,3400 

BANK 

05 

0073 

RFF 

1 

05,2000 

SETLCC 

ABnRTSl 

0074 

05,3400 

BANK 

00  7 5 

RFF 

1 

CCLNT* 

$t/P70 

0C76 

REF 

1 

05,3400 

3 340  3 

0 

CfNTAERT 

CAF 

ABRT JAOR 

0077 

RCF 

1 

05,34''! 

64  017 

0 

TS 

BRL'PT 

0078 

05, ’402 

5 0017 

1 

RESLRE 

0C79 

RFF 

1 

05,3403 

1 34  14 

0 

A ERT  J ACR 

TCF 

ABPTJASK 

OlSn  REF 


1 


05. 2 3‘!ifcA  1 A8RTJASK  CAP 


0CTAL27 


KftP:  fl<;<;F^<qLF  PF\/l<:inN  '.Ifc  rp  h<'r  FRCGP<:^'>  |l]KI^/>FY  f?V  ^JS/'  20211  12-')71 


19:":q  flUG.  U.iqfS  FLY 


PAGE  625 


L O70-P71 


L SFP*  S P/!GE  NO.  3 E7  S3 


ccei 

onq2 

OC03 

R^F 

OFF 

208 

132 

LftST 

LAST 

E?6 
P2  6 

C5,36C5 
OS, 36C6 
05.3607 

6 0002 
56  OCl 
6 00)0 

0 

1 

0 

AD 

IS 

COM 

(; 

L 

OT8A 

R9F 

6 

LAST 

76C 

05 ,36L0 

52  760 

1 

[XCF 

-PEAS  E6 

00«S 

PFF 

209 

LAST 

825 

05,  361  1 

50  002 

0 

INDE  X 

C 

OC06 

REF 

1 

15,3612 

3 3663 

0 

CAF 

M0DE7C 

0"P7 

PFF 

16 

LAST 

P26 

05,3613 

55 ' 110 

r 

7S 

MCPREG 

0088 

REF 

26 

LAST 

750 

■05,  3616 

55*162 

1 

IS 

m SPDEX 

INRUPE  CISFCEX  IS  PCSITIVE. 

ccaq 

REF 

2 10 

LAST 

825 

05,3615 

10  002 

1 

CCS 

c 

SFT  APSFLAG  IF  P7l. 

0091 

RFF 

16 

LAST 

75C 

05,3616 

6 C1C6 

1 

CS 

FIGWPCIO 

SFT  AFSFLAG  PRIOR  TO  TFE  ENEMA. 

009  1 

POF 

11 

1 AST 

750 

05,3617 

7 6 737 

1 

•'ASK 

APSFL01 T 

00  92 

OFF 

17 

LAST 

825 

05,3620 

26  106 

1 

ACS 

FLGWRCIO 

009  3 

REF 

1 

95,3621 

6 3666 

1 

CS 

DAPB  n S 

CAFEITS  = CCT  60660  = EITS  6,8,9,15 

0Q9A 

RFF 

23 

LAST 

753 

05,3622 

7 0111 

1 

MASK 

DAPBODL  S 

RESET  LLLAGE, DRIFT, XOVPIINh.ANC  PLLSFS 

0095 

REF 

26 

LAST 

825 

05,3623 

56  111 

1 

TS 

CAFBCCLS 

0096 

RCF 

1 

05, 3626 

3 36  6 7 

1 

CAF 

IDFGDR 

INSLPE  CAP  CEACPANC  TS  SET  TC  1 DEGFEE 

0097 

PFF 

7 

LAST 

79A 

05,3675 

55*363 

c 

TS 

D8 

1C98 

PFF 

25 

LAST 

792 

05,3626 

6 0101 

0 

CS 

FLAGWRD5 

SET  ENGONFLG. 

0099 

PFF 

P 

LAST 

753 

05,3627 

7 6 765 

1 

FASK 

ENGCNEIT. 

OlOO 

REF 

26 

LAST 

82  5 

95,3630 

26  ICl 

c 

ADS 

FLAG1'PD5 

0101 

RFF 

8 

1 AST 

753 

05,3631 

6 6355 

1 

CS 

PRIC30 

INSURE  TFAT  TEE  RNGINF  IS  CN , IF  ARNEC. 

0102 

05,3632 

C CCC6 

1 

EXTEND 

0103 

RFF 

26 

L AST 

753 

05, 3633 

02  Oil 

0 

RAND 

DSALMCUT 

0106 

RFF 

36 

1 A ST 

815 

05,3636 

6 6737 

0 

AC 

6IT13 

0105 

05,3635 

C CC06 

1 

E XTENC 

0106 

PFF 

■’7 

LAST 

825 

0*3  f 

01  'll 

0 

WP  ITE 

DSALMOLT 

0107 

PFF 

6 

LAST 

557 

05,3637 

3 6735 

1 

CAF 

LPEYP  IT 

TERMINATE  R12. 

01  OR 

RFF 

9 

LAST 

823 

05, 3660 

56  107 

0 

TS 

FLGKRDll 

Ol'S 

PEF 

23 

LAST 

595 

05,3661 

6 0076 

0 

CS 

FLAGWPCO 

SFT  R lOFLAG  TC  SUPPRESS  CLTFLTS  TC  THE 

OIK' 

RFF 

1 

'05,3662 

7 6752 

1 

MASK 

RIOFLEIT 

CPCSS-FC  INTER  DISPLAY. 

0111 

RTF 

26 

LAST 

825 

05,3663 

26  076 

n 

ADS 

FLAGV.RDC 

THE  FCIICV^ING  ENEMA  WILL  FFMCVE  TEF 

A. 01 12 

display  inertial  data  cltbit. 

Oil  3 

05, 3666 

0 0006 

1 

EXTEND 

LCAC  TEVFNT  FCR  TEE  CCWNLINK. 

0116 

PFF 

25 

1 AST 

8!  1 

05 .3665 

3 0025 

0 

CCA 

T IME2 

Oils 

RFF 

6 

LAFT 

753 

05 ,3666 

c 3 1 3^3 

1 

CXCF 

TEVENT 

0116 

05, 3667 

0 000  6 

1 

FXTENO 

0 117 

ROF 

1 

05,3650 

3 3662 

1 

CCA 

SVFX  ITAC 

0118 

REF 

3 

L AST 

732 

05,  "■651 

53*252 

1 

CXCH 

AYGEX I T 

0119 

RFF 

1 

05,365? 

0 2653 

0 

TC 

ABTKL  EAN 

KILL  GPCLPS  1,3,  AND  6 . 

f 


G4P: 

/'SSfNBLP 

FFVIEinN  116 

CF  ACC  FRCGRAM  LLMINARY  8Y  NASA  202 

11  12-C71 

19:09  AUC.  11 ,1969 

FLY  .1^,6  FACE  826 

L 

P 1C- 

-P71 

LS=R'S  PAGE 

NO.  4 67  S3 

0120 

REF 

2A 

LAST 

720 

05, 3453 

3 6 2 50 

r 

CAF 

TFOPE 

SET  UF  4.3SPCT  FCP  GCAECRT 

0121 

OFF 

13A 

LAST 

825 

>j5  ,.3A5A 

54  001 

1 

TS 

L 

0122 

35,345= 

4 CCCO 

c 

CON 

0123 

RFF 

7 

l.AST 

P2S 

05,3456 

52  760 

1 

CXCH 

-FHASE4 

012-^ 

PPF 

AS 

LAST 

8!  C 

05,3457 

0 4635 

0 

TO 

PCST JUMP 

0125 

PFF 

1 

05, 3^6C 

1276  3 

c 

CACR 

ENEMA 

0126 

PFF 

3A 

LAST 

32A 

F7,  1515 

FBANK= 

DVC.NTR 

■.112  7 

PFF 

6 

LAST 

75S 

C5 ,3461 

03761 

1 

SVEX ITAC 

2CACR 

SFPVFXIT 

0127 

05,2462 

6 4 C 6 7 

1 

0128 

05 ,3463 

00  1 16 

0 

M0FF7C 

CEC 

7C 

0120 

05  ,3464 

OC'127 

1 

CCTAL27 

CCT 

27 

01  30 

05, 3465 

00  107 

1 

M0DF71 

ere 

71 

0131 

► ^ » 3466 

^0640 

1 

C7P8  ITS 

OCT 

40640 

013? 

: 5,2467 

CC554 

c 

IDEGCe 

CCT 

00554 

0133 

32,3547 

BANK 

32 

013^ 

OFF 

1 

32 ,20U0 

SETLCC 

ABCRTS 

0135 

32,3547 

BANK 

0136 

pep 

1 

COUNT>> 

$t/P7C 

0 137 

REF 

15 

LAST 

806 

32,3547 

3 4751 

0 

GCABOPT 

CAF 

FCUR 

0133 

PFF 

Q C 

LAST 

826 

32,3550 

55*515 

c 

TS 

DVCNTP 

C13<3 

PFF 

1 

32,3551 

3 3756 

n 

CAF 

WF  ICHAOR 

01  AO 

PFF 

27 

LAST 

778 

32,3552 

55'455 

c 

TS 

WFICF 

OlAl 

PFF 

1 35 

LAST 

61<? 

32,3553 

0 6042 

1 

TC 

T NTPBET 

01  A2 

32,3554 

43  114 

n 

CLEAR 

CLEAR 

01A3 

P.EF 

1 

32,3=55 

04665 

0 

FLPCS 

OlAA 

PEF 

A 

LAST 

739 

32,3556 

04265 

1 

F LLNOI SF 

01A5 

32 ,3557 

43014 

0 

CLEAR 

S ET 

0 1A6 

REF 

5 

LAST 

7“ 

32  , ?56C 

C3670 

0 

TDLFFLAG 

C 1 A 7 

PFF 

1 

32  ,356  1 

06464 

1 

ACC.4-2FL 

01  A8 

32  ,3562 

45  114 

c 

SET 

C all 

01  A<? 

'’EF 

1 

32.3563 

C4462 

c 

C150 

PFF 

2 

LAST 

726 

32 ,3564 

6 1 1 7 1 

0 

1 

riNITCOUl.  7 

0151 

32,3=65 

77  7 76 

1 

EXIT  ' 

0152 

RFF 

6 

LAST 

81  A 

32,3566 

0 5321 

1 

TC 

CHFCKMM 

0153 

32 ,3567 

301  16 

0 

7CICEC 

CFr 

70 

015A 

PEF 

1 

32, 3 5 70 

1 3 702 

c 

TCF 

P71 RET 

0155 

REF 

1 36 

LAST 

826 

32,3571 

0 6042 

1 

P70IMT 

TC 

TNTPRET 

0156 

32,3572 

77624 

1 

CALL 

0157 

PFF 

1 

32,3573 

6 = 7 ? 1 

1 

TGOCCA'P 

0158 

32,3574 

54345 

1 

CLOAD 

SL 

i~,AP:  ASSPNPLF  RFVISIPN  116  fF  PRCGPfl''  UJ^'TN'/ir-Y  BY  NASA  2C;ilI2-C?l 


19;C9  ALG.  11,1969  FLY 


U6  PAGE  827 


L P7C-P71 


USER'S  PAGE  NO.  5 E7  S3 


ni5'5 

016P 

0161 

9EF 

1 

32,3  6 75 

32.3576 

32.3577 

36003 

21215 

77665 

C 

1 

1 

BDD\/ 

MOCTDFS 

6D 

016? 

REF 

11 

1 AST 

813 

32,3600 

’1266 

1 

T'A  S S 

0 163 

RFF 

2 

1 AST 

12C 

32 , 36'1 

16271 

1 

STCCL 

T PUP 

01  6A 

PEF 

1 1 

LAST 

8?7 

32.3602 

0 1266 

1 

PASS 

0166 

32 , 3603 

70671 

1 

CCV 

SR  1 

0166 

RPF 

1 
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VC6N76 

VN 

0676 

0590 

30,3022 

01441 

1 

V06N33A 

VN 

0633 
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PPL IM  IT 

2CEC 

- .0639 

(B/TBLP)MN=-.lFT.SEC(-3) 

3595 

33,220  1 

41775 

1 

0596 

33,2202 

00022 

1 

M INIABCV 

2DFC 
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. C00CC00O6O 

C61  1 

30,3032 

0000  2 

0 

0612 

30, 2C33 

76797 

1 

20EC 
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001  I 
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5.2SPCT  FCP  REREACAC  ANC  NCFRLI2T 

0033 

REF 

1 

37,3434 

C 3 523 

c 

GCRFACA)< 

TC 

GNUTFA  Z5 

0034 

REP 

4 

LAST 

788 

37, 3435 

3 5000 

1 

CA 

2 SFC  S 

WAIT  TWC  SECCNCS  FCP  PEACACCS 

0C35 

REF 

8 

LAST 

8 14 

37,3436 

0 5224 

0 

TC 

VARDELAY 

GAP ; 

ACS'^PBLF  R5VISI0A 

116 

CF  AFC  FRCGRAP  LUPIAARY  8Y  RASA  2021112-071 

19:09  AUG.  11,1969  FLY  .146  FACE  853 

L 

SFRVICEP 

LSER' S PAGE  NO.  2 El  S3 

pom  6 

PFAOACC  S 

0038 

9PF 

1 

37, 3A37 

4 3535 

0 

PEAOACrS 

CS 

0CT37771 
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1 
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TS 

L 
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LAST 
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2 
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RFF 

213 

LAST 

830 
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0116 

RFE 
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02217 

1 

2CADP 
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0116 

REF 

1 
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0 

0117 

PFF 

3 

LAST 
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1 
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2 
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1 

7C 
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RFF 
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1 
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TC 
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1 
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REF 

5 
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1 
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RFF 
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L AST 
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1 
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A 
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786 
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1 
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0127 

33,2225 

C C0C6 

1 
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0128 

RFF 

1 

33,2226 
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0 
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A 

LAST 
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33,2227 
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1 
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1 

EXTRNO 
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RFF 

12 
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1 
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lA 
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9 
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1 
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0 
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RFF 

12 
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1 

RASK 

AFSFLBIT 
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RFF 
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0 
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1 
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3 
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1 
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LAST 
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1 

TS 

0 
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1 
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REF 

5 
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33, 22A6 
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c 
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1 
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REF 
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1 
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C 
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1 
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0 1A5 

RFF 

13 
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1 
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LAST 

8^5 
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1 

DAS 

RASSl 

3 

L ART 

812 

33,225A 

3 2021 

n 

MCCNSPOT 

CA 

KPIPl 
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RFF 
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REF 
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0 
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LIFCATE  CVTCTAl  FOR  CISPLAY 

0155 

PFF 

1 

33,2260 

0 2660 

0 

TC 
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0157 

PEF 

236 

LAST 

855 

33,2261 

0 6616 

1 

TC 
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7158 

PEF 

2 

LAST 
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33, 2262 
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1 

CACR 
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REF 

1 

33,2263 

3 26  16 

1 

CAF 

XNBP I PAD 
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RFF 

237 
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f 56 

33 , 2266 

0 6615 

1 

TC  - 

PAN'KCALL 

0161 

RFF 

1 

33,2265 
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1 

CAOR 
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REF 
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LAST 

855 

33  ,??66 

0 6762 

1 

TC 
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7167 

33,2267 
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C 

AVERAGEG 
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call 
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PFF 

6 

LAST 
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33,227F 

03307 

u 

MUNFLAG 

0165 

RFF 

1 

33,2271 
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0 

PV8CTF 
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PEF 

1 

33,2272 
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0 

C ALCRVG 

01  71 

33,2273 

7 7776 

1 

EXIT 

0172 

REF 

1 

33 ,2276 

0 3516 

1 
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TC 

CL'IK  FAZ5 

0173 

REF 

1 

33,2275 
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c 

COPYC  >CL 

7C 

CCPYC  YC 

ACl  7A 

CA 
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0175 

RFF 

2 
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55*157 

1 

T S 
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RFF 

2 
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0 

TS 
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PFF 

2 

LAST 
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55*161 

1 

TS 
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RFF 

2 
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c 

CS 
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RFF 
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LAST 
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33 ,2302 
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1 
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RFF 

26 

LAST 

F56 

33,2303 
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1 

TS 

FLAGRRC2 
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RFF 

3 
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c 
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RFF 

2? 
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1 
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RFF 
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c 
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A 
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1 
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1 

TCF 

Mcn  v'^CN  1 

lOLFFLAr.  = l,  HENOF  SET  AUXFLAG  TC  0. 
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7 
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CS 
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1 
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1 
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PEF 
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LAST 
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33,2312 
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A 
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RFF 

1 

33,2313 
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c 
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RFF 

7 
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831 

33,2316 
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0 
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CS 
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CISC 

RFF 

5 
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33,2315 
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0 

AC 

ABCEL V 
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33,2316 
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1 

EXTEND 
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REF 

1 

33,2317 
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1 
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REF 

25 

LAST 
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33,2320 
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1 

CS 
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REF 

3 

LAST 
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33,2321 
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f 
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RFF 
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01  = 7 

RFF 

45 

LA=7 

855 
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0 
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CVCNTR 

THRUST  HAS  BEEN  CETECIEC. 
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RFF 

19 

I.AST 

F55 

33,2325 

2 01C6 

c 

CA 
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EFANCF  IF  APSFLAG  IS  SET. 
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RFF 

13 

1 AST 

855 

33,2326 

7 4737 

1 
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APSFLBIT 
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PFF 
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1 AST 

856 

33,2327 

IC  COO 

0 

CCS 

A 
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FFF 

1 

33, 2330 
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r 

ICF 

LS= JETS 
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REF 

21 
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33,2331 

2 4743 

0 

CA 
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CHECK  GIABAL  FAR  PIT 

0203 

23,2322 

C CCC6 

1 

EXTENC 

0204 

RFF 

3 

LAST 
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33,2332 

02  032 

1 

RAND 

CHAN32 

0205 

,2234 

C CC06 

1 

EXT  FNC 

0206 

PFF 

2 

LAST 
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33,2335 
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0 

BZF 

USE JFTS 

0207 

RFF 

2 

1 AST 
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33,2336 

4 4736 

0 

USEGTS 

CS 

USEOR JTS 
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PCF 

25 

LAST 
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33 ,2  AO  7 

7 0111 

1 

AASK 

OAPerCLS 

0209 

PFF 

26 

LAST 

857 

33,2340 

54  111 

1 

TS 

CAPBCCLS 

0210 

REF 

1 

33,2341 

1 240J 

0 

TCf 

SER VOLT 

0211 

per- 

2 

LA  ST 

856 

33,2342 

4 4752 

1 
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CS 

ALXFLPIT 

SFT  AUXFLAC  TC  0. 

0212 

RFF 

8 

LAST 

856 

33, 2343 
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0 

PA  SK 

FLAGVP06 

0213 

REF 

9 

LAST 

857 

33,2344 

54  102 

0 

TS 

FLAGWR06 

0214 

PFF 

3 

LAST 

857 

33,2345 

1 23  7 5 

0 

TCF 

USEJETS  ■ 
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REF 

10 

LAST 

857 

33,2346 
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0 
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CS 
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REF 

3 

LAST 

857 

33 ,2  347 
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1 
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0217 

REF 
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LAST 

857 

23,2350 
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0 
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RFF 

4 
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33,2351 
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0 

TCF 
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0219 

RFF 

2 

LAST 

856 
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1 
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TC 
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0220 

RFF 

46 

LAST 

857 

33,2353 
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0 

CCS 
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RFF 

1 

23,2354 
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1 

TCF 

DECCNTR 

0222 

RFF 

1 
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1 
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PHASE4 
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RFF 

2 

LAST 
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33,2356 
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0 

TCF 
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02224 

REF 

73 
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1 

TC 
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1 
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REF 

4 
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33,2361 
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c 

CAF 
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0223 

REF 

22 
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33,2362 
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1 

TC 
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PFF 

30 
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REF 
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LAST 
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1 
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0 

02236 

ref 

•a 
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0 
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1 
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TS 
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REF 

3 

LAST 
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1 
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PFF 

2 

LAST 
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1 
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REF 
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REF 
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LAST 

857 
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1 
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CS 
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REF 

3 

LA'T 

857 
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0 
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REF 

2F 
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1 
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0234 
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1 
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RFL INT 
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REF 
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LAST 
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33,2401 
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1 

TC 
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REF 

1 

33,2402 
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1 
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PFF 
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1 

CA 
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RFF 

8 
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1 
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RFF 

Q 
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1 

TS 
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3242 

33,2406 

22  007 

0 

ZL 
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PFF 

25 
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81S 
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1 

EXCL 
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FIXLOC  ANO  CVFIND 

0244 

REF 

4 

LAST 
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33,2410 
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1 

* 

TC 
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33,2411 
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1 
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PFF 

6 
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c 
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748 

33,2413 

52  006 

c 

OXCH 

Z 

HlUL  CCNVEY  this  INFCIPMATICN. 
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7 
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BANK 

325) 

REF 

1 

CCLNT* 

$$/SEPV 

02  52 
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0 
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8 
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1 
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REF 
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c 
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SET  DRIFT  FLAG. 
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REF 
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1 

AORES 

ORIFTFLC 

0256 

REF 

239 

LAST 

856 
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1 
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CAOR 

PIPFRFF 
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1 
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REF 
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REF 

1 AST 

8A1 

22,3707 

C 66  3 5 

0 

AVFRTRN 

Tf 

PCSTJLPf 

C27F 

Rcp 

1 

22,3710 

10116 

0 

CACR 

V37RET 

0276 

REF 

1 

22,3737 

FLTGrA\/E 

= 

AVEPTRN 

0277 

RFF 

5 

LAST 

85E 

E7,  157C 

CVCNTRl 

PASSl 
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P0278 


72782 

PEP 

1 

27,2000 

SFTLCC 

S*'PV3 

0278A 

27,3321 

BANK 

CZlff 

PFF 

1 

COUNT  < 

} 1/SERV 

’^21^ 

27, 3’21 

0 0006 

1 

SERVIOle 

EXTENT 

CISCCNNECT  SERVICER  FRGM  ALL  GLIOANCE 

0280 

R'"F 

1 

27,3322 

3 3357 

0 

OCA 

SVE  XTAOR 

028t 

PFF 

7 

LAST 

856 

27,3323 

53*252 

1 

CXCF 

AVGEX  IT 

028? 

R = F 

23 

LAST 

856 

27, 3324 

4 0103 

1 

CS 

F LAGNRD7 

CISCCNNECT  the  CELTA-V  MPMTOR 

0283 

REF 

4 

LAST 

856 

27,3325 

7 4745 

1 

MASK 

ICLEFBIT 

0284 

REF 

24 

LAST 

86C 

27,3326 

26  1C3 

1 

ADS 

CLAGNRC7 

0285 

REF 

5 

LAST 

825 

27, 2327 

3 4 7 35 

1 

CAF 

LRBVPIT 

TERMINATE  R12  IF  RUNNING. 

C286 

PPF 

10 

LAST 

825 

27,3330 

54  107 

0 

TS 

FLGWRn 1 1 

0287 

27,3331 

C CC06 

1 

EXTFNO 

02  88 

REF 

15 

1 AST 

807 

27, 3332 

3 4755 

1 

CCA 

NEC-0 

0285 

RFF 

4 

LAST 

728 

27,3333 

52  752 

•0 

CXCF 

-PHASEl 

0290 

PFF 

1? 

LAST 

85  7 

27,3334 

2 on 2 

1 

CA 

FLAGUPC6 

Cr  NCT  TURN  CFF  PFASF  2 IF  muNFLAG  SET. 

02S1 

REF 

4 

LAST 

853 

27,3335 

7 4744 

0 

WASK 

MLN'FLBIT 

025? 

PEF 

25t 

LAST 

85  7 

27,3336 

1C  COO 

c 

CCS 

A 

0293 

27,3337 

1 3 34  3 

1 

ir  F 

+ 4 

0254 

27,3340 

0 0006 

1 

EXTEND 

0295 

REF 

16 

LAST 

860 

27, ’341 

3 4 7 5 5 

1 

CCA 

NEGO 

029f> 

RFF 

6 

LAST 

854 

27, 3342 

52  754 

n 

DXC  H 

-PHASE2 

0257 

27,3343 

C 0006 

1 

+ 4 

EXTENC 

0298 

REF 

17 

LAST 

86F.  . 

27,3344 

7 4 7 5 5 

1 

CCA 

MEGO 

0259 

REF 

4 

LAST 

807 

27,3345 

52  756 

1 

CXCF 

-PFASE3 

030C 

27,3346 

0 C0C6 

1 

EXTFNC 

0301 

PEF 

18 

LAST 

860 

27,3347 

3 ^ 5 *' 

1 

DCA 

NEGO 

0302 

RFF 

3 

LAST 

7.3  6 

27 , 3350 

52  764 

0 

CXCF 

-PHASE6 

■J30  3 

REF 

2 

LAST 

225 

27,3351 

3 A 7 6 ^ 

c 

CAF 

rCT33 

4.33SFCT  FCR  GCPDOFIX 

0 304 

PFF 

139 

1 AST 

854 

27,3352 

54  001 

1 

TS 

L 

0305 

27,3353 

4 0009 

3 

CCN 

0306 

RFF 

8 

LAST 

826 

27,2354 

52  760 

1 

CXCH 

-PHASE4 

0307 

RFF 

1 

27,3355 

1 5634 

1 

TC  F 

WHIMPER 

PFRFCRM  A SCFTWARE  RESTART  ANC  PPCCFEC 

A0308 

TC  GCTCFEOF  WHILE  SERVICER  C0NTINLE5  TC 

A0309 

PUN,  ALBEIT  IN  A GRCUNC  STATE  WHERE 

A031  r 

CNLY  STATE-VECTCR  DEPENDENT  FLNCTICNS 

A0311 

ARE  MAINTAINED. 

0312 

PEF 

48 

LAST 

857 

E7, 1515 

EBANK= 

DVCMTR 
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0313 

REF 

7 

LA  ST 

826 

27,0356 

C3  76  1 

1 

SVEXTACR 

2CACF 

SEPVEXIT 

0313 

27,3357 

64067 

1 

031^ 

32  ,3761 

BANK 

32 

0316 

REF 

1 

32,2000 

SETLCC 

SERV 

0316 

32,3761 

BANK 

0317 

REF 

1 

CCLNTX 

J J/SERV 

0318 

PFF 

74 

LAST 

857 

32,3761 

0 5353 

1 

SERVEX  TT 

TC 

PBASCHNG 

0316 

32 ,376? 

000  3 5 

1 

CCT 

00035 

0370 

REF 

132 

LAST 

843 

32,3763 

1 5155 

1 

TCF 

FACCF JCE 

0321 

23,2463 

BANK 

23 

0322 

PEF 

1 

23  ,200C 

SETLCC 

NCP^<L  I Z 

0323 

23, 246’ 

BANK 

13?A 


REF 


1 


COUNT'S  SJ/SERV 
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PT325  . NCP«LTZF  AND  CCPYCVCL 


03?6 

REF 

1 48 

LA  ST 

R>=  f 

23.246? 

C 6042  1 

NFPPL 1 ZE 

TO 

I NTFRET 

3327 

23,2464 

43175  0 

VI  OAD 

BCFF 

C32F 

REF 

-a 

LAST 

1 5C 

23,2465 

03545  0 

PM 

0329 

RFF 

8 

1 AST 

85  F 

23,2466 

03347  I 

PLNFL AG 

0330 

PFF 

1 

23,2467 

66415  1 

NCRML I Z 1 

0331 

23,2470 

64252  0 

VSL6 

MXV 

0332 

REF 

32 

LAST 

834 

23,2471 

01734  C 

REFSt'f'AT 

0333 

REF 

20 

LAST 

848 

23,2472 

37521  0 

stcall 

R 

033A 

RFF 

4 

LAST 

832 

23,247? 

67C67  1 

PLNGFAV 

0339 

23,2474 

76575  1 

VLOAD 

VSLl 

0336 

RFF 

4 

LA'T 

772 

23,2475 

03553  1 

VM 

0337 

23,2*76 

77721  C 

PXV 

0338 

REF 

33 

LAST 

862 

23,2477 

01734  '0 

REFSP-MAT 

0339 

PEF 

12 

LAST 

83F 

23,2500 

27527  1 

STCVL 

V 

0340 

REF 

4 

1 AST 

726 

23,2501 

01726  C 

V ( r s M 

0341 

23,2502 

53435  0 

VXV 

UNIT 

' 034? 

REF 

C, 

LAST 

84F 

23,250? 

C172C  0 

R (CSM 

0343 

RFF 

3 

LAST 

152 

23, 2504 

03720  1 

STORE 

UHYP 

0344 

23,2505 

77776.  1 

ASCSFCT 

EXIT 

0345 

23,2506 

C 0006  1 

FXTENO 

RAKE  SURE  GCUF  2 

IS 

OFF. 

0 34  6 

REF 

19 

LAST 

860 

23,2507 

3 4755  1 

CCA 

NEGO 

0347 

REF 

7 

LAST 

860 

23,2510 

52  754  0 

CXCF 

-PFASE2 

0348 

RFF 

54 

LAST 

859 

23,2511 

0 *635  C 

1C 

PEST JL^F 

03482 

PEE 

1 

23,251 2 

6642 T 1 

CACR 

NOPML 1Z2 

03483 

32,2415 

EANK 

33 

03484 

PFF 

5 

LAST 

854 

33,2000 

SETLCC 

SERVICE  £ 

034  P5 

33,2415 

BANK 

03486 

RFF 

C 

LAST 

'854  TO 

85  8: 

135  172* 

COLNT* 

$$/SERV 

0349 

33,2415 

77624  1 

NOPML  IZ  1 

CAL  L 

0350 

REF 

1 

33 , 24  16 

66667  C 

CALCGPAV 

0351 

33,2417 

77776  1 

EXIT 

0352 

REF 

1 

33,2420 

3 2437  0 

NCRML  IZ2 

0 A 

E IGHTEEN 

0353 

PEF 

2 

LAST 

856 

33, ?421 

C 2424  1 

TC 

CCFYCYC  +1  CC  NOT  CCPY  MASS 

IN 

NORML  IZE 

0354 

PFF 

133 

LAST 

86  1 

33,2422 

0 5155  0 

TC 

ENOOFJCB 

0355 

PEF 

6 

last 

F54 

38  ,2423 

3 6007 

6 

CCPY CYC 

OA 

OCT  2 4 

EEC  20 

0 356 

33,2424 

0.  C0C4 

r 

+ 1 

TNHINT 

0357 

REE 

4 

LAST 

334 

33,2425 

7 7752 

I 

+ 2 

MASK 

NEGl 

RECUCE  BY  1 IF  COC 

0358 

RFF 

31 

1 AST 

744 

33 ,2426 

54  C61 

1 

TS 

I T E M F 1 

0359 

33, 2427 

n 0006 

1 

FXTENO 

0360 

REF 

32 

LAST 

862 

33 , 2430 

5 0161 

n 

INDEX 

ITEMPl 

0361  " 

■AiTF 

4 

LA  ST 

862 

33,2481 

3 1545 

1 

036? 

REF 

33 

LAST 

862 

33,2432 

50  06  1 

0 

INDEX 

I TEMPI 
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0363 

REF  13 

LAST 

789 

33,2932 

E3' 22C 

1 

CXEH 

RA 

0369 

PFF  39 

1 AST 

862 

33,2939 

10  06  1 

1 

CCS 

I TEMPI 

0’66 

REF  3 

LA<T 

86? 

33,2939 

1 2925 

1 

TCF 

CCPYC YC  +2 

0366 

REF  216 

L AST 

FES 

33, 2936 

0 cao2 

c 

TC 

C PFTUPA  UACER  INFINT 

0367 

33,2937 

00022 

1 

EIGHTEEN  CFC 

1 e 
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R0369 

MCC  NP.  CO  BY  0.  LTCKLV  0EC.9  1966 

R037C 

FLNCTIOAAL  DESCRlFTirA 

R0371 

SUPRPbTINF  TO  PEAC  PTP4  CCENi''ERS,  TRYING  TC  PE  VEPY  OARFFtL  SC  TF6T 

IT  WILL  BE  RESTARTAPLE. 

R0373 

R0375 

PIFA  PFACIMGS  APE  9TCRFC  IN  THE  VECTOR  DELV.  THE  HIGH  ORDER  PART  CF 
RF5TAPTS  PEGIN  AT  PFPEAD6C. 

EACH 

CCMFCN'FNT  CONTAINS  THE 

FIFA  REACINC, 

R0376 

R0377 

AT  the  ENC  OF  the  PIPA-  REACFP  THE  CFLS  APE  REAC  ANC  STCREO  AS  A 
VECTOR  IN  CCUTENP.  THE  HIGH  CPCFP  PART  CF  EACH  COMPONENT  CONTAINS 

R0?78 

R037O 

THE  rCL  PFAPING  IN  2S  CCNP  IN  THE  CRCEP  C CL  X , Y , Z . THE  THRUST 
VECTCF  ESTIYATCR  IN  FINCCCUC  FECUIRFS  THE  CDUS  BE  PEAC  AT  PIPTIME. 

R03AO 

CALLING  SEQUENCE  AND  EXIT 

Rn3R  1 

CALL  V'A  IC,  ISH.CAI.L,  FTG. 

R 0 3 e 2 

EXIT  IS  VIA  C. 

P338? 

R038A 

INPUT' 

R0386 

INFLT  IS  THROUGH  THE  CFUNTERS  FIFAX,  PIPAY,  PIPAZ,  AND  TIME2. 

R0386 

OUTPUT 

R0387 

R038G 

HIGH  CPCER  CCMFCNFNTS  CF  THE  VECTOR  CELV  CONTAIN  THE  PIPA  READINGS. 
PIPTIME  CONTAINS  time  cf  PIFA  READING. 

R0389 

FEERIS  (ERASABLE  LCCAtignS  DFStroyEC  EY  PROGRAM  I 

R0390 

TEMX  TEMY  TEMZ  FIFAGE 

0391 

039? 

37, ’=36  BANK  37 

PEF  2 LAST  852  37,2000  SFTICC  SERVl 

0393 

37,3536  BANK 

039A 

REF  2 LAST  052  TO  85A:  86  86*  CCLNT*  t$/SFRV 

03=5 


37,3536  0 0006  1 PIP/>SR 


EXTFNCl 
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0396 

RFF 

2 6 

LAST 

F25 

37,3537 

3 0025 

0 

OCA 

Ilf'S? 

0397 

REF 

8 

LAST 

795 

37,3540 

53 '561 

C 

tXC  F 

P IPTIME  1 

CLRPENT  TIME  FCSmvE  VALLE 

0398 

REF 

159 

LAST 

851 

37,3541 

4 4 755 

0 

43 

CS 

ZEPO 

INITIALIZE  THESE  AT  NEC-.  ZERO. 

0399 

RFF 

5 

LAST 

8 1 1 

37,3542 

c e • 2 c Q 

0 

t S 

TEMX 

0400 

REF 

4 

LAST 

8 1 1 

37 ,3543 

55' 254 

1 

TS 

TEVY 

.14'1 

REF 

4 

LAST 

8 1 1 

37.3544 

e c 1 p 5 c 

t 

TS 

TFNZ 

0402 

REF 

16'0 

LAST 

865 

37,3545 

3 4755 

1 

CA 

ZFRn 

0403 

REF 

A 

LAST 

385 

37,3546 

54  330 

0 

TS 

DELVZ 

0403  1 

RFF 

c; 

LAST 

865 

37, 3547 

54  33  1 

1 

T S 

DELVZ  +1 

04C4 

REF 

5 

LAST 

385 

37 , 355'J 

54  326 

1 

TS 

DEI  VY 

04T4  ] 

RRF 

6 

LAST 

865 

37  ,355  1 

54  327 

c 

TS 

DELVY  +1 

0404? 

REF 

9 

LAST 

386 

37, 3^=52 

K ^ •3  2 5 

1 

TS 

OELVX  +1 

04C3 

RFF 

4 

LA'T 

853 

37,3553 

55' 256 

0 

TS 

P IPAGF 

SHOW  PIPA  READING  IN  FPCGRFSS 

0406 

37,3554 

C 0006 

1 

RERI PI 

FXTEAC 

3407 

REF 

9 

lAst 

8 10 

37,3555 

4 004  J 

1 

DCS 

PI  PAX 

X ANC  Y FIFS  READ 

0408 

REF 

6 

LA  'T 

865 

37 ,3556 

53' 254 

1 

rxCF 

TEMX 

0409 

RFF 

to 

LAST 

86  5 

37,3557 

52  040 

1 

OXCF 

PI  FAX 

PIFAS  SFT  TC  NEG  ZEPD  AS  READ. 

C41  0 

FFF 

10 

LAST 

865 

37 ,3860 

54  324 

0 

TS 

DEL  VX 

0411 

RFF 

7 

LAST 

865 

37,356  1 

22  326 

0 

LXCF 

DEL  VY 

0412 

RFF 

4 

LAST 

811 

37,  3“=62 

4 004  1 

0 

R EP  TP2 

CS 

PIPAZ 

REPEAT  FFCCESS  FCP  7 RIF 

0413 

PFF 

5 

LAST 

865 

37 ,3563 

57' 255 

1 

XCF 

TEMZ 

0414 

REF 

5 

LAST 

865 

37,3564 

56  04  1 

1 

XCF 

P I FA  Z 

0415 

RFF 

6 

LAST 

865 

37, 3565 

54  330 

0 

OODELVZ 

TS 

DELVZ 

04  ! 6 

37,3566 

0 00  )6 

1 

R5FI P4 

EXTEND 

CGM'PUTE  GUIDANCE  PEPICC 

0417 

REF 

9 

LAST 

865 

37,3567 

3 156  1 

1 

CCA 

PIPTI NEl 

041  8 

RFF 

2 

LAST 

10,5 

37,3570 

53 '247 

0 

CXCF 

PGLIDE 

■34  19 

37,3571 

C 0006 

1 

EXTEND 

042  0 

REF 

2u 

LAST 

858 

37,3572 

4 1234 

1 

nc  S 

PI PTI ME 

0421 

REF 

3 

LAST 

865 

37,3573 

21 '247 

0 

CAS 

PGM  IDE 

042? 

REF 

13 

1 AST 

609 

37,3574 

3 0032 

0 

CA 

CCUX 

REAC  ecus  INTC  HIGH  ORCEP  CDUTEMRS 

0423 

REF 

1 

37,3575 

55 ' 154 

1 

TS 

CDUTEMPX 

0424 

R^F 

C 

1 AST 

6C  9 

37 ,3576 

3 0033 

1 

CA 

ICIJY 

0425 

REF 

1 

37,3577 

6 3 M 5 5 

0 

1 S 

CCLTFMPY 

0426 

REF 

7 

LAST  ' 

604 

37,361  ) 

3 0034 

0 

CA 

rCL'Z 

0427 

REF 

1 

37,3601 

c c f J 5 ^ 

c 

1 S 

CDLTEMFZ 

04?  8 

RFF 

1 1 

LAST 

865 

37,3612 

3 0324 

1 

CA 

DELVX 

0429 

REF 

3 

LAST 

856 

37,3613 

55' 157 

1 

TS 

D IP ATMPX 

0430 

RFF 

8 

1 AST 

37,3604 

3 0326 

0 

CA 

DEl.VY 

043  1 

REF 

3 

1 AST 

856 

37,3605 

55 ' 160 

0 

TS 

PIPATVPV 

0432 

RFF 

7 

LAST 

86  5 

37,3606 

3 0330 

1 

CA 

DELV  Z 

1433 

RCF 

3 

LAST 

856 

37, 3607 

55'  161 

1 

T S 

P I P A T M P Z 

REF  217  LAST  863  37,3610  0 0002  0 TX Q 
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3435 

PEE 

5 

1 AST 

865 

37,3611 

11 '256 

G 

RFREACAC 

CCS 

PIPAGE 

0436 

REF 

1 

37,3612 

1 3437 

0 

TC  F 

R FADACCS 

PIP  READING  NCI  S1ARTEC.  GC  TC  BEGIAMPG 

)437 

REF 

1 

37,3613 

3 3651 

C 

CAF 

OC^FACR 

SFT  UP  RETURN  FROM  PIPASR 

0438 

REF 

218 

LAST 

865 

37, 3614 

5 4 00  2 

1 

TS 

Q 

0439 

REF 

P 

LAST 

865 

37,3615 

10  330 

0 

CCS 

DEl.V? 

.1440 

REF 

1 

37, 3616 

1 3 5 66 

C 

TCF 

REPI P4 

Z CCNE,  GC  CC  ecus 

0441 

37,3617 

1 3622 

0 

TCF 

+ 3 

Z NCT  CCNE,  CHECK  Y. 

044? 

RFF 

2 

LAST 

866 

37,3620 

1 3 566 

c 

TCF 

prpiP4 

0443 

REF 

3 

LAST 

866 

37,362  1 

1 3 5 6 6 

c 

IGF 

REPI P4 

C444 

37,3622 

2,2  007 

0 

7.L 

0445 

REF 

9 

LAST 

865 

37,3623 

1C  326 

. 1 

CCS 

OELVY 

0446 

37. 3624 

1 3627 

0 

TCF 

+ 3 

0447 

R>^F 

1 

37,3625 

1 3636 

0 

TCF 

CEKTFRX 

V NOT  CONE,  CHECK  X. 

0448 

37,3626 

1 36  27 

0 

7CF 

+ 1 

0449 

REF 

6 

I.AST 

865 

37,3627 

22  041 

1 

LXCF 

P IPAZ 

Y DCNF,  ZERC  Z PIF. 

045C 

REF 

6 

LAST 

865 

37, 363R 

1 1 ’ 255 

(‘ 

CCS 

TFPZ 

0451 

RFF 

7 

LAST 

866 

37, 3631 

4 1255 

c 

CS 

TERZ 

TFNZ  NCT  = -0,  CCNTAINS  -PIPAZ  VALUE. 

0452 

RFF 

1 

37,3632 

1 3565 

c 

TCF 

DCOELVZ 

0453 

37,3633 

1 363  1 

1 

TCF 

-2 

0454 

REF 

9 

LAST 

866 

37 ,3634 

22  330 

1 

LXCH 

OELVZ 

lENZ  = -C,  L HAS  ZPIP  VALUE. 

■0^95 

RFF 

4 

LAST 

866 

37 » 3 635 

1 3566 

n 

TCF 

REPIP4 

0456 

KFF 

7 

LAST 

865 

37,3636 

11*253 

c 

CHKTEMX 

CCS 

TEPX 

HAS  THIS  CHANGED 

0457 

REF. 

P 

LAST 

866 

37 ,3637 

4 1253 

0 

CS 

TEMX 

YES 

045E 

37.364C 

1 3643 

1 

TCF 

+ 3 

YES 

0459 

37,  364  1 

1 3 6 3 7 

1 

TCF 

— 2 

YES 

046  r 

REF 

1 

37,3642 

1 3554 

1 

TCF 

R E F I F 1 

NO 

0461 

RFF 

12 

LAST 

865 

37,3643 

54  324 

0 

TS 

DELVX 

0462 

REF 

5 

LAST 

865 

37,3644 

4 1254 

1 

CS 

temy 

0463 

RFF 

1C 

LAST 

866 

37,3645 

54  326 

1 

TS 

CELVY 

0464 

REF 

161 

1 AST 

865 

37,3646 

4 4755 

{■; 

CS 

ZERO 

ZERC  X AND  Y FIPS 

0465 

REF 

11 

LAST 

865 

37 , 3647 

52  340 

1 

CXCE 

P IPAX 

L still  ZERC  FRCP  AECVE 

0466 

REF 

1 

3 7 , 3 6 5 r 

1 3562 

1 

1CF 

REPI F3 

REF 


.546  7 


I 


37, 3651 


03447  n CONE^CR  GENADR  PIPSDCNE 


GAP:  iSSENPLE  P€VISION  116  CP  AGC  PPCGRAM  LUMINARY  8V  NASA  2021112-171 


19  :09  AUG.  1 1 ,1969  i^LY 


1^6  PACE  867 


L SERVICfR 


LSER' S PAGE  NP.  16  E7  S3 


0468 
046° 
04  70 

RFF 

6 

LAST 

862 

33, 244C 
33,2000 
33 .244C 

BANK 

SETLCC 

BANK 

33 

SERVICES 

0471 

PEE 

6 

LAST 

862  TO 

864  : 

19  19 

1* 

CELNT^ 

$$  /SEPV 

0472 

REF 

2 

1 'ST 

865 

33 ,2440 

3 1155 

1 

TPPTOSPT  CA 

CCUTENPY 

THIS 

SLBPOLTINE,  CALLEC  BV  AN  RTR  FRCR 

0473 

rff 

1 

33,2441 

54  765 

1 

TS 

CCUSFCTY 

INTERPRETIVE,  LOACS  THE  CCLS  CORRESPON- 

04  74 

ref 

2 

LAST 

865 

33, 2442 

3 1156 

1 

CA 

CCLOENPZ 

CING 

TC  FIFTINE  INTC  THF  CCLSPCT  VECTCF. 

0475 

RFF 

1 

33,2443 

54  767 

0 

TS 

CCUSPCT  Z 

0476 

RFF 

2 

LAST 

865 

33, 2444 

3 1154 

c 

CA 

CCLTEHFX 

0477 

REF 

1 

33,2445 

54  77  1 

1 

TS 

CDLSFCTX 

0478 

PEP 

2 19 

LAST 

866 

33,2446 

0 000  2 

0 

TC 

C 

R3479  LRETASK  IS  A WAITLIST  TASK  SPT  BY  REACAC'CS  DISTNG  THE  CESCEN7  8PAKUG 

P9480  PHASE  kHEN  TEE  ALT  TC  THE  LUNAR  SHRFAff  IS  LESS  THAN  25,OCO  FT.  THIS 

POAEl  TASK  CLEARS  THE  ALTITLOE  HEASLRE»'EM  PACE  CISCPETE  ARC  INITIATES  THE 
R0482  LANDING  RAOAP  ^'EAEURE^'E^T  JOE  (LRHJiTg)  TO  TAKE  A ALTITLDE  MEASURENEM 
R04E3  5C  PE  pPICR  TP  THE  NEXT  REACACCS  TASK. 


0484 

21,2125 

BANK 

21 

0485 

REF 

2 

LAST 

42 

21 , 2000 

SET L PC 

R 10 

0486 

21,2125 

BANK 

0487 

REF 

1 

CCLN1=!= 

$$/SFPV 

04  8 8 

REF 

1 1 

1 AST 

86C 

21,2125 

4 010  7 

0 

LRHTASK 

CS 

FLGWRDl 1 

0489 

rff 

>6 

LAST 

86C 

21,2126 

7 4-,is 

C 

NAS  K 

LREYBIT 

0490 

21,2127 

0 C0C6 

1 

EXTEND 

0491 

REF 

1 

21,2  130 

1 2141 

0 

EZF 

GRP20FF 

LR  BYPASS  SET  - BYPASS  ALL  LP  REACING. 

0496 

REF 

12 

LAST 

867 

21,2131 

4 C107 

C 

CS 

F LGWRCl 1 

0497 

PEF 

1 

21,2132 

7 4742 

0 

NASK 

Nm.RRBI  f 

IS  LR  READ  INHieiTEC? 

0498 

21,2133 

0 C006 

1 

EXT  END 

0499 

RFF 

2 

LAST 

867 

21,2134 

1 2 14  1 

0 

ezF 

GRP2CFF 

YES.  BYPASS  LR  READ. 

0 5C- 

REF 

1 

21,2135 

3 7723 

0 

CA 

PR  1032 

LR  READ  CK  SET  JCB  TC  DC  IT' 

0 5C  1 

PEF 

23 

LA  ST 

85  7 

21,2136 

C 5072 

1 

TC 

NCVAC 

AECUT  50  NS  PRIOR  TO  P IPA  READ 

0502 

PEF 

4 

LAS’" 

239 

F7, 1654 

EBANK= 

HNFAS 

05C3 

RFF 

1 

21,2137 

03571 

1 

2CACR 

LRHJCB 

150  3 

REF 

1 

2 1, 2 140 

7CC67 

1 

0504 

21, 2141 

0 0006 

1 

GRP20FF 

EXTEND 

0505 

REF 

2C 

LAST 

862 

21,2142 

3 4755 

1 

CCA 

NEGP 

0506 

REF 

8 

LAST 

86  2 

21,2143 

52  7 5 4 

0 

CXCH 

-FHASE2 

C5C7 

RFF 

1 

21,2144 

1 20  21 

1 

TCF 

R 1C,R11A 

0508 

33,2447 

BANK 

33 

050° 

REF 

7 

LAST 

867 

3 3, 2 ion 

SFTLCC 

SERVICES 

051C 

33,2447 

BANK 

GAP: 

ASSEH0LE  PFVISTON  116  CF  AGC 

FPCGFAY  luninafy 

EY  NASA  20211  12-C71 

IS  :0S  AUG.  1 1 , 1S6S 

FLY 

.IA6  PAGE  868 

L 

SERVICER 

USFP' S PAGE 

NO  . 

17  E7  S3 

0511 

REF  7 LAST  667  TC  867: 

7 ISE# 

CCLNT:»  $j/SEFV 

P0512  HIG^TASK  IS  EMTFPFD  PPP  C XI  N /)T  E I Y 6 SFCS  FPICP  TC  HC/!Tg  CUC!I^G  T [- E 

pr)513  CESCFNT  PI-ASF.  (-IGATASK  SETS  THF  HIGATE  FLAG  (EITli)  AAD  thL  LR  INFIEIT 

ROEIA  FLAG  (EITIO)  IN  I.PSTAT.  THE  MGATJCE  IS  SET  UP  TC  REPCSITION  THE  LR 

R051S  AMTEMMA  FPCM  PQSITICH  1 TC  PCSITICN'  ?.  IF  THE  R E PC  S I T I CN  IKG  IS  

P0516  SUCCESSFUL  THE  ALT  EEAM  AND  VELOCITY  EEANS  ARE  TRANSFCRNED  TC  THE  HER 

RC517  CPIFNTATICN  IN  NP  CCCROINATES  ANC  STOREC  IN  ERASAELE. 


0518 

RFF 

75 

LAST 

66  1 

33,2447 

C 5353 

1 

HIGATASK  TC 

PHASOHNG  

0519 

33,2450 

00051 

C 

OCT 

5 1 

0520 

REF 

2 

LAST 

E6  7 

33,2451 

3 7723 

0 

CA 

PRI032 

T5?l 

PEE 

39 

LAST 

E53 

33,2452 

0 51C5 

0 

TC 

FINCVAC 

C522 

PEF 

5 

LAST 

867 

E7,1654 

EEANK= 

HNEAS 

0523 

REF 

1 

33,2453 

'’3636 

1 

2CACP 

H IGAT JCE 

0523 

REF 

1 

33,2454 

66C67 

0 

052A 

PEF 

13' 

L AST 

867 

33  ,2455 

4 ni'T7 

0 

CS 

FLGWRDl  1 

0525 

p -F 

11 

1 AST 

706 

33, 2456 

7 5C15 

1 

NASK 

PFI  C3 

0526 

REF 

14 

LAST 

86.8 

33,2457 

26  107 

0 

ADS 

FLGWRDl 1 

0527 

RFF 

1 

33,2460 

1 2546 

c 

TCF 

CENTS EPV  +1 

cap:  aSSE^'8lg  REVISION  116  CF  AGC  FPCGPav  luminary  ev  ^ASfl  2C21112-071 19:09  auG.  11,1^69  FLY ,1^6  PAGE  869 

L 9EPVICE0  LSER'S  PaCF.  NC.  18  E7  S3 


P05?8  »'U^RETPN  IS  the  RETU«N  LCC  FPC"  SPECIAL  AVE  G FCUTIAE  (VUNPVG) 


0529 

33,2561 

77776 

1 

MLNRETRA 

FXI  T 

0530 

R'=F 

15 

LAST 

868 

33 , 2562 

Za 

010  7 

0 

CS 

FLGWRDl 1 

0531 

REF 

7 

LAST 

867 

33,2563 

1 

5 72  5 

c 

NAS  K 

LRPYEIT 

053? 

33,2565 

0 

CC0  6 

1 

EXTEND 

0533 

REF 

1 

33 ,2565 

1 

2551 

0 

0ZF 

COPYCYC 1 

BYPASS  LP  LCGIC  IF  BIT15  IS 

SET. 

0 53^ 

REF 

16 

LA  ST 

869 

33,2566 

5 

C107 

0 

CS 

FLGWPCl 1 

CHECK  IF  AT  30000  FT 

0535 

REF 

1 

33,2567 

7 

5753 

1 

NASK 

XCRFLBI T 

0535 

33,2570 

C 

0006 

1 

EXTENC 

0537 

RRF 

1 

33, 2571 

1 

2506 

1 

6ZF 

R12 

053E 

33 , 2572 

0 

000  6 

1 

30KCFK 

EXTENC 

0539 

R9F 

1 

33,2573 

3 

3115 

1 

EGA 

1-30KFT 

055" 

REF 

359 

LAST 

856 

33,2575 

52 

^ c c 

1 

CXG.H 

NPAC 

0 551 

33,2575 

0 

TO  16 

1 

EXTEND 

0552 

REF 

*3 

LA  ST 

316 

33,2576 

2 

1-35 

'C 

CCA 

HCALC 

05525 

REF 

3 50 

LAST 

869 

33,2577 

2C, 

155 

1 

CAS 

NPAC 

0553 

rff 

257 

LAST 

86C 

33,2500 

10 

000 

0 

CCS 

A 

0553  5 

RFF 

2 

LAST 

869 

33,250  1 

1 

2506 

1 

TCF 

P12 

ALTITUDE-  > 30KFT 

0555 

PFF 

57 

1 AST 

858 

33,2502 

0 

5 505 

0 

TC 

UPFLAG 

ALTITLDE  < 2CKFT  SET  X-AXIS 

EVEPR  ICE 

0 555  5 

REF 

7 

LAST 

855 

33 , 2503 

0031  1 

1 

ACRES 

X CVINFLG 

0555 

RFF 

^ 53 

L AST 

869 

33, 2505 

C 

55C5 

r 

TC 

LFFLAG 

05555 

REF 

1 

33 , 2505 

00253 

0 

ACRES 

XGPFLG 

0556 

REF 

17 

LAST  ' 

‘ 869 

33,2506 

5 

C 1C7 

c 

R12 

CS 

FLGWRCl 1 

05563 

REF 

2 

LAST 

867 

33,2507 

7 

5752 

0 

NASK 

NCLRR8T  T 

05565 

33,2510 

0 

0006 

1 

EXTENC 

1557 

REF 

2 

LAST 

866 

:=?,  25  n 

1 

? 5A  5 

0 

ezF 

CCNTSEPV 

0 55  8 

REF 

18 

LAST 

869 

33,2512 

5 

0107 

0 

CS 

FLGWRDl 1 

0559 

RFF 

1 

33,2513 

1 

5 75  1 

1 

NASK 

NC5118IT 

0550 

33, 2515 

C 

C0J6 

1 

EXTEND 

0552 

REF 

1 

33 ,2515 

1 

3117 

1 

BZF 

UPDATCHK 

IF  N0511PIT  SFT.OC  NOT  CHECK  CP  FCSITICN 

0553 

REF 

19 

LA  ST 

869 

33,2516 

5 

01C7 

0 

HITEST 

CS 

FLGWRCl 1 

0555 

REF 

1 

33,2517 

7 

5 75  1 

0 

NASK 

PSTHieiT 

0555 

33,2520 

0 

CC06 

1 

EXTENC 

0556 

RFF 

1 

33,2521 

i 

2 550 

0 

BZF 

FCS2CHK 

0557 

RFF 

2 0 

LAST 

8 20 

33,3522 

3 

1652 

0 

HIGATCFK 

CA 

TTF/6 

IS  TTF  > CPITFRICN?  (TTF 

IS  NEGATIVE) 

055S 

RFF 

1 

33 , 252^ 

6 

152? 

1 

AC 

RPCRTIME 

0559 

33, 2525 

c 

CCC6 

1 

EXTEND 

C560 

RFF 

I 

33,2525 

6 

2536 

0 

BZMF 

POSICHK 

NO 

0561 

REF 

3 

LAST 

280 

33, 2526 

3 

5 75  1 

1 

CA 

E6ANK5 

NLST  SWITCH  EBANKS 

0562 

REF 

35 

LAST 

855 

33,2527 

56 

003 

1 

XCH 

EBAMK 

0563 

RFF 

150 

LAST 

86C 

33,2530 

55 

001 

1 

TS 

L 

SAVE  IN  L 

' GAP:  PEvrSiaN  116  CF  AGC  FCCGR/S^  LUMN<iRY  8Y  NASA  20211  12-C7I 


19tcq  aUG.  ll.IStc  PLY 


196  FAC-E  870 


L ■ sePvrcER 


LS6R'  S P/iGE  NR.  19  E7  S3 


05635 

REF 

8 

laST 

858 

E9, 1595 

EBANK= 

XNBPIP 

0569 

REF 

9 

LAST 

Pir 

33,2531 

9 

1595 

0 

cs 

X NBPI F 

UXPXP  IN  GSQP  CH5 

056^^05 

REF 

99 

LAST 

8 60 

E7,  151  = 

EBANK= 

DVC  NTP 

0569  1 

REF 

36 

LAST 

869 

33,2532 

22 

; 00  3 

1 

LXCF 

EBANK 

RESTCPE  EBANK 

0 569  2 

REF 

1 

33,2533 

6 

193C 

1 

AO 

R FCRTCSVv 

csFi  - uxexp 

05693 

33, 2539 

C 

CC06 

1 

EXTEND 

05699 

REF 

1 

33,2535 

6 

2997 

1 

eZNF 

Fiigatask 

IF  LXEXP  > CSF,THEN  REFCSITICN 

)565 

REF 

99 

LAST 

fiU 

33,2536 

Q 

9796 

C 

PrSlCHK 

CAF 

RI  T6 

0566 

33,2537 

1 

259  1 

1 

TCF 

+ 2 

0567 

RPF 

26 

LAST 

e 16 

33,259C 

3 

9,79  5 

c 

PCS2CFK 

CAF 

8 ITT 

0568 

RFF 

1 

33,2591 

0 

3 6 76 

c 

TC 

PCSTST 

0 56  5 

REF 

2 

LAST 

869 

33,259? 

1 

3117 

1 

TCF 

UPDATCHK 

LR  IN  RIGHT  PCSITICN  - CCNTINLE 

0570 

REF' 

39 

LAST 

820 

33, 259? 

c 

5567 

0 

LPPCSALR 

TC 

ALAPP 

LR  NCT  IN  PROPER  PO S- AL AR M-B YP A S S UPDATE 

0571 

33,2599 

00511 

1 

CCT 

5 11 

ANC  CCNTINLE  SERVICER 

0572 

33 ,2  595 

0 

C009 

0 

CCN'TS  ERV 

INF  INT 

0573 

REF 

1 

33,2596 

9 

3113 

0 

CS 

RITS9-7 

0579 

REF 

20 

LAST 

86  9 

33,2597 

7 

0107 

0 

MASK 

FLGWROl  1 

CLEAR  LR  MFASURERENT  FACE  CISCFETES. 

0575 

REF 

21 

LAST 

87C 

33 , 2550 

59 

10  7 

c 

TS 

FLGWPCI  1 

gap;  /iSSEI^BlP  SEVISIO'^  116  CF  AGC  PPCGRAW  LL^^INAPV  RV  ^ftSA  2021ll2-t'71 


19!09  AUC.  11,1969  FLY 


1A6  PAGE  e7I 


SEPVICEP  LSEP'S  page  ^C.  2C  E7  S3 


PC577 


0578 

REF 

5 

1 AST 

858 

33, 2551 

0 35  14 

1 

COPYCICI 

TC 

QLI KFAZ5 

0579 

REF 

14 

LAST 

60  8 

33,2552 

3 00  7 7 

1 

R29? 

CA 

FL AGWRD3 

■J580 

REF 

1 

33,2553 

7 5C14 

C 

PAS  K 

AR296P0R 

.■)5fll 

RFF 

258 

LAST 

869 

33,2554 

10  000 

0 

CCS 

A 

IS  NOR29FLG  CR  READPFLG  SET? 

0582 

REF 

1 

33,2555 

1 2567 

0 

TCP 

R29NCCES 

YES,  SO  CON'T  DESIGNATE. 

0583 

RFF 

1 1? 

LAST 

6 15 

33,2556 

3 cue 

1 

CA 

RACMCCES 

NO,  SC  R29  IS  CALLED  FCP. 

0584 

RFF 

1 

33,2557 

7 225  1 

0 

MASK 

nCT  10002 

IS  THE  RP  NCT  ZEPCING  ITS  COLS,  ANC 

0 5 8*^ 

RFF 

269 

LAST 

87  1 

33,2560 

1C  COC 

0 

CCS 

A 

IS  THE  RENCEZVeUS  RADAR  IN  ALTO  MCCE? 

0586 

REF 

2 

LAST 

871 

33,2561 

1 2567 

0 

TCF 

R29NC0ES 

NC,  SC  rCN'T  CESIGNATE. 

0567 

ore 

1 14 

LAST 

671 

33,2562 

3 OILO 

V 

CA 

PACMCCES 

0588 

PFF 

6 

L AST 

852 

33,2563 

7 7 713 

1 

MASK 

PPIC22 

0589 

Rf^F 

2 ^''1 

LAST 

871 

33,2564 

10  oi  ;i 

0 

CCS 

A 

IS  RR  RFFCSITICNI AG  CR  PEMCCING? 

0590 

REF 

6 ■ 

LAST 

601 

33,2565 

1 2573 

0 

TCF 

NCR29N0W 

YES;  CCMF  back  in  2 SECCNDS  6 TRY  AGAIN. 

05'’! 

REF 

2 

LAST 

600 

33,2566 

1 2045 

0 

TCF 

P 29 

* 

C592 

33,2567 

0 0004 

0 

P29N0CES 

IMF  I NT 

R29  NCT  ALLCWED  THIS  CYCLE. 

0593 

REF 

9 

LAST 

607 

33,2570 

4 4742 

c 

CS 

DESIGEIT 

Shew  THAT  rcSIGNATION  IS  OFF. 

05  9^^ 

REF 

1 15 

LAST 

871 

33,2571 

7 OIM 

0 

MASK 

RADMCOES 

0595 

REF 

116 

. LAST 

87  1 

33,2572 

54  lie 

0 

TS 

RACMCCES 

1596 

REF 

149 

LAST 

862 

33, 2573 

0 6042 

1 

KCP29ACV' 

TC 

I MRRET 

INTPRET  CCES  A RELINT. 

0597 

33,2574 

51575 

1 

VLOAC 

APVAL 

MPAC  = ABVALI  NEW  SM.  PCSITICN  VECTCR) 

0598 

RFF 

2 

LAST 

14E 

33,2575 

C 3 573 

c 

RIS 

0599 

33, 2576 

45206 

1 

PLSH 

DSL 

( 2 ) 

0600 

REF 

10 

LAST  , 

844 

33,2577 

02333 

0 

/ LAND/ 

06  ') 

RFF 

4 

LAST 

869 

33,2600 

03535 

1 

STCRF 

HCALC 

NEW  hCALC-72(24  )M. 

06015 

RTF 

4 

1 AST 

81  2 

33,2601 

,13  7 7 5 

1 

store 

HCALC 1 

C6C2 

33,2602 

47075 

0 

CMFP 

RTP 

0603 

REF 

1 

33,2603 

26026 

1 

ALTCCNV 

06C4 

REF 

3 

LAST 

702 

33,2604 

21613 

0 

SGNAGRE6 

0 60  5 

RFF 

2 

LAST 

152 

33 , 2605 

2 7 742 

r 

STCVL 

ALT8I TS 

' ALTITUDE  FCR  RIO  IN  BIT  LNITS. 

06P6 

REF 

25 

LAST 

8 54 

33,  26-16 

03  537 

0 

UMT/P/ 

06P7 

33 , 26  J7 

5343  5 

J 

VXV 

UMT 

0608 

RFF 

4 

LAST 

862 

3 3 , 2 6 1 r 

03  720 

1 

UHYP 

0609 

REF 

3 

LAST 

152 

33,2611 

27726 

1 

STOVL 

UHZP 

erWNRANGE  hALF-lMT  VECTOR  FOP  RIO. 

0610 

REF 

7 

LAST 

871 

33,2612 

03573 

0 

R IS 

0611 

33,2613 

6C505 

1 

VXM 

V SP4 

0612 

REF 

34 

LAST 

862 

33  ,2614 

. 01734 

0 

refsmmat 

0613 

PFF 

C. 

LAST 

862 

33 ,26  15 

2 7 54  5 

c 

STCVL 

PM 

TFMF.  REF.  POSITION  V E C TOR  =»  2 ( 2 9 ) M . 

0614 

RFF 

4 

L AST 

83  3 

33, 2616 

03601 

c 

VIS 

0615 

33 ,2617 

765  15 

0 

VXM 

VSL  1 

3616 

RFF 

3 5 

LAST 

87  1 

33,2620 

01734 

c 

RFFSMMAT 

0617 

RFF 

5 

LAST 

862 

33,2621 

27553 

1 

STOVL 

VM 

TEMP.  RFF.  VFLCCITY  V E CT C R *2 ( 7 ) M/ CS . 

0618 

REF 

26 

LAST 

£71 

33 ,2622 

03537 

0 

LIMT/R/ 

0619 

33,2623 

51435 

1 

VXV 

AEVAL 

GAP:  <'SS^:^'BLE  RCVISION  116  CF  4PC  PPOGC^x  LU’^lNiRV  BV  NASA  20211l2-'7l 


19:09  AUG.  1I,1S69  FLY 


1^6  PAGE  e?2 


L S'^RVICFP 


LSEP'  S F/SGE  ^C.  21  E7  S3 


0620 

0621 

0622 

REF 

c 

LAST 

671 

33 .2624 

33.2625 

33.2626 

03601 
63  552 
77671 

0 

0 

1 

SLl 

CDV 

VIS 

DSC 

0623 

33 ,2627 

47075 

0 

CHFP 

PTE 

0624 

REF 

1 

33,2630 

260  30 

0 

ARCONVl 

0625 

REF 

4 

LOST 

871 

33,2631 

21613 

0 

SGNAGREE 

0626 

33,2632 

77776 

1 

CCPYCYC2  EXIT 

LEAVE  ALTITUDE  RATE  CONPENSAT ICN  IN  MPAC 

0627 

33,2633 

C 0004 

0 

INHINT 

0628 

ref 

27 

1 AST 

871 

33,2634 

3 1536 

0 

CA 

UNIT/R/ 

UPDATE  RLNIT  FOR  RIO. 

0629 

REF 

3 

LAST 

152 

33,2635 

55  ' 743 

1 

TS 

RLM  T 

063f 

RFF 

23 

L«ST 

872 

33,2636 

3 1540 

1 

CA 

UMT/R/  +2 

0631 

REF 

4 

LAST 

872 

33 , 26  37 

55 ' 744 

c 

TS 

RLNIT  +i 

0632 

REF 

29 

L AST 

872 

33, 264C 

3 1542 

c 

CA 

UNIt/r/  +4 

C633 

REF 

5 

LAST 

872 

33 , 2641 

55' 745 

1 

TS 

RUN  IT  +2 

0634 

REF 

351 

LAST 

869 

33,2642 

3 C154 

1 

CA 

HFAC 

LCAC  NEW  CALTPATF  FDR  RIO. 

0 63  5 

RFF 

2 

LAST 

152 

33,2643 

55'716 

1 

TS 

DCLTRATE 

0 6 36 

33,2644 

0 0006 

1 

EXTEND 

0637 

RFF 

4 

LAST 

87  1 

33,2645 

3 1573 

1 

CCA 

PIS 

C63R 

RFF 

21 

LAST 

862 

33,2646 

53’521 

1 

rxCH 

R 

06.3  9 

33 , 2647 

0 0006 

1 

EXTEND 

0640 

PEF 

5 

LAST 

872 

33,2650 

3 1575 

1 

DCA 

P IS  +2 

0641 

REF 

22 

LAST 

872 

33 ,2651 

53*523 

0 

CXCH 

E,  +2 

0642 

33,2652 

C CC06 

1 

EXTEND 

0643 

REF 

6 

LAST 

872 

33,2653 

3 1577 

0 

DCA 

RIS  +4 

06^4 

RFF 

23 

LAST 

872 

33,2654 

53*525 

0 

FXCH 

R +4 

0645 

33, 2655 

C 000  6 

1 

EXTEND 

0646 

RPF 

6 

LAST 

872 

33,2656 

3 1601 

1 

rcA 

VIS 

0647 

REF 

12 

LAST 

F62 

33 , 2657 

5 3 * 5 2 7 

1 

rxcH 

V 

0648 

33, 2660 

0 0006 

1 

EXTEND 

0649 

REF 

7 

LAST 

872 

33 , 266  1 

3 1603 

0 

DCA 

V IS  +2 

0650 

REF 

14 

LAST 

872 

33,2662 

53*531 

f 

CXCH 

V +2 

0651 

33, 2663 

0 0006 

1 

EXTEND 

0652 

REF 

8 

LAST 

672 

33,R664 

3 1605 

0 

CCA 

VIS  +4 

0653 

REF 

15 

LAST 

872 

33, 2665 

5 3 * 5 3 3 

1 

CXCH 

V +4 

0654  PEF  1 33,2666  1 2275  1 TCP  CpPyi  VCL  CCNPLET'-  THE  CCVPCVCL. 
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L 

S9RV  ICPP 

USER'S  PAGE  NO.  22  E7  S3 

P0702  ' 

R0705 

0706 

33,2667 

4 1456 

0 

CALCGRA V 

UM  T 

FLSH 

SAVE  LMT/R/  IN  PUSHLTST 

(IE) 

C7P7 

RPF 

30 

LAST 

872 

33,2670 

03537 

0 

STORE 

UNIT/P/ 

0 70  8 

3.3 ,267  1 

67340 

1 

LXC  , 1 

SLCAC 

RTX2  = n IF  EARTH  ORBIT,  =2  IF  LUNAR 

« 

0709 

FFF 

15 

L AST 

772 

33,2672 

C2  7 7 7 

1 

RTX2 

071C 

RFF 

16 

LAFT 

873 

33 , 2673 

03000 

1 

RTX2 

0711 

33  2674 

5CC76 

C 

CCC.FF 

8 

.17!  2 

REF 

1 

33 , 2675 

66724 

0 

CALCGRVl 

0713 

33,2676 

50375 

O 

VLCAC 

DCT 

( 12  ) 

0714 

OFF 

9 

L AST 

834 

33,2677 

Q6  5 16 

c 

UM  TZ 

0715 

REF 

31 

LAST 

873 

33,2700 

03537 

0 

UNIT/P/ 

0716 

33,2701 

4 1552 

c 

SLl 

PLSH 

( 14  ) 

0717 

33, 2702 

44  3 16 

r 

DSQ 

BDSU 

071  8 

REF 

1 

33,2703 

26766 

1 

nPl/20 

0719 

33,2714 

5632  5 

c 

FDCL 

DCV 

Q72U 

FEF 

1 

33,2  7'-  5 

26C40 

1 

RE  SQ 

0721 

33,2706 

0CC43 

0 

340 

(PN  ISO 

7722 

33,2707 

rCC41 

1 

STCRE 

32D 

TEPF  FCP  IRE/FMSC 

C7P3 

33,2710 

412U5 

0 

CN"P 

DPP 

0724 

REF 

1 

33,271! 

26)42 

r 

20J 

0725 

33,2712 

6536  1 

0 

VXSC 

POOL 

C726 

RFF 

32 

1 AST 

873 

33 ,2713 

03537 

0. 

UNIT/R/ 

0727 

33,2714 

412C5 

c 

CPF 

DPF 

0728 

PCF 

1 

33,2715 

26044 

0 

2J 

0729 

33,2716 

0004  1 

1 

320 

0730 

33,2717 

7656  1 

1 

\/X  SC 

VSLl 

C731 

RFF 

10 

LAST 

873 

33,2720 

06516 

0 

UNITZ 

073? 

33,2721 

45455 

1 

VAC 

STACR 

0733 

RFF 

' 2 

LAST 

773 

33,2722 

74  2 56 

c 

STORE 

LM  TGC8L 

0 734 

33 ,2723 

41455 

0 

VAD 

PUSH 

MPAC  = UNIT  GRAVITV  VECTOR. 

{ 18  1 

0735 

33,2724 

6C345 

c 

CALCGRVl 

DLCAC 

A CRP 

PERFOPP  A NOPPAL  IZATION  ON  RPAGSQ  IN 

0736 

33,2725 

00043 

0 

3 40 

CROER  TC  BE  ABLE  7C  SCALE  TEE  WU  FCR 

07^7 

RFF 

14 

LAST 

77C 

33,2726 

00050 

1 

X2 

PAXIMLM  PRECISION. 

0738 

33,2727 

5 3 6 6 3 

1 

BDDV* 

SLR* 

C739 

RRF 

1 

33,2730 

26032 

1 

-MUDT  ,1 

0740 

33,2731 

5662? 

0 

•)  -21C,2 

0741 

33,2732 

45561 

1 

vxsc 

STAOP 

0742 

RRF 

3 

LAST 

83  8 

33 , 2733 

74214 

0 

STORE 

GOT  1/2 

SCALED  AT  2(+  7)  PI/CS 

0793 

33,2734 

77616 

0 

RVC 

074  4 

33,2735 

61375 

1 

CALCRVG 

VLCAC 

VXP 

0745 

REF 

6 

1 AFT 

655 

33,2736 

00325 

0 

OELV 

0746 

RCF 

3 6 

LAST 

87  1 

33,2737 

017  3 4 

r 

REFSPPAT 

0747 

33,2740 

7656  1 

1 

VXSC 

V5L.  1 

0748 

REP 

4 

LAST 

85  5 

33,2741 

26C22 

c 

K FI  FI 

074  9 

PEF 

5 

LAST 

76  4 

33, 2742 

02527 

1 

STORE 

OELVREF 

0750 

33,2743 

41562 

0 

VSR  1 

RUSH 

0751 

33 1 21 

41455 

c 

VAC 

PLSH 

(CV-CLCGCT  1/2  TO  PC  SCALEC  AT  2(+7)P/CS 
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L SERVICER 


L SFR' S F# GE  NO.  23  E7  S3 


075? 

REF 

8 

LAST 

El? 

33,2745 

01236 

1 

GCT/2 

0753 

33,2746 

6 5 2 5 5 

r 

VAC 

PCDL 

( IE) 

0754 

REF 

8 

LAST 

754 

33,2747 

01226 

;i 

VN 

0755 

Ri^F 

A 

LAST 

865 

33,2750 

01247 

1 

PC-UICE 

0756 

33,2751 

7426  1 

1 

SL 

VXSC 

0 75  7 

33,2752 

20207 

n 

6D  ■ 

0758 

33 , 275? 

4 40  5“= 

1 

VAC 

STG 

0759 

pep 

14 

LAST 

863 

33, 2754 

01220 

0 

RN 

C760 

33,2755 

0003  7 

0 

3 10 

0761 

REF 

6 

LAST 

87  1 

33,2756 

37545 

1 

STCALL 

RM 

TFNF 

STCFAGE 

CF 

RN 

SCALFC 

2( +29  )N 

0762 

REF 

2 

LAST 

862 

33,2757 

66667 

0 

CALCGRAV 

0763 

33,276C 

53255 

0 

VAC 

VAC 

0 764 

33,2761 

77655 

1 

VAC 

0765 

REF 

9 

LAST 

874 

33,2762 

01226 

0 

VN 

0766 

REF 

6 

LAST 

871 

33 , 276  3 

3 7 553 

c 

STCALL 

VM 

TFRF 

STCRAG  F 

CF 

VN 

SCALED 

2( +7  )N/CS 

0767  33.276A  OOC37  0 310 


C76g  33,2765  01463  1 CPl/20  20EC  0.05 

0768  33,2766  06315  0 

0769  33,2767  COOlO  0 SHFT11  2DFC  1 P-11 

0765  33,2770  00000  1 
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L 

SFPVT  CEP 

LSFP'  S PAGE  NO.  2A 

E7  S3 

P0.770 

iff  if  ^ ^ ii  ^ Illicit 

R9772 

M'JNRVG  IS  A SPECIAL  AVEPAGP  G INTEGRATION  ROLTINE  LSFC  BY  THRLSTING 

P0773 

P077A 

R077'; 

FRCGF7PS  Vvhiri-  FUNCTin^  J^  ThF  VICIMTY  CF  AN  ASSLMEC  SPHERICAL  «CCN. 
THE  INPUT  AND  OUTPUT  CUANTITIFS  ARF  PEFERENCEC  TC  THE  STABLE  HENBEP 
COCRCINATF  SYSTCV. 

C776 

0777 

PFF 

3 

LAST 

726 

33.2771 

33. 2772 

41575 
023  17 

0 

0 

PVPOTH 

VLCAC 

PUSH 
G (CSN) 

077  R 

33,2773 

65255 

0 

VAC 

POOL 

C779 

RCF 

C. 

LAST 

862 

33,2774 

01726 

0 

V (CSN  ) 

0780 

PFF 

5 

LAST 

874 

33,2775 

01247 

1 

PGUIDE 

C781 

33,2776 

74271 

0 

CDV 

VXSC 

0782 

REF 

1 

33,2777 

2677C 

c 

SHI  FT  11 

0783 

33,  3'' TO 

77655 

1 

VA.O 

C78A 

REF 

6 

LAST 

f 62 

33,3001 

01  72U 

0 

R (CSM  ) 

0788 

PFF 

7 

LAST 

872 

33, 3002 

37573 

1 

STCALL 

R1  S 

0786 

REF 

5 

1 AST 

862 

33,3003 

67067 

1 

MLNGRAV 

0787 

33,3004 

53255 

■0 

VAC 

VAD 

0788 

REF 

6 

LAST 

875 

33,3CC5 

C 1 726 

c 

v(csn 

C769 

33 , 3006 

77626 

0 

STADR 

0790 

REP 

9 

LAST 

872 

33,3007 

74176 

1 

STCRE 

VIS 

0791 

33, 3010 

77776 

1 

EXIT 

C792 

REF 

6 

LAST 

87) 

33,3011 

) 3 514 

1 

TC 

QUIKFAZ5 

J793 

RFF 

1 50 

LAST 

87  1 

33,3012 

C 6042 

1 

IC 

TNTFFET 

0794 

33, 3013 

77  775 

1 

VLCAD 

0795 

REF 

4 

LAST 

873 

33,3014 

03563 

1 

GCT 1/2 

0 796 

REF 

4 

LAST 

875 

33, 3015 

2 6 3 1 7 

0 

STCVL 

G (CS«) 

0797 

PFF 

8 

LAST  ■ 

875 

33,3016 

03573 

0 

P IS 

0798 

REF 

7 

LAST 

875 

33,3017 

25  720 

c 

STCVL 

R (CSM  ) 

0799 

RFF 

10 

LAST 

875 

33, 3020 

0 3 6C1 

n 

VIS 

08CC 

PEF 

7 

LAST 

875 

33 ,3021 

01726 

0 

STORE 

V (CSM  ) 

08' 11 

3?, 3022 

77776 

1 

EXIT 

08v? 

RFF 

7 

LAST 

875 

33,3023 

0 3514 

1 

TC 

QLI KFAZ5 

0803 

REF 

151 

LAST 

875 

33 ,3024 

0 6242 

1 

TC 

INTPPET 

0804 

33,3025 

74375 

0 

MLNRVG 

VLL  AC 

VXSC 

0 f ' 5 

REF 

7 

LAST 

873 

33,3026 

00325 

0 

DELV 

0806 

RFF 

1 

33,3027 

26024 

0 

K FI  P2 

0807 

33, 3039 

5 3206 

c 

PISH 

VAD 

1ST  push:  CELV 

IN 

UNITS  CF  2(8) 

M/CS 

C808 

RFF 

9 

LAST 

874 

33 , 3031 

01236 

1 

GDT/2 

0809 

33, 3032 

53206 

0 

FLSH 

VAD 

2NC  push:  (CELV 

G0T)/2,  UNITS 

CP  2(7) 

0810 

RFF 

16 

LAST 

872 

33,3033 

03527 

1 

V 

(12  ) 

0811 

33,3034 

56325 

0 

FPCL 

DCV 

081  ? 

PFF 

6 

LAST 

875 

?3, 3035 

C1247 

1 

PGLICE 

CF13 

PEF 

2 

LAST 

875 

33 , 3036 

2677  ) 

0 

SHIFT  11 

0814 

33,3037 

77761 

1 

VXSC 

0819 

33, 3040 

776  5 5 

1 

VAD 

0616 

REF 

24 

LAST 

872 

33,3  141 

03521 

1 

R 

9817 

PFF 

9 

LAST 

875 

33,3,42 

3757^ 

1 

STCALL 

RIS 

STCFE  R SCALEE 

AT 

2( +24  )M . 

081  fi 

PEF 

6 

LAST 

87  5 

33, 3043 

67067 

1 

MUNGRAV 
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LSER' S PAGE  NO.  25  E7  S3 

0819 

33, 3044 

c o 2 5 

c 

LAC 

VAC 

0820 

33,  3'*45 

77655 

1 

VAD 

(0  1 

08?1 

RCP 

1 7 

LAST 

875 

33  , ?'>46 

03527 

1 

V 

0822 

RPF 

1 1 

LAST 

875 

33, ^'’47 

C 360  1 

0 

STCPE 

VIS 

STCPE  V SCALEC  AT  2(+7  INXCS. 

0820 

33,3450 

77646 

0 

A8VAL 

062^ 

PFF 

C 

LAST 

7 2 7 

33  ,3C51 

27472 

c 

STCVL 

AEVEL 

STCRE  SPEEC  FCR  LR  AND  DISPLAYS. 

0825 

RFF 

33 

L AST 

873 

33,3052 

03537 

c 

UM  T/R/ 

'■826 

33,3053 

72441 

0 

CCT 

SLl 

0827 

REF 

12 

LAST 

876 

33, 3054 

C36CI 

c 

VIS 

0828 

REF 

1 1 

LAST 

8 13 

33,3055 

27474 

.1 

STCVL 

HOQTDI SP 

FDCT  = V.  LNIT(R)Y2(7)N/CS. 

0829 

REF 

10 

LAST 

875 

33 ,3C56 

03573 

0 

RIS 

0830 

33, 57 

72435 

0 

VXV 

VSL2 

0831 

REF 

6 

LAST 

848 

33,3060 

0 2 3 2 5 

1 

wv 

0832 

PFF 

0 

LAST 

813 

33  ,3C6  1 

1 7 734 

1 

STCCL 

DEL  VS 

LUNAR  RCTATION  CORRECTION  T ERM * 2 ( 5 ) P /C S . 

0833 

33,3062 

00045 

c 

36D 

C834 

33 ,0063 

77625 

0 

CSU 

0835 

REF 

1 1 

LAST 

871 

33, 3064 

02333 

c 

/LANS/ 

0836 

REF 

5 

LAST 

87  1 

33, 3065 

37535 

0 

STCALL 

HCALC 

FOP  NOW,  DISPLAY  V,HETHER  PCS  OF  NEC 

0837 

R.EF 

1 

33 , 3066 

66461 

1 

N'UNRETRN 

0838 

33,3667 

77656 

1 

MLMGR  AV 

LMT 

AT  36C  FAVE  AEVAL(R),  AT  34C  R.R 

C839 

REF 

34 

LAST 

876 

33 ,3070 

17537 

0 

STOCL 

UN  TT /R/ 

0840 

33,3071 

000  4 3 

0 

34C 

0841 

33,  3'‘ 7 2 

5 5 26  1 

1 

SL 

BOP  V 

C842 

33  ,3073 

20  20  7 

0 

6D 

0843 

R=:F 

1 

33, 3074 

26P36 

c 

-FUOTPUN 

0844 

33, 3075 

74205 

0 

OMP 

VXSC 

08^5 

REF 

■3 

LAST 

875 

33 ,3076 

26770 

0 

SHIFTll 

0846 

RFF 

O C 

LAST 

876 

33, 3077 

03537 

0 

UMT/R/ 

0 84  7 

PCF 

5 

LAST 

875 

33,3100 

03  56  3 

1 

STORE 

GCTl/2 

1/2GD1  SCALED  AT  2(7)P/CS. 

0848 

' 

33,3101 

776  16 

c 

FVC 

0849 

33, 3102 

00  30  3 

1 

1 .9  5SECS 

CEC 

195 

C85'' 

33,3103 

00005 

1 

7.5 

20EC 

.02286  3- 

6 

7.5  FT/SFC  AT  2(6)  P /C S 

0850 

33, 3 104 

33212 

c 

0851 

33,3105 

C0014 

1 

25Fr ( 18  ) 

20EC 

2CC  B-18 

085  1 

33,3106 

2 0000 

n 

0852 

33,? 107 

CCCOO- 

1 

2SEC( 28) 

2 CCT 

CCrOC  00310 

2SEC  AT  2(28) 

0852 

33  ,3110 

00310 

0 

38525 

33 ,3  1 1 1 

OOOOO 

1 

4SEC (28  ) 

2 0EC 

400  e-23 

08525 

33,3112 

CC6  20 

! ' 

0853 

33,3113 

00110 

1 

E ITS4-7 

CCT 

1 10 

08534 

33,3114 

37767 

c 

l-3'IKFT 

2DEC 

16768072 

8-24 

CPPCSPAX-30KFT 

08534 

33,3115 

02  200 

1 

08536 

33,3116 

OA-44  5 

0 

6KFT/SEC 

CEC 

18.288  P- 

7 

60CC  Fl/SEC  AT  2( 7)P/CS 

i 


J 
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E7  s; 


P 0854 
0855 
0 856 

REF 

RFF 

0 

22 

LAST 

LAST 

869 

870 

33,3117 
33, 312C 

3 4742 
7 OK  7 

1 

0 

UFCATCFK 

CAF 

PASK 

NCL  RP8IT 
FLGWRCl 1 

SEE  IF  LR  UPDATE  INHIBITrC. 

C857 

REF 

261 

LAST 

871 

33  ,3121 

10  TOO 

0 

CCS 

A 

0858 

REF 

3 

LAST 

869 

33,3122 

1 2545 

c 

TCF 

CCNTSERV 

IT  IS-NC  LR  UPDATE 

0859 

PCF 

1 

33, 3123 

3 4750 

1 

CAF 

RNGED8I T 

NC  INFieiT  - SEE  ALT  PEAS.  THIS  CYCLE. 

0660 

REF 

22 

LAST 

F7T 

33,3124 

7 CL07 

0 

NASK 

FLGWPCll 

0 861 

33, 3125 

C 0006 

1 

EXTEND 

(3862 

REF 

1 

33,3126 

1 3252 

0 

BZF 

VMEASCHK 

NC  ALT  PEAS  This  CYCLE-CHECK  FCR  VEL 

0863 

REF 

26 

LAST 

856 

33,3127 

3 C12C 

1 

FCSLFCAT 

CA 

F IX  LCC 

SET  PLSHLIST  TC  ZERO 

0864 

REF 

9 

LAST 

856 

33, 3130 

54  166 

1 

TS 

PLSHLCC 

CF65 

OCR 

152 

LAST 

675 

33,3131 

0 6042 

1 

TC 

I NTRRFT 

0 866 

33, 3132 

61375 

1 

VLCAC 

VXP 

0667 

REF 

1 

33,3133 

02273 

0 

HBFAPNB 

0868 

REF 

rc 

LAST 

87F 

33,3134 

02146 

0 

XNBPIR 

HEEAM  SP  AT  2( 2) 

0869 

33,3135 

72515 

0 

PDVl 

VSL2 

STCFE  FEEAP  IN  FC  0-5 

067C 

REF 

13 

LAST 

876 

33,3136 

036C1 

0 

VIS 

SCAlE  V at  2(5)  P/CS 

0671 

33,3137 

50255 

c 

VAC 

DCT 

0872 

REF 

4 

LAST 

876 

23,3140 

03734 

1 

DELVS 

V relative  TC  SURFACE  AT  2(5)  P/CS 

C87'^ 

087A 

0878 


REF 


38 . 3141 

33. 3142 

33.3143 


•V10O1  0 
774C5  C 
01352  1 


ERF 


OD 

'^XIT  ' 

F APSKAL 


V ALONG  hBEAM  AT  2(7)  N /C  S 
SCALE  TC  RACAR  CCLNTS  X 5 


0876 

0877 


C878 

0679 


RFF 

REF 


2 LAST 
1 


85 


33.3144 

33.3145 


4 0110  0 
7 4743  1 


CS  FLGWRC12 

RASK  ALTSCEIT 


TEST  LR  ALTITUDE  SCALE  FACTOR 


33 , 3146 
33  ,3  147 


0 00 06  1 
1 3152  0 


EXTEND 
eZF  +3 


EPANCF  IF  HIGH  SCALE 


0880 

C881 

REF 

R'=F 

1 

10 

LAST 

855 

33,315'' 

33,3151 

3 13  5 3 
G 731? 

0 

0 

CA 

TC. 

SKA  LSKAL 
SFCOTMP 

RESCALE  IF  LCIa  scale 

hcJ) 

088? 

RFF 

153 

LAST 

877 

33,3152 

C 6042 

1 +3 

TC 

T NTFRET 

0883 

33,3153 

54215 

0 

DAD 

SL  1 

CORRECT  FPEAS  FCR  DOPPLER  EFFECT 

0884 

PEE 

6 

1 A ST 

868 

33, 

03655 

1 

HPEAS 

0885 

33,3155 

2C210 

r 

7C 

0686 

33,3)56 

74205 

0 

CMP 

vxsc 

SLANT  RANGE  AT  2(21), FLSF  LR  FCR  FEEAP 

— ^ 

0897 

REF 

1 

33,3157 

26C11 

c 

HSCAL 

SLANT  RANGE  VECTOR  AT  2(23)  P 

\ 

Jl 

0888 

33, 3160 

4524  1 

1 

DCT 

n SL 

0689 

RFF 

36 

LAST 

876 

33,3161 

)3537 

0 

lIMT/p/ 

ALTITUDE  AT  2(24)P 

0890 

REF 

6 

LAST 

876 

33,3162 

03535 

1 

HCALC 

DELTA  F AT  2(24)  M 

0891 

REF 

5 

LAST 

779 

33,3163 

03665 

1 

STCRE 

DELTA!- 

C89? 

33,3164 

77776 

1 

EX  IT 

0893 

Rpp 

24 

L AST 

877 

33, 3165 

3 010? 

1 

CA 

FI CWRCl 1 

0694 

REF 

2 

LAST 

869 

33,3166 

7 474  1 

0 

PASK 

PSTHI6IT 

0895 

33 ,3  167 

0 000  6 

1 

EXTEND 

DC  NOT  PERFCRP  DATA  REASONABLENESS  TEST 

03°6 

REF 

1 

33, 3170 

1 3 20  5 

1 

BZF 

NCPEASCN 

UNTIL  AFTER  FTGATE 
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0697 

REF 

lf4 

LAST 

677 

23,3171 

C 6C42 

1 

TC 

I N'^PRET 

0998 

33, 3172 

4E246 

0 

APS 

DSL 

RFF 

? 

LAST 

122 

33,3173 

02521 

0 

CELGFIX 

ABSIDELTAH)  - ogpix  5C  FT  NCR 

3990 

33, 3174 

45252 

c 

SL3 

OSU 

SCALE  TO  2(21) 

0901 

REF 

7 

LAST 

877 

33,3175 

03535 

1 

HCALC 

AES(rELTAH)  - (50  + HCALC/8)  AT  2(21) 

9902 

33,3176 

77776 

1 

EX  IT 

099  3 

PEF 

2 

LAST 

151 

33,^177 

25 '670 

1 

INCR 

LFLCTR 

0904 

REF 

1 

33 ,32  19 

;)  6726 

1 

TC 

BRAMCF 

0909 

RFF 

1 

33,3211 

1 3E22 

0 

TCF 

HFAIL 

DELTA  F TOC  LARGE 

0906 

REF 

2 

LAST 

878 

33, 2292 

1 3 52  2 

c 

TC  F 

HFAI  L 

DELTA  F TCC  LARGE 

0907 

RFF 

89 

1 AST 

847 

33,3213 

0 5516 

0 

TC 

DCWMFLAG 

TURN  OFF  ALT  FAIL  LAMP 

0908 

REF 

1 

33,3204 

90263 

0 

ACRES 

HFLSFFLG 

0909 

REF 

25 

LAST 

877 

33,3205 

4 010  7 

0 

NCRFASCN  CS 

FLGURCl 1 

0 910 

REF 

1 

33 , 3296 

7 4744 

0 

NAS  K 

LP  INHEIT 

0911 

REF 

262 

LAST 

877 

33,2207 

1C  000 

0 

CCS 

A 

0912 

REF 

2 

LAST 

877 

33,3210 

1 3252 

0 

TCF 

VMEASCHK 

UPDATE  INHIBITED  - TEST  VELCCITV  ANVt,AY 

0913 

RFF 

1 E E 

LAST 

078 

33,2211 

0 6C42 

1 

TC 

I NTPPET 

DC  POSIT  ICN  UPDATE 

0914 

33,2212 

40545 

1 

DLOAD 

SP4 

0915 

REP 

8 

LAST 

878 

33,3213 

0 3 535 

1 

HCALC 

RESCALE  H TO  2(26)M 

3916 

33,3214 

77776 

1 

FXI  T 

0917 

33, 3215 

C 00U6 

1 

FXTPND 

0918 

REF 

6 

LA  ST 

877 

33  ,3216 

3 1665 

0 

CCA 

CELTAF 

STORE  CELTAF  IN  NPAC  AND 

0919 

PFF 

352 

1 AST 

872 

33,^217 

52  155 

1 

CXCH 

NFAC 

PPING  FCALC  INTO  A,L 

09?C 

REF 

1 

33 ,322G 

C 7547 

0 

TC 

ALSIGNAG 

9921 

33 ,3221 

0 9 9'I6 

1 

EXTENC 

IF  FIGF  FART  OF  HCALC  IS  NON  ZERO,  THEN 

0922 

33,3222 

1 3 224 

1 

BZF 

+ 2 

HCAIC  > FNAx, 

0923 

RFF 

3 

LAST 

878 

33  ,3223 

1 3252 

0 

TCF 

VMEASCHK 

SO  LPDATE  IS  BYPASSED 

0924 

REF 

3 

LAST 

878 

33,3224 

54  156 

1 

TS 

«FAC  +2 

FCR  LATER  SFCRTMP 

09?  5 

REP 

141 

LAST 

869 

33,3225 

4 0001 

1 

CS 

L 

-H  AT  2 ( 14  ) N 

0926 

REF 

1 

33,3226 

6 14  29 

0 

AC 

L RHMAX 

FNIAX  - F 

0927 

33,3227 

C 0006 

1 

FXTENC 

0928 

REF 

4 

LAST 

878 

33,3230 

6 3252 

1 

0ZMF 

VNEA  SCHK 

IF  H >HNAX,  BYPASS  UPDATE 

0929 

33,3231 

C rcc6 

1 

EXTFNC 

1933 

PEF 

■ 1 

33, 3232 

7 142  1 

0 

NP 

LR1»H 

N'F(HNAX  - F) 

0931 

33,3233 

0 C096 

1 

FXTFNO 

093? 

REF 

2 

LAST 

870 

33,3234 

11 '420 

1 

CV 

LRHNAX 

WH  (1  - F/FNAX  ) 

0933 

PEF 

4 

LAST 

464 

33,3235 

54  135 

1 

TS 

MPTPNP 

09-54 

PFF 

1 

33,3236 

0 7316 

1 

TC 

SHCRTNP2 

DFLTAF  (l,F)(l  - H/HMAX)  IN  MPAC 

0935 

REF 

156 

LAST 

878 

33, 3237 

0 604? 

1 

TC 

I NTPRPT 

NCDE  IS  CP  FPCM  AEOVE 

C936 

33,3240 

77752 

1 

SL  1 

0937 

33 ,324  1 

5 3 3,6  1 

0 

VX  SC 

VAF 

0938 

PEF 

37 

LAST 

877 

33, 3242 

l 3 537 

UM  T/P/ 

CELTAP  = DF(WF)(1  - H/FMAX)  UN  IT/RZ 

C939 

REF 

1 1 

LAST 

876 

33,3243 

13573 

0 

R IS 

0940 

REF 

1 

33,3244 

376  57 

1 

STCA  L 1 

GNLP 

0941  PFF  7 fATf  8T5  33, 3245  67067  1 MUNGPAV 

094?  33,3246  77776  1 


EX  IT 
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0943 

REF 

8 

LAST 

875 

33,3247 

0 3514 

1 

TC 

OUIKFAZ  5 

0944 

REF 

162 

LAST 

866 

33,3250 

3 4755 

1 

CA 

ZERO 

0949 

REF 

1 

33,3251 

C 3476 

1 

RLPDAIEC 

TC 

GAURVST 

0946 

REF 

9 

LAST 

879 

33,3252 

0 3514 

1 

VREASCFK 

TC 

QUIKFAZ5 

RESTART  AT  NEXT  LOCATICA 

0947 

REF 

26 

LA  ST 

878 

33,3253 

4 C1C7 

r 

rs 

FLC-WRCl  1 

0948 

QTR 

1 

33,3254 

7 4745 

1 

NASK 

VELD4BI T 

IS  V FEACING  AVAILABLE? 

0949 

REF 

26  3 

LAST 

67E 

33,3255 

10  o.n 

0 

CCS 

A 

0950 

REF 

1 

33, 3256 

1 3456 

1 

TCF 

VALTCHK 

AC  SEE  IF  V RFACIAG  TC  BE  TAKEN 

0951 

REF 

3 

LAST 

20  L 

33,3257 

4 1651 

0 

VFt.UFEAT 

CS 

VSELFCT 

RRCCESS  VELCCITY  CATA 

0952 

REF 

142 

LAST 

878 

33,3260 

54  CCl 

1 

' 

TS 

L 

0953 

RPF 

143 

LAST 

879 

33,3261 

26  00  1 

1 

AOS 

L 

-2  VSELECT  lA  L 

0954 

REF 

144 

LAST 

879 

33,3262 

6 0001 

0 

AD 

L 

0955 

RPF 

145 

LAST 

879 

33,3263 

6 OCOl 

c 

AD 

L 

-6  VSELECT  IN  A 

0956 

REF 

27 

LAST 

877 

33,3264 

50  120 

1 

INDE  X 

F I XLCC 

0957 

REF 

23 

LAST 

819 

33,3265 

52  04  7 

0 

CXCF 

X 1 

XI  = -6  VSELECT,  X2  = -2  VSELECT 

0958 

REF 

4 

LAST 

869 

33,3266 

3 474  1 

1 

CA 

E EANK4 

0959 

REF 

37 

LAST 

870 

33.3267 

54  003 

0 

TS 

FBANK 

0960 

REF 

2 

LAST 

117 

"4,1654 

F P A N K = 

LRXCCU 

0961 

REF 

2 

LAST 

117 

33, 3270 

3 1655 

0 

CA 

LRYCOL 

STCFE  LFCCUS  lA  CCUSPCTS 

0962 

R'^F 

19 

LAST 

604 

33,3271 

54  765 

1 

TS 

CCUSPCT 

0963 

PFR 

2 

LAST 

117 

33,3272 

3 1656 

c 

CA 

LRZCCL 

0964 

REF 

20 

LAST 

879 

33, 3273 

54  767 

r 

TS 

CDUSPCT  +2 

0965 

REF 

3 

LAST 

879 

33,3274 

3 1654 

1 

CA 

LRxcru 

0966 

RFF 

21 

L AST 

879 

33,3275 

54  7 7 1 

1 

TS 

CCLSPCT  +4 

0967 

REF 

240 

LAST 

858 

33  ,3276 

0 4616 

1 

TC 

SANKCALL 

096  8 

REF 

•2 

LAST 

856 

33,3277 

4761  7 

1 

CACR 

CUICTRIG 

GET  SIAES  AAC  COSINES  FCR  N8SM 

0969 

REF 

28 

LAST 

879 

33,3300 

3 0120 

1 

CA 

F IXLCC 

C97C 

REF 

10 

LAST 

877 

33,3301 

54  166 

1 

TS 

PUSHLCC 

SET  PC  TC  ZERC 

"197  1 

RFF 

157 

LAST 

878 

33, 3302 

0 6042 

1 

TC 

I KTPPET 

0972 

33,3303 

45  173 

0 

VLCAD* 

CALL 

097’ 

RFF 

2 

LAST 

117 

33,3304 

02231 

0 

VZeEARN'B,  1 

CCNVERT  VREAM  FROR  NR  TC  SR 

0974 

REF 

4 

LAST 

584 

33, 3305 

47675 

0 

0975 

33,3306 

54325 

1 

POOL 

SL 

STCRE  lA  PC  C-5 

0976 

RFF 

3 

LAST 

202 

33,3307 

03653 

1 

VREAS 

LCAC  VELCCITY  MEASUREMENT 

0977 

,33, 3310 

202  1 5 

0 

12D 

0978 

33,3311 

41403 

0 

CMF>» 

PUSH 

SCALE  TC  M/CS  AT  2(6) 

0979 

RFF 

1 

33,3312 

51764 

c 

VZSCAl ,2 

ANC  STCRE  IN  FC  6-7 

0980 

33,3313 

77  776 

1 

EXIT 

098  1 

REF 

95 

LAST 

856 

33,3314 

4 4753 

n 

CS 

CAE 

0982 

REF 

14 

1 AST 

819 

33,3315 

54  163 

1 

TS 

RCCE 

CHANGE  STCRE  RCCE  TO  VECTOR 

C9R3 

REF 

3 

LAST 

120 

33,3316 

3 1657 

1 

CA 

P IPTER 

STCRE  CELV  lA  RPAC 
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09R9 

33,3317 

22  007 

0 

ZL 

C985 

REF 

354 

LAST 

878 

33 ,3320 

52  155 

1 

CXOF 

MFAC 

0986 

REF 

4 

1 AST 

879 

33,3321 

3 1660 

0 

CA 

PIFTFR  +1 

0987 

33,3322 

22  CC7 

0 

ZL 

0988 

REF 

355 

I AST 

880 

33 ,3323 

52  169 

1 

CXCF 

MPAC  +3 

J989 

REF 

5 

LAST 

88C 

33, 3324 

3 1661 

1 

CA 

PIPTFF  +2 

0990 

33,3325 

22  007 

0 

ZL 

099  1 

REF 

356 

LAST 

880 

33 ,3326 

52  16? 

0 

CXCF 

I'FAC  +5 

099? 

REF 

in 

LAST 

845 

33,3327 

3 50  16 

0 

CA 

E8ANK7 

0993 

RFF 

38 

LAST 

879 

33,3330 

54  303 

0 

TS 

EBANK 

RESTORE  EBANK  7 

0994 

REF 

50 

LAST 

87C 

F 7 , 1 5 1 5 

E8ANH= 

CVCNTR 

0999 

RFF 

198 

LAST 

879 

33,3331 

Q 6042 

1 

TC 

I NTPPET 

0996 

33, 3332 

65361 

0 

vxsc 

PCDL 

0997 

REF 

5 

LAST 

875 

33,3333 

26C22 

0 

KFI  FI 

SC4LF  CFLV  TC  2(7)  MZCS  AND  PUSH 

0998 

REF 

2 

LAST 

1 17 

33,3334 

02253 

1 

LRVTIRF 

TIRE  CF  CELV  AT  2 (28 ) CS 

0999 

33,3335 

56225 

1 

csu 

DCV 

lOO'l 

REF 

21 

LAST 

865 

33,^336 

01234 

0 

PIPTINE 

TU  - T (N-1  ) 

101  1 

REF 

1 

33,3337 

27  1 10 

I ■ 

2SEC ( 28  ) 

1002 

3 3 ,334C 

76561 

1 

VXSC 

VSLl 

G( N-1  ) (TU  - T (N-1  ) ) 

1003 

REF 

n 

LAST 

875 

33,3341 

0 1226 

1 

GOT/2 

SCALEC  AT  2(7)  R/CS 

1C04 

33,3342 

53255 

0 

VAC 

VAD 

PLSH  UP  FOR  OELV 

1 !'lS 

RFF 

18 

LAST 

876 

33,2343 

02527 

1 

V 

VU  = V(N-l)  + CELVU  + G(N-1»  CTL 

1006 

33,3344 

53352 

0 

VSL2 

VAD 

SCALE  TC  2(5)  R/CS  AND  SUETRACT 

1007 

REF 

c 

LAST 

877 

33, 3345 

03  734 

1 

CELVS 

RCCN  RCTATICN. 

1008 

33 , 3346 

5 1406 

1 

PLSH 

ABVAL 

STCRE  IN  FC 

1C09 

33  ,R347 

43202 

0 

SR  4 

DAD 

ABS(VR)/8  + 7.5  AT  2(6) 

ICIO 

RFF 

1 

33 ,3350 

2 7 10  4 

1 

7.5 

1 )1  1 

33,3351 

24025 

c 

STOVL 

2 0D 

STCRE  IN  ?0C  ANC  RICK  LF  VM 

ni2 

33  , 3392 

44241 

0 

COT 

BCSU 

V( EST)  AT  2(6) 

I 'll  3 

33,3353 

COCOl 

0 

n 

CELTAV  = VRF/is  - V(  EST  ) 

1014 

33 ,3354 

5 1406 

1 

PUSH 

ABS 

101  9 

33,3359 

77425 

1 

CSU 

EX  IT 

AES(CV)  - (7.5  + ABS(VR)/8)) 

10)  6 

33,3356 

00025 

0 

2 0D 

1C17 

RFF 

2 

LAST 

151 

33,3357 

25  '672 

0 

INCR 

LRNCTft 

1018 

REF 

2 

LAST. 

878 

33,3360 

C 6726 

1 

TC 

BRANCH 

1019 

RFF 

1 

33, 3361 

1 3 5 3 7 

1 

TCF 

VFAI  L 

DELTA  V TCC  LARGE  ALARR 

1 020 

REF 

2 

LAST 

880 

33,3362 

1 3537 

1 

TCF 

VFAIL 

CELTA  V TOC  LARGE  ALARR 

1 121 

P,r-F 

90 

LAST 

878 

33,3362 

0 5 51  6 

r 

TC 

DCNiNFLAG 

TURN  CFF  VEL  FAIL  LA^F 

1022 

REF 

1 

33,3364 

09262 

1 

ADRES 

VFl SHFLG 

1023 

RFF 

27 

LAST 

879 

33,3365 

3 C107 

1 

CA 

FLGWRCl  1 

1024 

REF 

1 

33,3366 

7 4740 

1 

MASK 

V X I NH  B I T 

1C25 

33,3367 

0 090  6 

1 

EXTEND 

1026 

RFF 

1 

33,3370 

1 3377 

0 

PZF 

VUPDAT 

IF  VX  INHIBIT  RFSFT,  INCORPORATE  CATA. 
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1C27 

REF 

91 

1 AST 

880 

35  ,3371 

0 5516 

0 

TC 

OCWNELAG 

102  8 

REF 

1 

33,3372 

00250 

C 

AORES 

VX  I NH 

RESET  VX  INFIEIT 

102  9 

REF 

4 

LAST 

879 

33,3373 

3 1651 

1 

CA 

VSELECT 

1030 

RFF 

5 

LAST 

563 

33,3374 

6 7 751 

0 

AC 

NFG2 

IF  VSELECT  = 2 (X  AXIS  ) , 

1031 

33,3375 

C CO'^e 

1 

EXTEND 

BYPASS  UPCATE 

103? 

REF 

1 

33,3376 

1 3456 

1 

ezF 

ENOVOAT 

1033 

REF 

28 

LAST 

8PC 

33,3377 

4 C1C7 

c 

\/LPDA  T 

CS 

FLGWRCll 

103A 

REF 

2 

LAST 

876 

33, 3 4'K.I 

7 4 744 

0 

MASK 

LR INHBI T 

1035 

RFF 

264 

LAST 

879 

33 , 34  1 1 

10  000 

0 

CCS 

A 

10  3 6 

RFF 

2 

LAST 

879 

33, 3402 

1 3456 

1 

TCF 

VALTCHK 

UPDATE  INFieiTEO 

1 137 

RFF 

357 

LAST 

880 

33 , 3403 

54  155 

1 

TS 

MPAC  +1 

1038 

REF 

6 

LAST 

876 

33 , 3404 

3 1471 

1 

CA 

AEVEL 

STORE  E7  FRASABLES  NEECEO 

IN  TEMPS 

1039 

REF 

1 

33 , 3405 

54  130 

1 

TS 

ABVEL* 

1040 

REF 

5 

LAST 

881 

33 ,3406 

3 1651 

1 

CA 

VSELECT 

1041 

REF 

1 

33,3407 

54  131 

c 

TS 

VSELECT^ 

lOA? 

REE 

10 

LAST 

820 

33,3410 

3 50  14 

1 

CA 

EBANK5 

1C43 

REF 

39 

LAST 

esc 

33,3411 

54  0J3 

0 

TS 

EEANK 

CHANGE  EBANKS 

1044 

RFF 

2 

L AST 
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898 

21,2706 

3 1700 

1 

CA 

LATVEL 

0360 

21,2705 

0 OC06 

1 

EXTEND 

C361 

R^F 

2 

LAST 

898 

21 ,2706 

6 271  1 

1 

PZVF 

NEGVMAXY 

0362 

RFF 

6 

LAST 

898 

21,2707 

3 2005 

r 

CA 

N'AXVPITS 

0363 

REF 

3 

LAST 

898 

21,2710 

1 3015 

1 

TC  F 

ZEROLSTY 

036^ 

REF 

25 

LAST 

898 

21,7711 

50  065 

1 

FFGVWAXY 

IMCEX 

TTEMP5 

0365 

PEF 

5 

LAST 

898 

21,2712 

2 1676 

1 

CA 

LAT  VPPTR 

0366 

PEF 

7 

LAST 

898 

21,2713 

6 2005 

c 

AC 

MAXVe  ITS 

0367 

21,2716 

6 rcoo 

c 

CCR 

03  6 8 

REF 

26 

LAST 

8 9.8 

21,2715 

5 C 0 6 5 

1 

INDEX 

I TEPF5 

0369 

RFF 

C 

LAST 

898 

21,2716 

56  072 

1 

XCH 

PUPTREG2 

0370 

RFF 

100 

LAST 

898 

21,2717 

6 6 753 

c 

CS 

CNF 

0371 

PFF 

4 

L AST 

898 

21,2720 

1 2 0 20 

1 

TCF 

ZEROLSTY 

+ 3 

0372 

PEF 

27 

1 AST 

898 

21 ,2721 

50  065 

1 

LVLIVTTS 

INDEX 

ITFMF5 

0373 

PEF 

A 

LAST 

897 

21,2722 

1 ! ' 702 

1 

CD  S 

TRAKLAT  V 

C37A 

P'^F 

1 

21 ,2723 

1 2752 

1 

TCF 

LATVPOS 

0375 

21 ,2726 

1 2726 

1 

TCF 

+ 2 

03  76 

RPF 

1 

21,272= 

1 2757 

1 

TC  F 

LATVNEG 

0377 

REF 

28 

LAST 

898 

PI ,2726 

50  065 

1 

INDEX 

I TEMP  5 

0378 

PEF 

6 

LAST 

898 

21, 2727 

^ 16  76 

c 

CS 

LATVN6TP 

0379 

21, 273 C 

0 0006 

1 

EXTEND 

0380 

21,2731 

6 2732 

1 

BZPF 

+ 2 

0381 

REF 

1 

21,2732 

1 2 7 6 6 

f 

TCF 

NEGLNL V 

03  82 

PFF 

1 AST 

898 

21,2733 

50  .16.5 

1 

INCFX 

ITEMP5 

0383 

RFF 

1 1 

LAST 

898 

21 , 2736 

6 1 7 )0 

c 

CS 

LATVEL 

038A 

21,2735 

C CC06 

1 

EXTEND 

C3  85 

REF 

1 

21 , 2T36 

6 30  1 1 

1 

eZMF 

LVMINLM 

0386 

RFF 

6 

LAST 

897 

21,2737 

6 CC66 

1 

AO 

I TE^'F6 

03  8 7 

PFF 

30 

LAST 

898 

21, 2740 

50  06  5 

1 

INDEX 

I TENP5 

0388 

RFF 

7 

LAST 

898 

21,2761 

6 1676 

1 

AC 

L AYVNETP 

0389 

21,2762 

0 CCC6 

1 

EXTEND 
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L 

LA5ri ^0 

A N 4 1.  r n 

CTSPL  AYS 

LSEF' S page  NC.  9 E7  S3 

039P 

RFF 

. 2 

LA5T 

69  f 

21 ,2743 

6 301  1 

1 

PZ»f 

LYNIN1.M 

0391 

PFF 

31 

LAST 

8 = 8 

21, 2744 

50  06  5 

1 

IN'DE> 

I TENF5 

039? 

PFF 

12 

LAST 

898 

21,2745 

6 170'i 

1 

AE 

LATVEL 

0393 

21,2746 

C CG06 

1 

EXTFNC 

03  94 

PEF 

32 

LAST 

899 

21,2747 

5 C065 

1 

INIPE  > 

1 TFMP5 

0395 

RFF 

a 

LAST 

898 

21,2750 

61 '676 

1 

SU 

LATVRFTR 

0396 

RFF 

c 

LAST 

698 

21,2751 

1 3015 

1 

TEE 

ZEPCLSTY 

0397 

RFF 

33 

LAST 

899 

21 , 2752 

50  065 

1 LATVPCS 

IN'OE  X 

I TEMP5 

039B 

RFF 

13 

LAST 

899 

21,2753 

4 1700 

Q 

CS 

LATVEL 

0399 

21,2754 

0 0006 

1 

EXTENC 

0400 

RFF 

3 

LAST 

8Q9 

21,2755 

6 3U1 

1 

BZME 

LVRINLM 

0401 

21,2756 

1 2 7 63 

c 

TCE 

+ 5 

040? 

REF 

34 

LAST 

899 

21,2757 

50  065 

1 LATVNEG 

IMOEX 

I TENF5 

0403 

RFF 

14 

LAST 

899 

21 ,2760 

3 1700 

1 

CA 

LATVEL 

0404 

21,2761 

0 CCC6 

1 

EXTEND 

0405 

RFF 

4 

LAST 

899 

21,2762 

6 301  1 

1 

PZYF 

LVRI  NL*) 

0406 

RFF 

•a  K 

LAST 

899 

21,2763 

50  065 

1 

INDEX 

ITEWF5 

0407 

RFF 

9 

LAST 

899 

21,2764 

4 1676 

r 

CS 

LATVYFTR 

C4''e 

REF 

6 

LAST 

899 

21,2765 

1 3015 

1 

TCE 

ZEROL  STY 

0409 

RFF 

36 

1 A ST 

89  = 

21 ,2766 

50  J65 

1 NEGLMV 

INDEX 

ITFNP5 

04  lo 

RFF 

15 

LAST 

899 

21,2767 

3 1700 

1 

CA 

LATVEL 

0411 

21,2770 

0 0006 

1 

EXTEND 

04  12 

REF 

a 

LAST 

899 

21,2771 

6 301  1 

1 

BZNF 

LYM  NLP 

0413 

PFF 

8 

LAST 

8F8 

21,2772 

3 2005 

0 

CA 

NAXVBI TS 

04  14 

RFF 

37 

LAST 

899 

21 , 277R 

5'J  065 

1 

INDEX 

ITEYF5 

0415 

REF 

1.' 

1 AST. 

89R 

21 , 2774 

6 1676 

1 

AD 

LATVNETR 

0416 

21,2775 

4 C0''0 

0 

COM 

0417 

P'^F 

38 

LAST 

699 

21 ,2776 

50  06  5 

1 

INDEX 

1TEMP5 

041  R 

PFF 

16 

LAST 

8P9 

21,2777 

6 170C 

1 

AD 

LATVEL 

0419 

21 ,3000 

0 00  )6 

1 

EXTENC 

04?'' 

REF 

6 

LAST 

899 

21,3001 

6 301  1 

1 

PZPR 

LVM  NLN 

04?1 

21,  3.-02 

0 C006 

1 

EXTEND 

04?? 

PEF 

2 9 

LAST 

E9C 

21  ,3003 

5 0J65 

1 

INDEX 

ITEMF5 

0423 

REF 

17 

LAST 

8°9 

21, 3C''4 

61  ' 700 

1 

SU 

LATVEl 

0424 

REF 

40 

LAST 

899 

21 ,3005 

50  065 

1 

INDEX 

ITEMP5 

0425 

RFF 

1 1 

LAST 

899 

21  ,3006 

6 1676 

1 

AC 

LATVMETP 

04?6 

21,  3 '.’0  7 

4 COOO 

c 

CCN 

04?7 

REF 

7 

LAST 

899 

21  ,3010 

1 3015 

1 

TCP 

ZEPOLSTY 

0428 

REF 

41 

LAST 

899 

21, 3011 

50  065 

1 L Y M N L N 

INDEX 

ITENF5 

042° 

REF 

12 

LAST 

899 

21,  s'yiz 

4 1676 

0 

CS 

LATVPETR 

043( 

RFF 

42 

LAST 

899 

21,3013 

50  065 

1 

INDEX 

ITEYF5 

0431 

RFF 

18 

LAST 

89  9 

21,3C14 

6 1700 

1 

AD 

LATVEL 

0432 

REF 

43 

LAST 

899 

21,3015 

50  065 

1 ZEPOLSTY 

INCEX 

ITEMP5 

0433 

RFF 

6. 

LAST 

89F 

21,3016 

56  372 

1 

XCF 

PLPTRFG3 

0434 

RFF 

170 

LAST 

69  3 

21,  ’4.17 

3 4 755 

1 

CAE 

ZEPC 

0435 

RFF 

44 

LAST 

899 

21 ,3020 

50  165 

1 

INDEX 

1TFMP5 

<• 

0436 

REF 

5 

LAST 

898 

21 , 3C2  1 

55*7^2 

1 

TRAKLATY 

043  7 

REF 

45 

LAST 

89R 

21 , 3022 

50  065 

1 

INDEX 

1 TENP5 

0438 

RFF 

7 

LAST 

8 9R 

21 , 3023 

3 0072 

1 

CA 

RLFTREG3 

0439 

REF 

21 

LAST 

867 

21,  R:  24 

6 -^1  7 5 A 

C 

AD 

NFCn 

AVCICS  +C  CINC  FARCwARE  PALFUNCTICN 
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0^4-r 

PEE 

46 

LAST 

89S 

21 ,3'"25 

50  065 

1 

INDEX 

I TFMP5 

044  1 

REF 

2 

LAST 

53F 

21, 3026 

54  C=3 

c 

TS 

CDL^CNT 

0442 

RE'^ 

47 

LAST 

90':’ 

21  ,3  ■‘27 

50  065 

1 

INDEX 

1 TEMP5 

0443 

REF 

E 

LAST 

p C C 

21 .3C3C 

3 CC72 

1 

CA 

PLFTREG3 

0A44 

REF 

48 

LAST 

900 

2 1 , ' 3 1 

50  065 

1 

INDEX 

I TEMPS 

0445 

REF 

13 

LAST 

8°o 

21 ,3032 

27'676 

0 

ADS 

LATVMETR 

0445 

RFF 

49 

LA  ST 

90C 

21  , 3033 

10  065 

0 

DCS 

ITEMF5 

FIRST  .MCMTCR  FORWARD  TpFN  LATERftL  VEL. 

0447 

1 

21 , 3034 

1 26  1 1 

1 

TC^ 

VMONI TOR 

0448 

REF 

1 

21 ,3035 

3 5020 

0 

CAF 

e ITS  ET 

DRIVE  TEE  X-POINTER  DISPLA'r. 

044  9 

21,  36 

0 00(  6 

1 

EXTEND 

045'' 

RFF 

15 

LAST 

892 

21  ,3  137 

05  014 

1 

l«OR 

CFANl 4 

0451 

PFF 

C 

LAST 

flC  C 

21,  ?;.40 

0 1714 

1 

TG 

LACCSAVE 

GC  TC  ALTRCUT  +1  OR  TO  ALTOLT  41 

0452 

RFF 

1 71 

1 AST 

899 

21, ^041 

3 4755 

1 

ZEROCATA 

CAF 

ZEFD 

ZERC  ALTSAVF  AND  alTSAVE  4l  - - - 

0453 

RE<^ 

1 47 

LAST 

893 

21,3042 

54  O'U 

1 

TS 

L 

N'C  NEGATIVE  ALTITLCES  ALLCV-EC. 

n4‘>4 

P CF 

1 

21, 3043 

1 2261 

1 

TCF 

ZDATA2 

R0455 

:((  ^ >j:  :^c  ^ * 

* :^c  ^ 

0456 

prF 

27 

LAST 

995 

21 , 9044 

4 0074 

0 

CISPPSFT 

cs 

FL  ACWRDiO 

ARE  WE  IN  DESCENT  TRAJECTCRV? 

0457 

REF 

4 

LAST 

895 

2 1,  3045 

7 4752 

1 

WASK 

RIOFLBI T 

C45  8 

2.1 , 3046 

0 00.9  6 

1 

EXTEND 

0459 

RFF 

1 

21 ,3047 

1 3060 

0 

eZF 

AECPTCN! 

NC. 

0460 

REF 

31 

LAST 

894 

21, 3050 

3 4 744 

1 

CAF 

BI  T8 

YES. 

0461 

-?cp 

^5 

LAST 

894 

21  ,305  1 

7 1300 

1 

MASK 

IMOOES33 

CHECK  IF  INERTIAL,  DATA  JLST  OISFLAYEC. 

0462 

RFF 

272 

LAST 

896 

21 , ”052 

1C  CCC 

0 

CCS 

A 

0463 

RF>^ 

42 

LAST 

993 

21,3353 

3 4752 

0 

CAF 

8IT2 

YES.  DISABLE  RR  ERRCR  CCLNTER 

0464 

REF 

32 

LAST 

900 

21  ,3F>54 

6 4744 

1 

AD 

B IT8 

NO.  RENCVE  DISPLAY  INERTIAL  DATA 

0465 

21  , 3055 

4 rcoo 

( 

CCM 

0466 

21 , 3056 

0 00.06 

1 

EXTEND 

0467 

REF 

C Q 

LAST 

893 

21  ,3C57 

03  012 

1 

NANC 

CFAN12 

046  9 

PEF 

1 

21,  31.6-0 

4 3067 

1 

A8ORT0N 

CS 

eiTse/7 

RESET  INER‘''IAL  DATA,  INTERLEAVE  FLAGS. 

046F 

REF 

36 

LAST 

900 

21,3061 

7 13  00 

1 

MASK 

IMnOES33 

0470 

RFF 

37 

LAST 

900 

21 , ”"62 

5 5 • 3CC 

1 

TS 

I NCDES33 

04  71 

RFF 

4 

LAST 

892 

21 , 3063 

4 4736 

0 

CS 

DIDFLBI  T 

0472 

R=F 

?0 

LAST 

893 

21 ,3  964 

7 0075 

1 

NAS  K 

FLAGWPDl 

0473 

RFF 

31 

L AST 

900 

21,3065 

54  075 

1 

TS 

FLAGV-PDl 

RESET  CIFFLAG. 

0A74  PEF  (■.'=>  LAST  89A  ?l,3'i86  1 S261  0 TCP  TASKCVER 

H76  ““  ^ 21 , 306  7 CO  300  1 BITSE/7  cTf  0^30  I N E RT  I A l'  C AT  A ’ A ^ C INTEFLEAVE  FLAGT. 

CA77  RFE  2 LAST  538 5 '2C  EITSET  PPT06 


R347R 
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FIMICOUW  - GUTCAP  IMERFACE  LSER'E  PAGE  AC.  1 EO  S3 

ROOOl 

PRCGRAW  NAME;  FINDCnUH 

R0002 

Mcr.  NUMFFR:  1 A8  Cl  15 

R0003 

MCC  ALTECP:  KILPFP 

ROOOA 

R0')(I5 

RCCr6 

R0007 

RCOOR 

R0009 

OBJECTS  OF  “HO:  1.  TC  SLPPLY  CCMA«ANEFC  GTEPAL  AAGLES  FCF  NCUN  22. 

2.  TO  MAINTAIN  CORRECT  ANC  CURRENT  THRUST 

ClftFCTIPN  r tT  t IN  AU  NCCES.  THIS  IS  CONE  BY 
FETCHING  fgR  the  THRUST  CIRFCTICN  FILTER  THE 
COUO'S  IN  PNGCS-AUTO,  THE  CDU’S  IN  ALL  OTHER 
MCDES. 

ROOlo 

Rflflll 

R0C12 

3.  TO  SUBSTITUTE  A STCPRATE  FGR  THE  NORMAL 

AllTTFUCT  CCMMANCS  NHENEVFR 
1)  NCT  IN  FNGC  s- AUTC  , CR 

Rnni.3 

2)  ENGINE  IS  OFF. 

RCC.'IA 

FL'NCTICNAL  nFSCPIFTICN; 

RO'il  5 
.R0017 

FINOCCUW  PROVIDES  THE  INTERFACES  RETliEEN  THE  UARICLS  FCWERFO  FLITE  GUICANCE  PPCGRAmS 
AVC  TEE  DIGITAL  AUTCFTLOT.  TFF  INPUTS  Tn  FINCCCUw  APE  THE  THRUST  CCMMAND  VFGTGP 

R0<  iv 

AND  the  UNcnw  gonmanc  v^ctcp,  anc  the  cutfuts  are  the  ginpal  angle 

ii.^REMENTS,  the  COMMANDFO  ATTITUDE  ANGIE  RATES,  AND  THE  CCMMANCEC 
ATTITLw-  lag  angles  (NHIGH  ACCCUNT  FGR  THE  ANGLES  PY  ViHICH  THE  BODY  HILL 

R 

R0021 

" BEHIND  „ PAMP  CCMmaNO  IN  ATTITUDE  ANGLE  CLE  TG  TEE  EIMTE  ANGULAR 
■'‘TTCNS  AV..ILAELF). 

BOO 2? 

R0n?3 

^ ^ 'HL  "Hi.'M-u  IHPLST  VECTGt-  FPCN  THE  T FPU  ST  otrecTICN 

' ^»st  yi'i„.'io  vector,  and,  hhen  xcvinhif  set. 

— Btro?6 — 

'tHPEGO,!  u /JiiMr  .1-ANE  HITH  THE  HTNDOH  CCMMAND  VFCTCP. 
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L 

P C C 7 7 

R0028 

PCC79 

R Cr39 
R0031 
R CC32 

R0033 

R0034 

R0P3‘= 
P 1036 

R 0C37 
RC038 

R0039 

ROOAO 

R0O92 

R00A3 

P306A 

ROO^S 

ROOAt 

P0D67 

ROl’^n 

R0049 

P'lO^n 

R cr  >^2 

PQC53 
R005A 
R0C5'= 
R0056 
R0n57 
R CC5P 
R0059 
R006O 


FlACCrUV,  - GUIOAF  INTERFACE 
'PECTFICAllCNS; 


LSEF' S PAGE  NC. 


2 EO  S3 


IN  TT  I AL  IZAT  lor.  : A SINGLF  INTERPRETIVE  CALL  TF  IMTCCLV  IF  PECLIFEC 
RFFORF  [ACF  GUICEC  ''AN'EUVEP  USING  FINDCOUW. 


CALL  : 


RETURNS: 


AL  ARMS  : 


INPUT  5 : 


0 U T P L T 5 : 


(IPBRI  c : 


INTERFRFTIVF  CALL  Tf  FlNCrfUN  klTF  TFE  THFUST  CGMMANC 
VECTCR  IN  MPAC.  INTERPRETIVE  CALL  TO  FINDCOLk  -2  UTH 
THE  THRUST  CCNMANC  VECTOR  IN  UNFC/2  ANC  NOT  MPAC. 

NCPMAl  INTERPRETIVE  TN  ALL  CASES 

1.  normally  all  autopilot  CMOS  ARE  ISSUED. 

2.  IF  NC1  FNGCS  AUTC,  CC  STCPRATE  ANC  RETURN 
wtthCLT  ISSLING  autopilot  CMOS. 

3.  IF  ENGINE  CFF,  CC  STCFRATE  ANC  RETURN  WITHCUT 
I S5LING  ALTCFILOt  CMOS. 

OOAOl  IF  INPUTS  DETERMINE  AN  ATTITUDE  IN  GIMBAL  LOCK. 

FINOCDLK  ERIVES  CCUXC  ANC  rcuYC  TC  THE  RQC  VALUES, 
PUT  DRIVES  COUZD  ONLY  TC  THE  GIMBAL  LOCK  CCNE. 
00602  IF  UNFC/2  CF  UNWC/2  PRCCUCF  CVERFLOW  WHEN 

LMTIZEO  USING  NCRMLMT.  FINCCOLU  ISSUES 
STCPRATE  AS  ONLY  INPLT  TC  ALTCPILCT. 

UNFC/2  THPLST  CCMMANC  VECTOR,  NFEC  NCT  PE  SEMI-UNIT. 

UNwC/2  WlNOEh  CCMMANO  VECTOR,  NEED  NCT  BE  SFMI-UMT. 

xrVINHTP  flag  denoting  X AXIS  OVERRIDE  INHI6ITF0. 

CSMOCCKO  FI  AG  DENCTING  CSm  CCCKEC. 

STEERSW  flag  denoting  INSUFF  thrlst  for  thrlst  dir  fltr. 

OELCOLX, Y , 2 
OMEGAPO, + 1, +2 
DEI PFPCF  ,+l  ,+2 
CPHI ,+l , +2  FTP  N0LN22 

FINOrcUk  CESTFCYS  SINCCUX,Y,Z  ANC  fCSCCUX,Y,2  BY 
writing  into  these  LOCATICNS  the  sines  ANC  COSINES 
FF  TFE  rCUC’S  IN  FNGCS-AUTO,  CF  THE  ECU'S  DTHERHSE. 
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L FINCCCLVv  - PUinAP  INTERFACE 

Prm61  IMTI  iL  IZATIDN  FTP  FINCCPUW 


0C62 

3t  ,3L71 

EANK 

30 

0063 

t>Er 

1 

30,2060 

SFTl CC 

FCRUK 

0064 

36,3071 

BANK 

0066 

PEF 

2 

LAST 

137 

F6 , 1 646 

EBANK= 

Ecruw 

0066 

PFF 

1 

COUNT* 

I.$/FCCUV< 

rC67 

30 ,3071 

77775 

1 

IMTCCUV,  VLOAC 

0C6P 

REF 

12 

1 AST 

89C 

30  , ■’072 

C6  522 

1 

UN  I TX 

0C69 

REF 

6 

LAST 

137 

30,  3i;73 

C32  70 

1 

STCRE 

LNF V/2 

CC7C 

REF 

9 

LAST 

845 

30,30  74 

03262 

1 

STORE 

UNWC/2 

00  7 1 

30, 3'’75 

7 7 6 1 6 

C 

RVC 

R0072  FINPCriw  PRELIMINAF TES 


0073 

’0,3676 

77775 

1 

VLCAC 

0074 

PFF 

19 

LAST 

645 

30,3077 

03254 

1 

UNFC/2 

QC75 

3'i  ,31  10 

402  1 1 

1 

FINCCCUW  euv 

SE1  PD 

or  76 

REF 

c 

LAST 

E4  3 

S"  , 3 1;'  1 

6 1 li.0 

1 

F INPCCUIa 

0C77 

30, ’i’? 

OC023 

U 

22 

CC78 

30 ,3103 

77420 

1 

STC 

EXIT 

0079 

REF 

2 

LAST 

137 

30, ’ 104 

0324  7 

c 

CCrUKLSR 

R008'! 

MCRE 

FAUSKFFFI^c 

0081 

rjp(T 

1 

3C,3105 

3 3746 

1 

CA 

ECCUWL 

0082 

RFF 

49 

LAST 

896 

30,3  106 

F6  '03 

1 

XCH 

CRANK 

0083 

PFF 

2 

LAST 

L37 

30,3107 

5 5 ' 646 

0 

TS 

ECDUKLSR 

0C84 

RFF 

29 

1 AST 

85E 

3<'  , 3 1 IF 

3 C 1 1 1 

c 

CA 

CAP8CCLS 

0085 

PFP 

6 

1 AST 

746 

’0,311! 

7 4 7 3 7 

1 

MASK 

C SMDCCKD 

0CF6 

RFF 

2 73 

LAST 

900 

3', 3112 

10  06.) 

0 

CCS 

A 

0087 

RFR 

111 

LAST 

898 

’O, 3113 

3 4 7 5 3 

1 

CA 

CNE 

0088 

RFF 

2 

LAST 

137 

3ii,  3114 

55  *650 

1 

TS 

NOXCnUK 

0089 

RFF 

1 

3^1 ,’  1 15 

’ 4743 

0 

CA 

XCV  INF13 

0096' 

PFF 

2 

LAST 

137 

3n, 31 16 

55*652 

0 

TS 

F LPALTNC 

0091 

RFF 

30 

LAST 

903 

3-1  ,3117 

7 0111 

1 

MASK 

OAPBOCLS 

0C92 

REF 

2 

LAST 

137 

36,31  20 

55  • 65 1 

c 

TS 

F LAGCCCK 
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INPUT  VECTrps  NEFC  NOT  EE  SEMI-UNIT 

finocclf:  entry  i^hen  unfc/2  in  NPAC 

INTERPRETER  NCW  INITIALIZEP 

LCCS  C TFoU  21  FTP  CIRECTinN  CCSINE  MAT 

SAVE  RETURN  ACCRESS 


SET  EEANH 

SAVE  USER'S  EEANK 


CSMPCCKC  MUST  NCT  BE  E ITl 5 
INCEX  IF  CSM  nCKEC 


X0VIN8FIP  MUST  not  be  8IT1S 

SET  TC  rCS-NCN-ZERO  FLAC  FNGCS  AUTO  NOT 


FL  AGCCCW 


ANY  PNZ  NL'MEER  IF  XGV  INFI8TD 
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E6  S3 

PCC^?  FFKH  0ASIC  DfiTA 


0094 

30,3121 

C 0CC4 

C 

INHIAT 

PEIINT  AT  PAUTNC  (TC  INTPRETI 

CC95 

FFf 

1 5 

LAST 

887 

30,3122 

3 0032 

T 

FA 

CCUX 

FETCH  CDLX  ,CDLY,CnUZ  TN  Alt  CASES, 

0096 

REF 

2 

1 AST 

P67 

30,3123 

54  77  1 

1 

TS 

rCLSFCTX 

RFPIACE  EELO^«  IF  PNGCS  ALTC 

0097 

REF 

6 

LAST 

865 

3i',  3 124 

2 OG23 

1 

FA 

CDLY 

CC9R 

RFF 

2 

LAST 

R6  7 

30 , 3 1 2 5 

54  765 

1 

TS 

CCUSFCTY 

0099 

REF 

9 

1 AST 

887 

30,3126 

3 CG34 

r 

CA 

CCLZ 

ClOfi 

REF 

2 

LAST 

867 

39, 3127 

54  767 

0 

TS 

CCLSPCTZ 

0 10! 

RFF 

32 

LA'T 

892 

30,3130 

3 4742 

1 

CA 

BITl  ) 

PNGCS  CCNTROL  BIT 

01'? 

30,3131 

0 0CC6 

1 

EXTEND 

CK3 

REF 

R 

LAST 

893 

30 ,3132 

02  030 

0 

RANG 

CFAN3C 

OKA 

REF 

274 

LAST 

903 

3 .1  , 3 1 3 ? 

1C  COC 

r 

CCS 

A 

01 '3 

REF 

1 

30 , 3 1 3 4 

1 3151 

C 

TCF 

PALTPC 

NCT  RNGCS  (EITS  INVFRTECl 

C1C6 

RFF 

57 

LAST 

77F 

30,3135 

3 4736 

1 

CA 

BIT14 

AUTP  vrCF  BIT 

0107 

30,3136 

r CCC6 

1 

EXTEND 

OlOR 

REF 

7 

LAST 

815 

30,3137 

02  031 

1 

RAND 

CHAN  3 1 

Oinc 

R = F 

275 

LAST 

9i.4 

39,3140 

10  000 

0 

CCS 

A 

0111 

RFF 

2 

LAST 

904 

30,3141 

1 3151 

c 

TCF 

PALTNC 

NCT  ALTC  (BITS  INVEPTEC) 

Oil! 

RTF 

0 

1 A ST 

903 

3 1 ,3142 

55  >652 

0 

TS 

FLPALTMD 

RESET  FlAG  PNGCS  AUTC  NCT 

0112 

RFF 

13 

LAST 

522 

3:- , 3 143 

3 1635 

c 

CA 

CCUXC 

PNGCS  AUTO:  FETCF  CCU x C , C CL  YD , C DC  ZD 

01 1 3 

RFF 

3 

LAST 

9'14 

30,3144 

54  77  1 

1 

TS 

COLSPCTX 

CllA 

RFF 

•3 

L A'T 

522 

?9 ,3145 

3 1636 

0 

(A 

CDUYC 

0115 

RFF 

3 

LAST 

9^4 

30,3146 

54  165 

1 

TS 

CCUSRCT  Y 

0116 

RFF 

3 

LAST 

521 

30,3147 

3 1637 

1 

CA 

CCL'ZD 

0117 

RFF 

3 

LAST 

904 

30,9150 

54  767 

0 

TS 

CCUSPCTZ 

ELT 
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PGUP 

fetth  inplts 

0119 

REF 

161 

LAST 

889 

3-1,3151 

Cl2r 

30 ,3152 

C12  1 

RFF 

9 

LAST 

F(.6 

30  .3  193 

0127 

PFF 

1 

30,3159 

0123 

RFF 

10 

LAST 

903 

30,3155 

0179 

30,3156 

0125 

REF 

10 

LAST 

°0  5 

3’, ’157 

0126 

RF.F 

9 

LAST 

87S 

30 ,316C 

0127 

RFF 

1 

3ii  ,3161 

Q12P 

RFF 

8 

LAST 

875 

30  ,3162 

C129 

30 ,3  16  3 

ono 

RFF 

1 

30, 3169 

C131 

3-0  ,3165 

0 132 

R 'F 

1 

30,3166 

0130 

RFF 

6 

LAST 

89C 

30,3167 

R0139 

THRUST  1 

3IRECTICN  FILTER 

0135 

30,3170 

C136 

FFF 

1 

30 , 3171 

0137 

REF 

3 60 

LAST 

882 

30,3172 

0138 

REF 

1 

30  , 1 7 3 

0 139 

PFF 

2 

LAST 

9C5 

30,3179 

0190 

REF 

1 

30,3175 

0191 

RFF 

361 

LAST 

905 

30,3176 

0197 

RFF 

2 

LAST 

c o e 

30,3177 

0193 

REF 

2 

LAST 

90? 

30, 320C 

0199 

REF 

162 

LAST 

905 

30 ,32  ) 1 

0 6092 

1 PALTNC 

TC 

INTPRET 

77639 

'1 

PTB 

21  72  7 

C 

NCPMLMT 

29001 

0 

STOVL 

UNX/2 

03262 

1 

LINWC/2 

97C39 

c 

PTE 

RT8 

21727 

0 

NCPMUM  T 

9761  7 

1 

CUICTRIG 

29C15 

c 

STOVL 

UNZ/2 

00325 

0 

DEI  V 

5 3 90  9 

1 

erve 

UNIT 

61735 

1 

NCATJCNT 

950  00 

<> 

BOV 

I 1 1 1 

6 1202 

0 

AFTRFITR 

97673 

0 

niit 

1 

EXIT 

3 1671 

0 

CA 

UNFVY/2 

22  157 

1 

LXCH 

MFAC 

0 39  7^ 

1 

TC 

F LTRSLB 

55' 671 

1 

TS 

UNFVY/2 

3 1673 

1 

CA 

LNFVZ/2 

22  161 

1 

LXCF 

MPAC 

0 3970 

1 

TC 

fltrsur 

55*673 

0 

TS 

UNFVZ/2 

0 6092 

1 

Tf 

INTPRET 

ENTERING  THRUST  CPD  STILL  IN  MPAC 


SFM-L'NYT  thrust  CmT  6$  INITIAL  UNX/2 


ALWAYS  RCO  TO  C8TAIN  TRIGS  CF  CCLC'S 
SEM-LMT  WINCCW  C«D  AS  INITIAL  UNZ/2 


AT  LEAST  CNE  ENTERING  CNC  VCT  ZERO 

IF  DMT  CELV  OVERFLOWS,  SKIP  FILTER 
YlfinS  LNIT(DFLV)  IN  VEH  CCCRCS  FOR  FLTP 


FOR  RESTARTS,  UNFV/2  ALWAYS  INTACT,  NFAC 
RENFWFC  AFTER  PFTLRN  FROM  CALLER, 
TWC  FILTER  UFCATES  NAY  PE  CCNE. 
UNFV/E  NEEO  NOT  BE  EXACTLY  SERI-L'MT. 


CONPLETES  FILTER 
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P01A5  FING  t SLITiBLE  VvINDFVv  PCINTING  VFCTCP 


0196 

3 ! t ? 2 2 

96  135 

1 

AFTPFLTF  SLCAt 

PHIZ 

0197 

PFF 

3 

LAST 

9"  3 

30, 32  )3 

03252 

1 

FLAGCCON 

C19E 

RFF 

1 

30 , 3?'19 

61210 

0 

FETCHZNB 

0199 

30, P205 

95175 

c 

VI  C AC 

CALL 

015- 

RFF 

2 

1 AST 

90" 

30 , 3206 

00C15 

0 

UNZ/2 

OlSl 

Rcp 

1 

30,3207 

61510 

1 

UNWCTEST 

019? 

30,3210 

7 7 7 7 5 

1 

RETCHZNB  VLCAC 

G1S3 

pr.p 

1 

30  ,321  1 

02162 

0 

ZNBPIP 

0159 

PFF 

Z 

LAST 

906 

3 1 ,3  2 1 2 

3 90  15 

1 

stcall 

UN  Z/2 

0155 

REF 

2 
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906 

30,^213 

61510 

I 

UNUC  TRST 

0156 

3'i  , 3219 

57575 

1 

VLOAC 

VCCNP 

0157 

RFF 

I I 

LAST 

877 

30,3215 

02  196 

c 

XNPPI R 

015R 

PFF 

9 

1 AST 

906 

3'0 , 321  6 

OOC  1 5 

0 

STORE 

UNZ/2 

R0159  COMPLTF  THE  REOllTpED  OIFECTIGN  CCSINE  PATRIX 


1160 

31,3217 

973  75 

( DCMCL 

VLCAD 

VXV 

0161 

RFF 

5 

LAST 

906 

30,3220 

.10015 

0 

UNZ/2 

0162 

REF 

2 

LAST 

905 

30,322! 

OCFCl 

C 

UNX/2 

0163 

30,3222 

91956 

r 

UNIT 

PUSH 

C 169 

30, 3223 

76935 

1 

VXV 

VSLl 

1165 

RFF 

3 

LAST 

906 

39,3229 

core  1 

c 

UNX/2 

0166 

REF 

6 

LAST 

906 

3ri  ,3225 

009  15 

0 

STORE 

UNZ/2 

0167 

30  ,’226 

63361 

0 

VXSC 

PCVL 

1168 

REF 

3 

LAST 

90" 

30,3217 

C 3 2 7 9 

c 

LNFVZ/2 

016" 

31 ,32  30 

51361 

1 

VXSC 

B VSU 

Ol^'i 

REF 

3 

LAST 

905 

30,3231 

03272 

c 

UNFVY/2 

0171 

30, 3232 

53372 

1 

VSLl 

VAD 

0172 

REF 

9 

LAST 

9C  6 

30,323? 

00001 

0 

UNX/2 

0173 

?.),3?39 

7 7656 

1 

LM  T 

Cl  79 

REF 

5 

LA"T 

906 

30  ,3235 

00091 

0 

STORF 

UN'X/2 

C175 

30,3236 

769  35 

1 

VXV 

VSLl 

0176 

RFF 

7 

L AST 

90  6 

30, 3237 

0CC15 

c 

UNZ/2 

C177 

REF 

1 

30,3290 

OOO  1 7 

0 

STORE 

UNY/2 

0178 

30,3291 

97276 

1 

VCCNF 

VXV 

0179 

REF 

6 

LAST 

906 

3''.  3292 

OOCOl 

0 

UNX/2 

0186 

30,3293 

7 7-77  2 

0 

VSL  1 

1181 
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e 

1 AST 

9^6 

30, 3299 

OCC  15 

c 

STCRE 

UNZ/2 
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IF  XCV  NCT  INFieiTEC,  GO  FETCH  ZNE 


Z ANE  -X  CAN'T  BOTH  PARALLEL  UNFC/2 


UNY/2  FIRST  ITERATICN 


-LNZ/2  FIRST  ITERATICN 

EXCHANGE  -nNF-VZ/2  UMZ/2  FOR  UNY/2 

NLST  PE  SPALL 

YIELDS  -LNFVY/2  UN' Y /2  - LNF  V Z /2  LNZ/2 
PUST  EE  SYAIL 


TCTALLY  ELIPINATFS  THRUST  PCINTING  ERRCR 
UNX/2 

-LNZ/2  NAS  STCREC  HERE  RFHENEfR 
UNY/2 


LNZ/2 
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PO  IE? 

COMPLTF 

THE  REOLIPED 

GIMBAL  ANGLES 

0183 

3'  ' I 3 24  5 

7 7624 

1 

CALL 

C1E4 

REF 

1 

30  ,3246 

6152) 

1 

NB2CCUSP 

0185 

30, 3247 

77  776 

1 

EXIT 

R0186 

LIMIT  THE  MirCLF  GIMBAL  ANGLE 

6 COMPUTE 

THE  UNLIMITED  GIMBAL  ANGL 

c 

0 187 

REF 

362 

LAST 

905 

30,325C 

3 0156 

0 

CA 

M FAC 

+ 2 

J188 

REF 

1 4F 

1 AST 

90r 

3'),  3 2 5 1 

54  CU 

1 

TS 

L 

UPS 

REF 

1 

30  ,t252 

3 3760 

0 

CA 

CCUZDI IM 

019C 

REF 

1 

30,3253 

0 3714 

c 

TC 

L TMITSUB 

0191 

REF 

3 63 

LAST 

90  7 

30,3254 

56  156 

0 

XCH 

MPAC 

+ 2 

C192 

30,3255 

0 00ii6 

1 

EXTEND 

0193 

RFF 

364 

LAST 

9C7 

30,3256 

20  156 

1 

MSL 

VFAC 

*2 

0194 

30,3257 

0 0006 

1 

EXTEND 

0 195 

30,3260 

1 3262 

0 

EZF 

+ 2 

0196 

P "F 

1 

39,3261 

1 3 74  3 

r 

TCF 

ALARMMGA 

0197 

30 ,3262 

0 0004 

0 

MGARFT 

IMF  INT 

0198 

30,3263 

22  CC7 

c 

ZL 

01  99 

RFF 

62 

LAST 

889 

30, 3264 

3 4 752 

t 

CA 

TRC 

020'' 

R'^F 

4 

1 AST 

98 

3'T  ,3265 

54  142 

1 

CELGMELP 

TS 

TEM2 

0 20  1 

REF 

149 

LAST 

907 

30,3266 
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c 

CA 

L 

0 202 

3') , 3267 

0 0006 

1 

EXTEND 

9203 

3Ct327C 

7 0000 

0 

SCUAPE 

0204 

REF 

c. 

LAST 

417 

30,3271 

6 435C 

c 

AD 

HIS 

02C5 

30,3272 

0 9006 

1 

EXTEND 

02C6 

30,327’ 

6 3276 

1 

EZMF 

+ 3 

0207 

REF 

172 

LAST 

900 

30 , 3274 

3 4 75  '= 

1 

CA 

ZERO 

02CF 

REF 

4 

LAST 

906 

30 ,3279 

55'65l 
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TS 

FLAGGCDW 

o?nc 

REF 

c 

LAST 

9C  7 

3C ,3276 

50  142 

c 

INDEX 

TFM2 

0210 

PEE 

369 

1 AST 

907 

30,8277 

3 0154 

1 

CA 

MPAC 

021  1 

RFF 

6 

LAST 

9C7 

30,3300 

50  142 

0 

)NCEX 

T EM2 

0212 

REF 

1'1 

LAST 

521 

30,3301 

54  32  1 

0 

TS 

C PHI 

0213 

30,3302 

0 0006 

1 

EXTEND 

0214 

REF 

7 

LAST 

907 

3C.330? 

5 0142 

c 

INDEX 

TFM2 

0215 

RFF 

14 

L AST 

904 

30, 3304 

21 ' 635 

1 

MSL 

CDLXn 

C216 

39,3399 

4 9 COO 

0 

COM 

0217 

REF 

8 

LAST 

90  7 

30, ’306 

5C  142 

c 

INDEX 

TEM2 

0218 

REF 

1 

30, 33)7 

55'679 

0 

IS 

-DELGMB 

0219 

RFF 

150 

LAST 

9C7 

3U.331U 

94  00 1 

1 

TS 

L 
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RFF 

c 

LAST 
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30.3311 

10  142 

1 

CCS 

TEM2 

0221 

REF 

1 

30  , 3 3 1 2 

1 3265 

1 

TCF 

DELGMBLP 
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YIELDS  THF  roc  GIMBAL  ANGLES,  2'S,  FI 


^GS 


LIMIT  TFE  MGA 

CAN'T  LXCF:  NEEC  UNLIVITFC  MGA  FOB  ALARM 

YIELDS  LIMITED  MGA.  1 PIT  ERROR  POSSIBLE 
EECAUSE  USING  2'S  COMP.  WFC  CAPES? 

TFIS  EETTFR  YIELD  ZERO 


REIINT  AT  TC  INTPRET  AFTER  TCCCCUV' 


TO  PREVENT  false  STARTS  ABOUT  X,  ZERO 
FLAGOCCR  IF  CELGMEZ  CP  Y TCC  EIG. 

V-ITHIN  i PIT  CF  -(49  CEG  SCUARECI 


CUTFUTS  TC  NCUN22 


NC  MATTER  TEAT  THESE  SLIGFTly  CIFFEPENT 
FROM  RHFN  RF  INITIALLY  FETCHFC  THEM 

-LNLIMITEO  GIMBAL  ANGLE  CFGS,  I'S,  FI 
FOR  PRECEDING  TEST  ON  NEXT  LCCP  PASS 
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02?3 

PEF 

A 

LAST 
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30,3313 

11 

■ 652 

0 

CCS 

flpautno 

T22A 

PFF 

2 

LAST 

<305 

30, 331A 

1 

3 737 

r 

TCF 

NCATTCNT 

+ 2 

0225 

REF 

28 

LAST 

887 

30, '33  15 

3 

oim 

1 

CA 

flagwpds 

0226 

Pt^F 

6 

1 AST 

82  1 

30,3316 

7 

A7A5 

1 

PAS  K 

ENGONFIT 

0227 

30,3317 

C 

0C06 

1 

EYTENO 

0228 

PEF 

3 

LAST 

Qna 

30 , 3 3 20 

1 

3737 

0 

ezF 

NCATTCNT 

+ 2 

f 
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LIVTT  THE  AITITLCE  ANGLE  CHANGES 

THIS  SECTION  LIMITS  THE  ATTITUDE  ANGLE  CHANGES  A0CLT  A SET  CF  CRTHCGCNAL  VEHICLE  AXES  X , Y PR  I ME  i ZP P I ME . 

THESE  AXES  CCINCIGE  W I^H  the  CCMMANOEr  VEHICLE  AXES  IF  AMD  ONLY  IF  CDUXD  IS  ZERC.  THE  PRIME  SYSTEM  IS 

the  commanded  VEHICLE  SYSTEM  PETATEC  AECUT  THE  X AXIS  TC  EPING  THE  Z AXIS  INTC  ALINEMENT  hITH  THE  MIDDLE  GINBAL 


AX  TS 

• 

ATTITUn 

E ANGLE  CHANGES 

IN  the 

PRIMP  SYSTEM  ARE  RELATED  TC 

small 

GIMEAL  angle  CHANGES  BY: 

« -DFLATTX 

* I SIN (CCUZC ) 

0 

* -CELGMBX  * 

* 

♦ 

* X- 

* -OELATTYPPIME  * = 

* n cos  (CCUZC  1 

0 

» -DFLGMBY  Y 

* 

X-  X 

* -CFLATTZPR IME  * 

* 0 E 

1 

* 

* -OELC-MPZ  * 

RFF 

2 

lAST 

907 

30 ,3321 

23 '677 

0 

LXCH 

-celgmb 

♦ 2 

SAME  AS  -DELATTZFRIME  LNLIMITEC 

REF 

3 

LAS'' 

90  2 

30,3322 

5 1 ' 650 

0 

INL'EX 

NCXCCLW 

PF  F 

1 

30,3322 

3 37  54 

1 

CA 

DAZMAX 

REF 
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SAVE  CRIGINAL  OFFSET 

ONE  VCT,  NC  WCS,  CAN  EE  SAVES  IF  NEC  OF 
CRIG  OFFSET  ARRIVES  IN  A,  ELT  IT'S 
ACT  WORTH  the  INCREASED  OBSCLRITY. 


lACR  TC  OFFSET,  UNLIMITEC 

SAPE  LIMT  FCR  Y AND  1 

YIELDS  lACR  TO  OFFSET,  LIMTED 

CPIGIAAL  offset 

TOTAL  OFFSET,  LALIPITEC 

SAPE  LIPIT  FCR  Y AND  Z 

YIELDS  TC^AL  OFFSET,  LIMTEC 


VOTS 


five  FOR  ALT  CECICE  IF  COT  PAGN  TOO  LARGE 
ZEROING  WINDOW  GOOD  FLAG 
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RQ43C  ALREACY  CGNTAIN  CCS(NGA)/2  AS  A FACTOR.  THEREFORE  THE  QUOTIENT  SHOULD 
R0431  ORCIMARILY  NEVER  EXCEED  1/2  IN  MAGNITUDE.  BUT  IF  THE  PGA  IS  NEAR  FI/2 

R0432  THEN  CCS(RGA)  IS  NEAP  ZERO,  AND  THERE  HAY  EE  SORE  CHAFF  IN  THE  OTHER 

R043?  ELFMRNTS  CF  THF  HATRIX  WHICH  WCULC  PRCCUCE  CHACS  UNCEP  DIVISICN. 

R0^,34  PFFORE  CIViriMG  WF  MAKE  SURE  CCS('^GA)  IS  AT  LEAST  CNE  BIT  LARGER 

R0435  than  the  NAGMTUCE  CF  tre  HIGH  CRCER  FART  OF  THE  OPERAND.' 

R0436  IF  ONE  OR  MORF  DIVIDES  OiNNCT  BE  PERFOP''Er,  THIS  NEANS  THAT  THE 
R0437  PECUIREC  MGA  IS  VERY  NFARLY  +-PI/2  AND  THEREFORE  THE  CTHER  GIN8AL 
R0438  ANGLES  ARE  INDETERM NATF.  THE  INNER  AND  CUTEP  CIHBAL  ANGLES  RETURNED 
RT43P  IN  THIS  CASE  WILL  BE  RANDCH  MULTIPLES  CF  PI/2. 
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DCA58  ARCTPG5P  RETURNS  TPF  2'R  CONPLEPENT,  PI,  SP  ANGLE  IN  THE  A REGISTER  GIVEN  ITS  SINE  IN  A ANO  ITS  CfSINE  IN  L IN 

R0A60  UMTS  rp  2.  THE  RESULT  IS  AN  UNA«BIGUCLS  ANGLE  ANYV,H£RE  IN  THE  CIRCLE,  MTH  A PAXINUN  EFPCP  CF  +-A  EITS. 
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RCC08 
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ALIGNS  THE  T NU  TC  CNE  CF  THREE  CFIENTATIONS  SELECTED  BY  TH=  ACTRONALT.  THE  PRESENT  IPL  OPIENTATICN  IS  HNCYN 
ANC  IS  STORED  IN  RPFSPMAT.  THE  THREE  FCSSIBIE  CPIFNTATIONS  MAY  EE_ 


ROni  1 


(A)  FPEEPPRcr  CPIE^TATIO^ 


Rrri2 

RTD14 


AN  OPTIMUM  CRTENTATICN  ECR  A FREVICUSLY  CALCULATED  manUFVER.  THIS  ORIENTATION  MUST  BE  CALCULATED  ANC 
PTOREC  PY  A PPEVIOU"^lY  SELECTED  FPCGPAM. 
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VECTOR 

AT 

TIME 

T( ALIGN) 
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BY 
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A STPCNALT 

R0029  (C)  PERSMMAT  fPIFNTATION 

R003f’  (C)  LANEINC  Sl^P  - THIS  IS  NOT  AVAILIBLE  IN  SUNDANCE 


ROO^l 

R3033 

RCC35 
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CAP 

V06N894 

)’3n 

REF 

2 53 

LAST 

924 

14,2455 

0 46  16 

1 

TC 

PANKCALL 

0231 

PER 

28 

LAST 

923 

14  ,2456 

20477 

1 

f ACR 

GCFl ASH 

0232 

RFF 

3 c 

last 

924 

14,2457 

1 6C01 

1 

TCF 

GCTCFCCP 

1233 

14,2460 

1 246  2 

1 

TCF 

+ 2 

0234 

REF 

1 

14,2461 

1 2454 

1 

TCF 

LSDI SP 

0235 

RRF 

171 

LAST 

924 

14,2462 

0 6042 

1 

TC 

I NTPRFT 

0236 

14,2463 

72545 

0 

DLCAO 

SLl 

0237 

REF 

4 

LAST 

926 

14,2464 

0271  1 

1 

LANCLCNG 

0238 

RFF 

4 

LAST 

926 

14,2465 

15  122 

1 

5TC0L 

LCNG 

0239 

RFF 

3 

LAST 

926 

14,2466 

0271  3 

0 

LANDALT 

0240 

RRF 

4 

LAST 

926 

14, 2467 

15124 

1 

STCCL 

ALT 

0241 

RFF 

4 

LAST 

926 

14,2470 

02  7.07 

c 

LANDLAT 

0 24  2 

REF 

4 

1 AST 

926 

14,2471 

15120 

c 

STOCL 

LAT 

0243 

RFF 

15 

LAST 

926 

14,  2<^72 

C1242 

1 

GCT/2  +4 

0244 

14,2473 

77624 

1 

CALL 

0245 

REF 

1 

14,2474 

26422 

1 

LALCTCRV 

0246 

14,2475 

7 7 6 50 

1 

GCTC 

C24  7 

RFF 

4 

LAST 

926 

14,2476 

02746 

0 

OYAJ 

0246 

14,2477 

01”1 

1 

VC6N89* 

VN 

689 
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TENF  STCRE  TIf'E 


CISPLAY  LAT ,LCNG/2, ALT 


V3A-T  ERY  IN'ATE-EX  IT  P57 

V33-PRCCFEC-  ACCEPT  LS  CATA 

Y32  OR  E-  LOOK  AGAIN  ANO/CR  LCAC  NEV>  LS 


PICK  UP  T lYE 

GFT  FLS  BACK  FRCN  LAT, LONG,  ALT 
RLS  B-29  IN  MPAC  AND  ALPHAV 


G AP: 

ASSEMBLE  REVISION  lit  CF  AGC  PRCGRA"  LLPINAPY  EV  NASA  2021112-071 

L 

F5I  -P‘53 

P02A9 

NAPE  -SEC  ALIAS  LCCSAP 

R025< 

8Y 

R02S1 

VINCENT 

RC2E2 

FLNCTirN  - rCPPLTF  INFLTp  FCR  FICAPAR  AAC  PLANET 

R0253 

CEF  IN’F 

P(125A 

R025E 

t 

= UNIT!  SUN  WRT  EARTHI 

R0256 

ES 

R02'7 

L 

= U'MT(  PCPN  WPT  FAPTM 

R0258 

EP 

P.02  5 9 

R 

= PCS  IT  ICN  VECTCP  CF  LEM 

R02f' 

L 

R02A1 

P 

= MFAN  CIS‘‘’ANCE  (38AA02KP)  BETWEEN  EARTH  AND  PCCN 

RC262 

EM 

R02E3 

p 

=RATIC  P /(DISTANCE  SUN  TC  EARTH)  >.00257125 

R026A 

FM 

RC26  5 

R 

=EOLATCPIAl  RAOIUSS  (6378.166KP)  CF  FApTH 

R0266 

E 

Rf1?67 

LCCSAP  CCPPUTES  IN'  EARTH  INFLUENCE 

RC268 

pn2E9 

VSUN 

U 

R0270 

ES 

R027  1 

VFARIl-  = 

-UMT(  R ) 

P0?T2 

L 

RC273 

VMCCN 

LMT(R  .U  - P ) 

R027A 

EP  EM  L 

R0279 

CSUN 

CCS  90 

R027E 

CEARTH  = 

CCS  (5  + APCSI N ( R /PAG  (p  ) ) ) 

P0277 

B L 

RC278 

CPCCN 

CCS  5 

R0279 

R02RO 

INPUT  - time 

IN  PP/C 

ROPEl 

OUTPUT  - LISTED  AECVF 

R02P2 

suproltines  - 

LSPnS  tLEPPPEC 

R0283 

PEPRIS  - VAC 

AREA  .TSIGHT 

. ..  . ■ ■ 
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GAP: 


P51- 

P53 

028A 

PEF 

2 

LAST 

4 5 TO 

45  : 

8 

8* 

CCLNT* 

SS/LCSA8 

3285 

OFF 

1 

14,2500 

S50 

= 

LCCSAM 

0286 

14,2500 

7762  1 

) 

LEGS  Ap 

STC 

3287 

8FF 

2 

LA9T 

125 

14,2501 

C2  74  5 

G 

CMN 

0288 

REF 

2 

lAST 

25F 

14,2502 

37562 

1 

STCALL 

TSIGHT 

0289 

PFF 

1 

14 , 2503 

33647 

1 

LSFOS 

0290 

14, 2504 

77  74  5 

1 

ELCAD 

0291 

DgF 

3 

1 AST 

928 

14,2505 

03562 

0 

T SIGHT 

3 29  2 

RFF 

47 

LAST 

832 

14,2506 

34'"4  1 

c 

STCALL 

TCFCl 

0293 

REF 

T' 

LAST 

832 

14,2507 

27060 

1 

1 EVPREC 

029A 

14,2510 

61131 

0 

SSF 

TIX,2 

0295 

PEF 

9 

LAST 

72  1 

14,2511 

00052 

0 

S2 

C2S6 

14,2512 

00,000 

1 

0 

0297 

RFF 

1 

14,2513 

30  5 3 5 

1 

MCCNCNTR 

0298 

14,2514 

74375 

0 

EAPTCNTR 

VLOAD 

V>SC 

C299 

RPF 

3 

LAST 

48F 

14,2515 

02  723 

0 

VN-OON 

0300 

RFF 

1 

14,2516 

3CCC1 

0 

RSLBEP 

3301 

14,2517 

52372 

n 

VSL  1 

VSU 

0302 

RFF 

26 

LAST 

F32 

14,2520 

00001 

0 

P ATT 

130  3 

14,2521 

77656 

1 

LM  T 

030A 

RFF 

4 

LAST 

928 

14,2522 

26723 

0 

STGVL 

VPCinN 

0 30  5 

RFF 

■ 27 

LAST 

92F 

14,2523 

0000  1 

r 

PATT 

0306 

14.2524 

57456 

1 

LNIT 

VCCPP 

C3G7 

REF 

3 

LAST 

125 

14,2525 

16  707 

0 

STOOl 

VEARTH 

0 30  8 

PFF 

1 

14, 2526 

30005 

1 

PSUBE 

03P9 

14,2527 

77624 

1 

CALL 

n?\o 

PEF 

1 

14 , 25^0 

3F567 

0 

CCCCS 

0311 

RFF 

1 

14,2531 

14"  17 

1 

STcni 

CEARTH 

C31  2 

REF 

1 

14,2532 

30576 

0 

CSSS 

031  3 

RFF 

1 

14,2533 

34023 

1 

STCALL 

CPCCN 

0314 

RFF 

1 

14,2534 

3C562 

r 

EADSAP 

0315 

14,2535 

74375 

0 

MCONCNTR 

VLOAC 

vxsc 

0316 

RFF 

5 

LAST 

92F 

14,2536 

02723 

c 

VPCCN 

0317 

RFF 

1 

14, 2537 

30C07 

0 

RCE 

0318 

14,2540 

53445 

1 

EVSU 

OMT 

0319 

RFF 

2 

L AST 

124 

14,2541 

027  15 

c 

VSLN 

0320 

PFF 

3 

LAST 

928 

14 ,2542 

267  15 

0 

STOVL 

V SUN 

0321 

RFF 

t 

LAST 

928 

14 ,2543 

02723 

c 

VPCCN 

0322 

14,2544 

53  36  1 

0 

YXSC 

VAD 

0323 

REF 

2 

LAST 

928 

14,2545 

30001 

0 

RSUBEM 

0324 

RFF 

28 

LA  ST 

9?F 

14,2546 

OCCCl 

c 

PATT 

0325 

14,2547 

57456 

1 

UNIT 

VCCMP 

0326 

PFF 

4 

1 A ST 

928 

14,2550 

26707 

c 

STCVL 

V EAPT  8 

0327 

PFF 

29 

LAST 

928 

14,2551 

COCIC  1 

0 

PATT 

0328 

14,2552 

57456 

1 

LN  IT 

VCOMP 

0329 

REF 

7 

LAST 

928 

14,2553 

16  7 2 3 

c 

STCDL 

VPCON 

0330 

REF 

1 

14, 2554 

30003 

1 

R SLBN 

C331 

14,2555 

77624 

1 

CALL 

033? 

pep 

2 

LAST 

928 

14,2556 

3C567 

c 

CCCCS 
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gap: 


A<;sePBLit  p.evisinN  ne  cf  agc  frcgrai-  llmnapy  py  aasa  202ni2-f7i 


L 

P51- 

D53 

0333 

REF 

2 

LAST 

928 

lA  ,2557 

1A023 

0 

STOCL 

CPOON 

033A 

PEF 

? 

LAST 

92E 

lA, 2560 

30576 

C 

CSS5 

•)33  5 

RFF 

2 

LAST 

928 

lA, 2561 

00017 

1 

STORE 

CEARTH 

0336 

lA ,2562 

777A5 

1 

ENCSAP 

CLCf  C 

03  37 

R=F 

1 

lA, 2563 

306C0 

1 

r SSL'N 

0338 

RFF 

1 

1A.256A 

0002  1 

1 

STORE 

CSLN 

0339 

lA ,2565 

77650 

1 

GCTC 

03  AO 

PEF 

3 

LAST 

026 

lA, 2566 

0 2 7 A 5 

0 

QNl  N 

03A1 

lA  ,2567 

70A71 

1 

orcns 

CCV 

SRI 

03A3 

lA, 257C 

0CCA5 

c 

36C 

03A3 

lA, 2571 

A3336 

c 

AS  IN 

DAD 

03AA 

PEF 

1 

1A,2572 

30  60  2 

0 

5CCGRFES 

03A5 

lA, 2573 

7C  5A6 

1 

CCS 

SRI 

03A6 

lA, 257A 

77616 

0 

RVO 

03A7 

C016 

CEARTF 

= 

lAC 

03A8 

00  20 

C SLN 

= 

16C 

C3A9 

0022 

CRCON 

= 

ler 

0350 

1A,2575 

0776  1 

1 

css  5 

2CEC 

.2A90A75 

0350 

lA, 2576 

1AA73 

1 

0351 

lA  ,2577 

OAOOO 

0 

CSSUN 

2CEC 

. 125 

0351 

lA , 260C 

CCOPC 

1 

0352 

lA, 2601 

C03A3 

n 

5CEGREFS 

2DEC 

.C136E8E89 

0 35? 

1 A ,2  602 

21616 

0 
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(CCS  5)/A 
(C0S6C)/^ 

SCALEC  IN  PEVS 
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P035?  PRCGRAN  nape  - R56  CATE  CEC  20  66 

R035A  WGC  I LCG  SECTICN  PS1-PE3 

R0359  ASSeVBLY  SUNCISK  REVAO 

R0356  EY  KEN  YINCFN'T 
R0397 

R035E  FLNCTICN 

P0359  THIS  PROGRAM  READ  THE  IPL-COUS  AND  CC"'PL7ES  THE  VEHICLF  CRIENTATICN 

R0360  WITh  RESPECT  tc  INERTIAL  SPACE.  IT  THEN  CCPPLTFS  THE  SHAFT  AXIS  (SAX) 

R0361  UTTH  RPSPECI  TC  REFEPENCp  INEETIAL,  EACH  STAR  IN  THE  CATALOG  IS  TFSTEC 

P0362  TC  FETERMIMF  IF  IT  IS  OCCLLTFO  BY  EITHER  THE  EARTH, SUN  ER  PCCN.  IF  A 

R0363  STAR  IS  ACT  rcCULTOO  THEN  IT  IS  PAIRED  WITH  ALL  STAR  CF  LOWER  INDEX. 

R036A  the  PAIPFC  STAR  IS  TESTED  PEP  CCCLLTATICN.  FAIRS  CF  STARS  THAT  PASS 

R036S  THE  ncruLTATION  TESTS  APE  TESTED  FOR  GOOD  SEPARATION. A PAIR  CF  STARS 

R0366  HAV^  GCCD  SFPFRATICN  IF  THE  ANGLE  BETWEEN  THEM  IS  LESS  THAN!  100  DFGRFES 

R0367  AND  MORE  THAN  50  DEGREES.  THOSE  PAIRS  WITH  GCCD  SEPARATION 

R0368  APF  THFN  TESTED  TC  SEE  IF  THFY  LIE  IN  CLRRENT  FIELD  CF  VIEW. (WITHIN 

R0369  50  DEGREESCF  SAX). THE  PAIR  WITH  MAX  SEPARATION  IS  CHOSEN  FROM 

R037O  THCSE  WITH  GDOC  S EP AR AT  I ON , AND  IN  FIFLD  CF  VIEW. 


R9371 

R037? 

R0373 

RC37A 

P0375 

R0376 

RC377 

R337S 

R0379 

R03RH 


CALLING  SFOUENCE 
I TC  8ANKCAL1 

HI  CAOP  R56 

1+2  ERROR  RETURN  - NC  STARS  IN  FIELC  OF  VIFW 

L+3  NCRMAL  RETURN 

CUTPUT 

BESTI.bFSTJ  -single  FREC  , integers  , star  numbers  TIMES  6 
V^LAG  - FI  AG  PUT  SET  IMFLIP'  NC  STARS  IN  FIELC  CF  VIEW 


P0381 

PC3F?  IM7IAI  UATIOM 

R0383  1)A  CALL  TO  LOCSAM  MLST  RE  maCE 

R03RA 

R03C5  DEPRIS 


R0386 

WORK 

AREA 

R038  7 

X ,Y  , 

2N6 

R0388 

SINCCL  ,c.nscou 

R0389 

STARAP  - 

STAR 

+ 5 

039C 

REF 

1 

19,2603 

0391 

REF 

1 

0392 

PFF 

12 

LAST 

889 

19,260? 

C393 

REF 

4 

LAST 

C 7 c 

19  ,26C9 

0394 

rff 

172 

LAST 

926 

19, 260S 

0395 

19,2606 

0396 

PEE 

4 

LAST 

55C 

19,2607 

0397 

19, 2610 

C396 

PEF 

1 

19,261  1 

C399 

19,2612 

04C0 

19,2613 

0401 

19,2619 

0402 

REF 

1 

19,2615 

R56 

= 

P ICAPAP 

CCUNTX 

f J/R56 

0 9695 

1 

P ICAPAR 

70 

MAKECADR 

55 ' 795 

1 

TS 

CMN 

0 6C92 

1 

TC 

1 NTPPET 

77629 

1 

CALL 

9 7 59  1 

1 

CCUTR  IG 

77629 

1 

CALL 

20030 

r 

calcsmsc 

7 7 6C1 

0 

SETPO 

OCOCl 

0 

0 

71214 

0 

SET 

CLCAC 

C1965 

1 

VFLAG 

VFLAG 


1 


930 


GAP: 
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F51- 

P53 

0A03 

RFF 

1 

14,2616 

24007 

0 

CPZERC 

0A04 

REF 

4 

LAST 

920 

14, 2617 

26  756 

1 

STEVL 

BEST! 

'1A15 

PCF 

3 

L AST 

382 

14,2620 

.02  66  5 

0 

XNB 

OAC6 

14,2621 

63361 

0 

VXSC 

PCVL 

9An7 

PEF 

1 

14 , 2622 

240C5 

1 

HAI FOP 

OATP 

REF 

3 

LAST 

375 

14,2623 

12701 

0 

ZNB 

0A09 

14, 262A 

74  37C 

r 

AXT  ,1 

VXSC 

041  0 

14, 2625 

00344 

1 

2 2 80 

0411 

RFF 

2 

LAST 

931 

14  ,2626 

24005 

1 

HAIFCP 

0412 

14,2627 

77655 

1 

LAC 

0413 

14,2630 

53505 

1 

VXM 

UNIT 

04  14 

REF 

40 

1 AST 

924 

14,2631 

01  734 

0 

REESNNAT 

0415 

REF 

1 

14,2632 

0273  1 

0 

STORE 

SAX 

0416 

14,2633 

66331 

0 

SSP 

SSP 

0417 

REF 

7 

LAST 

612 

14,2634 

0005  1 

0 

SI 

041  8 

14,2635 

'■,0006 

1 

6 

04  1C 

R>^F 

1C 

LAST 

92E 

14,2636 

0CC52 

c 

S2 

0420 

14,2637 

rrcct 

1 

6 

0421 

14,2640 

52100 

1 

P IC  1 

TI  X,  1 

GOTO 

0422 

REF 

1 

14,2641 

30643 

0 

P 102 

0423 

FFF 

1 

14,2642 

30  7 60 

c 

PICEND 

042A 

14 ,2643 

503-63 

0 

p IC2 

VLOAD=* 

DOT 

042f 

REF 

1 

14 , 2644 

3034  7 

1 

CATLOG,! 

0476 

REF 

2 

L AST 

931 

14,2645 

02  73  1 

c 

SAX 

0427 

14,2646 

5012  5 

0 

CSU 

BNN 

0428 

REF 

1 

14,2647 

30  7 5 7 

1 

CSS33 

0429 

REF 

1 

14,2650 

30640 

0 

PIC  1 

0430 

14,2651 

77754 

1 

LXA  ,2 

0431 

RFF 

24 

1 AST 

879 

14,2652 

0CC46 

c 

XI 

0432 

14,265? 

52114 

0 

PIC3 

TIX,2 

GOTO 

0433 

RFF 

1 

14, 2654 

306  56 

1 

PIC4 

0434 

RFF 

2 

LAST 

93  1 

14,2655 

30640 

0 

PICl 

0435 

14,2656 

5'J  3 7 3 

0 

P IC4 

VLCAC» 

DOT 

1436 

REF 

2 

LAST 

9?  1 

14,2657 

47430 

0 

CATLCG,2 

0437 

RFF 

3 

L A5T 

931 

14,2660 

02731 

0 

SAX 

043f 

14,2661 

50025 

0 

CSU 

PRN 

0439 

REF 

2 

LAST 

93  1 

14,2662 

30  757 

1 

CSS33 

0440 

REF 

1 

14,2663 

3 1653 

1 

P IC3 

0441 

14 , 2664 

47  7 73 

1 

YLCAC* 

CCT« 

,344? 

RCP 

3 

LAST 

931 

14, 2665 

30347 

1 

CATLCG,! 

0443 

RFF 

4 

LAST 

931 

14,2666 

4743') 

0 

CATLOG, 2 

0444 

14,2667 

51025 

1 

rsi 

BFl 

0445 

REF 

1 

14,267^ 

30755 

0 

C SS4C 

0446 

REF 

2 

1 AST 

931 

14,2671 

30653 

1 

P 1C  3 

0447 

14,2672 

45  173 

0 

VLCADX- 

CALL 

044  e 

RFF 

5 

1 AST 

931 

14,2673 

30347 

1 

CAT) QG,  1 

0449 

RFF 

1 

14, 7674 

30  7 32 

1 

CCCULT 

0450 

14, 2675 

776  14 

1 

RON 

0451 

RFF 

1 

14,2676 

01711 

0 

cultflag 

0452 

REF 

■a 

LAST 

93  1 

14,2677 

3C64C 

c 

PICl 
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XI  = 37  > 6 <-6 


SAX  = SHAFT  AXIS 
S ! = S2=6 


FAJCP  STAR 


r,AP 
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P51- 

-P53 

C453 

14,2700 

45173 

0 

0454 

REF 

6 

LAST 

93  1 

14,27"  1 

4743C 

C 

0455 

RFF 

2 

LAST 

931 

14, 2702 

30732 

1 

'•ASF 

14,2703 

77614 

1 

04  5 7 

PPF 

2 

LAST 

93  1 

14, 2704 

01710 

C 

045E 

DCF 

3 

LAST 

931 

14,2705 

30653 

1 

J459 

1 4,2  706 

776  14 

1 

STRAT  GY 

0450 

REF 

2 

L AST 

930 

14,2707 

0 1 6 ■!  5 

0 

0461 

REF 

1 

I',  ,2710 

30725 

1 

046? 

14,2711 

65120 

1 

0463 

RFF 

5 

LAST 

931 

14,2712 

C2755 

1 

0464 

PFF 

2 

LAST 

12^ 

14,2713 

02756 

1 

0465 

14,2714 

477  7 3 

1 

STRAT 

0466 

REF 

7 

LAST 

932 

14,2715 

30347 

1 

0467 

PFF 

8 

LAST 

932 

14,2716 

4?43;'i 

c 

0468 

14,2717 

43C06 

r 

046S 

PFF 

3 

LAST 

932 

14,2720 

01545 

1 

0470 

PFF 

1 

14,2721 

’F711 

c 

0471 

14,2722 

45345 

1 

0472 

14,2723 

77644 

1 

0470 

PEF 

4 

LAST 
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15, 2444 

1 2295 

1 

15 ,7445 

3 9757 

0 

R59E 

l‘^,2A46 

7 129  1 

c 

15,2447 

0 C006 

1 

15,2450 

7 9795 

1 

15,2451 

4 7 747 

r 

15,2452 

7 0734 

0 

15,2953 

6 cctn 

0 

15,2959 
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c 

15  ,2955 
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1 
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15,2956 
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0 

15,2457 

C 4616 

1 

15,2460 
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1 

15,2461 
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1 

15,2462 

1 3 T’7 

1 
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1 
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15,2469 

f:  1 5 1 7 

0 
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02525 

1 

CEG30 
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12525 

c 
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00026 

0 
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P59E 

V33-PPCCEEC  TC  MARK  ROLTINE 

TCF 

R59 

V32-RECYCLF  TC  TCF  CF  F59  AGAIN 

CAF 

SEVEN 

GET  DETENT  CPCE  CORR E S PCNC I NG  TC  FCSCCCE 

FASK 

FCSC  CCE 

EXTEND 

FP 

8 IT7 

CETENT  CCOE  NCR  IN  1 

cs 

H1GH9 

PASK 

ACTCOPE 

ISOLATE  STAR  AC  IN  BIT  1-6 

AT 

L 

IS 

ACTCCOE 

S^CFE  CETENT  7-9 

TF 

BANKCALL 

GC  TO  ACTMARK  FOR  SIGHTING 

CACR 

AGTPARK 

TC 

BANKCALL 

CACF 

ACTSTALL 

SLEPP  TILL  SIGHTING  DONE 

TC 

CLRTAINS 

EACFNC  RETURN  FRC^  ACTNAPK 

TC  F 

R 59RFT 

RFTLRN  TC  1 STAR  CP  2STAP 

VN 

1 70 

VN 

679 

2DPC 

.083333333 

30  DEGRESS 

2DEC 

.on  3E6F  e 

.5  CEGRESS  SCALED  IN  FEVS 

CCT 

12525 

60  CEG  ecu  SCALING 

EQUALS 

GCT/2 

ECUALS 

GCT/2  +2 

ECLAL5 

GCT/2  +9 
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L 
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R1321 
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NAPE  - PLANFT 

FUArTICA  -TO  PRrVICE  ThP  REFERENCE  VECTOR  FOR  THE  SIGHTED  CELESTIAL 
BODY.  STARS  ARE  FETCHED  F°CR  THE  C AT  A LC G , SU N , E A RT H ANC 
MGCH  APE  COMPUTED  BY  LCC SA M , PL ANF T VECTORS  ARE  ENTERED 
BY  DSDY  INPUT 
CALL  - CALL 

PL  ANET 

INPUT  - TIRE  IN  RFAC 
OUTPUT  - VECTOR  IN  MDAC 
SUBROUTINES  - irCSAR 


DFPR 1 S - 

VAC  , 

FTARAO 

- stapac 

+ 17 

REF 

4 

LAST 

55C 
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SETLCC 

P50S 

15  ,2472 

BANK 

REF 

1 

CCLNT* 
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R^F 

fi 

LAST 
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0 

PLANET 
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1 

STQ 

EXIT 

REF 

4 

LAST 
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1 

GCTP 

REF 

7 

LAST 
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15,2475 
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0 

CS 

HIGHS 

RPP 

12 

LAST 
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15,2476 
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0 

NASK 

ACTCCCF 
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C C006 

1 

EXTEND 

PFF 

3 

LAST 
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0 

RP 

PEVCNT 

REF 

US 
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15,2501 
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0 

XCH 

L 

REF 

12 

LAST 

9 5f 

15, 25C? 

51*757 

c 

INDE  Y 
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REF 

1 1 

LAST 

950 

15  ,2503 

55*755 

r 

TS 

BEST  I 

REF 
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LA  ST 
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15,25C4 

1C  O'l  1 

0 

CCS 

A 

F'-F 

1 

15,2=15 

1 2521 

1 

TCF 

NCTPLAN 

RFF 

1 

15  .25  )6 

3 2560 

51 

CAF 

VNPL ANV 

RFF 

286 

LAST 

953 

15 ,25''7 

C 4616 

1 

TC 

BANKCALL 

REF 

37 

LAST 

952 

15,2510 

20477 

1 

CAOR 

GCFLASH 

15,2511 

0 2506 

0 

TC 

-3 

15,2512 

0 2 5 14 

c 

TC 

+ 2 

15,251 3 

0 2 506 

G 

TC 

_ C 

RFF 

156 

LAST 

551 

15,3514 

0 6 34  2 

1 

TC 

INTPPFT 

15,2515 

53  5 75 

0 

VI  OAO 

UNIT 

REF 

21 

LAST 

944 

15,2516 

02  707 

0 

STARAD 

15,2517 

7 7 6 5 C 

1 

GCTC 

RFF 

5 

LAST 
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15,2520 

02736 

1 

GCTR 

RFF 
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LAST 

954 

15,2521 
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0 
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CS 

A 

REF 

2 
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950 

15,2522 

6 25  57 

1 

AD 

0EC227 

15,2523 
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1 

EXTEND 

REF 

1 

15,2524 
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0 

PZRF 
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RFF 

13 

LAST 
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15,2525 

51*757 

c 

INDEX 
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REF 

12 

LAST 
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15,2526 
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1 

CA 
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RFF 

37 

LAST 
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15,2527 
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1 

INDEX 
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rff 

26 

LAST 
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1 

TS 
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LAST 
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0 6042 

1 

TC 

INTPRET 

15,2532 
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c 
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GCTC 

REF 

12 

LAST 
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1 
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1364 

REF 

6 
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15,2534 

C2736 

1 

GCTP 

1365 

PEF 

198 

LAST 
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15  .2535 

0 6342 

1 

C ALS  AMI 

TC 

INTPRQT 

1366 

15,2536 

45  145 

0 

CALSAN 

CLOAC 

CALI 

1367 

PFF 

9 
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954 

15,2537 

03  56  2 

0 

7 SIGHT 

1368 

R'^F 

3 

LAST 

934 

15,2540 

30500 

1 

LOCSAM 

1369 

15,2541 

7734C 

c 
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VLEAC 
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RFF 

14 

LAST 

954 

15,254? 

02757 

0 

STARl ND 

1371 

REF 

R 

LAST 

928 

15,2543 

027'17 

0 

VEARTF 

137? 

15,2544 

24C0  1 

c 

STCVL 

00 

13  73 

RFF 

4 

LAST 

928 

15  ,2545 

02715 

0 

VSUN 

1374 

RFF 

6 

t AST 

9 5 5 

15,2546 

26  7 07 

'J 

STCVl 

vfartf 

1375 

15,2547 

0000  1 

0 

no 

1376 

REF 

5 

LAST 

955 

15,2550 

02715 

0 

STORE 

VSUN 

1377 

15,2551 

7C143 

0 

CLCAC* 

LXC,1 

1378 

PFF 

13 

LAST 

954 

15,2552 

02756 

1 

BESTl  ,1 

1379 

RCF 

373 

LAST 

922 

15,2553 

00154 

1 

M P AC 

138') 

15,2554 

52  173 

c 

VLEAC* 

GOTO 

1381 

REF 

22 

LAST 
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15,2555 

02343 

1 

STARAO  -22£C,1 

1382 

RFF 

7 

1 AST 

955 

15,2556 

02736 

1 

gctr 

1383 

15,2557 

CC343 

0 

0EC22  7 

CEC 

227 

1384 

15,2560 

0!  530 

0 
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VN 

0688 
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REF 

4 
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P1386 
R1387 
R 1388 
R1389 
R1  3R't 
R13S1 
R1392 
R 1393 
P 139A 
R1396 
R 1396 
R1397 
R 1398 
R 1399 
RIAOO 
RlACl 
R I AO? 
RIA03 
R lAOA 
R1408 
R1A06 
R 1 487 
RlAOe 
RIA39 


R1  A?3 
R 1A?A 
RIA28 
R 1426 
R1427 
Pl42fi 
R 1429 
R143  > 
R 1431 
P1432 
R1433 
R 1434 
R1435 


gravity  vector  DETFRYINATION  POLTINE 

EY  KEN  VINCENT 

FOR  DETAILED  DESCRIFTICN  SE^  504GSCP  5. 6. 3. 2. 5 
This  FRCGRAM  finds  ThF  niPFCTIGN  CF  THE  RCCNS  GRAVITY 
ViHII.E  THE  LN  IS  CN  Th'’  MOONS  SURFACE.  IT  WILL  8E  LSfC 
FOR  LLMAP  SLPFACE  ALIGNMENT.  THE  GRAVITY  VECTCR  IS 
CETERMINEC  8Y  RFACING  THF  PIPAS  WITH  THE  IMU  AT  TWO 
PARTICLLAR  CR I CNT AT  I C NS . ^hE  TWC  READINGS  ARE  AVERAGED 
AND  UNITIZED  AND  TFANSFORMEO  TO  N3  CrORDINATFS.  THE  TWC 
CRIENTATICN  WERE  CHCSEN  TC  REDUCE  BIAS  ERRORS  IN  THE 
READING'. 


CALL- 


INFLTS- 


TC 

CADR 


BAN'KCALL 

GVCETER 


° IPAS  ,CDLS 


OUT  OUT S- 


STARSAVI  = LMT  GRAVITY 
DITTO 

1 


GSAV 
GRAVeiT 

sleroltines- 

PIPASR,  IMUCOARS,  IMUF  INF,  IwlST ALL , 1/PIPA .delay JCB  .CDLTR  IG  , 
*NESM*  ,*SNNP*,  CALCGA , FCFLASH 


R 1410 
P1411 

DE8R1 

c_ 

VAC, 

SAC,STARAD,XSM, 

XNP.THETAO.DELV, 

.CCSCDL.SINCDU 

1412 

REF 

1 

15,2561 

3 2760 

0 GVCETER  CAE 

4 2DEG 

1413 

RFF 

14 

LAST 

943 

15,2562 

5 4 32  1 

C 

T ' 

THETAD 

1414 

15.2563 

4 0000 

0 

COM 

1415 

REF 

15 

LAST 

956 

15,2564 

54  322 

D 

TS 

THFTAC  +1 

1416 

RFF 

1 

1', 2565 

3 2763 

1 

CAP 

35DEG 

141  7 

PFE 

16 

LAST 

956 

15,2566 

54  323 

1 

TS 

THETAD  +2 

1418 

REF  199 

LAST 

955 

15,2567 

0 6 142 

1 

TC 

intppet 

1419 

15, 257C 

45C  14 

C 

CLEAR 

CALI 

142'i 

PEF 

6 

LAST 

944 

15,2571 

01662 

1 

PEFSMFLG 

1421 

RFF 

1 

15,2572 

32666 

0 

LUNG 

R1422 

FIND 

G IWPAL 

ANGLES 

WHICH  rotate  SM 

180OEG 

APOLT  G VEC 

DFF  INE  G COOP  SYS 


LNIT  G 


R=  Y = UNITEZS"  + X ) 

Z UNIT(X  =♦  Y ) 
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R1A36  XSP  = w C t -1  , r w 

R1A37 

R143R  Ui  0 ,-l 

R 1A39 


914^,,') 

ALSO 

NP  WRT 

PRFS 

S^'  IS 

R1441 

R 1442 

* 

R1443 

XNR  = 

^BSw  I 

R 1444 

R1445 

G T'leAl. 

ANGLES 

= CAfGAI  XSN 

P 1446 

1447 

REF 

c 

LAST 

9 5 4 

15.2CCO 

1448 

15,2573 

1449 

PEP 

1 

1450 

1=,2573 

1491 

15, 2574 

1492 

PFF 

1C 

LAST 

946 

15,2575 

1453 

15,2576 

1 494 

15,2577 

1455 

Rop 

I 1 

LAST 

95  7 

1 5 ,26PC 

1496 

15, 26<;  1 

149  7 

4 

LAST 

99  1 

19 ,26  12 

1458 

prp 

c 

LAST 

879 

19, 26E-> 

1499 

PPF 

6 

LAST 

946 

15,2604 

146C 

15 ,26C5 

1 461 

REF 

6 

LAST 

95  1 

15, 26C6 

1462 

15 ,26J7 

1 463 

REF 

15 

LAST 

873 

15,261C 

1464 

PPF 

7 

1 AST 

997 

15,2611 

1469 

15,2612 

1466 

REF 

16 

LAST 

997 

15,2613 

1467 

15,2614 

1468 

REF 

5 

LAST 

95  7 

15,2619 

1460 

19,2616 

1470 

REF 

21 

LAST 

991 

19,261 7 

1471 

15 ,262C 

1472 

REF 

1 

19,2621 

1473 

REF 

3 

LAST 

946 

19 ,2622 

14  74 

15,7623 

1 4 79 

P = F 

1 

15, 2624 

1476 

RFF 

23 

1 AST 

955 

19,2625 

1477 

REF 

2 

LAST 

956 

15,2626 

1478 

15,2627 

1479 

REF 

2 

LAST 

95  7 

19,263C 

1480 

19,2631 

1481 

RFF 

24 

LAST 

957 

19  ,267? 

14P? 

PEF 

7 

LA9T 

944 

19,2633 

1483 

19, 2634 

1484 

REF 

6 

LAST 

785 

1 9,2639 

1489 

19,2636 

=2  (X  X ) - 1/2  I * 
I J 


* 

XNH  ) 


SFTLCC  P^ns 
BANK 

COUNT'S  TJ/P57 


66  3 7C 

C 

AXT  ,1 

SSF 

(10022 

1 

1 80 

00T51 

0 

S 1 

0CCC6 

1 

60 

77744 

0 

LXC  ,2 

00090 

1 

SI 

45  173 

0 GRAVEL 

VI CAC* 

CALL 

94000 

0 

XUNIT  -6,2 

47675 

C 

*6854* 

06707 

1 

STORF 

XNB  +180,1 

77779 

1 

VLCAC 

C273  1 

c 

STAR 

73744 

1 

LXC  , 2 

VXSC* 

0004  7 

1 

X2 

7504C 

1 

STAR  +6,2 

71192 

1 

VSL2 

L XC  , 2 

CCC47 

1 

X2 

63C47 

1 

VSL'S 

I NC  R , 2 

940U0 

0 

XUNIT  -6,2 

0CC02 

r 

20 

06669 

1 

STORE 

XSN  +180,1 

49  100 

1 

T!X,1 

CAl  L 

3 2 6C  1 

1 

GRAVEL 

47359 

1 

CALCGA 

7457  = 

c 

VI  CAC 

VSRl 

02  715 

c 

GCLT 

36723 

1 

STCALL 

STARAC  +12C 

32666 

0 

LING 

74575 

0 

VLOAC 

VSR  1 

02719 

0 

GCLT 

53455 

0 

VAO 

LM  T 

02723 

0 

STARAO  +120 

72  76  1 
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STCRE 

STARSAVl 

7764  1 

1 

npT 

C2231 

n 
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c 

SLl 
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1486 

REF 

29 

LAST 

921 

15,2637 

01045 

1 

STORE 

CSFTEPl 

1487 

15,2640 

7 7 776 

1 

EXIT 

1488 

REF 

95 

LAST 

948 

15.2641 

0 5516 

0 

TC 

DOWNFLAG 

CLEAR  FREEFLAG  IN  CASE  CF  RECYCLE 

1489 

RFF 

8 

L A 

944 

1=,264? 

CCC14 

1 

ACRES 

FRFEFLAG 

1490 

REF 

1 

15,2643 

3 2 7 6 1 

0 

CA 

niSGRVER 

1491 

RFF 

287 

LAST 

954 

15  ,2644 

0 4616 

1 

TC 

BANKCALL 

1492 

REF 

38 

LAST 

954 

15,2645 

20  47  7 

1 

CACR 

GCFLASH 

1493 

RFF 

52 

LAST 

952 

15,2646 

C 6Cf  1 

c 

TC 

GCTCFCCH 

1494 

R = F 

1 

15,2647 

1 2652 

0 

TCF 

PPCGRAV 

VP33-PRCCEEC 

1496 

REF 

6 5 

I AST 

886 

15,2650 

C 55^4 

r 

TC 

UFFLAG 

VE32-RFGYCLE-STCRE  GRAV  ANC  CCI  IT  AGAIN 

149  6 

REF 

9 

1 AST 

958 

15  ,2651 

00014 

1 

ACP  FS 

freeflag 

AND  SET  FRFFFIAG  TC  Sfcv>  RECYCLE 

1497 

PFF 

92 

LAST 

944 

15,2652 

0 5 3 5 3 

1 

PREGRA V 

TC 

PFASCHNG 

1498 

15,2653 

04C24 

c 

CCT 

04024 

1499 

REF 

200 

LAST 

956 

15,2654 

0 6C42 

1 

TC 

TNTPRET 

1500 

15,2655 

77775 

1 

YLCAC 

1501 

REF 

8 

LAST 

957 

15,2656 

0276  1 

0 

ST4RSAV1 

1502 

REF 

7 

LAST 

95  7 

1 5,2657 

02231 

0 

STCRF 

GSAV 

150  3 

15, 266C 

77  7 76 

1 

EXIT 

1 50  4 

PCF 

1 

15,2661 

3 4751 

0 

CAF 

FREEFBIT 

IF  FREEFLAG  SET,  RE-CCNRLTE  GRAVITY. 

1505 

RFF 

28 

1 AST 

900 

15,2662 

7 0074 

0 

NASK 

FLAGWRDO 

1 506 

PEP 

287 

L AST 

954 

15,2663 

10  CCC 

0 

CCS 

A 

1 5''! 

PFF 

1 

15,2664 

1 2561 

0 

TCF 

GVOETER 

SET 

150  8 

RFF 

1 

15,2665 

1 3 536 

c 

ICF 

ATTCHK 

EXIT  FRCP  GVCETER 

1 509 

15, 2666 

77220 

1 

LUMG 

STQ 

VLOAO 

1510 

PEF 

14 

LAST 

952 

15,2667 

C2745 

0 

CN  IN 

1 511 

RFF 

4 

LAST 
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15,2670 

2 400  7 

0 

ZERCVEC 

1 “^l? 

PEF 

1 

1 5 ,2671 

02  70  7 

0 

STORE 

GAGC 
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15,2672 
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1 

EX  IT 
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PEF 

93 

LAST 
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15,2673 

0 5353 

1 

TC 
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151  5 

15,2674 

04024 

0 

OCT 

0 4024 

1516 

RFF 

201 

LAST 
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15,2675 

0 6042 

1 

TC 

I NT  fret 

1517 

15,2676 

77624 

1 

CALL 

151P 

REF 

4 

LAST 

945 

15,2677 

31557 
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CCAPSE 

1519 

15, 2700 

7 7776 

1 

EXIT 

1 520 

REF 

1 

15  ,2701 

3 2760 

1 

CA 

T /?src 

1521 

REF 

8 

LAST 

955 

15,2702 

55*736 

0 

TS 

GCTR 

1522 

REF 

4 

LAST 

855 

15,2703 

3 772  1 

1 

CA 

PRIC31 

1523 

REF 

10 

LAST 

045 

15  ,2704 

55*074 

1 

TS 

1/PIPADT 

1524 

RFF 

288 

LAST 

956 

15,2705 

0 46  16 

1 

TC 

PANKCALL 

152  5 

REF 

1 

15,2706 

IS?"? 

c 

CADR 

GCCNPZER 

INITIALIZE  CCNPENSATICN 
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REFMF 

1725 

15,3171 

77  776 

1 

P57PCST 

EXIT 

1726 

REF 

3 

LAST 

935 

15 , j 172 

3 579  1 

0 

CAP 

OCT  19 

1727 

RFF 

299 

LAST 

963 

15 ,31 75 

C 96  16 

1 

TC 

BANKCALL 

172  8 

REF 

9 

LAST 

993 

15,3179 

206  29 

0 

CADR 

GCPERFl 

1 729 

RFF 

59 

1 AST 

963 

15,3175 

1 6001 

1 

TCP 

GCTOPCDH 

173T 

RFF 

2 

LAST 

969 

15,3176 

1 3 599 

0 

TCP 

P57  JURF 

1731 

RFF 

99 

LAST 

921 

15,3177 

9 9752 

1 

CS 

B IT2 

1 732 

REF 

10 

LAST 

969 

15,3200 

6 1199 

1 

AC 

OPT  ICN2 

1733 

]5,32C1 

0 C0C6 

1 

EXTEND 

1 739 

15,32  12 

1 3 2)9 

0 

PZ  F 

+ 2 

1 739 

RFF 

95 

LAST 

969 

15,3203 

1 6 1 U 

1 

TCF 

GCTCPrCH 

1 736 

RTF 

99 

L AST 

969 

15, 32'"9 

0 5353 

1 

TO 

PHASCHNG 

1 737 

15,3205 

09  129 

0 

CGT 

09029 

1738 

REF 

210 

LAST 

969 

15,3206 

(.  6C92 

1 

TC 

I NTPFET 

1 739 

15, 32'7 

95175 

0 

VIOAO 

CAl  1 

1790 

RFF 

P 

LAST 

95E 

15,3210 

02  231 

0 

GSAV 

1791 

RTF 

3 

LAST 

812 

15,3211 

97663 

1 

CrL=XNPSN 

1792 

15,3212 

93  105 

1 

VXM 

SET 

1 793 

RFF 

= 0 

LAST 

969 

15,3213 

01739 

c 

RFFSMHAT 

1 799 

RFF 

5 

LAST 

925 

15, 3219 

'1963 

1 

L LN'AFl  AG 

1 79*; 

15,3215 

51515 

1 

PFVL 

ABVAL 

1796 

RFF 

K 

lAST 

9 2 5 

15,3216 

02023 

1 

RLS 

1797 

15,3217 

9556  1 

1 

VXSC 

STADR 

1798 

RTF 

6 

lAST 

925 

15 , 3220 

75795 

0 

STCRE 

ALPHAV 

1799 

15,3221 

97''  19 

1 

CLEAR 

RTB 
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IF  OPTION  ZERO  DC  FINISH 

IF  INITIAL  FLAG  SET,  RE-CVCLE. 

ITS  SET 

GO  GET  ATTITLCE  VEC  IN  NF ( YNBSA V , XN E SA V ) 
niSPLAV  VECN2E  CHK  CCCE  19 


VB39-TERNINATE 

VE33-FRCGEEC  TO  PE-ALIGN 

TEST  TC  SE  IF  aligned  EV  CPTICN  2 


VES-GC  rXLCLLATE  LANDING  SITE 
NG-EXIT  F57 
RESTART  place 


LSE  GNB 

GC  TC  SN  CCCPCS 

CN  RCCN  SO  S>^T  LLNAFLAG 
G(REF)  = (REFSMMAT)T  (NBSHIGNB 


ALPHAV 


RLSNAG  X.  G ( REF  ) 
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L F51-P53 


1750 

REF 

3 

LAST 

9?  5 

15,3222 

C0662 

0 

ERACFLAG 

1 751 

PPF 

27 

LAST 

949 

15,3223 

21574 

1 

LCADTIPE 

1 752 

15,3224 

77624 

1 

CALL 

1 753 

PEP 

2 

1 AST 

925 

15,3225 

3044T 

1 

N89CISP 

1 754 

PEE 

15 

1 AST 

874 

15, 3226 

01220 

<; 

STORE 

RN 

17*^5 

15,3227 

65352 

0 

VSL2 

POOL 

1 756 

REF 

19 

LAST 

953 

15,3230 

C1242 

1 

GCT/2  +4 

1757 

15,3231 

77606 

1 

PLSH 

1 75E 

RFF 

23 

LAST 

894 

15,3232 

35234 

1 

STCAL  L 

F IPT  IPE 

1759 

PFF 

2 

LAST 

784 

15, 3233 

51677 

0 

R-TC-PP 

1 76m 

PEF 

11 

LAST 

964 

15,3234 

02028 

1 

STORE 

RLS 

1761 

15,3235 

77776 

1 

EXIT 

1762 

RFF 

56 

L AST 

964 

15,3236 

1 600  1 

1 

TCF 

GCTOPCCH 
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TIPE  TEVP  STORED  IM  N89CISP 
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RLS  PACK 
IN  PCLIST 


EXIT  f57 
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L P51-P52 


PI  763 

CGARSE 

ANC  FINE  ALIGN 

INU 

176A 

15,3237 

75  160 

1 

CCATP  IN 

AXC  , 1 

Axr,2 

1765 

RTF 

5 

L AST 

966 

15, 326C 

C2666 

1 

XCC 

1766 

REF 

2? 

LAST 

957 

15 ,326  1 

02662 

0 

X SM 

1 767 

15,3262 

77626 

1 

CALL 

1 768 

REF 

6 

LAST 

966 

15, 3263 

3 137  1 

0 

MATmcvE 

1 76S 

15,3266 

77626 

1 

CALL 

1770 

P.EF 

8 

LAST 

96C 

15,3265 

67  56  1 

1 

CCLTR  IG 

1 771 

15, 3266 

77626 

1 

CALL 

1772 

RFF 

6 

LAST 

96C 

15,3267 

20C30 

0 

CALCSNSC 

1773 

l=,325r 

776  26 

1 

CAL  L 

1776 

RFF 

6 

1 AST 

957 

15,3251 

67355 

1 

CALCGA 

1 775 

15,325? 

776  16 

0 

eCFF 

EXIT 

1776 

RFF 

2 

1 AST 

963 

15, 3253 

06355 

c 

I M TALGN 

1777 

R = F 

1 

15,3256 

33266 

0 

OCRS  IT 

1778 

RTF 

6 

1 AST 

963 

15,3255 

3 5C1C 

0 

CAE 

V06N2? 

1770 

RFF 

295 

LAST 

966 

15,^256 

0 6616 

1 

TC 

BANKCALL 

1780 

rIf 

60 

LAST 

96  3 

15,3257 

20677 

1 

CAER 

GCFLASH 

1781 

RFF 

E7 

L AST 

96E 

15,3260 

C 6CC1 

c 

TC 

GCTCPrOH 

178? 

15,3261 

1 3263 

1 

TCF 

+ 2 

1783 

15,326? 

1 3255 

1 

TCF 

-5 

1 786 

REF 

100 

LAST 

966 

15, 3263 

0 5353 

1 

TC 

PHASCHNG 

1 785 

15,3266 

06026 

0 

CCT 

06026 

1786 

RFF 

2 1 1 

LAST 

966 

15,3265 

0 6C62 

1 

TC 

1 NTPPET 

1 787 

1 5,3266 

77626 

1 

CORS  IT 

CALL 

1788 

REF 

R 

LAST 

95E 

15,3267 

31557 

1 

CCARSE 

1789 

15,3270 

776  26 

1 

CALL 

1790 

REF 

6 

LAST 

963 

15,3271 

31603 

0 

NCOARSE 

1791 

15,3272 

77626 

1 

CALL 

1 792 

RFF 

1 

15,3273 

32  766 

0 

GYPCTRl  N 

1 793 

15,3276 

77650 

1 

GCTO 

1796 

REF 

2 

LAST 

963 

15,3275 

33166 

r 

SLPFCISF 

1795 

15,3276 

01535 

0 

CISPGYRC 

VN 

0693 
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IF  INITIAL  ALG^^'E^T  GISFLAY  FINAL 
GIMBAL  ANGLES  IF  COARSE  ANGLES  GREATER 
TFAN  5 CEGREES 


GAP: 
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L P=l-P53 


FI  796 

ILNAC  SURFACE 

IMU  i 

AL  IGNMFNT  1 

program 

179  7 

REF 

296 

LAST 

966 

15 ,3277 

0 4616 

1 

P57 

TC 

8ANKCALL 

1 798 

REF 

2 

LAFT 

943 

15,3300 

33635 

1 

CADR 

I MUCHK 

1799 

FFF 

27 

1 AST 

92  1 

15,330] 

3 6250 

0 

CAF 

THFEE 

1800 

RTF 

11 

1 AST 

964 

15 ,8302 

55' 144 

0 

TS 

OPT  ICN2 

1801 

REF 

46 

LAST 

962 

15, 3 3'^3 

3 4753 

1 

F57CFT 

CAF 

PITl 

18C2 

PFF 

297 

LAST 

967 

15  ,3304 

0 4616 

1 

TC 

3ANKCAL  L 

1 Pi’'P 

FFF 

2 

LA'T 

921 

15,3305 

20714 

1 

CACF 

GCPEP94R 

1 804 

OFF 

58 

LAST 

966 

15,3306 

C 6CC  1 

0 

TC 

GCTCECCH 

1 805 

PFF 

1 

15, 3 30 7 

1 3314 

0 

TCF 

ALIGNCPT 

1 806 

OCf 

1 

1=, 331C 

1 33C3 

c 

TCF 

F57CFT 

1 807 

RFF 

I U 

L AST 

966 

15,3311 

0 5353 

1 

TC 

PHASCHNG 

1800 

15,3312 

00014 

1 

CCT 

00014 

1809 

REF 

142 

LAST 

959 

15,3313 

0 5 155 

c 

TC 

ENCCF JCB 

1 810 

RFF 

12 

1 AST 

967 

15,3314 

3 1 144 

1 

Al IGNCPT 

CA 

OPTI0N2 

18  1 1 

RFF 

2F 

LAST 

967 

15,3315 

7 62  50 

1 

MASK 

THREE 

1812 

R::F 

290 

1.  AST 

964 

15,3316 

50  OOO 

1 

INDEX 

A 

1813 

15,3317 

1 332  ) 

1 

TCF 

+ 1 

1814 

REF 

1 

15,3320 

1 3 33? 

0 

TCF 

TCISP 

1 815 

REF 

I 

15,33.-’  1 

1 3374 

0 

TCF 

PACKOPTN 

1816 

REF 

2 

LAST 

967 

15,3322 

1 3 303 

0 

TCF 

P570PT 

1817 

REF 

2 12 

LAST 

966 

15, 3323 

0 6042 

1 

TC 

I NTPPET 

1 81  F 

1 5 ,3324 

75160 

1 

AXC,  1 

AXC  ,2 

1819 

REF 

E 1 

LAST 

964 

15, ’325 

C 1 7 3 3 

1 

REFSMMAT 

1 820 

PFF 

12 

LAST 

964 

15, 3326 

C36C6 

1 

XSMP 

1821 

15 ,3327 

77624 

1 

CAl  L 

1822 

REF 

7 

LAST 

966 

15,3330 

31371 

c 

MATMCVE 

1 823 

15,3331 

77650 

1 

GOTO 

1 824 

REF 

2 

1 AST 

96  7 

15,3332 

33373 

0 

FACKC  FTN 

1825 

R -F 

2 13 

1 AST 

967 

15,3333 

C 6..'42 

1 

TDISP 

TC 

I NTPRET 

1 E26 

15,3334 

77745 

1 

CLOAC 

1827 

REF 

36 

L A'T 

832 

1 5 ,3  335 

C3442 

0 

TIC 

1828 

PEE 

30 

LAST 

958 

15,3336 

010  4 5 

1 

P 57A 

STORE 

DSPTEWI 

1E29 

15,3337 

77776 

1 

EX  IT 

1831 

RFF 

2 

LAST 

921 

15, ’340 

3 2170 

0 

P57AA 

CAF 

V06N34« 

1831 

P = F 

298 

LAST 

°67 

15, ’341 

L 4616 

1 

TC 

BANKCALL 

1832 

P-^F 

A] 

LAST 

966 

15,3342 

2C477 

1 

CACR 

CCFLA9H 

1 833 

PFF 

59 

1 AST 

967 

15, ’343 

1 600  1 

1 

TCF 

GCTCECCH 

1 634 

15,3344 

1 3346 

1 

TC  F 

♦ 2 

1 8 35 

REF 

1 

15,3345 

1 3 34) 

1 

ICE 

P57AA 

1 836 

P'‘F 

214 

1 AST 

967 

15, 3346 

0 6042 

1 

TC 

1 NTPRET 

1 E37 

15,3347 

65234 

1 

PTP 

PCDL 

1838 

REF 

28 

LAST 

965 

IS  3350 

21574 

1 

ICADT I ME 

1 839 

RFF 

31 

L AST 

967 

15,  ’351 

01045 

1 

DSPTENl 
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■P53 

LSFR*S  PAGE  NP.  5C  E5  S3 

18  AO 

15,3352 

65254 

1 

BZF 

FOOL 

1841 

DCp 

1 

15,3353 

33363 

1 

P57C 

IF  KEV  IF  TIFF  ZERC-T AL  IGF  = CURREFT  TIFF 

18A? 

15,3354 

51  925 

1 

rsu 

BPL 

NOT  ZERO  SC  EXCHANGE  PC  KITH  CSFTEFl 

1843 

pt^F 

32 

1 AST 

967 

1 C ^ -3  -3  C C 

C 1045 

1 

C SPTFFl 

1 E44 

REF 

2 

LAST 

968 

15,3356 

33363 

1 

P57C 

1845 

1 5,3357 

45  545 

1 

CLFAC 

STACR 

IF  KEYTF  time  GREATER  THAN  CLRRENT  TIME 

1 846 

RFF 

37 

LAST 

967 

15,3360 

7433  5 

1 

STORE 

TIG 

STCRF  IT  IN  T IG 

1647 

REF 

8 

1 AST 

925 

15,3361 

36775 

1 

STCALL 

TAL  IGN 

1848 

RTF 

1 

15,3362 

•a  3 Q ^ c 

1 

P57C 

1 349 

15, 3363 

45545 

1 

P 57C 

DLOAO 

STADR 

1850 

RFF 

c 

LAST 

96  6 

15,3364 

75C02 

1 

STCRF 

T AL IGF 

1851 

OFF 

49 

LAST 

947 

15,3365 

3404  1 

0 

P 57D 

STCAl  1 

TCFCl 

1852 

REF 

11 

1 AST 

928 

15 ,3  366 

27069 

1 

1 EFIPREC 

CCFFLTE  DESIRED  I FU  CRIENTAIICN  STCFE 

1853 

15,3367 

5 3=75 

0 

VLCAC 

UMT 

IN  X,Y,  ZSMD 

1854 

RFF 

32 

L AST 

947 

15,3370 

core  1 

0 

RATT 

1 655 

POF 

13 

1 AST 

967 

15,3371 

3?6  )7 

1 

STCALL 

XSMD 

1856 

REF 

2 

LAST 

92  5 

15,3372 

10775 

0 

LSCPIENT 

1 857 

15, 3373 

77  776 

1 

EXIT 

1858 

REF 

163 

LAST 

962 

15 , 3374 

3 4755 

1 

P^CKCFT^ 

CAF 

ZERO 

PACK  FLAG  BITS  FGR  OPTION  DISPLAY 

1856 

RFF 

2 

1 AST 

306 

15,3375 

K 5 t L 4 4 

0 

TS 

CFTICM  +l 

JAF  ZEPf  IN  ALIGNMENT  CFTION 

1 66C 

REF 

3 

LAST 

968 

1 5 ,3  376 

55*145 

1 

TS 

nPTICNl  *-2 

INITIALIZE  FLAG  PIT  C C N F I G LR A T 1 C N 

1861 

RFF 

4 

LAST 

9 59 

15,3377 

3 4737 

0 

CAF 

REFS^'P  IT 

1 862 

prf 

16 

LAST 

050 

15, 3490 

7 CQ77 

0 

FA  SK 

FLAGV-RD3 

PFFSFFLG 

1 663 

RCF 

291 

LAST 

967 

15,34)1 

10  000 

0 

CCS 

A 

1864 

REF 

34 

LAST 

9 5 3 

15,3402 

3 4145 

c 

CAF 

BIT? 

SET 

1 865 

RFF 

4 

LAST 

968 

15, 34C3 

27  ' 145 

1 

ADS 

OPTICM  +2 

CLEAR-JLST  ZERC 

1 866 

OFF 

1 

15,3404 

3 4 753 

1 

CAF 

ATTFLBTT 

1867 

OFF 

13 

LAST 

860 

15,3405 

7 102 

0 

NASX 

F L AGFFD6 

ATTFI C 

1 668 

RFF 

292 

last 

968 

15  ,3406 

10  000 

0 

CCS 

A 

1869 

RFF 

39 

LA  ST 

913 

15,3407 

3 47  5i) 

1 

CAF 

R IT4 

SET 

1 8 70 

RFF 

5 

L AST 

968 

15, 34  10 

27*145 

1 

ADS 

OPTICM  +2 

CLFAP-ZEFC  IN  A 

1871 

OFF 

4f; 

1 AST 

968 

15,3411 

3 47  50 

1 

CAF 

B IT4 

1872 

RRF 

LAST 

968 

15,3412 

55*  143 

1 

IS 

CFTl  CM 

JAF  OCCIC  IN  CPTICNI  FCP  CHECK  LIST 

1873 

OFF 

1 

15,3413 

3 3634 

0 

DSPOPTN 

CAF 

V805NC6 

display  cfticn  codf  anc  flag  bits 

1874 

REF 

299 

LAST 

967 

15,3414 

0 4616 

1 

TC 

PAFKFALL 

1875 

RFF 

42 

1 AST 

967 

15, 3415 

2047  1 

1 

CACR 

GCFLASh 

1876 

RFF 

60 

LAST 

967 

1 5 , 3416 

1 600  1 

1 

TCF 

GOTOPOOH 

YB34-TERFINATE 

1 6 ? 7 

1 = , 3 4 1 7 

1 3421 

1 

TCF 

+ 2 

V33-PPCC6EC 

1 878 

RFF 

1 

15,3420 

1 3413 

0 

TCF 

0 SPQPTN 

V32-RECYCLE 

1 679 

Rf^F 

5 

LAST 

966 

15,3421 

3 4 73  7 

0 

CAF 

REFSF3TT 

1880 

RFF 

17 

1 AST 

968 

15,3422 

7 CC7  7 

c 

FASK 

FLAGV)PC3 

1 881 

REF 

293 

LAST 

968 

15,3423 

10  0 J ) 

0 

CCS 

A 

1882 

RFF 

1 

15,3424 

1 3524 

0 

TCF 

GETLFATT 

SET,  GC  COMPUTE  LM  ATTITUDE 

1883 

RRF 

2 

LAST 

966 

15,3425 

3 4 753 

1 

CAF 

attflpit 

CLEAR-CHECK  ATTFLAG  FOP  STPPFC  ATTITUDE. 

16  64 

RCF 

14 

LAST 

968 

1 5 ,3426 

7 0102 

0 

^'ASK 

FLAGWRD6 

1665 

RFF 

294 

LAST 

96  f 

15,3427 

1C  000 

c 

CCS 

A 

1 886 

RFF 

1 

15, 3430 

1 3 530 

c 

TCF 

B VLMATT 

ALLFLG  SET,  CHK  CFTICN  FOR  GRAVITY  CCFF 

1 687 

RFF 

45 

1 AST 

96  4 

15,3431 

3 4752 

0 

CAF 

BIT2 
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1 888 

PEF 

13 

LAST 

967 

15,3932 

7 1199 

0 

MASK 

OFTl CA2 

1889 

PEP 

295 

LAST 

968 

1 5 , ’933 

10  000 

0 

CCS 

A 

1890 

RFF 

2 

LAST 

968 

15, ’939 

1 3530 

C 

TCF 

BY  L MATT 

1891 

REF 

39 

LAST 

952 

15,3935 

0 5 56  7 

C 

TC 

ALARM 

1892 

15,3936 

00701 

1 

CCT 

701 

1893 

RFF 

3 

LAST 

952 

15,39’7 

’ 50C6 

1 

CAF 

Ve05NC9 

1 899 

RFF 

300 

LAST 

96  8 

15  ,3990 

0 9616 

1 

TC 

BANKCALL 

1895 

RFF 

L 1 

LAST 

966 

15,3991 

20977 

1 

CACR 

GGFLASP 

1896 
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1 
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POOL 
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15,3463 
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0 

0 
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14 
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97F 

15,3464 
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TSIGHT 

191  6 
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0 

PUSF 

CALL 

1917 

RFF 

5 

LA  ST 

97C 

15  ,3466 

5 97  16 

1 

R F-TC-R 

191  R 

REF 

3 

1 AST 
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F IN 
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AAD 

ZNBSA Y 

1922 

15.3A71 

A5C20 
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STO 

CALL 

1922 

prp 

lA 

LAST 

97C 

15  ,3A72 

C2  7A6 

0 

CRAJ 

192A 

REF 

9 

LAST 

966 

15,3A72 

A75A1 

1 

CDLTRIG 

GET 

SIR  arc 

CCS 

CF  CDUS 

192^ 

15  ,3A7A 

A023A 

0 

rtr 

SETPO 

1926 

PPF 

30 

LAST 

97C 

15 ,3A75 

2157A 

1 

LCADT  INE 

1 92  7 

15, 3 A 76 

COOO  1 

C 

0 

1928 

prc 

15 

1 AST 

97F 

1 5 ,3A77 

37  562 

1 

STCALL 

TSIGHT 

192^ 

RFF 

5 

LA  ST 

966 

1 5, 35CC 

2CC30 

0 

CALCSRSC 

GFT 

YRE  IN 

SR 

19:50 

15,  BS^’l 

61375 

1 

VI  CAD 

VXR 

193  1 

RFF 

A 

LAST 

960 

15,3502 

02673 

1 

YRB 

1932 

PFF 

52 

1.  AST 

967 

15, 3503 

0173A 

c 

RCPSRRAT 

YNE  TC  FEF 

1933 

15 ,35  'A 

65256 

0 

UN  IT 

PCDL 

192A 

REF 

16 

1 AST 

971 

15 ,35C5 

03562 

0 

TSIGFT 

1935 

15, 3506 

A 5 10  6 

0 

PISH 

CALL 

1936 

RFF 

3 

LAST 

965 

15 ,3507 

51677 

0 

R-TO-RP 

1937 

RFF 

LAST 

2C3 

15, 3510 

2623  7 

c 

STOVL 

YNES  AV 

YAE 

TC  RF 

1 938 

RFF 

A 

LAST 

931 

15, 351  1 

0270  1 

c 

ZNB 

1939 

15,3512 

53505 

1 

VXR 

UMT 

19AI) 

RcF 

9 3 

1 AST 

97  1 

15,3513 

C173A 

0 

REFSRRAT 

ZAE 

TC  REF 

19A1 

1 5 , 3 5 1 A 

A1525 

0 

PCDL 

PUSH 

19A? 

PFF 

17 

LAST 

971 

15,35  15 

C 2 562 

0 

TSIGHT 

19A3 

15,3516 

7762A 

1 

CALI 

1 9AA 

RFF 

A 

LAST 

971 

15,3517 

5167  7 

0 

R-T'l-RP 

ZNB 

TC  MF 

19A5 

REF 

1 

15,3520 

C22A5 

0 

STCPE 

ZAtSAV 

19A6 

15, 3521 

7761A 

1 

SETGC 

19A7 

REF 

1 

15,3522 

03336 

1 

ATTFL  AG 

19AR 

REF 

15 

LAST 

971 

15,3522 

027A6 

c 
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1 950 

RFF 

215 

LAST 

967 

15,3529 

0 6)92 

1 

GETLMATT 

TC 

T NTPRFT 

19>=1 

15,3525 

77629 

1 

CALL 

195? 

REF 

3 

LAST 

96A 

15,3526 

3397  1 

r 

REFMF 

19  53 

15,3527 

77  776 

1 

EXIT 

195A 

REF 

66 

LAST 

95  E 

15,3530 

0 5509 

0 

EYLMATT 

TC 

UFFLAC 

1955 

R5F 

3 

LAST 

966 

15,3531 

0C2O5 

0 

ADRES 

I NT  TAIGN 

1956 

RFF 

97 

LAST 

96  7 

15,3532 

3 9753 

1 

CAP 

8 IT  1 

1957 

PPF 

19 

LAST 

969 

15,3533 

7 1199 

c 

MASK 

EFT ICN2 

1958 

RFF 

296 

LAST 

969 

15,3539 

10  000 

0 

CCS 

A 

1959 

REF 

2 

LAST 

95E 

15,3535 

1 2561 

0 

TCP 

GVPETER 

1960 

REF 

102 

L AST 

967 

15, 3536 

C 5353 

1 

ATTCHK 

TC 

PFASChNG 

196) 

15,3537 

09029 

0 

OCT 

09C29 

1962 

RFF 

3 

LAST 

966 

15,359C 

3 9 753 

1 

CAP 

ATTFLPIT 

1963 

REF 

15 

LAST 

968 

15,359  1 

7 0102 

0 

MASK 

F LAGV.R06 

1 969 

RFF 

297 

L AST 

972 

15,3592 

10  TOO 

n 

CCS 

A 

1965 

REF 

1 

15, 3593 

1 356C 

c 

TCP 

P57CPT0 

1 966 

RFF 
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L AST 

972 

15,3599 

.)  5353 

1 

P57JUMP 

TC 
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15 ,3595 
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0 

CCT 
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LAST 
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15,3596 
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r 

TC 

DCNNFLAG 
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L 
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15,3597 
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0 
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REF 

29 
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967 

15, 355C 

3 6 2 50 

c 

CAF 
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REF 

15 

LAST 

972 

15,3551 

7 1199 

0 

MASK 

CFTI CN2 

1972 

REF 

29F 

LAST 

972 

15,3552 

50  000 

1 

INCEX 

A 

1973 

15,3553 

1 3 55  9 

1 

TCF 

+ 1 

1979 

REF 

2 

LAST 

972 

1 5 ,3559 

1 3560 

0 

TC  F 

P570PTC 

1975 

RFF 

1 

15,3555 

1 3 60  1 
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TCF 

P570PT1 

1 976 

REF 

1 

15, 3556 

1 3617 

0 

TC  F 

P57CFT2 

1977 

RErF 

1 

15,3557 

1 3 620 

1 

TCF 

P570PT3 
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REF 
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1 AST 

968 
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1 AST 

967 
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REF 
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LAST 
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1 AST 
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R2C0C,  NARP  - L'FGS  - irCATP  SUN  ANC  RCCN  DATE  - 25  CCI  67 

R20T2  MOD  NO.l 

R2004  ROC  EY  NEVILLE  ASSERELY  SUNCANCE 

R2006  FUNCTICNAL  OFSCPIFTICN 


R2007  COMPUTES  UNIT  OOSITICN  VECTOR  OF  THE  SUN  AND  RCCN  IN  THE  BASIC  REFERENCE  SYSTEM.  THE  SUN  VECTOR  S IS 

P2rA9  ICCA7EC  VIA  TWO  ANCLES.  T(-E  F 1 RS"'’  ANG  L E (C  EL  I CU  IT  Y ) IS  THE  ANGLE  BETPEEN  THE  EARTH  ECLATCR  AND  THE  ECLIPTIC.  THE 

R201 1 SECOND  ANGLE  IS  THE  LONGITUDE  CF  THE  SUN  MEASURED  IN  THE  ECLIPTIC. 

R2012  T(-e  PrSITICN  VFCTCP  CF  THE  SUN  IS 
R201? 

R2iM4  S=(COS(LCS),  C C S ( C 61  ) * S I N ( LC  S ) , S I N ( 0 B L ) * S I N ( L C S I ) , IvHERE 


R2015 
P 201  6 
P20  I 7 


LCS=inS  +LCS  *T-(C  *S IN ( 2P I7T 1/366 .24  +C  *C0 S ( 2P I *T ) / 36 6. 2 4 ) 

3 P C 1 

LOS  (RACl  IS  THE  LCNGITLDE  CF  THE  SUN  ^CR  MIDNIGHT  JUNE  3CTh  CF  THE  PARTICULAR  -YEAR. 


R2019 
R 202O 
R2021 
R 2C22 
P2023 
P2024 
R 202-= 
P2026 
R2C28 
R2029 
R2U31 


0 

LOS  (RAD/DAV)  I « THE  REAM  RATE  FCF  THE  PAFTICULAR  YEAR. 

R 

LOS  AND  LCS  ARE  STCPED  AS  LCSC  AND  LCSR  IN  RATESP. 

0 P. 

CCS(CBL)  ANC  SIMCEL)  APF  STCREC  IN  THE  MATRIX  KONRAT. 

T,  TIRP  MEASURED  IN  0AYS(24  HCURSl,  IS  STCREC  IN  tirrf. 

C ANC  C ARE  FUDGE  FACTORS  TC  RINIMIZF  THE  CEVIATICN.  THEY  ARE  STCREC  AS  CNF  C C NSt ANT < C RED  1 , SINCE 
Cl  221/2 

C *SIN(Xl-fC  RCOS(X)  CAN  RE  WRITTEN  AS  (C  ■^C  1 #SIMX4FHI),  WHERE  PHI=APCTAN(C  /C  ). 

0 1 0 1 1C 


R2''33  THE  ^-CCN  IS  LCCATEC  VIA  FCUR  ANGLES.  THE  FIRST  IS  THE  OBLIQUITY.  THE  SECOND  IS  THE  RFAN  LCNGITLDE  CF  THE  MCCN, 

RZOBB  MFASURFC  in  THE  ECLIPTIC  FROM*  Th E MEAN  EOUTNCX  TC  THE  MEAN  ASCENDING  NCCE  CF  THF  LUNAR  ORBIT,  AND  THEN  ALCNG  THE 

R2037  CRBIT.  THE  THIRD  ANGLE  IS  THE  ANGLE  BETWEEN  THE  ECLIPTIC  AND  THF  LUNAR  CRBIT.  THE  FClRTH  ANGLE  IS  THE  LCNGITUCE 
R2039  OF  the  node  OF  THE  MCCN,  REASLREC  IN  THE  LUNAR  CRBIT.  LET  THESE  ANGLES  BE  ORLjLCM.Iv,  AND  LON  RF SP EC T T VE L V . 

R2D41  T’hE  SIMPLIFIED  POSITION  V^CTtr  qf  THE  MCCN  IS 

P2C42 

R204  3 M=(CCS(LOM|,  cost  0eL)*SIN(LCMl-STMCPU)*SIN{IM)4SlN(LrM- LON),  SlMrBL)4SIMLCM)-HCCS(C6L)*SIN(TMl*SIN(LCM-L0N)) 

R2045  WHERE 

R2C46  LCN^IOM  +ICM  X<T-(A  *SIN  2 P I *T  / P 7 . 5 54  5 ♦ A XC  C S ( 2 P 1 X T / 2 7 . 5 6 4 5 1 + P *SIN  2PIXT/32-HB  XC  C S ( 2F  1 * T / 2 2 ) I , ANC 

R2048  I R 0 1 0 1 

R2050  LCN  = trN  -H  C N 

R20E1  n R 

R2052  A , A , B and  B are  STORED  AS  AMOD  AND  BMIOD  (SEE  DESCRIPTTON  CF  CMCD,  ABCVE).  CCSICBLI,  S I N (C  PL  ) XS I N ( Im  ) , 
R2C54  CIO  1 

R2055  SIN'(OBL),  AND  CCS  ( CRl  I *S  I N ( IM  ) ARE  STORED  IN  KCNMAT  AS  K1  , K2  , K3  ANC  K4  , RESPECTIVELY.  LCM  , LCM  , LON  , LCN 
R2C57  ARE  STCREC  AS  LCmC,  LCMP,  LCNC,  AND  LONR  IN  RATESP.  CROP 

R2C5S  the  THREE  PHIS  ARE  STCREC  AS  AARG,  EAPC,  ANC  CARG(SUN).  ALL  CONSTANTS  ARE  LPCATEO  BY  YEAR. 

R2n61  C all  INC  SEQUENCE 
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P2062  CALL  LSPOS.  RETURN  IS  VIA  CFRET. 

R2063  ALARMS  CR  AEORTS 

R2C6A  NCNR 

R2065  ERASABLE  INITIALIZATION  REOUIREC 

R2066  TEPEEM  - TIPE  FPCM  MirMGHT  1 JULY  PRECEOING  TEE  LAUNCH  TQ  THE  TINE  CF  THE  LAUNCH  (NHEN  THE  AGC  CLOCK  WENT 

R 2068  TO  zero.  TEPHFM  IS  TP  WITH  UNITS  CF  C ENT  1 -S  ECC  N CS . 

R2P69  TIME2  ANC  TIMEl  APE  IN)  “PAC  ANC  MFAC  <-1  WHFN  FRCGRAN  IS  CALIFC. 

P2C7C  rLlPLI 

P2C7]  UNIT  POSITIONAL  VICTOR  CF  SUN  IN  VSUN.  (SCALFC  B-1) 

R2072  LMT  FCSITIONAL  VECTCR  CF  MCCN  IN  VMOON.  (SCALEC  B-1) 

R2C73  SUBROUTINES  LSEO 


R207A  NCNE 


R2A75  OF°RI' 


R?C76 

CURRENT 

COPE 

SET  , 

,WCRK  AREA 

207  7 

04,3011 

2C77C1 

RFF 

1 

15,?OU0 

2077C2 

15,3647 

2078 

REF 

6 

LAST 

955 

E5,  1714 

207PS 

RRF 

1 

20786 

RFF 

2 

L AST 

928 

15, 3647 

2C7S 

15,8647 

2080 

15,8650 

208? 

15,3651 

2CE3 

15,3652 

2084 

RFF 

•a 

LAST 

243 

15,3653 

?086 

RFF 

1 

15, 3654 

2CP7 

R-FF 

1 

15,3655 

2088 

1 =, 3656 

2089 

15.8657 

2090 

15.366C 

2091 

15,3661 

2092 

REF 

ll 

LAST 

963 

15 ,3662 

2093 

15,3663 

2094 

RFF 

1 

15,  3 664 

2C95 

RFF 

1 

15,3665 

2096 

15,3666 

20  = 7 

REF 

? 

LAST 

977 

15,3667 

2098 

R = F 

1 

15,3670 

pREEFL  AG 

BA  N K 04 
SETLCC  EPFEM 
BANK 


EBANK=  VSUN 
CruNT*  FT/EPFEM 


LLNPCS 

EQUALS 

LSPOS 

54 2 U 

0 

LSPOS 

SETPC 

SR 

0000  1 

0 

0 

206  1 7 

0 

140 

56371 

1 

TAC 

DDV 

01707 

C 

TEPHEN 

12024 

1 

C STODA Y 

00031 

0 

STCRF 

T IMEF 

77  17C 

1 

A XT  ,1 

AXT  ,2 

OOJOO 

1 

0 

OOOOO 

1 

0 

7 7 6 1 4 

1 

CLEAR 

00274 

0 

FREEFLAG 

7 7745 

1 

PCSn  A 

CLCAC 

12004 

0 

KCNMAT  +2 

0002  7 

1 

STCPE 

GTMP 

4C745 

c 

PCSl TP 

CLCAC 

ONF* 

00031 

0 

TIMFP 

12050 

1 

VAL67  +4, 1 

TF 

TINE  CF  LAUNCF 

24  HCURS-8640C00  C ENT T - SE C S/ C A Y B-33 
T IN  cays 


SWITCH  BIT 
ZFRCS 


T 

1/27  CR  1/32  OR  1/365 


977 
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20PP 

1 8,3671 

A266  1 

0 

SL 

DAD* 

2100 

15,3672 

2021  1 

1 

8C 

2101 

PEE 

2 LAST  977 

15,3673 

120A6 

0 

VAL67  +2,1 

AARG 

21. ‘•2 

15  ,367A 

A0756 

1 

S IN 

DMp# 

SIN( T/ 27+PHl ) CP  7/32  CP  T/365 

2103 

REF 

■a 

LAST 

S 7£ 

15 ,3675 

120  A A 

1 

V AL  67 ,1 

( A0**2  + A 1*=«2)  =1*1/25  INI  >+P(-IA) 

21  "A 

15, 3676 

620  1 5 

1 

CAD 

I NCR  ,1 

FLLS 

2105 

REF 

2 

LAST 

977 

15,3677 

0 )02  7 

1 

GTMP 

(B0**2  + P 1**2M*1/2SIN(>  + PHIB) 

2106 

1 5, 370C 

7777  1 

C 

CEC 

-6 

2107 

REF 

3 

LAST 

978 

15,3731 

■;'-’027 

1 

STORE 

GTMP 

CP  {CG**2+Cl**2)**l/2SIN(X+FhIC) 

210P 

15,  )702 

7761A 

1 

PCFSFT 

21.nq 

RFF 

12 

LAST 

977 

1 5 , ? 7 r 3 

CCC5A 

c 

F F E E F L A G 

2110 

REF 

1 

15,37  )A 

33666 

1 

PCSIT8 

2111 

15,37C5 

A07A5 

0 

PCSIT  C 

CLCAC 

DMF* 

2112 

REF 

3 

LAST 

977 

15,3706 

000  3 1 

0 

TIMER 

T 

2113 

RRF 

1 

15,3707 

657A7 

c 

RATESP, 2 

LOMR, LOSP, LQNR 

21  lA 

15.3710 

A 2 6 6 1 

c 

SL 

CAC=6 

211  5 

15, 3711 

20206 

1 

50 

2116 

REF 

2 

LAST 

976 

15,3712 

6 5 7A  1 

0 

PATESP  +6,2 

LCMO, LCSC.LCNC 

2117 

15,371? 

77625 

0 

csu 

2118 

RFF 

A 

LAST 

976 

15, 57  lA 

00027 

1 

GTMP 

2119 

REF 

1 

15,3715 

10021 

0 

STCRE 

STMP, 2 

LCM.LCS, LON 

2120 

15,3716 

63135 

c 

SLCAC 

I NCR  ,2 

2121 

REF 

1 7 

LAST 

957 

15,371 7 

000  50 

1 

X2 

2122 

15,3720 

77775 

1 

FFC 

-2 

2123 

15,3721 

5 3 0 1 5 

0 

CAD 

BZE 

212A 

REF 

1 

1 5 ,3722 

12026 

n 

RGB-  1 3 

PLLS  2 

2125 

RFF 

1 

15,372? 

3 ? 7 £ 3 

c 

PCSITE 

2NC 

2126 

15, 372A 

776AA 

1 

BPL 

2 127 

RFF 

1 

15  ,3725 

33663 

1 

PCS  ITA 

1ST 

2128 

15,3726 

A53A5 

1 

PCSI IF 

CLCAC 

OSL 

3RC 

2129 

RFF 

2 

LAST 

978 

15,3727 

000  21 

1 

STMP 

LCM 

2130 

RFF 

■a 

LAST 

976 

15,3730 

00025 

0 

STMP  +A 

LON 

2131 

15,3731 

65356 

1 

SIN 

PDDL 

SIMLCM-LCN  1 

2132 

RFF’ 

A 

1 AST 

978 

15,3732 

00.121 

1 

STMP 

2133 

1',  ’73? 

6 5 3 56 

1 

SIN 

PCDL 

SIN  LCM 

213A 

REF 

5 

L AST 

978 

15, 373A 

00021 

1 

STMP 

21-55 

15,3735 

555A6 

0 

CCS 

VCEF 

CPS  LCM 

2136 

15,3736 

5352  1 

1 

y\/ 

LNTT 

2137 

REF 

7 

LAST 

977 

15,3737 

1200  2 

0 

KCNMA7 

K1  ,H2  ,K3 ,KA  , 

21  38 

REF 

E 

1 A ST 

92F 

1 5 ,37AC 

02723 

0 

STCPF 

VMCCN 

2139 

15,37A1 

6 5 3A  5 

c 

DLCAC 

PODl 

21A^ 

RRF 

3 

1 AST 

978 

15 ,37a2 

1200A 

0 

KONMAT  +2 

ZERO 

21A1 

RFF 

6 

1 AST 

978 

15, 37A? 

0CC23 

c 

STMP  +2 

21  A2 

15, 37AA 

65  356 

1 

SIN 

POOL 

SIN  ICS 

21A3 

REF 

7 

1 AS! 

978 

15 ,37A5 

0C023 

0 

STMP  +2 

21AA 

15, 37A6 

5 5 5A6 

c 

CCS 

VDFF 

CCS  LCS 

21  A5 

15 ,37A7 

53521 

1 

MXV 

UNIT 

21A6 

RFF 

A 

LAST 

978 

1 5 ,375C 

1200  2 

0 

K CNMAT 

21A7 

REF 

7 

LAST 

977 

15,3751 

C2715 

c 

STORE 

VSLN 

21  A8 

15,3752 

77616 

0 

RVQ 
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979 


2149 
21  5C 

RFF 

5 

LAST 

978 

15,3753 
15 ,37  54 

77745 

12C04 

1 

0 

POSITF 

CLOAD 

KONMAT  +2 

ZFROS 

2151 

OEF 

5 

LAST 

978 

15, ’755 

CC027 

1 

STPPE 

GTMP 

2152 

15,3756 

776  50 

1 

GOTO 

2153 

RFP 

1 

15,3757 

33705 

0 

PPSITC 

21536 

RFF 

2 

L AST 

51 

C5, ?noc 

SETLCC 

EFHEM 

21537 

r>5  , 347? 

bank 

2153F 

OFF 

2 

LA  ST 

51  TO 

52  : 

52 

52* 

CCUNT* 

SJ/EPFEM 

2163 

0020 

STMP 

EOLALS 

16D 

2164 

0026 

GTMP 

EQUALS 

220 

2165 

CC3C 

TIMEP 

eclals 

240 

♦ ENP  OF  LFMP50S  .118  **>!' 
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POOOl 

R0002 

R0nO4 

PCC'"6 

R00f>8 

ROOn 

ROO  1 1 

POO  12 

ROri  3 

R0C14 

pon  5 

ROO  1 fc 

R0O17 

ROO  1 e 

ROOl  9 

R0020 

P002  I 

P0022 

R0023 

PQG2A 

P )0?9 

R0026 

R0027 

9002  8 

R CC29 

P0030 

R0031 

P0032 

R0033 

R0O34 

R0036 

R0038 

RCCAO 

RO^iA? 

R0043 

R0GA7 

P1048 

ROOA9 

ROO  90 

ROO  9 1 

R0052 

R00922 

R00529 

RC0926 

R0O53 

ROf'SA 

R0095 

ROO  5 6 

R009F 

R0099 


FRCGPAP  name-  CCPA  TFLFmeyPY  FPCGFAm 

MOC  N'O.-  0 Tf  GCMPLETFLY  REWRITE  THE  DOWN  TEIERPTPY  FPCGFAM  ANC  CCWNL  INK  ERASABLE  CUMP  PROGRAM  FOR  ThE 

PURPOSE  OE  SAVING  APPROXIMATELY  150  WORCS  OF  CORF  STORAGE. 

This  CHANGE  FECLIRES  AN  ENTIRELY  NEW  NFTHCC  OF  SPECIFYING  CCWNLINK  LISTS. REFER  TO  DOWNLINK 
LISTS  LOG  SECTION  FOR  MORE  DETAILS.  HCWEVEP  THIS  CEANGF  WILL  NOT  AFFECT  THE  GRCUNC  PROCESSING 
FF  CrWN  TELFmftRY  CATA. 

MOO  BY-  KTLROY,  SMITH,  DFwITT 
CATE-  (>2rCT67 

ALTHOPS-  KIIROY,  SMITH,  FEWItt,  CEWOLF,  FAGIN 
LOG  SFCTION-  DOWM-TELEMr try  PROGRAM 

FUNCTIONAL  CFFCPIPTICN-  Tf-IS  PCUTINE  IS  INITIATED  BY  TELEMETRY  ENC 

PULSE  FROM  the  CCWMINK  TELEMETRY  CCNVFPTFR.  THIS  PULSF  OCCURS 
AT  50  TIMES  PER  SECIEVERY  20  MS)  THEREFORE  CCOCWNTM  IS 
EXFCUTFO  AT  THFSF  RATES.  THIS  ROUTINE  SELECTS  THE  APPROPRIATE 
AGC  DATA  TO  BF  TRANSMITTED  DOWNLINK  ANC  LCACS  IT  INTO  OUTPUT 
CHANNELS  3A  ANC  35.  ThE  INFORMATION  IS  THEN  GATED  CLT  FPFM  THE 
LGC  IN  SERIAL  FASHION. 

THIS  program  is  C'DEC  FOR  A 2 SECCNC  DFWNLIST.  SINCE  OCWNPLFTS 
CCOUF'  every  ^OMS  ANC  2 AGC  COMPUTER  WORDS  CAN  BE  PLACED  IN 
CHANNELS  34  AND  35  CURING  EACH  CCWNRUPT  THE  PROGRAM  IS  CAPABLF 
OF  SENDING  20D  AGC  WORDS  EVERY  2 SECONDS. 
call ING  SFCUENCF-  NONE 

PROGRAM  IS  entered  VIA  TCF  CECCWNTM  WHICH  IS  EXECUTEC  AS  A 
RESIHT  OF  A nnwNRUPT.  CCNTROL  IS  RETURNED  VIA  TCF  RESUME  WHICH 
IN  EFFECT  IS  A RESUME. 

SUBROUTINFS  CALLED-  NCNE 
NCFMAL  FXTT  mocE-  TCF  RFSU«E 
ALARM  DR  ABORT  Exn  MCDO-  NCNE 
RESTART  PROTECTION: 

ON  A EPFSH  START  ANC  RESTART  THE  'STARTSUE*  SUBROUTINE  WILL  INITIALIZE  THE  DCWNLIST  F 0 T NT F P ( ACTU A L L Y 
DNTMGOTC)  TO  THE  BEGINNING  OF  THF  CURRENT  COW  NO  I ST ( I . E . CURRENT  CONTENTS  OF  DNLSTADR).  THIS  HAS  THF 
FFFFOT  OF  IGNORING  THE  REMAINDER  OF  THE  DOWN'LIST  WHICH  THE  DC W N -T E LE Mf T CY  FRCGRAM  WAS  WORKING  ON  WHEN 
THE  RFSTARTICR  FPESH  START)  CCCUPRFC  ANC  RESUME  DOWN  TELEMETRY  FROM  THE  BEGINNING  OF  1HE  CURRENT 
DOWN!  1ST. 

ALSC  OF  INTEREST  IS  THE  FACT  THAT  ON  A RESTART  THE  AGC  WILL  ZERO  CFWNLINK  CHANNELS  13,  34  ANC  35. 
DOWNLINK  1 1 ST  SELFCTICM: 

THF  /ippRppRTATF  CQWNIINK  LISTS  ARE  SELECTEG  EY  THE  FCLLCWING: 

1.  FRESH  START 

2.  V37EXXE  WHERE  xx  = THE  majcP  MCCE  EFING  SELECTEG. 

3.  UPDATE  PROGRAMIP27) 

4.  NCN-V37  SELECTABLE  TYPE  PPOGP AM$ ( E . C . AGS  IN  IT  I AL I Z AT  I CN ( SUND ANC E , L UM I NA R Y ) AND  P61-P62 
TRANSITTCNIGCLDSSLS)  FTC.). 

DOWN)  INK  LIST  RULFS  AND  LIMITATIONS: 

read  SECTIFN(S)  WHICH  FOLLOW  'CEERIS'  WRITEUP. 

OUTPUT-  EVERY  2 SFCCNOS  100  COLBLE  PRECISION  WCRCSd.E.  2C0  LGC 
CCMFUTER  WCPCS)  arc  TRANSMITTED  VIA  CCWNLINK. 

crasable  init ial izaticn  rtclireo-  none 

'CNTMCDTO'  AND  'CNLSTAnP*  ARE  INITIALIZED  BY  THF  FRRSH  START  PROGRAM. 

DEBRI  ' (ERASABLE  ICCATICNS  DFSTRCYEC  EY  THIS  FROCRAM)- 

LDATALST  ,DNTM3uFF  TD  ONTMBUFF  + 2 1C  , T M I NCE X , D N C . 
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L 

POOtS 

R0066 

o CCf  7 
POOffi 
ROOfO 
ROOTf 
R0O75 
RCf  76 
R0C77 
R0n78 
R0079 
R0080 
R90R1 
R00R2 
R008  ? 
POCPA 
R008b 
R 1086 
RQC87 
R0088 
R0CB9 
R0C9O 

RO091 
P0C92 
R0093 
R0094 
RCGPb 
R0096 
R0O97 
R009R 
Rono 
ROlOl 
R 0 n 3 
POl 

Roibe 

P31  )7 

RO  10" 

RQl  10 
Roll  1 
R0113 

ROllA 

R0116 

ROllR 


''n,A-TElE>'ETRY  PPCGPA''  LSER'S  PAGE  AC.  3 EO  S3 

COGHUMW  IS  ENTERED  EVFPY  20  fS  PY  4^  IMEPRUFT  TRIGGEREC  EY  ThE 
RECEIPT  OF  AN  ENFPUl  SE  *-'R0’'  TEE  SPACECRAFT  TELEMETRY  PRCGRAMMFR. 

NOTES  rfgaoCING  nrwMINK  L’STS  ASSCCIATEC  WTTF  This  PROGRAM: 

1.  OnwNLISTS.  - n^kNUSTS  MIST  BE  CCMPILFO  IN  THE  SAMF  BANK  AS  THE 
DCkN-TFLEMETRY  PRCGRAM.  THIS  IS  CONE  FOR  EASE  CF  CCOIMG,  FASTER 
E YECITTON. 

2.  FACH  CnwNLINK  LIST  CfNSI'^TS  OF  A CCNTRCL  LIST  ANC  A NUMBER  OF 
SLBLISTS. 

3.  A SLBLIST  PEFFPS  TO  A SNAFSHCT  CR  CATA  CCnnCN  TC  THE  SAME  CR  GThER 
CriNNLINK  I1ST9.  ANY  SUflLIST  CONTAINING  CCMMCN  CATA  NEEDS  TO  PE 
COOED  ONLY  ONCE  FCR  THE  APFLICAFLT  CCWNLINK  LISTS. 

A.  SNAPSHOT  SUBLISTS  REFER  SPECIFTCALLY  TC  HCMFGENCLS  CATA  L.HICH  MLST  EE 

savfc  in  a buffer  curing  one  COWNRUPT. 

E.  the  ICNACR  for  the  1ST  NCPC  CF  SNAPSHOT  CATA  IS  FCUNC  AT  THE  EMC 

OF  each  snapshot  SLBl  1ST,  SINCE  THE  PROGRAM  CODING  SENDS  THIS  DP  NCRC 
IVYfcIATFLY  AFTER  STCPING  THE  OTHERS  IN  THF  SNAPSHOT  BUFFER, 
f.  ALL  LIS'^S  are  CCmrINATICNS  OF  CCOFC  ERASABLE  ADDRESS  CONSTANTS 
CREATFC  FCR  THE  CCWNLIST  PROGRAM. 

A.  ICNADR  l-WCFC  CCNNLIST  ACCPESS. 

same  as  EC  ADR,  PUT  USED  FiHEN  THF  WORD  ADCRES5EC  IS  THE  LEFT 

HAL  F OF  A rCUEL F-PREC  IS  ION  WORT  FOR  CDWN  TELEMETRY. 

B.  20NADR  - 6DNA0R  N-HCRD  CCWNLIST  ACCFFSS,  N = 2 - 6. 

SAME  AS  ICNADR,  BUT  WITH  THE  A UNUSED  BITS  OF  THE  ECADR  FORMAT 
FILIFO  IN  HTH  DO"l-nini.  USEC  TO  POINT  TC  A LIST  OF  N COUELF- 
PPFCISION  WORDS,  STORED  CC N S EC LT I VF L Y , FCR  CCWN  TELEMFTRY. 

C.  CNCHAN  CCWNLIST  CHANNEL  ACCRESS. 

SAME  AF  ICNACP,  PLT  WITH  PCEFIX  BITS  'Ull.  USEC  TC  PCINT  to 
A PAIR  OF  CHANNEl S FOR  DOWN  TELFmFTPY. 

0.  CNPTP  CCWN  telemetry  SUBLIST  POINTER. 

SAMc  AS  CAF  RUT  TAGGED  AS  A CCASTANT.  USEC  IN  CCNTPCL  LIST  Tn  PCINT  TO  A SUBLIST. 

CAUTION A CNPTR  CANNCT  RE  USEC  IN  A SLBLIST. 

7.  Tj-f  v,rRo  ORDER  CCCE  IS  SET  TC  ZERO  AT  THE  BEGINNING  OF  EACH  COWNLIST  (I.E.  CCNTPCL  LIST)  ANC  WHEN 
A 'ICNADR  TIME2'  IS  DETECTED  IN  THE  CCNTPCL  LIST(CNLY). 

B.  IN  The  fnAPSHCT  SUELIST  only,  THE  CNACP'S  CANNCT  POINT  TO  THE  FIRST  WCFC  CF  ANY  FEANK. 

DOWNLINK  LIST  RESTRICTIONS: 

(The  following  POINTS  MAY  BE  LISTED  ELSEWHERE  BLT  APE  LISTEC  HERE  SC  IT  IS  CLEAR  THAT  THESE  THINGS  CANNOT  RF 
. CONE ) 

1 . SNAP  SHOT  DO WNL I ST  : 

(A)  cannot  COA'TAIN  the  following  ECADRSd.'-.  IDNADR'S):  , AOO , ICOO  , 1600,  20CD  , 2600  , 3000,  3600. 

(B)  CAN  CONTAIN  CNIY  ICNACR'S 

2.  ALL  CCWNLINKEO  CATA(EXC"PT  CHANNELS)  IS  PICKED  LF  BY  A <OCA<SC  CCWNLINK  LISTS  CANNCT  CONTAIN  THE 
ECUTVALENT  OF  THF  FCLLCWING  ECADRSd. E.  ICNADRS):  377,  777  , 137  7 , 1777  , 237  7 , 27777  , 3377  , 3777. 

(NCTP;  THF  TERM  ECUIVALENT  • MFANT  that  THE  ICNACR  TC  6DNADR  WILL  BE  PROCESSED  LIKE  1 TC  f ECACRS) 


R0120  3.  CCNTRCL  LISTS  ANC  SUPLISTS  CANNOT  HAVE  ENTRIES  = CCTAl  CCCCC  CR  OCTAL  77777 
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0 
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NFGONE 

1S:CS  AUG.  11  ,1S6S  SKIPPER 


097  PAGE  Se* 


USER'S  PAGE  NO.  5 FO  S3 

YES  - then  fetch  the  NEXT  2 SP  ViOPCS 

NEGATIVE  OF  T1YE2  lONACR 

(ECACR  OF  2776  + 7A00  1 = 77777  ) 

IS  THE  SUEL  1ST  IN  CCNTFGl 
YES 

ENACR  COUNT  eCACR  CECREmENTER 


n kill  FE  NEGATIVE  AT  ENC  CF  LIST 

IMTIALI  ZF  CTLIST  WITH 

STARTING  ADCRESS  CF  NEW  LIST 


SET  POINTER  TO  PICK  UP  NEXT  CTLIST  WCRD 
ON  NFXI  ENTRY  TC  PROG.  (A  SHCULC  NCT  =0 ) 
SET  riLlSl  TC  NEGATIVE  AND  F L AC E t C C C I N G ) 
UNCCNFLFNENTFC  CNACR  INTO  A.  (FOR  LA) 

(ST  IN  ) 
(CTLIST) 

SAVE  ONACR 

TEST  FOP  TIWE2  ( NSG.  CF  ECACR) 

CON'T  SET  WCRC  CRCER  CCCF 

MINUS  BIT  12  AND  lA  (CAN'T  GET  HERE) 

rON'T  SET  WORE  CPCFP  CCCE 

GC  SET  WCRC  CRCER  CODE  TO  ZERC. 

dFLCAC  a WITH  THE  CNACR. 

IS  THIS  A regular  CH/scR? 

YES.  (A  MUST  NEVER  PE  ZERO) 

NO-  IS  IT  A POINTER  (CNPTR)  CF  A 
CHANNEL(DNCHAN) 

IT'S  A POINTER.  (A  MUST  NEVER  EE  ZERO) 

(FXECLTEC  AS  >=XTENO)  IT  S A CHANNEL 

(EXECUTEC  AS  RRAC) 

(FXECUTEC  AS  EXTEND) 

(EXECLTEC  AS  READ) 

SET  (TNEOACR 
TC  MINUS 
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0209 
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E 
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984 
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1 

>CH 

CNECAOR 

HHILE  PRESERVING  t. 
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1 

05,3576 

1 3 700 

1 

TCF 

ONTMFXIT 
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0211 

05,3577 

C CC06 

1 
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PPF 
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0217 

RFF 
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R02?A  thF  FQLLOUING  COOIAG  (FPCM  SNAFLCCP  TO  SNAPEAOIS  FOR  TFE  PURPOSE  OF  TAKING  A SNAPSHOT  OF  12  DP  REGISTERS. 

R)2?6  this  :S  GOME  PY  SAVING  II  DP  REGISTERS  IN  CNTMBLFF  AND  SENDING  THE  FIRST  CF  KEPC  INNECIATELY. 

R022R  THE  SNAPSHOT  PROCFSSING  IS  THE  MGST  TIME  CONSUMING  ANC  THEREFORE  TFE  COOING  AND  LIST  STRUCTURE  KFRE  DESIGNEE 

ROPBA*  TO  MINIMIZE  TIME.  THF  Tjwp  OPTIMIZATION  RESULTS  IN  RUIFS  UNICUF  TC  THE  SNAFSHCT  FORTICN  OF  THE  DCRNUIST. 

R0232  THESE  PULES  APE 
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05,3663 

1 3 700 

1 

TCF 

CNTMEX ir 

0277 

REF 

8 

LAST 

986 

05,3664 

5 4 337 

1 

DCSUBLST 

TS 

SLBLIST 

0278 

RFF 

9 

LAST 

986 

05 ,3665 

5C  337 

0 

NEXT  INSL 

INDEX 

SLBL  1ST 

0279 

05, 3666 

C CCCC 

1 

C 

0 

0280 

ref 

3.18 

LAST 

986 

5,3667 

IC  COO 

0 

CCS 

A 

0281 

REF 

10 

LAST 

986 

05,3670 

24  33  7 

0 

INCR 

SUBLIST 

0282 

05,3671 

1 3675 

1 

TCF 

■^4 

02  83 

RPP 

11 

LAST 

986 

05,3672 

54  337 

1 

TS 

SUBLT  ST 

0284 

RFF 

5 

LAST 

986 

(5,3673 

3 7752 

1 

CA 

NEGCNF 

0285 

RFF 

12 

LAST 

986 

'■■5,3674 

56  337 

0 

XCH 

SLPL I ST 

P286 

REF 

3C9 

LAST 

986 

05 ,3675 

24  000 

1 

+ 4 

INCR 

A 

0287 

REF 

1 5 

LA^T 

986 

05,3676 

54  336 

c 

TS 

CNFCADR 

0288 

RFF 

3 

LAST 

984 

'5, 3677 

1 3 556 

c 

ICE 

SETWC  +2 

AC289 

A 1280 

02  91 

05,3700 

0 C0’06 

1 

CNTMIEXIT 

EXTEND 

0292 

REF 

1 

05, 37'’! 

01  034 

1 

WRITE 

DNTM'l 

0293 

REF 

173 

LAST 

986 

C5, 3702 

3 COO  1 

0 

CA 

L 

C2S4 

05,3703 

0 0106 

1 

TMEX  ITL 

EXTEND 

0295 

REF 

1 

(5 , 37P4 

01  03  5 

0 

WRITE 

DNTM2 

0296 

RPF 

21 

LAST 

816 

05,3705 

1 5270 

0 

TMR  ESLME 

TCF 

RESUME 

CS  AUG.  lltlSfF  SKIPPER  .097  PAGE  986 

USER'S  PAGE  NO.  7 EO  S3 

NCI  LAST  TVvC. 

YES,  LAST.  SAVE  A. 

SET  DNECAOP  AND 

SUELIST  POINTERS 

TC  NEGATIVE  VALUES. 


PICK  LP  FIRST  2 HCROS  CF  5NAFSFCT. 
NCW  GC  SENE  teem. 


SET  EEANK 

isolate  relative  address 
cfcrenent  count  anc  ecacp 


PICK  UP  2 CAT/-  WORDS 
NGN  GC  SEND  TMER. 

SET  SLCLIST  PCINTER 

= CA  SSSS  (SSSS  = NEXT  ENTRY  IN  SLBLIST) 
IS  IT  THE  END  CF  THE  SLEL 1ST 
NC- 
SA VE  A. 

SET  SLBLIST  TO  MINUS 
RETRIEVE  A. 

SAVE  CNAOR 

GC  USE  CfNNCN  CCCIN'GIPPCFLENS  WCULC 
OCCUR  IF  THE  PROGRAM  FNCCLNTEREC  A 
CNFTR  NOW) 

DCWN-TELEMETR\  EXIT 

TO  SEND  A + L TO  CHANNELS  3«  + 35 

RESPECTIVELY 


EXIT  TELEMETRY  PRCGRAM  VIA  RESUME. 


G4P:  /SSSEPBLE  REVISinN  lit  CP  ACC  PRCGRA”  LLMINARY  BY  ^ASA  2Q2U12-071 

I.  r:CV.N- TELEMETRY  PPCGRAM 


19:09  AUC.  11. 

19t9 

SKIPPER 

.097  PAGE 

LSFR'  S 

PAGE 

NO.  e 

EO  S3 

0297 

REF 

2 

LAST 

53C 

77AA 

M INP12 

ECLALS 

-1/8 

0298 

REF 

7 

LAST 

985 

0336 

CNECACR 

ECLALS 

TMNDEX 

G299 

REF 

? 

LAST 

99 

0334 

CTLIST 

E CU  A L S 

LCATALST 

0390 

RTF 

2 

LAST 

IOC 

C3  37 

SLBLl ST 

ECLALS 

GFC 

R030l'5 

Mcr 

BY  - 

OFNSMCRF  - 

JUNC  1969  - 

eliminate  ERASABLE  DLMP 

CCUNT 

9E7 


gap: 


AS'JPf'fJLr  PFVISION  lie  TF  AGC  CRCGPAN  LLMNACY  EY  AASA  2021112-071 


19:09  AUG.  !l,19es  SKIPPER  .CS7  PAGE  SEE 


L cnviN-TEL  FMTTRY  PPOGR'y 


USER'S  PAGE  NO.  9 EO  S3 


PC3C1  SIEPCIUNF  NAPF-  CNnUNF 

R03O2  functional  OFSCRIPTICN  - TO  SEND  (CUYP)  ALL  8 BANKS  CF  ERASABLE  STCFAGF  TWICE.  BANKS  ARE  SENT  ONE  AT  A 

R03  )4  EACH  BANK  IS  RRECEECFC  °Y  AN  IC  WORE,  SYNCH  BITS,  ECAOR  ANC  TIHEl  FOLLCV-ff  8Y  THE  256C  WCRCS  CF  EACH 

P030f  FpAlKS  ART  CLKPEC  IN  CFCERII.F.  EEANK  0 FIRST,  THEN  EBANKl  ETC.) 

PT39B  CALLING  SFOUFMCF-  THE  GPOLND  CR  ASTRON'ALT  BY  K'^YING  YIAE  CAN  INITIALIZE  THE  CUHF. 

P03)0  AFTFR  Keying  in'  V74E  the  CUPRFNT  COWNL 1ST  WILL  BE  IMMEDIATELY  TERMINA1FC  AND  THE  DCWNLINK  ERASABLE  CLNP 

R03'2  WILL  BEGTN. 

R0313  CNCE  INITIATFC  THE  DCWNLINK  ERASABLE  OLMP  CAN  BE  TERMNATEC  (ANC  INTERPLFTEC  CCWNLIST  REINSTATEC)  CNLY 

RDlia  BY  THE  FCLLCWINC: 

P0316  I.  A FRESH  START 

P.03I7  2.  CC^FLETICN  OF  BOTH  CC«PLETE  DUMPS 

R032D  3.  AND  INVriUN TARI I Y BY  A RFSTART. 

P0321  NCF^'A!  EXIT  MOCF-  TCF  OA-PHASEl 
P0322  ALARM  CP  ABORT  MCFF-  NOME 

R0323  *SLBROLTINES  CALl.Ff-  NONE. 

R0324  FPASAFLE  INITIALIZATION  REQUIRED- 
RC325  NONF 

R0328  DEBRIS-  CLMPl.pr  , plmpSW,  DNTmGCTC,  EBANK  ANC  CENTOAL  REGISTERS 

P3329  TIMING-  TIMFIIN  SETS)  = ( ( NG  . DUMP  S ) 7 ( NO  . EB  ANK  S ) =1  (WCSPEREBANK  + NC.IDWDS))  / NC.WCSFERSEC 
R0331  TIMFIIN  serc)  = ( A ) * ( 3 ) >t  ( 256  + a ) / KC 

P'I333  thus  TIMFIIN  SECS  TC  SEND  DUMP  CF  ERASA81E  <*  TIMES  VIA  DCWNLINK)  = 83.2  SECCNCS 


R0335  'TRLCUPE  CF  DNE  EEANK  AS  IT  IS  SENT  EY  CCWNLINK  FROGRAM- 

R0336  (R EM  INDER-THI S ONLY  OESCPIPRS  FNE  CF  THB  B EPANKS  X A (DUMPS)  = 32  EPANKS  WFTCH  WILL  BE  SENT  BY  ONDL^P) 

R033R  COWNL TST  W 

RC33F  WORD  TAKEN  FPCM  DDATENTS  CF  EXAMPLE  n CDMMFNTS 


R.)3AD 
R0342 
R03AA 
P'13A6 
R03A7 
R0349 
R03S1 
RC353 
R03FA 
R03SS 
PO  356 


1 

ERASIU 

01  77X 

0 

OCWNL  1ST 

T.C.  FCR  CCWNLINK 

FRASABL  E 

CUMP 

( X = 7 CSM , ELM) 

2 

L CW IDCOO 

773A0 

1 

OrWNL I NK 

synch 

BITS. 

( SAME 

ONE  LSEC  IN  ALL  CTHEP 

CCWNL  ISTS  ) 

dlmplcc 

13AOO 

1 

(SEE  NCTDS  CN  CIMPLOC  ) 1=  3 

RC  ERAS  DUMP, 

34CC=ECADR  CF 

5IH  WC 

A 

T IMF  1 

14  1 20 

1 

TIME  IN 

cent  I SECONDS 

5 

F IRST 

WCRC 

DF 

EBANK 

X 

03400 

1 

IN 

THIS 

EXAMPLE 

THIS 

WCRD 

= ccntents 

CF 

E7,14C0 

( ECACR 

3400  ) 

6 

2ND 

WORD 

CF 

EBANK 

X 

00142 

1 

T N 

THIS 

example 

this 

WCRC 

= CONTENTS 

OF 

E7,14C1 

( ECADR 

3 40  1 ) 

7 

3FD 

WCRC 

OF 

EBANK 

X 

00  142 

1 

1 

1 

1 

1 

IN 

TH  I S 

EXAMPLE 

THIS 

WCRD 

= CCNTENTS 

CF 

E7 ,1402 

(ECACR 

3402  ) 

2600 

256TH 

WCRC 

CF 

EEANK 

X 

03777 

IN 

THIS 

EXA'^PL  E 

THIS 

WORD 

= COMENTS 

OF 

E 7 , 1777 

(ECAOR 

3777  ) 

RD353 
R035S 
R036^ 
R0361 
RD363 
R3365 
R 13  66 


NOTE-  DUMRLOC  CONTAINS  ThF  COLNTEP  AND  ECADP  FCR  EACH  WCRC  BEING  SENT. 

IHF  PIT  STRLCTURF  CF  CUMFLCC  TS  FCILOWS 

X = NCT  LSFC 

X ABC  FEE  RRRRRRRR  ABC  = ERASABLE  OLMP  CCUNTERd.E.  ABC  = 0,1,2  CR  3 WHICH  MEANS  THAT 

complete  ERASABLE  DUMP  NUMBER  1,2,3  OR  A RESPECTIVELY  IS  IN  FRCGRESS) 
FEE  = EBANK  BITS 

RRRRRRRR  = RELATIVE  ADDRESS  WITHIN  AN  FBANK. 


■>368 

R°F 

I E5 

LAST 

985 

05,3706 

336° 

RFF 

1 

05, 3707 

Q37G 

REF 

2 

1 AST 

984 

05,3710 

3 4755 

1 

CNCUM  F I 

CA 

ZFRC 

54  336 

C 

TS 

DLMPLCC 

0 375  1 

1 

+ 2 

TC 

°endic 

initialize  DCWNLINK 

FPASAELF  CUMF 

GO  SEND  ID  and  SYNCH  BITS 
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0371 

R8F 

1 

15,371 1 

3 3 720 

1 

CA 

LONOLMPl 

SET  CATMGCTC 

0372 

REF 

7 

LAST 

983 

<15 ,3712 

54  335 

0 

TS 

ONTMGOTO 

TC  LPCATION  FCR  NEXT  PASS 

0373 

REF 

16 

LA  FT 

948 

C8, ’7  13 

’ CC25 

0 

CA 

T IMFI 

PLACE  T IMEl 

03  7A 

REF 

174 

1 AST 

986 

08, 3714 

56  COl 

0 

XCH 

1 

INTC  L 

C37S 

PEE 

2 

LAST 

98F 

C5, 371 8 

’ 0336 

1 

CA 

CUMPCC 

AND  FCACR  CF  THIS  EBANK  INTC  A 

0376 

P9F 

4 

LAST 

986 

08,3716 

1 3700 

1 

IFF 

PNTMEXI T 

SEND  CUMFLCC  ANC  ttmFI 

03  7 7 

PFF 

1 

05,3717 

0372  1 

0 

L CNCUMF 

ACRES 

CN'CL'MP 

0378 

REF 

1 

08,3720 

03733 

0 

LCNDIJVPI 

ACPFS 

rNCUMFl 

0379 

PEf 

64 

LAST 

911 

'(8,372  1 

’ 4 7 52 

C 

ONDUMP 

CA 

TEQ 

lECPEMEAT  ECACR  IN  CUMFLCC 

03PO 

REF 

3 

LAST 

989 

05,3722 

26  336 

0 

ACS 

PUMPLCr 

TC  NEXT  CP  V,C1RD  TC  BE 

0381 

PFF 

8 

LAST 

986 

05,3723 

7 4-357 

c 

PASE 

LCE8 

CUMFEC  ANC  SAVE  IT. 

038? 

PFF 

311 

LAST 

986 

05,3724 

10  000 

0 

CCS 

A 

IS  THIS  THE  BEGINNING  CF  A NFV,  EEANE 

038’ 

PFF 

1 

05  ,3725 

1 3735 

1 

TCF 

nNTllMP2 

NC-  THEN  continue  PUMPING 

038A 

PFF 

4 

1 AST 

989 

05,3726 

3 0 3 36 

1 

CA 

PLMPLCC 

YES-  TS  THIS  the  ENC  Cf  TLE 

03E8 

REF 

38 

1 AST 

981 

15 ,3727 

7 4737 

1 

MASK 

B 1T13 

SECCND  CCMPlETE  ERASABLE  CLMF? 

0386 

C5,  ?73C 

C CCC6 

1 

ExTENC 

03  8 7 

RFF 

2 

LAST 

289 

>5, 3731 

1 3710 

0 

BZF 

PNDUMPI  +2 

NC  - GC  EACK  ANC  INITIALIZE  NEXT  BANE 

0390 

RFF 

2 

LAST 

223 

05,3732 

1 3507 

1 

TCF 

DNPHASE 1 

YES  - SEND  COk.NL  1ST  AGAIN 

1)391 

REF 

1 

05, 3733 

3 3 7 1 7 

C 

DNDLPFl 

CA 

LCNDLME 

SET  CNT^CCTC 

03°? 

PFF 

8 

LAST 

989 

’5,  3734 

54  335 

0 

TS 

DNTMGGTC 

FCF  V,CRDS  3 TC  2560  CF  CURRENT  EBANE 

0393 

RCF 

5 

LAST 

989 

05,3735 

3 1336 

1 

DNCUPF2 

CA 

CUMPLCC 

0394 

PEF 

88 

LAST 

986 

05,3736 

54  CC3 

c 

IS 

FBANK 

SET  EEANE 

0398 

RFF 

9 

t AST 

989 

05,3737 

7 4357 

0 

MASK 

LOWS 

ISOLATE  RELATIVE  ADDRESS. 

0396 

REF 

233 

LAST 

917 

C5, ’740 

54  CC2 

1 

TS 

Q 

(NCTE:  mask  INSTRUCTION  IS  LSEC  TC  RICE 

0397 

RFF 

23 

LAST 

921 

05,  374  1 

3 4 754 

c, 

CA 

NEGO 

LP  erasable  REGISTERS  SC  THAT  ECITING 

Cise 

PFF 

178 

LAST 

989 

C5, 374? 

54  001 

1 

TS 

L 

REGISTERS  2C-23  WILL  NCI  BE  ALTEPEC.l 

0399 

RFF 

234 

L AST 

989 

05, ’743 

51  CC2 

n 

INDEX 

C 

0400 

E3, 1403 

EBANK= 

14CC 

PICK  UP  LCVi  CROER  REGISTER  CF  FAIR 

040  1 

05,3744 

7 1401 

1 

MASK 

1 401 

CF  ERASABLE  REGISTERS. 

0402 

REF 

176 

L AST 

989 

''5,3745 

56  CO  1 

0 

XCH 

L 

0403 

REF 

235 

L AST 

989 

05 ,3746 

50  002 

0 

INDEX 

Q 

PICE  LP  FIGh  CROER  REGISTER  CF  FAIR 

04  ! 4 

05, ’747 

7 14C0 

c 

WASE 

14.)0 

CF  FRASAELF  PEGISTFRS. 

0408 

RFF 

22 

LAST 

086 

'340 

EBANE= 

PNTMBLFF 

0406 

PFF 

5 

LAST 

989 

05,3750 

1 3700 

1 

TCF 

DNTMEX IT 

GO  SENC  THEM 

'1407 

05,3751 

C CC06 

1 SEND  I C 

EXTEND 

**ENTRANCE  USEC  BY  ERASABLE  CUMP  PROG. ♦’A 

04' '8 

PFF 

9 

LAST 

989 

05,3792 

22  335 

1 

CXCH 

DNTMGOTQ 

SET  OMMGOTC  SC  NEXT  TIMF  FFCC  WILL  CC 

04719 

RFF 

1 

C5,3753 

3 501  1 

1 

CAE 

EPASIC 

TO  LOCATION  FOLLOWING  :TC  SENCIF: 

0410 

REF 

177 

1 AST 

989 

05, 3754 

54  COl 

1 

TS 

1 

OX'ENTPANCE  USEC  BY  REGULAR  CCWNL  INK  PGXA 

0411 

RFF 

2 

LAST 

984 

05  ,3  755 

0 3577 

1 

TC 

WOZERO 

GC  SET  WCRO  ORChR  CODE  TC  ZERC 

0412 

REF 

1 

C5, 3756 

3 2C65 

C 

CAF 

LCWICCCC 

PLACE  SPEC  lAL  IC  CODE  INTO  L 

0413 

.<FF 

1 78 

LAST 

9BS 

05,3757 

56  00  1 

0 

XCH 

L 

ANC  IC  pack  INTC  a 

04  1 4 

REF 

6 

L A ST 

989 

'-■5, 3 760 

1 3730 

1 

TCF 

CNTMFX IT 

SENC  CCWNLIST  ID  CODE ( S ) . 

4 
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POOOl 

THE  FCUriJlNG 

PFUTINE  CAN  BE  USEF  TO  CALL  A SLPROLTINE 

IN  ANOTHER  BANK.  IN  THE  BANKCALL  VEESICN,  TFE 

R 0001 

CADR 

OF 

7HF  SLRPOLTINF 

I PPEDI ATELY  FFl LCWS  THE 

TC  8ANKCALL  INSTRUCTION,  WITH  CIA)  A NO  CIL)  PRESERVEF. 

UTiS 

A616 

BLCCK 

02 

OOP  ^ i 

P'^F 

1 

COUNT  X 

1 1/BANK 

0006 

RFF 

6 

LAST 

4^3 

6616 

52  136 

0 

PANKC  ALL 

FXCF 

BUF2 

SAVE  INCCMINC  A,l. 

0007 

PEF 

2 36 

LAST 

989 

6617 

50  C>‘:2 

r 

INDEX 

0 

PICK  lf  caco. 

COCP 

662C 

3 0300 

1 

CA 

0 

0009 

Pcp 

237 

LAST 

99T 

66  2 1 

2‘S  C02 

C 

I NCR 

0 

SC  WE  RETURN  TC  The  LCC.  AFTER  TFE  CACR 

RPO)  0 

SWCALl 

IS  ICFNTICAL 

TF  PANKCALL 

, EXCEPT 

TEAT  THE  CADR 

ARRIVES  IN  A. 

00  1 2 

RFF 

179 

LAST 

9 8 9 

6622 

56  CCl 

1 

S RCALL 

TS 

1 

001  3 

RFF 

A 

LAST 

56A 

6623 

22  0C6 

0 

L XCH 

FBANK 

SWITCF  BANKS,  SAVING  RETURN. 

QC16 

PEF 

8 

LAST 

7AA 

6626 

7 5012 

0 

NASK 

LCwin 

GET  SLB-ACCRESS  CF  CADR. 

1)0  15 

RFF 

238 

LA  FT 

990 

6623 

56  C02 

n 

XCH 

c 

A,L  NCW  CCNTAINS  CP  RETURN. 

0016 

RFF 

7 

1 AST 

990 

6626 

52  136 

0 

CXCH 

BLF2 

RFSTCPINC  INFLTS  IF  TFIS  IS  A EANKCALL. 

00  1 7 

Ri=F 

239 

LAST 

900 

6627 

50  00? 

0 

INCEX 

Q 

OOlfi 

6630 

0 2000 

0 

TC 

ICOOO 

SETTING  Q TC  SWFFTURN. 

001  9 

RFF 

R 

LAST 

990 

663  1 

56  136 

1 

SWPFTURN 

XCF 

BUF2  +1 

CCPES  HFRE  TO  RETURN  TC  CALLER.  C(A,L) 

0020 

RFF 

5 

LAST 

990 

6632 

56  C06 

0 

XCF 

FBA.NK 

ARE  PRESERVEC  FOR  RETURN. 

0021 

RFF 

9 

1 AST 

9 90 

6633 

5 6 13  6 

1 

XCF 

PLF2  +1 

0C22 

REF 

IF 

LAST 

99F 

6636 

0 0133 

0 

TC 

PUF2 

Ron  2 3 

THE 

FOLLCWING 

ROUTINE 

CAN  BE 

USED  AS  A 

UM  1 ATEPAL 

JLNF 

WITF  C (A  ,L  ) PRESERVFO 

ANC  THE  CACR  INNECIATELY 

RQ025 

FCLLCWTNG 

, THF 

TC  POSTJiJFF  INSTRU'-T  ICN. 

0026 

REF 

290 

LAST 

99C 

6635 

56  CO?  0 

FCSTJLN  F 

XCF 

C 

SAVE  INCCMINC 

CIA  ). 

0027 

REF 

311 

LAST 

989 

6636 

50  000  1 

INDEX 

A 

GET  CACR. 

0028 

6637 

3 0300  1 

CA 

0 

P3029 

BANKJUMP  IS  thF  sane 

AS  PCSTJLNP,  EXCEPT  THAT 

THE 

CACR 

ARRIVES  IN  A. 

0031 

RFF 

6 

LAST 

990 

6660 

56  036  I 

BANKJUMP 

TS 

FBANK 

0032 

REF 

9 

LAST 

99C 

666  1 

7 5012  0 

MASK 

LCWIO 

0033 

RFF 

261 

L AST 

990 

6662 

56  C02  0 

XCH 

0 

RESTCMNC  INPUT  CIA)  IF  TFIS  WAS  A 

0036 

RFF 

262 

LAST 

990 

6663 

50  132  0 

C«10000 

INDEX 

0 

POST JLNF. 

0'i35 

6666 

I 2CC0  1 

PRI012 

TCF 

lOOOO 

FP  IC12  = TCF 

ICCUL  = 12CCC 
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P0036 

THE 

FCLLCWIAG 

PCLTTAF 

GETS 

TEE 

RETURN  CACP  S/VEC  PY  SWCALL 

0038 

PPR 

I’l 

1 AST 

99C 

9695 

3 5012 

I 

"AKECAOR  CAP 

LCRIO 

CC39 

RTF 

1 1 

1 ART 

990 

9696 

7 0133 

1 

MASK 

PUF2 

009  0 

P FF 

12 

l.AST 

991 

969  7 

6 0139 

1 

AC 

BLF2  +1 

0091 

PFF 

293 

L AST 

990 

965C 

r 0002 

0 

TO 

0 

0C965 

REF 

C 

LAST 

878 

9651 

59  135 

1 

SUPCACAL  TS 

MFTEMF 

0097 

ogF 

7 

LAST 

99P 

9652 

56  009 

C 

XCH 

PPAAK 

00975 

9653 

0 0006 

1 

EXTEND 

0098 

REF 

1 1 

LAST 

557 

9659 

C9  007 

1 

FTP 

SUFEFPNK 

0098  5 

PEF 

6 

LAST 

99  1 

9655 

56  135 

0 

XCH 

MFTEMF 

0C9C 

RFF 

11 

LAST 

991 

9656 

7 5 312 

0 

MASK 

LCWlC 

00995 

REF 

1 FT 

LAST 

99C 

9 657 

56  GT  1 

0 

XGF 

L 

005H 

9660 

0 0009 

c 

INHI NT 

CCFC  5 

9661 

0 0006 

1 

fxtfnc 

005! 

REF 

12 

LAST 

991 

9662 

Cl  007 

1 

RPITE 

SI FCRPAK 

C052 

PFF 

181 

LAST 

99  1 

966  3 

50  00  1 

0 

INDE  X 

L 

00525 

9 6 69 

3 2000 

0 

GA 

10000 

005  3 

PEF 

7 

1 AST 

99  1 

9 66  5 

56  135 

0 

XCH 

MPTEMP 

0C539 

9666 

0 0006 

1 

EXTEND 

00535 

PEF 

13 

1 AST 

991 

■ 9667 

01  00  7 

1 

RP  ITF 

SLFFRENK 

0059 

9670 

C 0003 

1 

RELIAT 

CC595 

REF 

8 

LAST 

991 

967  1 

59  0H9 

1 

TS 

FEAMK 

00  55 

RFF 

8 

LAST 

99  1 

9672 

3 C135 

c 

CA 

w FTEMP 

O0555 

96  73 

0 0002 

0 

RFTURA 
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SET  t-EAAK  fCR  CATA. 

SAVE  FBAAK  TN  BITS  15-11,  ANC 
SCFEFEAAK  IN  PITS  7-5. 

SAVE  PEI.  ACR.  lA  BANK,  PETCP  SIPERPITS. 

BECAUSE  PUPT  CCES  NCT  SAVR  SUPEPPAAK. 

SET  SUFEFBANK  FOP  CATA. 

PINBALL  (FIX  PEN  DISP)  PPEVEATS  CCA  HERE 
SAVE  1ST  wC,  FETCF  CLC  F8AAK  ANC  SBANK. 

PFSTCFE  SUPEREANK. 

RFSTORE  FBANK. 

PFCCVER  FIRST  WORC  OF  CATA. 

29  hOF.  CATACALL  516  AL,  SUFCACAL  932  PU 
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i 

1 
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PJ096 

TFF 

FCLLFWING  FfUTINFS  ARE 

IDENTICAL  TC 

BANKCAIL  AND  SkCALL 

EXCEPT  TEAT  THEY  ARE  USFC  IN  TNTFRRUFT 

0058 

REF 

9 

lAST 

90C 

6676 

52  073 

1 

1 ENKf ALL 

CXCF 

RUFTPEG3 

USES  RLPTRFG3,6  FOR  DP  RFTLRN  ACCPE 

0059 

PFF 

266 

1 AST 

99  1 

6675 

50  CC2 

0 

INDF  X 

Q 

CC6C 

66  76 

3 0000 

1 

CAF 

0 

006  1 

RFF 

265 

LA'^T 

992 

66  77 

26  )02 

C 

INCR 

c 

0062 

PFf 

182 

L AST 

99  1 

6 7.;ii 

56  00  1 

1 

TSWCALL 

TS 

L 

0C63 

REF 

9 

LAST 

99  1 

6 70  I 

22  006 

0 

Lxr  F 

FBANK 

0066 

PEF 

! 2 

LAST 

991 

6 702 

7 50  12 

0 

PAS  K 

LCHin 

0065 

RFF 

266 

1 AST 

992 

6 70  3 

56  002 

0 

XCH 

0066 

RFF 

10 

LAST 

992 

6 7''6 

52  073 

1 

CXCF 

PUPTPEG3 

0067 

RFF 

267 

LAST 

992 

6705 

50  0C2 

0 

INDEX 

C 

CC6F 

6 7 )6 

0 2000 

0 

TC 

ICOOC 

0069 

RFF 

0 

LAST 

c 5 

6707 

56  C73 

0 

I S^^RETR^ 

XCF 

PLPTPEG6 

00  7. . 

RCF 

10 

LAST 

QO  p 

6 7 IC 

56  C06 

c 

XCH 

FRANK 

0C71 

RFF 

6 

LAST 

992 

6711 

56  F73 

0 

XCH 

RUPTR  EG6 

00  72 

REF 

1 1 

LAST 

992 

6712 

0 0072 

1 

TF 

RLFTPEG3 

R'0O9(' 

1 

JSPRFACR  AFfPcSES 

INTERPRET1V5  CQCING 

IN  OTHER 

: THAN 

THE  USER'S  FBANK.  THF  CALLING  SECUENCF  IS  AS  FCLLFWS 

AQ09? 

L 

TC 

USPRC  ACR 

A0093 

L+  1 

CAFR 

TNTPPETX 

TNTFRETx  IS  TEE  INTERPRETIVE  CrCiNG 

A0C96 

RFTLRN  IS  TC  L<-2 

0103 

REF 

C 

LASf 

66C 

6713 

56  166 

c 

LSFRCACF 

TS 

LCC 

SAVE  A 

0106 

PFF 

36 

1 AST 

968 

6716 

3 6766 

1 

f A 

BITS 

01C5 

REF 

7 

1 AST 

655 

6715 

56  023 

1 

TS 

EDCP 

EXIT  IN97RLCTICN  TC  EDCP 

.0106 

PFF 

23 

LAST 

82C 

67  16 

3 0006 

1 

CA 

BEANK 

0107 

RFF 

1 

6717 

56  165 

1 

TS 

BANKSFT 

USER'S  8 rank  TC  BANKSET 

0 lOfl 

RFF 

26E 

LAST 

992 

6 720 

50  002 

0 

INCEX 

C 

0179 

672  1 

3 oono 

1 

CA 

0 

0110 

PFF 

11 

LAST 

992 

6722 

5 6 006 

1 

TS 

FBANK 

INTEPFRFTIVE  BANK  TC  FEANK 

0111 

RFF 

13  . 

LAST 

992 

6 723 

7 50  12 

c 

PAS  K 

LCHIO 

YIELDS  TN^PPPRET  IVE  RELATIVE  ADORES: 

Oil? 

REF 

269 

LAST 

99  2 

6 726 

56  CQ2 

c 

XCH 

0 

INTEPFRFTIVE  ACCRESS  TC  C,  FETCHING 

0113 

REF 

6 

LAST 

992 

6725 

56  166 

1 

XCH 

LCC 

L+1  7C  irc,  RETRIEVING  CPIGINAL  A 

0116 

REF 

1 

6726 

1 6663 

0 

TCF 

Q+IOOOO 
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POl  17 

THFPE  ARE 

FPUP 

POSSIBLE 

SETTINGS 

FGR  CHANNEL 

07. 

(CHANNEL 

07  GCNTA  INS  THE 

superbank  setting. I 

P.O  1 1 9 

PSELDC- 

FI  XEC 

OCTAL  PSEUCC 

R0120 

SLPER8ANK 

SETTING 

S-PEG. 

VALUE  BANK  NURRERS 

ACORESSE  S 

R0121 

PT12? 

SL'FERPANK 

3 

OXX 

?COC  - 

3777 

30  - 

37 

7CG0C  - 1C7777 

(WHERE  XX  CAN  BE  ANYTHING  ANC 

R012A 

WILL  LSLALLY  BE  SEEN  AS  111 

R'H26 

SUPER  EANK 

A 

IOC 

20CC  - 

3 77  7 

AC  - 

A7 

110000  - 127777 

(AS  FAP  AS  IT  CAN  EE  SEEN, 

R012E 

ONLY  RANKS  90-43  WILL  EVER  BE 

ponn 

AND  APE  PRESENTLY  AVAILAPLEI 

Ron? 

SllFERFANK 

5 

ini 

2oor  - 

3 777 

SO  - 

57 

13lPC0  - 1A7777 

(PRESENTLY  NCT  AVAILAELE  TC 

P013A 

THE  LSFR) 

R0136 

SUPERPANK 

6 

1 10 

2CCC  - 

37  77 

60  - 

67 

150000  - 167777 

(PRESENTLY  NCT  AVAILABLE  TO 

R0138 

THE  LSFRI 

R T1A2 

♦*»  THIS 

RGLTINF  RAVPE 

CALLPC  BY 

ANY  PRCGRAR 

ICGATEC  IN 

BANKS  CO  - 27.  I 

.E.,  NC  PRCGRAN  LIVING  IN  ANY 

R3194  S1JCERE''NK  SFOULP  I.SF  SUPFRSlv. 


R01A5  SLP  = FSk  PAYEE  GALIEE  IN  T|-I6  FASFICN: 


P3  1A6 
PT197 
RCIAP 
R01A9 
R015P 


CAF  ABBCGN  WHERE  --  ABECCN  EeCGN  SCPETHIN  -- 

TOO  SUPERSW  (TEE  SLiPEPBNK  BITS  ARE  IN  THE  BBCCM 


R0151 

OR  IN  THIS  FASHICN  : 

R)1  5? 

•3 

CAP 

SLPFRSET 

WHERE  SUPERSET 

IS  CNE  op  the  FOLR 

AVAUABIF 

ROl  54 

TCH 

SUPERBANK  FIT 

CONSTANTS; 

R0155 

« • • 

• • • 

SLPEROll 

CCTAL 

60 

R0157 

• 

• 

SLPFR  100 

CCTAL 

ICO 

R0159 

• 

SUPER  in  1 

OCTAL 

120 

R0161 

SLPERllO 

CCTAL 

140 

0163 

4727 

0 

0006 

1 

SUPERSW  EXTEND 

0164 

A0165 

pep  14, 

LAST 

99  1 

473C 

Cl 

007 

1 

WRITE 

SUFERPNK 

WRITE  BITS  7-6-5 
CHANNEL  07 

CF  THE  ACCUNLLATGR  INTC 

0166 

A0167 

PEP  25C 

LAST 

992 

4731 

0 

0302 

0 

TC 

0 

TC  TO  INSTPLCTICN 
TC  SUPPRSW 

FCLLCWI NG 
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ROCOl  SECTICN  1 OISFATCHEF 


Roon? 

fnTRY 

TO  the  INTERPRETER.  INTFRET  SETS 

LFC  TC 

THE  FIRST 

INSTRLCTICN,  EANKSET  TC  THE  8E«NK  CF  THE 

POOOA 

09JE 

CT 

INTEPPPET  TVF 

PROGRAM, 

AND  INTBIT15  TO  THE 

BIT  15 

contfnts  of 

FBANK.  INTERPRETIVE  PRCGRAPS  PAY  EE  IN 

ROOOF 

VIRTUALLY  ALL 

BANKS 

PRESENT 

UNOFF  any 

SUFFR-EANK 

SETTING,  WITH  THE 

FESTPICTION  THAT  PROGRAMS  IN  HIGH  BANKS 

ROOOR 

(FIT  IS 

OF  FRANK  = 11 

po 

(VOT 

REFER  TO 

LCI«BANKS,  AND  VICE 

-VERSA.  THE 

INTEPPPETEF  DCFS  NCT  SWITCH  SUFEREANKS. 

ROCIO 

E-PANK 

SWITCHING  CCCURS 

WHENEVER  general  ERASABLE  (100 

- 3777)  IS 

ADDRESSED. 

001? 

6CA? 

PLCCK 

03 

001  3 

RFF 

1 

rouNTA 

$ t/INTER 

0013  5 

6CA? 

0 00O3 

1 

INTPRET 

PEL  INT 

00  lA 

60A? 

0 0006 

1 

EXTEND 

SET  LCC  TC  the  WORD  FCLLCWING  THE  TC 

001  3 

REF 

7 

LAST 

992 

60AA 

??  16A 

1 

CXCF 

LOG 

0016 

RFF 

2A 

LAST 

99? 

6CAS 

2 0C06 

1 

+ 2 

CA 

BEAN  K 

INTFPFPETlvE  ERANCFES  FINISH  HERE. 

0017 

REF 

? 

LAST 

992 

6"A6 

5A  165 

1 

TR 

BANKSFT 

orip 

RFF 

36 

LAST 

89  ? 

60A7 

7 A735 

0 

PAS  K 

B IT15 

C-FT  ifiH  BIT  FCR  INDEXABLE  ADCFESSE5 

0019 

REF 

5 

LA  ST 

96 

60  50 

5A  115 

c 

TS 

INTBIT15 

0020 

Rcp 

8 

LAST 

992 

60  51 

5A  023 

1 

TS 

FOOP 

PAKF  SLRF  NC  INSTRUCTICNS  LEFT  CVER 

)02  1 

RFF 

1 

6052 

1 6073 

1 

TCP 

NEwnps 

PICK  UP  CP  CODE  PAIR  ANC  BEGIN. 

002? 

REF 

25 

LAST 

99A 

605^ 

2 2 006 

1 

INTRSP 

LXCH 

8BANK 

RFSLPE  SLSFENCEC  INTERPRETIVE  JCE 

0C?3 

R'^F 

219 

LAST 

97A 

6.05A 

1 60A5 

1 

TC  F 

INTPRET  ^■3 

ROO?A 

OLOAO 

LOADS 

MPAC , MPAC  +1, 

LEAVING  ZERO 

IN  PFAC  +2. 

00?  5 

6055 

1 0006 

1 

CLOAD 

extend 

00?6 

RFF 

A 

LAST 

91A 

6F56 

5 0116 

1 

INDEX 

ACCPHC 

0027 

6057 

3 OOC.  1 

0 

DCA 

0 

LCAC  CF  C(C(ACCRWCI)  INTO  MFAC,MPAX 

0C2P' 

REF 

37A 

L AST 

955 

6060 

52  155 

1 

SLCAC2 

CXCF 

MPAC 

0r2Q 

RFF 

166 

LAST 

9EF 

606  1 

3 A755 

1 

CAF 

ZERO 

ZEFC  PFAC  +2 
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POOPn 

AT  THE 

FNC 

CF  HCST  U 

PTPLCT  ICNS 

, CrATRFL 

IS 

G IVFN  TC  DANZIG 

TO  CTSPAICF  THE  NEXT  CPE9AT1CN. 

903? 

REF 

375 

LAST 

994 

60  6 2 

5 4 15  6 

1 

IS 

MPAC  +2 

AND  CeCLARE  CF  PCCE 

003  3 

pr>: 

19 

LAST 

P79 

6063 

94  16  3 

1 

NEW^ACCE 

TS 

MODE 

PRCLOGUF  FCR  VCDE-CH ANG 1 N G I NS TRUC I 1 C N S . 

0O3A 

rff 

3 

LAST 

994 

6 C64 

3 C165 

0 

DANZIG 

CA 

BANKSET 

SET  EEANK  EEFCRE  TESTING  NERJOB  SC  THAI 

0039 

REF 

26 

LAST 

994 

6':65 

54  006 

0 

IS 

BBANK 

IT  PAY  PF  SAVED  CIRFCTLY  BY  CFANJCE. 

003^^ 

rff 

9 

1 AST 

994 

6066 

10  023 

1 

NC  IPNKSR 

CCS 

ECCP 

SFF  IF  AN  FPCER  CCOE  IS  LEFT  CVER  FPCN 

0037 

O^F 

1 

6.67 

1 61C2 

ICF 

gfjunf 

THE  LAST  PAIR  RETRIEVEC.  IF  SO,  EXECUTE. 

A003R 

EOrP  IS  SET  TC  ZFPC  CN  ITS  RE-ETITING. 

0C39 

REF 

c 

LAST 

717 

60  7C 

10  C67 

1 

CCS 

NFi^  JFE 

SEE  IF  A JCE  CF  MGFER  PRIORITY  IS 

004  1 

PEF 

I 

6 171 

1 5126 

0 

ICF 

CHANG  2 

PRESENT,  ANC  IF  SC,  CHANGE  JCBS. 

rc4i 

REF 

p 

LAST 

= 94 

Ar  7 2 

24  164 

1 

INCP 

ICC 

ADVANCF  IF=  LCCAIICN  CCCN1ER. 

R0042 

ITRACE 

( 1) 

reffrs  to 

"NEWQPS 

or43 

RFF 

9 

LAST 

995 

6073 

50  164 

1 

NEWOPS 

INDE 

Y LCC 

ENTRY  IC  BEGIN  BY  PICKING  CF  CCCE  FAIR. 

0044 

6074 

3 000-) 

1 

CA 

0 

MAY  BE  AN  OPCCOE  FAIR  CR  A STORE  COCF. 

0045 

PEF 

312 

LAST 

990 

6 175 

10  000 

0 

CCS 

A 

TEST  SIGN  AND  GET  DABS  ( A ) . 

CT4A 

pnp 

1 

6 176 

1 6369 

0 

TC  F 

DCSTOPE 

FRCCFSS  =TCPE  CODE. 

C047 

6077 

CC177 

c 

LCV»7 

CCT 

1 77 

0048 

PEF 

10 

L AST 

999 

6 lor 

54  023 

1 

IS 

EDCP 

CP  CODE  FAIR,  leave  THE  CIFEP  IN  ECCF 

0049 

REF 

6 

LAST 

495 

6101 

7 6077 

f) 

PAS  K 

LCW7 

WHERE  CCS  FDCP  RILL  HCNCR  IT  NEXT. 

005'i 

PEF 

12 

LAST 

46? 

6102 

94  02C 

1 

HP JUPF 

IS 

C YP 

LCRWn  ENIE=S  HERE  IF  A RIGHT-HANC  CF 

0091 

RPR 

14 

1 AST 

995 

6103 

10  O?0 

1 

CCS 

CYP 

CCCE  IS  TC  BE  FPCCESSEC.  TEST  PPEFICES. 

0092 

RFF 

1 

6 1 14 

1 6252 

c 

ICF 

OF  JUPF2 

TFST  SECCNC  PREFIX  BIT. 

0093 

PFF 

1 

6 U;5 

1 6746 

t 

ICF 

EXIT 

+0  CP  CCCE  IS  EXIT. 
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0056 

PEE 

68 

LAST 

972 

61  16 

7 6753 

0 

acCRFSS 

MASK 

R ITl 

SEE  IF  ADDRESS  IS  INDEXED.  CYR  CCM/INEC 

00  5 7 

REF 

3 13 

LAST 

995 

6 1 '17 

K COO 

0 

CCS 

A 

600XX,  SC  eiT  1 IS  NCIU  AS  IT  NAS  IN  CYR. 

0058 

PEF 

1 

6 11'! 

1 6151 

0 

TCP 

I NOE  X 

FCFN  INCEXEC  a DDR  ESS. 

0059 

REF 

10 

LAST 

995 

6111 

50  166 

1 

C IRADPES 

INDEX 

LCC 

LOOK  aPEAD  TP  NEXT  NPRC  TC  SEE  IF 

0060 

6 112 

6 000  1 

1 

0CT6000  1 

CS 

1 

ADDRESS  IS  GIVEN. 

0061 

REF 

3 16 

LAST 

996 

6113 

10  000 

Cl 

CCS 

a 

0062 

PEE 

1 

61  1.6 

1 6220 

0 

TCF 

PUSHUP 

IF  NOT. 

0063 

6115 

7 7 7 7 3 

1 

NEG6 

DEC 

-6 

006A 

REF 

11 

LAST 

996 

6116 

26  166 

1 

IMCR 

LCC 

IF  SO,  TC  SHON  WE  PICKED  LP  A WCRC. 

0065 

RPP 

e. 

LAST 

996 

61  17 

56  lie 

r. 

TS 

aCDRWC 

I 


I 
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,1964 

SKIPPER 

.097  PAGE 

LSEP  ' 

S PAGE 

NO.  A 

EC  S2 

P0066 

FINAL 

CTGEST  ION  OF  1 

DIRECT  ADORE 

SSES  CF 

CF  CCCES  NITf  01 

FPEF  IX 

IS  CDNE  FERE.  IN  FACE  CASE,  TFE 

K0068 

PPCUl  PTC 

1 2-eiT 

■ PUB 

-AFCRFSS 

IS  LEFT 

IN  ACCRWC,  WITH  ANY 

REQUIRED 

E 

CP  F 

BANK  SWITCHING  DCNF.  ACCPFSSES  LESS 

P0070 

THAN 

A50 

ARE  TAKEN 

TG  81-  RFLATIV'^  TC 

TFE 

WCPK  AREA.  TFE 

CF  CODE 

IS 

NGW 

IN  EITS  1-5  CF  CYR  WITH  BIT  14  = 1. 

007? 

PEP 

1 

6120 

6 62  5 A 

1 

AD 

-ENDVAC 

SFE  TF  AEDRRSS  PEIATIYE  tc  wCPK  APFA. 

0073 

PFP 

’ 1 S 

LAST 

996 

612  1 

10  00' 1 

0 

CCS 

A 

0'I7A 

RFF 

1 

6122 

6 7 7A6 

C 

AD 

-ENDERAS 

IF  NOT,  SEE  IF  IN  GENERAL  ERASABLE. 

0075 

RFF 

1 

6123 

1 6130 

I 

TCF 

1 ERASTST 

00  76 

RFF 

36 

1 AST 

95A 

612A 

3 '120 

1 

NPTZEPC 

CA 

F IXLCC 

IF  SC,  LEAVE  TFE  MODIFIEC  ADDRESS  IN 

0077 

PEP 

6 

LAST 

996 

6125 

26  116 

0 

ADS 

ADDRFD 

ACCRWC  AND  CISPATCF. 

0078 

PEE 

15 

LAST 

995 

6126 

50  020 

0 

ITR15 

INDEX 

CYR 

THIS  INCFX  MAKES  THE  NEXT  INSTRLCTICN 

0079 

REF 

1 

6 127 

7 6276 

c 

7 

I NC JLNP 

-1 

TCF  INCJUMF  + DP,  EDITING  CYR. 

OORO 

6130 

0 3106 

1 

IFRASTST 

EXTEND 

0081 

RFF 

1 

6131 

6 61A1 

1 

eZMF 

GEADCR 

GO  PPCCFSS  GENERAL-ERASABLE  ADDRESS. 

OOP? 

REF 

lA 

LAST 

992 

■6  132 

7 50  12 

0 

PA  SK 

LCNIO 

FIXED  BANK  ADDRESS.  RESTORE  AND  ACC  B15. 

0083 

REF 

15 

LAST 

997 

6133 

6 5)12 

1 

AD 

LOWl'l 

SWITCH  BANKS  AND  LEAVE  SLEACCRFSS  IN 

OOEA 

REF 

7 

LAST 

997 

6 13A 

56  116 

1 

XCF 

ACCRNC 

ACCRWC  FCR  CPERANC  PFIRIFVAL.  (TFIS 

0085 

OFF 

6 

LAST 

99  A 

6135 

6 0115 

1 

AO 

I NTB  n 1 5 

METHCC  cRECLUCES  LSE  CF  TFE  LAST 

0OF6 

PFF 

12 

1 AST 

992 

6136 

54  004 

1 

TS 

F BANK 

LOCATION  IN  FACH  FBANK.) 

0087 

RFF 

16 

LAST 

997 

6137 

50  020 

0 

ITR12 

INDEX 

CYR 

00B8 

PFF 

2 

LAST 

997 

61  A ) 

7 6276 

0 

7 

INDJLPP  ■ 

- 1 

0089 

RFF 

10 

LAST 

989 

6141 

7 4357 

0 

GEADCR 

NASK 

LCh8 

0090 

Rcf 

3 

LAST 

A62 

6 1A2 

6 5007 

0 

AD 

0CT14C0 

CC91 

REF 

8 

LAST 

997 

61A? 

56  1 16 

1 

XCF 

ACCRWC 

0092 

pff 

59 

LAST 

9PS 

61AA 

5A  fC3 

c 

TS 

EFANK 

0093 

RFF 

17 

L AST 

997 

6 1A5 

50  020 

0 

ITRir 

INDEX 

C YR 

PC9A 

RFF 

0 

LAST 

99  7 

61A6 

7 6276 

3 

7 

I NCJUPP 

- 1 

I 

I 


► 
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P0C95 

THF  1 

FCL  LCl^l  AG 

r-CUTINE  FfiCCESSES 

INTERPRETIVE  INDEXED  ADDRESSES. 

AN  INTERPRETER  INDEX  REGISTER  NAY 

R0097 

CONT A IN 

THF  AnOpFSS  CF 

ANY  fpaSAELE  I 

REGISTER  (0- 

42  BEING  RELATIVE  TC  THE 

VAC  AREA)  CP  ANY  INTERPRETIVE  PRCGRAN 

ROOF'A 

PARK 

, CP 

AAY 

TATFCFR  IN 

TFAT 

RANGE. 

01  30 

R:^F 

1 

6 147 

3 7736 

1 

0CDLCAD4 

CAF 

DLCAC* 

STOCL=»  CCMES  FERE  TC  PRCCESS  LCAC  ACP. 

9101 

REF 

18 

1 AST 

997 

615P 

54  020 

1 

TS 

CVP 

( STCVL*  ENTERS  FERE)  . 

0102 

PFF 

39 

1 AST 

997 

6151 

3 0120 

I 

INDEX 

CA 

F IXLOC 

SET  LF  INDEX  LCCATICN. 

0101 

pep 

1 

6 152 

54  13C 

1 

TS 

I NCEX  LCC 

•010^ 

RPR 

12 

L AST 

996 

6 153 

24  164 

1 

INCP 

LCC 

(ADCPESS  ALWAYS  G IVEN  ) . 

0109 

R'^F 

1 3 

LAST 

998 

6154 

50  164 

1 

INDEX 

LCC 

0136 

6155 

4 ceno 

0 

CS 

0 

Olf'7 

REF 

316 

LAST 

997 

6 156 

10  000 

0 

CCS 

A 

INDEX  2 IF  ADDRESS  STCREC  C C N F L E N E NT F C . 

0108 

RFF 

2 

LAST 

998 

6157 

24  130 

0 

INCP 

INCEXLOC 

0109 

6 16C 

16  16  1 

0 

NCCF 

0110 

RFF 

9 

I AST 

997 

6161 

54  1 16 

0 

TS 

ADDRKD 

14  BIT  ADDRESS  TC  ADDRWC. 

0111 

PFF 

1 

6 162 

7 7 74  5 

1 

NASK 

H ICH4 

IF  ADDRESS  GREATER  THAN  2K , ADO  INTEIT15 

0112 

6 163 

0 C006 

1 

EXTEND 

0113 

REF 

1 

6164 

1 6167 

0 

ez  F 

IN0EX2 

0 114 

RFF 

7 

LAST 

9R7 

6 165 

3 0115 

1 

CA 

INTBIT15 

0119 

RFF 

in 

LAST 

998 

6166 

26  1 16 

0 

ADS 

A00RV,0 

0116 

P''F 

■j 

LAST 

99F 

6167 

50  130 

0 

I NDEX2 

INDEX 

INCEXI DC 

0117 

RFF 

27 

LAST 

9E4 

6170 

4 0046 

1 

CS 

XI 

01  1 8 

REF 

11 

LAST 

998 

617  1 

26  116 

0 

ACS 

ACCRWD 

DC  augnfnt,  igncping  and  CCFPECTING  CVf. 

0119 

REF 

1 

LAS-F 

954 

6 172 

7 7747 

c 

NASK 

H IGH9 

SEE  IF  AtCRESS  IS  IN  WORK  AREA. 

0120 

6 173 

c ccoe 

1 

EXTEND 

0121 

PFF 

1 

6 174 

1 6 3)7 

0 

ezF 

INDWORK 

012? 

RFC 

2 

LAST 

998 

6 175 

7 7 74  5 

1 

NASK 

HIGH4 

SEE  IF  IN  FIXED  BANK. 

0123 

6176 

C 0006 

1 

extend 

0124 

RFF 

1 

6177 

1 6211 

1 

BZF 

INCERASE 

0129 

OFF 

1? 

1 AST 

998 

6200 

3 C 1 16 

1 

CA 

ACCRWD 

IN  FIXED  - SWITCF  BANKS  AND  CREATE 

0126 

RFF 

13 

LAST 

097 

6201 

54  004 

1 

TS 

FBAMK 

SUE-ACCPESS. 

0127 

REF 

16 

1 A FT 

997 

6202 

7 5C12 

c 

NASK 

LCWIO 

0128 

REF 

1 

6201 

6 474  1 

1 

AD 

2K 

C129 

RE  F 

13 

LAST 

098 

6 204 

54  116 

0 

TS 

ACDRWD 

Olio 

RTF 

19 

LAST 

9C8 

6?C5 

50  C20 

0 

I IRll 

INDEX 

f YR 

0131 

RFF 

/, 

LAST 

997 

6206 

1 6276 

1 

■a 

INPJLNP  -1 

0 132 

REF 

4C 

1 AST 

998 

6207 

3 ) 120 

1 

I NDWr  FK 

CA 

F IXLCC 

NAKE  ACCRWD  RELATIVE  TC  WCPK  AREA. 

0133 

RFF 

1 

62  10 

1 621" 

0 

TCF 

I TR13  -1 

01’4 

RFF 

4 

LAST 

997 

6211 

3 5007 

0 

INDERAS  f 

CA 

OCT1400 

0119 

RFF 

1 4 

LAST 

998 

62  12 

56  116 

1 

XCF 

ACCRWD 

0136 

PFF 

60 

LAST 

997 

6211 

54  CC3 

0 

TS 

F0ANK 

0117 

RFF 

1 1 

LAST 

997 

6214 

7 4357 

0 

NASK 

LCW8 

0138 

REF 

15 

LAST 

998 

6215 

26  116 

0 

-1 

ADS 

ACCPWC 
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intepppeter 

LSFF’  S FAC-E  AC. 

6 

FO  S3 

n 1 3<? 

REF  2C  LAST 

SSF 

t?l6 

90  Q20  0 ITR13 

INCEX  CYP 

0140 

RFF  5 LAST 

99P 

6217 

3 6276  ] 

3 I SOJLYP  -1 

G^F: 


iSS'^^'PLF  RFVISIPN  116  TF  AGC  FRCGP/SF  LU^'INiFY  EV  NASA  2C21112-071 


1S:CS  AUG.  11,1S(S  SKIPPER  .097  PAGE  lOCO 


L INTERPRETER  USER'S  PAGE  NO.  7 EO  S2 

POlAl  FUSH-UP  FGUTTNES.  NEFN  NC  QPFRANG  AGGRESS  TS  GIVEN,  THE  APPROPRIATE  CP'^PANC  IS  TAKEN  FPCN  THE  FUSh-CCNN 

ROIAT  LI'T.  IN  ROST  CASES  THE  RGOE  GF  TH^  RESULT  (VECTCP  CR  SCALAR)  OF  TEE  LAST  ARITI-PETIC  GPERATICN  PEPFCRNEO 

P11A5  IS  THE  same  as  THF  TYPE  CPFRANO  OFSIRED  (ALL  AGC/SLETpACT  ETC.).  E>CEFTICNS  TC  THIS  GENERAL  RULE  ARf  LISTEG 

RC1A7  EFLGN  (NCTE  THAT  IN  EVEPV  CASE  THE  PGCE  REGISTER  IS  LEFT  INTACT): 


R01A8  1.  VXSC  AND  V/SC  l-ANT  THE  CFFCSITF  TYPE  CF  CFERANG,  F.G.,  IF  THE  LAST  OPERATION  YIELDED  A VECTOR 

R0150  RESULT,  VXSC  WANTS  A SCALAR. 


ROl  El 

2. 

THE  LCAC 

CCDES  SFCULC  LCAC 

THE  ACCUHULATCR 

INDEPFNCENT 

OF  THE  RESULT  OF  THE  LAST  CFERATICN.  THIS 

P')1S3 

INCLMGFS 

VLOAP,  CLOAC, 

, tload. 

POOL  , 

AND 

PDVL  (NC 

PLSHLP 

WITH  5LCAC) 

• 

R0  15A 

3. 

SCHF  ARITHE'FTic 

CPER  AT ICNS 

RECU  IRF 

A STANCARC  TYPE  OF 

OPERAND  REGARDLESS  CF  THF  PREVIOUS  CFERATICN. 

P 0 1 E 6 

THI  S 

INCLLOES 

SIGN  WANTING  OP 

AND  TAG  RECLIPING 

TP. 

0157 

REF 

2 

LAST 

739 

- 6220 

3 9360 

C 

PLSHLP 

CAF 

OCT23 

IF  THE  Lew  5 EITS  OF  CYR  ARE  LFSS  THAN 

015E 

REF 

21 

L AST 

999 

6221 

7 0 320 

1 

MASK 

CYR 

20,  this  op  requires  special  attfmicn. 

0159 

RCF 

1 

6222 

6 6225 

1 

AD 

-CCTIO 

(NC  -0). 

016>- 

RFF 

317 

LAST 

998 

6223 

10  COO 

0 

CCS 

A 

0 16  1 

pep 

1 

6229 

1 6736 

1 

TCP 

R E GU  P 

FOR  ALL  codes  GREATER  THAN  CCT  7. 

0162 

6225 

77  767 

1 

-CCTIC 

CCT 

-10 

0163 

OfF 

1 

6226 

6 6 115 

1 

AG 

NEG9 

WE  N(7W  HAVE  7 - CF  CrCE(MCC9).  SEE  IF 

01  6A 

RFF 

Tie 

LAST 

ICOC 

6227 

10  COO 

0 

res 

A 

TFE  CF  CODE  (M0C9)  IS  THREE  (REVERSE). 

0165 

RTF 

3 19 

LAST 

luno 

6230 

50  COO 

1 

INDEX 

A 

NC  - the  «CCE  is  DEFINITE.  PICK  UP  THE 

0166 

RFF 

1 

623  1 

9 6297 

1 

CS 

NC.WCS 

0167 

°EF 

2 

LAST 

lOOC 

6232 

1 6 29C 

c 

TCP 

REGUP  +2 

016S 

RCF 

16 

LAST 

995 

6233 

50  163 

0 

INOE  X 

MODE 

FOP  VXSC  and  v/sc  we  want  the  REGUIFEC 

0169 

RFF 

9 

LAST 

959 

6239 

9 6295 

0 

fS 

RFVCNT 

PUSHLQC  CFCRFMENT  WIITHCLT  CHANGING  THE 

0170 

RFF 

3 

L AST 

1000 

6235 

1 6 290 

c 

TC.F 

RFCL'P  +2 

NCCE  AT  THIS  TINE. 

0171 

RFF 

I 7 

LAST 

1000 

62  36 

50  163 

0 

REGUP 

INDEX 

MODE 

most  ALL  OR  cooes  PLSHLP  HERE. 

0172 

RFF 

2 

LAST 

lOOC 

6 237 

9 6297 

1 

CS 

NC.WCS 

017  3 

R = F 

1 1 

LAST 

879 

6.29C 

26  166 

1 

+ 2 

ADS 

PLSHLCC 

0179 

REF 

16 

LAST 

998 

6291 

59  116 

0 

TS 

AGCPWC 

>175 

RFF 

22 

LAST 

ICOC 

6 2 9 2 

50  C2C 

r 

I TR19 

INDEX 

CYR 

0 176 

RFF 

6 

LAST 

999 

6293 

7 6276 

0 

7 

INDJLMP  -1 

(THE  INDEX  NAKES  THIS  t TCF. I 

0 177 

6299 

OCOu2 

0 

CCT 

2 

REVERSE  PUSHUP  CFCRFMENT.  VECTOR  TAKES  2 

01  78 

6295 

00006 

1 

REVCNT 

CCT 

6 

WCFGS,'  SCALAR  TAKES  6. 

Cl  79 

6296 

00  >06 

1 

OCT 

6 

0180 

6 29  7 

Q0C02 

0 

NC. WOS 

CCT 

2 

CCNVENTICNAL  CECREMENT  is  6 WORDS  VECTCP 

0181 

6250 

00003 

1 

OCTAL  3 

OCT 

3 

2 IN  CP,  and  3 IN  TP. 

0182 

6261 

00006 

1 

CCT 

6 

GfiP: 
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P0183 

TEST 

THE  SECCNC  FRFFIX  FIT 

TC 

SEE  IF  THIS  IS  A 

MISCELLANECIS  CR  A LNARY/SHCRl  SHIFT  CFERATICN. 

0 1R5 

REF 

23 

1 AST 

loot 

6252 

10  0 20 

1 

CFJUR  F2 

CCS 

C YR 

TEST  SECCNO  PREFIX  BIT. 

01  H6 

PFF 

1 

6253 

1 6266 

1 

TCF 

CF JUMF3 

TFST  THIFC  BIT  TC  SEE  IF  LNARY  CR  SHIFT. 

Cl  E7 

6256 

77722 

0 

- ENFVAC 

EEC 

-65 

R018fl 

THE  FOLLOWING 

ROUTINE 

PROCESSES  ADDRESSES  CF  SLFFIX  CLASS 

10.  they  are  EASICALLY  WORK  AREA  ADDRESSES 

RC19(» 

I N 

THF 

RANGE  0 

- 52,  ERASAPLE 

ECACR 

CONSTANTS  FROM  ICC  • 

- 3777,  AND 

FCAORS  ABOVE  THAT.  ALL  15  BITS  APE  AVAILABLE 

R019? 

IN 

CONTRAS!  TO 

SUFFI X 

1 , IN  WHICH  ONLY 

THE  LEW  CFCEP  16 

ARE  AVAILABLE. 

0193 

RFF 

16 

LAST 

998 

6255 

26  166 

1 

1 5PI TACR 

I NCR 

LCC 

(ENTRY  HERE  FFCM  STCALL). 

0196 

RFF 

15 

1 AST 

1001 

6256 

50  166 

1 

INDEX 

LOG 

PICK  LP  ADDRESS  WCRD. 

0195 

6257 

3 OCCO 

1 

CA 

D 

01  96 

REF 

6 

LAST 

98 

6260 

56  117 

1 

TS 

PCLI SH 

WF  MAY  NEED  A SUBACDRESS  lATER. 

0 1C7 

REF 

1 

6261 

3 5013 

0 

CAF 

LCW7+2K 

THESE  INSTRLCTIONS  ARE  IN  PANK  1. 

0198 

REF 

16 

LAST 

99F 

6262 

56  006 

1 

TS 

FEANK 

0199 

RFF 

26 

LAST 

1001 

6263 

7 0020 

1 

MASK 

CYR 

0200 

RFF 

3 20 

LAST 

lOOC 

6 26  6 

50  DOO 

1 

ITR7 

INDEX 

A 

0201 

RFF 

1 

6265 

1 633  ? 

1 

TCF 

MI  SC  JLMF 

GAP: 

ASSF  NBLF 

RFVTSICN  116 

CF  ACC  PRCC-RAV  LUMINARY 

EV 

NASA  202 

1112-C71  IS 

:CS  AUG.  11,1969  SKIPPER  .097 

PAGE  1002 

U 

IMTFPPPFTER 

USER' S PAGE  NO. 

9 

EO  S3 

P02r>2 

rORPLETE  TFE  OISPATCFING  OF 

LNARV 

ANC 

SHORT  SHIFT  OP'^PATICFS. 

0203 

REF 

15 

LAST 

ICCl 

6266 

5A  C06 

1 CPJUMF3 

TS 

F BANK 

CALL  IN  BANK  C (BITS 

11-15  CF 

A APE  C.) 

R0204 

ITRACF  ( 61 

REFFRS  to 

"OP JLMP3". 

02'’ 

rff 

25 

1 AFT 

1001 

6267 

10  020 

1 

cr  s 

CVR 

TEST  THIRD  PREFIX  EIT 

. 

pr^F 

321 

LAST 

1001 

627C 

50  VIJ 

1 

INDEX 

A 

THE  DECREMENTED  UNARY 

CODE  IS 

IN  BITS 

0207 

PEF 

1 

627  1 

1 2000 

1 

TC  F 

UNA JLMP 

1-4  CP  A (ZERC,  EXIT, 

FAS  BEEN 

CFTECTEC 1 

02Ce 

RPP 

18 

LAST 

1000 

6272 

10  163 

1 

CCS 

MCDE 

ITS  A SHCRT  SHIFT  CCOE.  SEE  IF 

PRESENT 

0209 

RFF 

1 

6273 

1 2017 

1 

TCP 

SHCRTT 

SCALAR  CR  VECTOR. 

0210 

RTF 

2 

LAST 

1002 

627A 

1 2017 

1 

TCF 

SHCRTf 

0211 

RFF 

1 

6275 

1 2121 

0 

TCF 

S HCPTV 

CALLS  THE  APPROPRIATE 

RCUTINE. 

0212 

REF  1 

4350 

fbanknsk 

ECLALS 

PANKMASK 

0213 

RFF  34  LA'T  606 

62  76 

00122  0 LVEUF 

ACRES 

VRLP 
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P021A 

THE 

FnicwiFG  IS  the 

JU«F  TABLE  FCR  CF 

CCCES 

l«F  ICF  MAY 

HAVE  INPFXAei. 

E ACDRESSES  OR  MAT  PISH  LF. 

J216 

RFP 

1 

6277 

1 

6510 

1 

I NOJLRF 

TGF 

VLCAC 

00 

- 

LCAC  MPAC  W ITh  A VECTOR. 

0217 

OPC 

1 

6 300 

1 

7074 

1 

TCF 

TAO 

Cl 

- 

TRIFLE  PRECISIGN  ACC  TC  RFAC. 

02  IP 

REF 

1 

63':i 

1 

7660 

1 

TGF 

S ION 

02 

- 

CCFFLEMFNT  MFAC  (V  CR  SC)  IF  X NEC. 

0219 

FFF 

1 

6 302 

1 

74C4 

1 

TCF 

VXSC 

03 

- 

VECTCF  T T«ES  SCALAR. 

022'' 

RFF 

1 

6303 

1 

6706 

1 

TCF 

CGHTO 

C4 

- 

CCNFLTED  GC  TC. 

02?  I 

PFF 

2 

LAST 

358  6304 

1 

6473 

C 

TCF 

TLCAC 

05 

- 

LCAC  MFAC  WlTF  TRIPLE  PRECISION. 

')??? 

REF 

1 

6305 

1 

6055 

fj 

TCF 

niCAD 

06 

- 

LCAC  MFAC  WITH  A CP  SCALAR. 

0223 

RFF 

1 

6 3)6 

1 

7627 

1 

TCF 

v/sc 

07 

- 

VECTOR  DIVIDED  PY  SCALAR. 

022A 

RFF 

1 

6307 

1 

6504 

1 

TCF 

SLCAC 

10 

- 

LCAC  MPAC  IN  SINGLE  PRECISION. 

0225 

RFF 

1 

6310 

1 

6623 

1 

TCF 

SSP 

1 1 

- 

SET  SINGLE  FPECISICN  INTC  X. 

0226 

RTF 

1 

6311 

1 

6526 

1 

TCF 

PCCL 

12 

- 

PUSH  DOWN  MRAC  AND  RE-LOAO  IN  CP. 

02?7 

PER 

1 

6312 

1 

7 3 3 7 

0 

TCF 

MXV 

13 

- 

NATFIX  FCST-MULTIFLieC  BY  VECTCP. 

0228 

RFF 

1 

6313 

1 

6562 

1 

TCF 

PCVL 

14 

- 

FLSh  DCNN  ANO  VECTCR  LCAC. 

0229 

opF 

1 

63  14 

1 

663  1 

1 

TCF 

CCALL 

15 

- 

CCMFUTEC  CALL. 

0230 

RFF 

1 

■63  15 

1 

7342 

1 

TCF 

V XM 

16 

- 

MATRIX  FRE-mLLTTFLIEC  BY  VECTCR. 

0231 

RFF 

1 

6316 

1 

7621 

1 

TCF 

TSLC 

17 

- 

normalize  MPAC  (SCALAR  CNLY). 

0232 

pr(; 

1 

6317 

1 

7 57  7 

1 

TCF 

OMFR 

20 

- 

CF  MULTIPLY  AND  ROUND. 

0233 

RFF 

1 

6 320 

1 

7602 

0 

TCF 

OOV 

21 

- 

CF  DIVIDE  BY. 

023A 

RFF 

1 

632  1 

1 

7606 

1 

TCF 

RCCV 

22 

- 

CP  CIVIDE  INTO. 

0235 

PFF 

1 

£322 

I 

7624 

1 

TCF 

GSHIF"' 

23 

- 

GENERAL  SHIFT  INSTPUCTICN. 

0236 

RFF 

1 

6323 

1 

6754 

0 

TC  F 

VAD 

24 

- 

VECTCR  ADO. 

02’7 

RFF 

1 

6324 

1 

6 7 52 

c 

TCF 

VSU 

25 

- 

VECTOR  SLBTPACT. 

023B 

RFF 

1 

6335 

1 

7041 

1 

TCF 

BVSU 

26 

- 

VEGTCF  SLBTPACT  FRCM. 

0239 

RFF 

1 

6326 

1 

7 334 

0 

TCF 

OOT 

27 

- 

VECTOR  DCT  FRCDLCI. 

02AO 

RFF 

1 

6327 

1 

7463 

c 

TCF 

VX  V 

30 

- 

VFCTCR  CROSS  PRORUCT. 

0241 

R'"F 

1 

6330 

1 

7430 

0 

TCF 

VPROJ 

31 

- 

VECTCR  FFCJECTICN. 

0242 

REF 

1 

6331 

1 

7010 

0 

TCF 

DSU 

32 

- 

CP  SUBTRACT. 

0243  • 

RFF 

1 

6332 

1 

7L65 

1 

TCF 

PCSL 

33 

- 

CF  SUBTRACT  FRCM. 

0244 

RFF 

1 

633  3 

1 

7 TOO 

1 

TC  F 

DAO 

34 

- 

CP  ADD. 

0245 

6334 

1 

6 334 

1 

TCF 

35 

- 

AVAIL  ABl  E 

0246 

PFF  ■ 

1 

6335 

1 

75  75 

0 

TCF 

OMPl 

36 

- 

CF  multicly. 

0247 

RFF 

1 

6336 

1 

7616 

0 

TCF 

SFTPD 

37 

- 

SET  PLSh  DOWN  POINTER  (DIRECT  CNLYI 

R024H 

CODES 

10 

AND 

14  MUST  NOT  PUSH 

LF 

'.  CODE 

04  RAY  6E 

CSEO 

FCP  VECTCP 

CECIAFE  6EF0FE  FUSFUF  IF  OESIRFC. 

GAP:  iSSEwBLE  REVISION  116  OE  AGO  PPOGRAP  LLMINAFY  8V  NASA  2021112-071  19:09  AUG.  11.1969  SKIPPER  .097  PAGE  lOCA 
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P0250  THE  FOLLCklNG  JLNP  TABLE  AFFLIES  TC  INFEX,  EFANCF,  ANC  P IS C E L L A N E CUS  I N ST  RUG T ION S . 


9252 

REF  1 

6337 

1 2345 

0 

MISCJUNP  TfF 

AXT 

no 

- 

ACCFESS  TC  INCEX  TRUE. 

0253 

REE  1 

6349 

1 2352 

9 

TCF 

AXC 

0 1 

- 

ACDRFSS  TO  INDEX  CC F F LE PE N T E C . 

025A 

PEF  1 

634  1 

1 235  5 

1 

TCP 

LXA 

92 

- 

LCAC  INCEX  FROM  ERASABLE. 

0255 

REF  1 

6342 

1 2361 

0 

TCF 

L XC 

03 

- 

LCAC  INDEX  FRCP  CCNFLEMENT  CF  ERAS 

0256 

REF  1 

0343 

1 2365 

1 

TCF 

SXA 

04 

- 

STCPE  INCEX  IN  FRASABLE. 

9257 

RFF  1 

6344 

1 2 373 

0 

TCF 

XCHX 

05 

- 

EXCHANGE  INDEX  WITH  ERASAELF. 

025F 

RFF  1 

6345 

1 24J7 

1 

TCF 

INCR 

06 

- 

INCREMENT  INOEX  REGISTER. 

C259 

RFF  ! 

6346 

1 2416 

1 

TCF 

TIX 

07 

- 

TRANSFER  ON  INDEX. 

0260 

PEF  1 

6347 

1 2401 

1 

TCF 

XAD 

1C 

- 

INCEX  REGISTER  ACC  FRCM  ERASABLE. 

9 261 

REF  1 

6350 

L 2412 

0 

TCF 

XSU 

1 1 

- 

INDEX  SLBTRACT  FRCP  ERASABLE. 

9262 

RFF  1 

635  1 

1 2470 

1 

TCF 

BZE/GCTC 

12 

- 

ERANCF  ZERO  ANC  GCTO. 

0263 

RFF  1 

6352 

1 2475 

1 

TCF 

RPl /BRN 

13 

- 

BRANCH  FLLS  AND  PRANCE  MNLS. 

026A 

RFF  1 

6353 

1 245(1 

0 

TCF 

RTB/BFI  Z 

14 

- 

RETURN  TC  BASIC  ANC  BRANCH  HI  ZERC 

9265 

RFF  1 

6354 

1 2eir 

c 

TCF 

CALL/ITA 

15 

- 

CALI  ANC  STCFE  CPPET. 

0266 

REF  1 

6355 

1 2517 

1 

TCF 

SW/ 

16 

- 

SWITCH  INSTPLCTICNS  ANC  AVAILABLE. 

0267 

REF  1 

6356 

1 2460 

0 

TCF 

ecv(B) 

17 

- 

ERANCF  CN  OVERFLOW  TO  BASIC  OR  INT 

GAP:  /SSEPBLe  REVISION  116  Of  AC-C  P><CG«A^  LUMNAflf  6>  NASA  2021I12-C71  1S:C9 


L INTEPFRPTER 

P.1268  THE  FCLirwiNG  JURP  TABLE  APPIES  TC  LNAPT  I N S T RLE.  T I CN  S . 


026  9 

RPF 

2 

LAST 

99A  TO 

l>05:  205  2J5* 

COUNT  =» 

$J/INTER 

027^ 

ro,2000 

BANK 

0 

00 

3271 

fff 

1 

CO, 200C 

1 3207 

C LNAJLRF 

TCF 

SCRT 

01 

C272 

RPF 

1 

00  ,2011 

1 3531 

0 

TCF 

S INE 

C2 

0273 

REF 

1 

cn ,2002 

I 3517 

C 

TC  F 

CCSINE 

03 

02  7A 

PPF 

1 

00,2103 

I 361Q 

1 

TCF 

ARCS! N 

C6 

0275 

REF 

1 

00 , 2006 

I 36I2 

n 

TCF 

ARCCCS 

05 

0276 

RFF 

1 

CO, 2015 

I 2176 

1 

TCF 

DSC 

06 

0277 

PFF 

1 

CO, 2016 

1 2116 

1 

TCF 

ROUND 

07 

0278 

RPF 

1 

00,2017 

1 7673 

0 

TCP 

CCRP 

10 

0279 

REF 

1 

00, 20  K' 

1 3232 

C 

TCF 

VOEF 

11 

0280 

REF 

2 

LAST 

60A 

0.1 ,2111 

1 312  3 

1 

TCF 

UNIT 

12 

0281 

RFF 

1 

CO,  ?('  12 

1 3176 

c 

TCF 

ABVALABS 

13 

128? 

RTF 

1 

00, 21  13 

1 3265 

0 

TCF 

VSO 

16 

C2R3 

REF 

1 

rfi,26lA 

1 6357 

1 

TCF 

STADP 

15 

02RA 

RPF 

1 

00,2115 

1 3276 

1 

TCF 

PVC 

16 

0285 

RFF 

1 

00,20  16 

1 3267 

1 

TCF 

PLSH 

17 

AUG.  11,1969  SKIPPER  .097  PAGE  1005 
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- EXIT  - DETECTED  EARLIER. 

- SCUARE  FCCT. 

- SIN. 

- CCS. 

- ARC  SIN. 

- ARC  CCS. 

- CF  SCUAFE. 

- RCUND  TC  OF. 

- CORPLERENT  VECTOR  OR  SCALAR. 

- VECTCF  CEF  INE  . 

- LMT  VECTCP. 

- LENGTf  CF  VECTOR  OR  RAG  CF  SCALAR. 

- SCUARE  CF  length  CF  VECTOR. 

- PLSH  LP  CN  STORE  CODE. 

- RETURN  VIA  GPRET. 

- PLSH  RFAC  CORN. 
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L IMPPPPETfR  USER’S  PAGE  NO.  13  EC  S3 

P02P6  SECTTCN  2 LCAC  ANT  STCFE  PACKACF. 


P0287  A SET  OF  FIGHT  STCRF  CGOFS  IS  FRCVICEC  AS  TFE  PRIMARY  MET|-nC  CF  STORING  THE  WUL  TI -PUR  FC  S F 

R02R9  ACf U»<UL ATPr  (mpag).  IF  IN  THR  nANIIG  SECTION  LOC  REFERS  TC  AN  ALGE 6P AI C AL LY  POSITIVE  KQPD.  IT  IS  TAKEN  AS  A 

PC2S1  STOP’'  COOF  v>I’’M  A CCPPESPCNr  ING  EPASAFLE  ACCPESS.  MOST  OF  THESE  CODES  ARE  TkO  ADDRESS,  SPECIFYING  THAT  THE  VCPC 

P0293  FOLLOUING  thC  STORE  COOF  IS  TO  BF  USED  AS  AN  ADDRESS  FROM  WHICH  TC  FF-LCAD  MPAC.  FOUR  OPTIONS  ARE  AVAILABLE: 


R029S 
P02S7 
R0299 
R03P  1 


1.  STCPE 
?.  STOOL 
3.  STOVL 
A.  STCALI 


STORE  MPAC.  tee  E ADDRESS  MAY  BE  INDEXED. 

STCRF  NFAC  AND  FE-LCAC  IT  IN  CP  WIIF  TFE  NEXT  ADDRESS  (THE  LOAD  MAY  BE  INDEXED). 
STORE  vpAC  AND  PE-LOAC  A VECTOR  (AS  ARCVF). 

STCPfc  AND  CO  A CAII.  (ECTF  ADDRESSES  MUST  BE  DIRECT  FEFE). 


03r>3 

STODL 

AND 

STOVI  ULL 

TAKE  FRCN 

THE  PLSH 

-DOWN  LIST  IF  NC  LCAC 

ACCPESS  IS  GIVEN. 

030S 

6357 

BLCCK 

3 

03CA 

RPP 

■3 

LAST  ICCE 

TC  10C6: 

15  220* 

COUNT* 

} 1/1 NTER 

03n7 

rff 

A 

LAST 

995 

6357  . 

3 0165 

0 

STADR 

CA 

BANKSET 

THE  STACP  CCCE  (PUSHUP  UP  ON  STORE 

0308 

REF 

16 

1 AST 

100? 

6360 

5A  OOA 

1 

TS 

F6ANK 

ADDRESS)  ENTERS  HERE. 

03'1G 

RFF 

16 

1 AST 

1001 

6361 

2A  16A 

1 

INCR 

LCC 

031'' 

REF 

17 

I AST 

100  6 

6'»62 

5‘^  I6A 

1 

I TR  1 

INDP  X 

LCC 

THE  STCRFCCCF  WAS  STORED  COMPLEMENTED  TC 

0311 

6363 

A oooo 

0 

cs 

0 

MAKE  IT  LOCK  LIKE  AN  CFCCCE  PAIR. 

C31  2 

RFF 

6 

LAST 

986 

636A 

6 7 752 

c 

AD 

NEGCNE 

(YUL  CANT  RPMCVF  1 BECAUSE  OF  EARLY  CCS) 

031  3 

REF 

1 7 

LAST 

lOOH 

6365 

5A  116 

0 

CrSTORF 

TS 

ADDRWD 

03IA 

REF 

7 

LAST 

A63 

6366 

7 A356 

1 

MASK 

LCHll 

ENTRY  FROM  CT5PATCHER.  SAVF  THE  ERASABLE 

0315 

R = F 

18 

LAST 

1006 

6367 

56  116 

1 

XCH 

ADDRWD 

ACCRESS  AND  JUMP  CN  TFE  STCPE  COCF  NO. 

0316 

RFF 

1 

6370 

7 7725 

1 

MASK 

B 12T16 

0317 

6371 

0 TOO 6 

1 

EXTEND 

T318 

REF 

38 

LAST 

816 

63  72 

7 A7A7 

0 

Mp 

8IT5 

EACH  TRANSFER  VECTCR  ENTRY  IS  TWO  WORDS. 

0319 

RFF  322  LAST  1002 

6373 

5 0 n.-in  ] 

ITRO 

INDEX 

A 

'1320 

REF  1 

6376 

1 6375  1 

TCF 

STCRJLMP 

GAP:  /SSSEWBLE  REVISION  116  OF  ft  GC  PRCGRftW  LUMIN4RV  B\  RASA  20211  12-071 
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I INTFPPPFTER  LSEP'S  PAGE  NC.  lA  EC  S3 

P032I  STORE  rOOE  JLMP  TABLE.  CALLS  tl-e  AFFFCFPIATE  STCPINC  RCUTIRF  ANE  EXITS  TO  CARZIG  OR  TC  ACDRESS  RITE 

R0323  A SUPPLIFE  OPERATION  COrF. 

P 1223  I STCPF  store, 1 ARO  STCRE,2  PETL'PN  TO  CARZIC,  TFUS  RESETTING  TEE  EEANK  TO  ITS  STATE  AT  IRTFRET. 


0329 

PEE 

1 

6375 

0 

6925 

1 

STrpjLPF  TC 

0325 

REP 

2 

LAST 

99  1 

6376 

1 

6C69 

1 

TCP 

0226 

REF 

1 

6377 

0 

6917 

0 

TC 

0327 

REF 

3 

LAST 

1007 

69CP 

1 

6069 

1 

TCE 

C32P 

PEE 

1 

6901 

0 

6922 

0 

TC 

0329 

RPF 

9 

LAST 

1007 

690  2 

1 

60  69 

1 

TC  F 

0330 

RPF 

2 

LAST 

1007 

6 90  2 

0 

6 925 

1 

TC 

033  1 

REF 

1 

690  9 

1 

6963 

1 

TCF 

0332 

REF 

7 

LAST 

1007 

69C5 

0 

6925 

1 

TC 

0333 

REP 

1 

6906 

1 

619  7 

1 

TCF 

0339 

REF 

9 

LAST 

1007 

■ 6907 

0 

6925 

1 

TC 

0335 

REE 

1 

6910 

1 

6966 

1 

TCF 

0336 

REF 

5 

LAST 

100  7 

6911 

1 

6925 

1 

TC 

0337 

PEE 

1 

6912 

1 

697  1 

1 

TCF 

0338 

PEE 

6 

LAST 

1007 

6912 

0 

6 925 

1 

TC 

0339 

REF 

2 

LAST 

28C 

6919 

3 

9766 

1 

CAE 

0390 

REF 

26 

LAST 

1002 

6915 

59 

020 

1 

TS 

0391 

REF 

1 

6916 

1 

6255 

1 

TCF 

STORE 

STCFF 

. 

DARZIG 
STCPF,  1 
OAR  Z IG 
STORE  ,2 
DANZIG 

PICK 

LP  REVi  CP  CCDE(S)  . 

STCPF 

OCCLCAO 

STCCL 

• 

STCPF 

OOOLCAD* 

STCCL 

VilTH  INCEXEC  LCAC 

ACCRESS . 

STORE 

OCVLCAD 

STOVL 

• 

STORE 

STCVL 

LhITH  INCEXEO  LCAC 

ADDRESS. 

DCVLCAD* 
STORE 
CALLCCCE 
C VP 

STCTC 

• 

15BTTADR 

GET  A 

15  PIT  ADDRESS. 

GAP: 


ASS=^BL=  revision  116  CF  AGC  FRCGPAV  LUVINAFY  EY  ^ASA  2021112-071 


L TMERPCETFR 


P03A2 

STCRF 

CC  CE 

ACCRESS 

FFCCESSOF 

1 . 

03A3 

REF 

41 

LAST 

998 

641  7 

5C  120 

1 

STCRE  ,1 

INCEX 

F IXLCC 

03AA 

RTF 

28 

LAST 

998 

6420 

4 0046 

1 

CS 

X 1 

C3A5 

LL 

L 

CL 

1 

6421 

1 6424 

1 

TCF 

PRESTCRE 

0 3A6 

R5F 

42 

LAST 

lore 

6422 

50  120 

1 

STORE  ,2 

INDEX 

F IXLCC 

03A7 

pff 

18 

LAST 

978 

6423 

4 0C47 

0 

f S 

X2 

OTAfl 

REF 

19 

LAST 

1CC6 

647.4 

26  116 

0 

FP6SFCRE 

ACS 

ACCPWC 

03A9 

REF 

20 

LAST 

1008 

6425 

4 0116 

c 

store 

CS 

ACORViC 

035C 

FFF 

1 

6426 

6 477  7 

1 

AC 

DEC  4 5 

0351 

PFF 

323 

LAST 

1006 

64  2 7 

10  'nu 

0 

CCS 

A 

0352 

RFF 

43 

L AST 

100  8 

6430 

3 0120 

1 

CA 

F I XLCr 

0353 

REF 

1 

6431 

1 6436 

1 

TCF 

AHEAC5 

0354 

RFF 

K 

LART 

998 

6432 

3 5CC7 

0 

CA 

0rT14O0 

0355 

RFF 

21 

LAST 

1008 

6433 

56  116 

1 

XCH 

ACORHC 

0356 

PEF 

6 1 

LAST 

99  8 

6434 

54  003 

0 

TS 

FEANK 

0357 

RFF 

12 

1 AST 

996 

6435 

7 4357 

0 

RASK 

LCV«8 

035E 

REF 

22 

LAST 

1008 

6436 

26  116 

0 

AHEAC5 

ACS 

ACDRHC 

lc:C9  AUG.  11,19«S 
LSFP'S  PAGE 


SKI PPER 
NO.  15 


.097  FACE  10C8 
EO  S3 


RESULTANT  ACCRESS  IS  U ERASABLE. 

CCES  TFE  ACCRESS  POINT  TO  THE  PORK  AREA? 
YES. 

NO.  SET  E5ANK  C MAKE  UP  SUBACCRESS. 


GAt>:  ASSENRLE  REVISION  116  CF  AC-C  PBCGRAF  LUFINflPY  BY  NASA  2021U2-C71 
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PAGE  ICCS 


L INTEPPRETfR 


USER'S  PAGE  NC.  16  EO  S3 


P035S  STORING  RCUTINFS.  STCPE  CPt  TP,  CP  VECTOR  AS  INDICATED  BY  NODE 


0360 

6437 

C CCC6 

1 

STARTSTC 

EXTEND 

P0361 

ITRACE  (5) 

FEFFRS  to 

"STAPTSTO 

C362 

OBF 

276 

LAST 

995 

6 44 

3 0155 

0 

CCA 

P FAC 

0363 

REF 

23 

LAST 

1008 

644  1 

50  116 

1 

INDEX 

ACCRKD 

0364 

1C02 

6442 

52  OOl 

1 

DXCH 

0 

0366 

REF 

19 

LAST 

6443 

10  163 

1 

res 

YCCE 

0366 

REF 

1 

6444 

1 645  7 

0 

TCP 

TSTORE 

0367 

REF 

261 

LAST 

993 

6445 

')  0002 

0 

TG 

g 

036P 

6446 

0 0006 

1 

VSTCPE 

EXTEND 

036S 

REF 

377 

LAST 

100  9 

6 44  7 

2 C 160 

0 

DCA 

YPAC  +3 

037C 

RTF 

24 

1 AST 

1009 

6 4 5C 

50  116 

1 

INDEX 

ACDRWD 

0371 

64  5 1 

52  CC3 

c 

CXCH 

2 

037? 

6452 

0 0006 

1 

extend 

0373 

REF 

378 

LAST 

1009 

6453  ' 

3 0162 

1 

CCA 

«FAC  +5 

0374 

PEF 

26 

1 AST 

1009 

6454 

50  116 

1 

INDEX 

ACCRNC 

0375 

6455 

52  005 

0 

CXCF 

4 

0276 

REF 

262 

LA  «T 

1C09 

6466 

C 000  2 

0 

TC 

C 

0377 

R-FF 

379 

lAST 

1009 

646  7 

3 0156 

0 

TSTORE 

CA 

MPAC  t? 

0378 

rff 

26 

LAST 

1009 

6460 

50  116 

1 

INDEX 

ACDRWD 

0379 

646  1 

54  0C2 

1 

TS 

2 

0380 

REF 

253 

LAST 

1009 

6462 

0 0002 

0 

TC 

Q 

I'PAC.n  RUST  EE  STORED  IN  ANY  EVENT. 
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L INTERPPETFR  USER'S  PAGE  NO.  17  EC  S3 

P03BI  ROUTINES  TC  BEGIN  PRCCES'ING  OF  THE  SECONC  ADDRESS  ASSCCIATEC  UTH  ALL  STCRE-TYPE  CCCES  EXCEPT  STCFE 

R03H3  ITSELF. 


03PA 

PPF 

1 

6 A63 

3 7735 

1 

OrOLCAC 

CAF 

DLCACCCC 

T3EF 

pff 

27 

LAST 

1007 

6A6A 

54  320 

1 

TS 

C YR 

03P6 

RFF 

1 

6A6f> 

16  111 

1 

TCF 

DIPACRES 

GC  C-FT  A DIRECT  ADDRESS. 

03B7 

RFF 

1 

6A6F 

3 4 73  5 

1 

COVI.OAD 

CAF 

VLCADCCO 

(■3P8 

PFF 

28 

LAST 

1010 

646  7 

54'  3 20 

1 

TS 

CYR 

0399 

RFF 

2 

LAST 

1010 

6 47C 

1 6111 

1 

TCF 

CIPACFFS 

0390 

RFF 

1 

647  1 

3 6112 

0 

OGVLOAO’f 

CAF 

VLOAD* 

3 391 

REF 

2 

LAST 

1007 

6472 

1 6150 

1 

TCF 

CCCLGAC*  +1 

PROLOGUE  TC  INDEX  ROUTINE 

G«P:  4SSEPBLe  REVISION  lit  CE  AGC  PROGRAM  U.MINAPV  BV  NASA  2021112-071 
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I TMPRFPE7FR  LSER'S  PAGE  NC.  18  FO  S3 

P0392  the  FOLLEklNG  ICAO  TFS7RLCTICNS  ARE  FPCVIEEC  FCP  LCAEING  TEE  PU LT  1-Pt R Ff S E ACCUMULATOR  MpAC. 


039A 

REF 

27 

LAST 

i;»09 

6A73 

50 

1 116 

1 

TLOAC 

INDEX 

ADORFD 

0395 

6A7A 

3 

0302 

0 

CA 

2 

LOAC  A TRIPLE  PRECISICN  APGLPENT  INTC 

0396 

REF 

380 

LAST 

no9 

6A75 

5A 

156 

1 

TS 

PFAC  +2 

THE  FIRST  three  MPAC  REGISTERS,  WITH  THE 

0397 

6A76 

0 

0 0O6 

1 

EXTEND 

CONTENTS  0=  THE  CTHEP  FCUF  IRRELEVANT. 

0398 

REF 

28 

LAST 

1011 

6A  n 

5 

0116 

1 

TNOFX 

ACDPwr 

0399 

PFF 

LAST 

6 500 

3 

OOC  1 

c 

OCA 

0 

OAOQ 

381 

1011 

6501 

52 

155 

1 

CXCF 

MPAC 

OA'  I 

OPF 

\'  ■= 

LAS'* 

917 

6 50  2 

3 

A753 

1 

TPCDF 

CAF 

CNF 

OA'l? 

REF 

1 

65  13 

1 

606  3 

0 

TCF 

NEKMCDE 

CFCLARE  TRIPLE  FRECISICN  MODE. 

0AC3 

t 50A 

22 

007 

0 

SLOAC 

ZL 

LOAC  A SINGLE  PRECISICN  NIMBFR  INTC 

OA  lA 

RTF 

29 

LAST 

101  1 

65C5 

51 

116 

1 

INDEX 

ACDPWC 

MFAC,  setting  VPAC+1,2  Tf  ZERO.  THE 

CAt  5 

6506 

3 

0000 

1 

CA 

0 

CCNTENTF  CF  THE  REMAINING  MPAC  RFGISTERS 

OAdt 

PFF 

1 

6507 

1 

6060 

0 

TCF 

SLCAC2 

APE  IRRELEVANT. 

0AO7 

6510 

0 

root 

1 

VLOAC 

EXTFNC 

ICAC  A CCUPLE  PRECISICN  VECTOR  INTO 

OACe 

REF 

30 

LAST 

1011 

651  1 

5 

0 116 

1 

INDEX 

ACDRWD 

MPAC,+1,  MFAC+3,a,  and  MPAC+5,6.  THE 

0A(  q 

REF 

382 

1 AST 

10  1 1 

6512 

3 

CCQl 

0 

CCA 

0 

CCNTENTS  CF  MFAC  *2  ARE  IRRELEVANT. 

OAl  O 

6 513 

5 2 

155 

1 

CXCH 

MFAC 

OAl  1 

651  A 

C 

0006 

1 

FNDVLC  6C 

EXT  END 

PDVL  COMES  HERE  TC  FINISH  LF  FCR  CF,  TF. 

0A12 

R^F 

31 

LAST 

loll 

6515 

A 

C 1 16 

1 

INDEX 

ACDRFD 

>Al  3 

6516 

3 

0 00  3 

1 

CCA 

2 

OAIA 

'ref 

3f  2 

LAST 

1011 

6517 

52 

160 

1 

CXCF 

MFAC  +3 

OAl  5 

6520 

C 

C006 

1 

+ A 

EXTEND 

TFCVL  FINISHES  HERE. 

0A16 

RFF 

^2 

LAST 

101  1 

6521 

5 

1 1 16 

I 

INDEX 

ADCRWO 

OAl  7 

6 522 

3 

crc5 

1 

CCA 

A 

OAl  8 

REF 

38A 

LAST 

1011 

6523 

52 

162 

0 

CXCH 

MFAC  +5 

0A19 

Rf^F 

1C6 

1 A ST 

1011 

652A 

A 

A753 

0 

VPCDE 

CS 

CNE 

DECLARE  VECTCR  MODE. 

')A?'1 

RFF 

2 

1 AST 

1011 

6 52  5 

1 

6963 

r 

TCF 

NEUMCCE 

GAP:  ASSP^eLE  REVISION  116  EE  AGC  PROGRAM  LUMINARY  BY  NASA  2C21112-C71  19: 

L IMCPFRPTER 

P1^,21  THE  EOLLGUING  INSTRLCTIONS  ARE  PROV  I OEO  FOR  STORING  CPERANCS  IN 


RTA23 

1 . 

PUSH 

PIJSECnWN 

AND  NC 

LEAD. 

R0A2A 

2.  1 

POOL 

PLSHCCwN 

AND  CCLELP  PEFCISION  LCAF 

P JA2S 

3.  1 

3DVL 

PUSHCCkvN 

AND  VECTOR  LCAC 

''  • 

0A26 

6526 

J 0006 

1 

PC  CL 

EXTEND 

0A27 

REF 

33 

LAST 

1011 

6527 

5 CU6 

1 

INDEX 

ACORWC 

DA28 

653" 

3 ':2ni 

0 

DCA 

0 

0A29 

RPF 

3E5 

LAST 

1011 

653  1 

52  155 

1 

CXCE 

MFAC 

0A3O 

RFE 

12 

L AST 

1000 

6 5 32 

5C  166 

C 

INDEX 

PLSHLCC 

■)A31 

6533 

52  001 

1 

CXCE 

0 

OA32 

RFF 

20 

LAST 

1009 

65  39 

53  163 

0 

INDEX 

MCCE 

0A33 

RFF 

3 

L AST 

1000 

6 5 3 5 

3 629  7 

r 

CAP 

NC.WDS 

CA3A 

RFE 

13 

LAST 

1012 

65  36 

26  166 

1 

ACS 

PUSHLOC 

IA35 

RFE 

2 1 

LAST 

1012 

65^7 

1C  163 

1 

CCS 

MCDE 

0A36 

RFF 

1 

6590 

1 6555 

0 

TCF 

ENDTPLSH 

0A37  . 

FFF 

1 

6591 

1 6553 

0 

TCF 

ENCOFLSE 

OA38 

RFF 

22 

LAST 

10  12 

6 5 92 

5 9 16  3 

1 

TS 

MCDE 

0939 

pff 

3 66 

LAST 

ni  2 

6593 

59  156 

1 

ENCVPLSE 

TS 

MPAC  +2 

0990 

REF 

3 6 7 

LAST 

10  1 2 

6 599 

52  16C 

1 

CXCE 

MFAC  43 

0991 

Rff 

19 

LAST 

1 >12 

6595 

50  166 

0 

INDEX 

PLSHLCC 

C992 

6596 

51 ’ 775 

0 

CXCE 

0 -9 

0993 

REF 

388 

LAST 

1012 

6597 

52  162 

0 

CXCH 

MFAC  +5 

0999 

RFF 

15 

LAST 

1012 

6550 

53  166 

0 

INDE  X 

PLSHLCC 

0999 

6551 

51*777 

1 

CXCE 

0 -2 

0996 

PFF 

R 

LAST 

1007  , 

6552 

1 6C69 

1 

ICF 

DANZIG 

099  7 

RFF 

369 

LAST 

1012 

6553 

59  156 

1 

ENDCPLSE 

TS 

MPAC  42 

099B 

RFF 

6 

LAST 

1012 

6559 

1 6069 

1 

7CF 

DANZIG 

0999 

PEF 

23 

LAST 

10  12 

^ c c c 

59  163 

1 

ENCTPLSE 

TS 

MCDE 

09  50 

REF 

39C 

1 AST 

1012 

6556 

56  156 

0 

XCE 

MFAC  42 

0951 

REF 

16 

L AST 

1012 

6557 

50  166 

0 

+ 2 

INDE  X 

PLSHLCC 

095? 

6560 

53*777 

0 

TS 

0 -1 

0953 

RFF 

7 

LAST 

1012 

656  1 

1 6069 

1 

TCF 

DANZIG 

09  AUG.  11,1969  SKIPFEP  .097  PAGE  1012 
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TEE  FUSECCNN  LIST: 


LCAC  NFAC,+1,  PUSEING  TEE  FORMER 
CONTENTS  CCViN. 


ADVANCE  THE  PLSECOWN  POINTER  AFPRO- 
FPI  ATELY. 


NCE  CF. 

FUSE  CCVvN  TEE  REST  OF  TEE  VECTOR  EEPE. 


SET  MFAC  <-2  TO  ZERO  AND  EXIT  ON  DP. 


ON  TRIPLE,  SET  MPAC  +2  TO  ZERO,  FLSEING 
CCV.N  TEE  OLD  CONTENTS 


ASSe^BLF  REVISION  11^^  CF  / C-C  PRCGR'W  LLMNPFY  BY  ^/SSA  20211  12-071 


GAP: 


I IN'fFPPPETFR 


POVL 

- PLSHCCWN  ANC 

VECTCF  LCAC. 

6 562 

0 C006 

1 

POVL 

EXTENT 

0A56 

PEF 

34 

LAST 

101  2 

656  3 

5 0 116 

1 

INPF  X 

ACDfiWD 

OA57 

6564 

3 OCOl 

0 

CCA 

0 

OARR 

REF 

391 

LAST 

101? 

6565 

52  155 

1 

OXCH 

MPAC 

0AS9 

rff 

17 

1 AST 

101  2 

6566 

50  166 

0 

INDEX 

PLSHLOC 

0A60 

6567 

52  '•Cl 

1 

CXCH 

0 

0461 

REF 

24 

LAST 

101  2 

6 5 70 

50  163 

C 

INOE  X 

MCOE 

C462 

REF 

4 

LAST 

101  2 

6 57  1 

3 6247 

0 

CAF 

NC.WDS 

0463 

RF-F 

18 

1 AST 

101  3 

657? 

26  166 

1 

AOS 

PLSHLCC 

0464 

REF 

25 

LAST 

1013 

6573 

10  163 

1 

CCS 

MOOE 

046R 

REF 

1 

6574 

1 6613 

1 

TCF 

T FCVI 

0466 

REF 

1 

65  75 

1 6 514 

c 

TCF 

ENCVLCAC 

0467 

6576 

0 0006 

1 

VPCVL 

FXTEND 

046P 

RFF 

z c 

LAST 

icia 

6 5-7  7 

5 0116 

1 

TNCEX 

A CCRWC 

0469 

6600 

3 C0C3 

1 

OCA 

2 

04  7C 

RFF 

392 

1 AST 

101  3 

6601 

52  160 

1 

CXCF 

MPAC  +3 

0471 

REF 

19 

1 AST 

1013 

66'"2 

50  166 

0 

INDEX 

PLSHLCC 

047? 

6603 

51  '775 

0 

CXCH 

0 -4 

047’ 

6604 

0 0006 

1 

EXTENT 

04  74 

PEF 

36 

LAST 

101  3 

6605 

5 0 116 

1 

TNDE  X 

ACDRWC 

04  7 5 

6606 

3 0005 

1 

CCA 

4 

04  7 6 

RFF 

39’ 

LAST 

ICl  3 

6607 

52  162 

0 

CXCF 

MPAC  -f5 

0477 

P'^F 

?0 

L AST 

IP  1 3 

6610 

50  166 

0 

INDEX 

P 1.  SH 1 CC 

C478 

6611 

51 • 777 

1 

CXFF 

0 -2 

0479 

Rf^F 

8 

LAST 

1012 

6612 

1 6C64 

1 

TCF 

DANZIG 

04RO 

6613 

0 1006 

1 

TPDVL 

EXTEND 

0481 

RFF 

’7 

LAST 

1013 

6614 

5 -.U16 

1 

INCEX 

ACCRWC 

048? 

6615 

3 0CC3 

1 

CCA 

2 

0483 

REF 

394 

LAST 

101  3 ' 

6616 

52  161 

I 

CXCF 

MPAC  *3 

0484 

REF 

3 9 5 

LAST 

1013 

6617 

3 C 156 

r 

CA 

MAC  *2 

04  8R 

PFF 

21 

L AST 

1013 

6620 

5 1 166 

C 

INOE  X 

PLSHLCC 

C4P6 

6621 

53 • 777 

C 

TS 

0 -1 

0487 

RFF 

2 

LAST 

1013 

6622 

1 6 520 

1 

TCF 

FNDVl CAC 

R0488 

SSP 

(STORE 

SINGLE  FRECISinN) 

IS 

EXECUTED 

' FEPE. 

0489 

REF 

18 

LAST 

1C06 

6623 

24  164 

1 

SSP 

INCR 

LCC 

0490 

RFF 

19 

LAST 

10  13 

6624 

50  164 

1 

INOE  X 

LCC 

0491 

6625 

3 0000 

1 

CA 

0 

0492 

PEF 

38 

LAST 

ICl  3 

66  26 

5 0 116 

1 

STCREl 

INCEX 

ACCRWC 

0493 

6627 

54  000 

c 

TS 

0 
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US^R' S PAGE  AC.  20  EO  S3 


PELCAC  MPAC  ANC  PUSH  CCWiN  ITS  CONTENTS. 


ACVANCE  the  FLSFCCWN  FCINTER. 

TEST  PAST  NCCE. 

JLST  ICAC  LAST  FCUP  REGISTERS  CN  CP. 
PLSHDCkN  AND  R.E-LCAD  LAST  TVC  CCRPCNENTS 


CN  TP,  UE  RLST  LOAD  THE  Y CCNECNENT 
REECRE  STORING  MPAC  *1  INCASE  THIS  IS  A 
PLSFUF. 


IN  CP. 


PICK  UP  THE  WORD  FOLLOWING  THE  GIVEN 
ACCRESS  ANC  STCRE  IT  AT  X. 

SCPE  INDEX  ANC  MI SCELLANECLS  OPS  ENG 
HERE. 


GAP 
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19:09  AUG.  11,1969  SKIPPER 


097 


FACE  lOlA 


IMERFPFTER 

USER'S  PAGE  NO.  21 

EO  S3 

0A9A 

REF  9 LAST  1013 

6630  1 606A  1 

TCF 

CAN21G 

G4P:  ^SSF^0LE  REVISION  116  CF  AGC  PRCGRA'1  LUMINARY  BY  NASA  2021112-071  1S:0S  fUG.  Iltl96q  SKIPPER  .097  PAGE  1015 

I INTFOPRFtfr  USER'S  PAGE  NO.  22  FC  S3 

P0A95  SECUFNfE  CI-AN'GING  ANC  SLBROLTINE  CALLING  CFTICNS. 

R0A96  THE  FCLirwING  CPERATICNS  ARE  AVAILABLE  FOR  SECUENCING  CHANGING,  BRANCHING,  ANC  CALLING  SIBRCLTINES: 


ROqOR 

1 . 

GOTC 

GO  TC. 

pCAqq 

2. 

CALL 

CALL 

c 

LBROLT  TNE 

SETTING 

CFPET. 

R05C0 

3. 

CGOTC 

rCRPUTEC  GC  TC. 

Rosn  1 

A. 

rCALL 

CCWPLTEG  CALL. 

R0  59? 

7. 

BPL 

francf 

IF  MPAC 

FOS  IT  IVE 

OP  ZERO. 

POSH? 

8. 

87F 

BRANCH 

IF  WPAC 

ZERC. 

P05r>4 

9. 

BMN 

BRANCH 

IF  HPAC 

NFGAT I VE 

NCN-ZERC. 

0505 

PFF 

20 

LAST 

101  3 

6631 

24  164 

1 

CCALL 

INCR 

1 CC 

maintain  LOC  FOR  CPRET  CCMPLTATICN. 

0 506 

REF 

21 

LAST 

1015 

6632 

50  164 

1 

I NDEX 

LCC 

C5('7 

6633 

3 OOCO 

1 

CAE 

C 

GFT  BASE  AOCRESS  CF  CACP  LIST. 

0 5ce 

PFF 

39 

LAST 

1013 

6639 

50  116 

1 

INOEX 

ACCRWC 

0509 

6635 

6 0000 

1 

AD 

0 

ACC  INCPENENT. 

051  C 

RFF 

17 

1 A 'T 

1006 

6636 

54  T04 

1 

TS 

FEANK 

SELECT  DESIREE  CACR. 

0511 

REF 

1 7 

LAST 

99F 

66  37 

7 5012 

0 

NASK 

LCUin 

0512 

PFF 

32A 

LAST 

1008 

66  AO 

50  OQO 

1 

INDEX 

A 

0513 

6641 

3 700  7 

0 

CAF 

10009 

051A 

RFF 

7 

LAST 

1001 

6642 

54  117 

1 

TS 

PCllSH 

0515 

REF 

5 

L AST 

1006 

6643 

3 0165 

0 

CALL 

CA 

BANKSFT 

FOP  ANY  CF  THE  CALL  CFTICNS,  MAKE  U F TFE 

051<y 

RFF 

2 

LAST 

1002 

6644 

7 4350 

1 

NAS  K 

RANKMASK 

ACCRESS  CF  THE  NEXT  CP-CCDE  PAIR/STCRE 

0517 

RFF 

■a 

1 AST 

1C  1 5 

6645 

6 4 350 

0 

AP 

BANKNA  SK 

CCCE  ANC  LEAVE  IT  IN  CPRET.  NCTE  TFAT 

051  P 

REF 

22 

LAST 

lUl  5 

6646 

6 0164 

1 

AD 

LOC 

8ANKMASK  = -( 2GC0  - 1 ) . 

051  S 

RFF 

AA 

LA  ST 

ICCf 

6 64  7 

50  12c 

1 

INCEX 

F !Xl CC 

0520 

REF 

9 

1 AST 

932 

66  50 

54  052 

1 

TS 

QPRET 

C521 

REF 

8 

LAST 

101  5 

665  1 

3 0117 

0 

GCTO 

CA 

PCL  ISF 

BASIC  BRANCHING  SEQUENCE. 

0522 

RFF 

3 

LAST 

998 

6652 

7 7745 

1 

+ 1 

NASK 

H 1GH4 

0523 

6653 

0 0006 

1 

EXTEND 

0 52A 

RFF 

1 

6654 

1 6665 

0 

FZF 

GCTCERS 

SEE  IF  ADDRESS  PCINTS  TC  FIXED  CR  ERAS. 

0525 

■ PFF 

6 

1 AST 

1015 

6655 

3 0165 

0 

+ 4 

CA 

BANKSFT 

SET  FEANK  FART  CF  BBANK.  NEXT,  SET  LP 

0 = 26 

PEF 

27 

1 AST 

995 

6656 

54  006 

c 

TS 

BBANK 

FRANK.  TFE  CCNBIN«TICN  IS  FICKEC  LF  G 

0527 

REF 

9 

LAST 

10  1 5 

6657 

3 0117 

c 

CA 

PCLISH 

PUT  INTC  PANKSET  AT  INTPRET  +2. 

0528 

R = F 

18 

LAST 

10  15 

6660 

54  004 

1 

TS 

F8ANK 

0529 

RFF 

18 

1 AST 

1015 

666  1 

7 5012 

0 

MASK 

LCWlO 

0500 

PEF 

2 

LAST 

998 

6662 

6 4741 

1 

AD 

2 K 

0531 

REF 

23 

LAST 

1015 

666? 

54  164 

0 

TS 

LCC 

053? 

RFF 

220 

1 AST 

99A 

6664 

1 6045 

1 

TCF 

TNTPPEY  +3 

0533 

E3,  1 400 

E8ANK= 

1 400 

SC  YLL  CCESN'T  CUSS  THE  "CA  1400"  EELGK. 

Q53F 

PEF 

10 

1 AST 

1015 

6665 

3 0117 

0 

GCTOERS 

CA 

PCL  ISH 

TFE  GIVEN  ACCRESS  IS  IN  EFASABLE  - SEE 

0535 

PFF 

2 

1 A ST 

997 

6666 

6 6254 

1 

AC 

-EADVAC 

IF  RELATIVE  TC  TFE  WORK  AREA. 

0536 

RFF 

325 

1 AST 

1015 

6667 

10  000 

c 

CCS 

A 

0537 

REF 

1 1 

L AST 

1C  1 5 

667C 

3 0117 

0 

r A 

PCLISH 

GFNEPAL  ERASABLE. 

0538 

R = F 

1 

667  1 

1 6 700 

1 

TC  F 

GCTOGE 

GAP: 


ASSe^RL?  REVISION  116  rp  AGC  PRCGRAP  LLMNARY  BY  AASA  20211  1?-''71 


L TNTfPP PETER 


0E3S 

REE 

A5 

LAST 

1015 

6672 

3 0120 

1 

CA 

F IXLCC 

05A0 

REF 

12 

LAST 

1C15 

6673 

6 0 117 

0 

AD 

PCI  I SH 

05A1 

RPF 

326 

1 A“^T 

101  5 

667A 

50  000 

1 

INDEX 

A 

05A2 

6675 

3 JTJT 

1 

CA 

0 

05A3 

REF 

13 

LAST 

1016 

6676 

5A  117 

1 

TS 

PCLI SH 

0 5AA 

REF 

1 

6677 

1 665? 

1 

TC  F 

GOTO  +1 

05AS 

REF 

62 

LAST 

1006 

6 700 

5A  003 

c 

GCTOGE 

TS 

EBANK 

05AH 

REF 

13 

LAST 

looe 

6701 

7 A357 

0 

PASK 

LDW8 

0 5A7 

PPF 

32  7 

LAST 

101  6 

6 7 02 

50  00  0 

1 

INDEX 

A 

05A8 

67  13 

3 lAOO 

1 

CA 

1 AGO 

Q5AS 

REF 

lA 

LAST 

1016 

67  )A 

5A  117 

1 

TS 

POL ISH 

05sn 

REF 

2 

LAST 

1C16 

6705 

1 6 6 52 

1 

TCF 

GCTO  +1 

0551 

REF 

?A 

LAST 

I'll  5 

6706 

5C  16A 

1 

CGOTO 

INDEX 

LCC 

055? 

6707 

3 con 

0 

CA 

1 

0553 

REF 

AO 

LAST 

101  ■= 

67K 

50  116 

1 

lADE  X 

ACDRWD 

055A 

6711 

6 0000 

1 

AD 

0 

0555 

RPP 

19 

LAST 

101  5 

6712 

5A  OOA 

1 

TS 

FEANK 

0556 

PEF 

19 

LAST 

1015 

671- 

7 5C12 

c 

BASK 

LCWIC 

0557 

REF 

32R 

LAST 

1016 

671A 

5 ) OOO 

1 

INDEX 

A 

055B 

6 715 

3 2000 

c 

CA 

inooo 

0559 

REF 

15 

1 AST 

1016 

6716 

5A  117 

1 

TS 

PCL I SH 

056G 

REF 

3 

1 AST 

1016 

6 717 

1 6652 

1 

TCF 

GCTC  +1 

0561 

PEF 

7 

LAST 

101  5 

6720 

3 0165 

f 

SWBRANCE 

CA 

BANKSFT 

0562 

REF 

20 

LAST 

1016 

672  1 

5A  OOA 

1 

TS 

F BANK 

D56:> 

pep 

2 = 

LAST 

1C  16 

6722 

50  16A 

1 

INCEX 

LCC 

056A 

6723 

3 OCOl 

c 

CA 

1 

0565 

REF 

16 

LAST 

1016 

672A 

5A  117 

1 

TS 

POL  1 SH 

0566 

REF 

A 

1 AST 

IC16 

6725 

1 66  52 

1 

TC  F 

GCTO  +l 
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PAGE  lOlt 


LSEF' S PAGE  AC.  23  E3  S3 

UORK  AREA. 

LSF  TEE  GIYEA  ADDRESS  AS  THE  ACCPESS  CF 
TEF  BRAACE  ACTRESS. 

ALLOWS  ARBITRARY  INDIRECTNESS  LEYELS. 


USE  TEE  GIVEN  ADDRESS  AS  THE  ADDRESS  CE 
TEE  BRAACE  ACCRESS. 


CCAFUTEE  GG  TC.  PICK  UP  ACCRESS  OF  CACR 
LIST. 

ACC  NCCIFIER. 

SELECT  GCTC  ADDRESS. 


WITH  ACCPESS  IN  A. 

SWITCE  INSTRUCTIONS  WEICE  ELECT  TO 
BRANCE  CCRE  HERE  TC  DC  SO. 


G4P;  />SSEP8LF  REVISION  116  PF  AC-C  PROGRAM  LUMINARY  BY  ^ASA  2P21112-071 
I IMFRFFETEO 


19:09  AUG.  11,1969  SKIPPER 
LSEP'S  PAGE  NC.  24 


.097  PAGE  1017 
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P0567 

TRIPLE 

PRECI SI CA 

BPAACHING  RCLTINE.  IF  CALLIAG  TC  IS  AT  L,  RETURN  IS  AS  FCLLCV»S 

P'3  569 

1 +1 

IF 

MPAC  IS 

GREATER  than  zero. 

RC57C 

1 +2 

I F 

AF^C  IS 

FCUAL  TC  <■  ) CP  -C. 

R0571 

L + 3 

IT 

Rpsr  IS 

LE'S  THAN  ZERC. 

0572 

REF 

396 

LAST 

1013 

6726 

10  154 

0 

BRANCH 

CCS 

MPAC 

0573 

REF 

254 

LAST 

ICC  5 

6727 

0 000’ 

0 

TC 

G 

”1574 

6 730 

1 6732 

C 

TF  F 

+ 2 

CN 

ZFfiC. 

0575 

REF 

1 

6731 

1 6744 

1 

TCF 

NEC 

0576 

REF 

3S  1 

LAST 

10  17 

6732 

1C  155 

1 

CCS 

M FAC 

+ 1 

0577 

REF 

255 

LAST 

1017 

6733 

0 0002 

0 

TO 

0 

C578 

6 734 

1 6736 

1 

TCF 

+ 2 

0 5 79 

REF 

? 

LAST 

1017 

673T 

1 6 744 

1 

TCF 

NEG 

05P0 

REF 

398 

LAST 

10  17 

6736 

10  156 

1 

CCS 

MPAC 

+ 2 

05P1 

RFF 

256 

1 A ST 

K17 

6737 

0 0002 

0 

TC 

C 

05R2 

6 740 

' 1 6742 

1 

TCF 

^■2 

05E3 

REF 

3 

1 AST 

1017 

674  1 

1 6744 

1 

TCF 

NFG 

05P4 

REF 

257 

LAST 

101  7 

6 742 

50  CO  2 

c 

C + 1 

INDEX 

C 

0585 

6 743 

0 CO’'  1 

0 

TC 

1 

0566 

REF 

258 

LAST 

1017 

6744 

50  002 

0 

NEG 

INDEX 

Q 

IF 

FIRST  NCN-ZERO  REGISTER  HAS  NEGATIVE. 

0587 

6745 

C CC02 

0 

TC 

2 

0588 

REF 

4 

1 AST 

101  7 

6744 

Ot2 

= 

NEG 

P.0589 

I TP.  ACE  (3) 

REEEPS  TC 

"EXIT". 

1590 

REF 

8 

LAST 

1016 

6746 

3 0165 

0 

EXIT 

CA 

BANKSET 

RESTCRE  USER' 

'S  eank  setting,  and  leave 

0591 

REF 

28 

LAST 

1015 

6747 

54  ) 16 

0 

TS 

BBANK 

INTERPRET! VE 

MODE. 

0592 

REF 

.26 

LAST 

1016 

6 75L 

50  164 

1 

INDEX 

LCC 

0593 

6 75  1 

0 0001 

0 

TC 

1 
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NEN  X CCNPCNENT  IN  8UF2. 


INITIALIZE  ACCEND  FCR  NEXT  CCT  FRrClCT. 
FCFPS  EASE  ACCRESS  D''  N>=XT  CDLUMN(RCN). 


»AOVE  GIVEN  VECTOR  PACK  TC  PFAC,  SAVING  Y 
CCNFCNENT  CE  ANSWER  IN  VBUF  +2. 


FCPN  ACCRESS  GF  LAST  COLLIN  OR  RON. 


ANSWER  NCW  CC^PLETE.  PLT  GCHPONENTS  INTO 
PPCPFR  NFAC  REGISTERS. 


EX  IT 


GAP: 


ASSEMBLF  REVISION  116  CF  A GC  FRCGPA^'  LUMNARV  BV  NASA  20211  12-071 


L INTERPRETER 


POR-^A 

VXSF 

- VECTOR 

TINES 

SCALAR. 

09S5 

REF 

27 

LAST 

1024 

7 4 14 

10 

162 

1 

VXSC 

CCS 

^-CDE 

09=^6 

PEE 

1 

740  5 

1 

7433 

0 

TCF 

OVXSC 

099  7 

REF 

2 

LAFT 

1C3? 

7406 

1 

7 4 2 3 

C 

TCF 

DVXSC 

0958 

RFF 

5 

LAST 

1027 

7407 

0 

7 112 

1 

VVXSC 

TC 

0 NPSLB 

C959 

REE 

1 

7410 

0 

7143 

0 

TC 

V PrUNC 

096H 

ocF 

462 

LAST 

1031 

7411 

52 

160 

1 

CXCH 

NFAC  +3 

0961 

ref 

464 

1 AST 

1032 

7412 

52 

155 

1 

DXCH 

MPAC 

0962 

REF 

465 

LAST 

1032 

7413 

52 

160 

1 

rxCF 

NFAC  +3 

0963 

REF 

6 

LAST 

1032 

74  14 

0 

7 112 

1 

TC 

DNPSUB 

0964 

pcF 

2 

LAST 

1032 

7415 

0 

7143 

0 

TC 

VROUNO 

0965 

RFF 

466 

LAST 

1022 

7416 

5 2 

162 

f 

CXCH 

NFAC  +5 

0966 

RFE 

467 

L AST 

1032 

7417 

52 

l‘=5 

1 

DXCH 

MPAC 

0967 

RFF 

46F 

LAST 

1022 

742C 

52 

162 

0 

CXCH 

NFAC  +5 

096B 

REF 

7 

L AST 

1032 

742  1 

0 

7 112 

1 

TC 

ONRSCe 

0969 

REF 

3 

LAST 

1032 

7422 

0 

7 143 

0 

TC 

VROUNO 

0970 

REF 

469 

1 AFT 

1032 

7423 

52 

155 

1 

VRCTATEX 

CXCH 

NFAC 

0971 

RFF 

47  T 

LAST 

1032 

7424 

52 

162 

0 

CXCH 

MPAC  +5 

0972 

RFF 

471 

LAST 

1032 

7425 

52 

160 

L 

CXCH 

MPAC  +3 

0973 

RTF 

472 

LAST 

1032 

7426 

52 

155 

1 

CXCH 

NFAC 

0974 

REF 

14 

LAST 

1031 

7427 

1 

6064 

1 

TCF 

DANZIG 
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LSEP*  S PAGE  NC.  39  E3  S3 


TEST  PRESENT  PCCF. 

SEPARATE  ROUTINE  V«HEN  SCALAR  IS  IN  NPAC. 


CCNPUTE  X CCNPCNFNT 
AN'C  RCCNC  IT. 

PUT  Y CC^PCNENT  INTC  yfaC  SAVING  RRAC  IN 
RPAC  +3. 


CC  SANE  FCP  Y ANC  I CCNPCNENTS. 


EXIT  USED  TC  RESTORE  «PAC  AFTER  THIS 
TYPE  CF  PCTATICN.  CALLEC  EY  VECTOR  SFIFT 
RIGHT,  V/Sr,  ETC. 
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L INTERPReiPP 


PG975  CP  VFCirp  PFCJECTICN'  R0L7INE. 


0976 

PEE 

2 

LAST 

1030 

7430 

0 7157 

0 

VFRCJ 

TC 

PPECCT 

oqyT 

REF 

21 

1 AST 

913 

7431 

4 4 75  1 

1 

CS 

FCLR 

09  7P 

P = F 

6C 

1 AST 

1031 

7432 

26  116 

0 

ACS 

ACCPWn 

R0979 

vxsc 

WHEN 

SCALAR  ARRIVES  IN 

XFAC  ANC 

VFCTCP  IS 

t> 

X 

Q9R'-l 

7433 

0 0006 

1 

DVXSC 

extend 

C9R1 

PEF 

473 

LART 

1C32 

74  34 

3 0155 

0 

CCA 

MFAC 

0982 

RFF 

474 

LAST 

10  3 3 

74  35 

52  160 

I 

CXCH 

PFAC  +3 

0983 

RFF 

8 

1 AST 

1032 

7436 

0 7112 

1 

TC 

nwPSUB 

0984 

REF 

4 

LAST 

103? 

7437 

0 7193 

0 

TC 

V POUNO 

0985 

PFF 

68 

LAST 

10  30 

7 440 

3 4 752 

c 

CAE 

TWC 

09E6 

RFF 

61 

LAST 

1033 

7441 

26  116 

0 

ACS 

ACORWD 

0907 

7442 

0 rCC6 

1 

EXTEND 

0988 

PFF 

475 

LAST 

1033 

7443 

3 0 160 

'C 

nr.  A 

MPAC  +3 

QC89 

RFF 

476 

LAST 

1033 

7444 

52  155 

1 

CXCH 

MFAC 

0990 

PFF 

477 

1 AST 

1033 

7445 

52  162 

c 

CXCH 

MPAC  +5 

0991 

REF 

9 

LAST 

1033 

7446 

0 7112 

1 

TC 

DMPSie 

0992 

RFF 

C 

LAST 

10  3 3 

7447 

0 7 143 

I 

TO 

VPCUNC 

0993 

PEF 

69 

LAST 

1033 

7490 

3 4 7 5 2 

c 

CAP 

TPC 

0994 

RFF 

62 

LAST 

103  3 

7451 

26  116 

0 

ADS 

ACDRHD 

09'P5 

REF 

4 78 

LAST 

1033 

7452 

52  160 

1 

CXCH 

MPAC  +3 

0996 

RFF 

479 

LAST 

10  3 3 

7453 

52  155 

1 

CXCH 

MPAC 

0997 

PCF 

4EC 

LAST 

1033 

7454 

52  163 

1 

CXCH 

‘'FAC  +3 

0998 

REF 

in 

LAST 

1033 

7 455 

0 7 112 

1 

K 

DMFSLB 

09C9 

RFF 

6 

LAST 

1033 

7456 

3 7143 

0 

TC 

VROUND 

lOOC 

RFF 

4F  1 

LAST 

1033 

7457 

52  155 

1 

CXCH 

MPAC 

1001 

REF 

482 

LAST 

10  3 3 

7 460 

52  162 

0 

DXCH 

MFAC  +5 

1002 

REF 

463 

LAST 

1033 

7461 

52  155 

1 

CXCH 

MFAC 

1003  • D rp 


7A62 


1 6524  C 


TCF 


VPCDE 
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(MPAC  .>  IPPAT  IS  CCMPUTEC  AND  LEFT  IN 
NFAC.  CC  CCT  ANC  FALL  INTC  CVXSC. 


SAVE  SCALAR  IN  NPAC  +3  ANC  GFT  X 
CCMPONENT  HP  ANShER. 


ADVANCE  ACCRWC  TC  Y CCNFCNENT  CF  X. 


PUT  SCALAR  BACK  INTC  NPAC  ANC  RAVE 
X RESULT  IN  MPAC  *5. 


TO  Z COMPONENT. 

BRING  SCALAR  BACK,  PUTTING  Y RESULT  IN 
THE  PPCPFR  PLACE. 


PUT  Z CCPPCNENT  IN  PROPER  PLACE,  4LSC 
PCSITICNING  X. 


PCCE  FAS  CFANGEC  TO  VECTCP. 


t 
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GAP: 


i.  IMPfiFFETER  LSER'S  PAGE  KC.  A1  E3  S3 

PIOOA  THE  VECTCP  CROSS  PRCCLC.T  RCUTIAE  CAICUIATES  (X  M -X  N , X R -X  P , X P -X  M ) kPERE  M IS  Tl-F  VECTOR  IN 

Rlon6  32  23  1'  31  21  12 


RICCE 

RFAC 

ANO 

X THE 

VECTFP 

AT  THE 

GIVEN  ACCFESS. 

1009 

7963 

0 C006 

1 VXV 

EXTEND 

101  -I 

REF 

989 

LAST 

1033 

7969 

3 0162 

1 

DOA 

MFAC  +5 

FORM  LP  M3X1,  LEAVING  M IN  VEUF. 

10  1 1 

RFF 

965 

LAST 

1039 

7965 

52  155 

1 

CXCF 

MFAC 

ni2 

REF 

93 

1 AST 

103  1 

7966 

52  123 

C 

CXCH 

VELF 

ICl  3 

ROC 

11 

1 AST 

1033 

7967 

1 7112 

1 

TC 

rippsL'e 

BV  XI. 

l^lA 

7 9 70 

C CCC6 

1 

EXTEND 

lOlK 

REF 

986 

LAST 

1039 

797  1 

9 0 160 

I 

DCS 

MFAC  +3 

CALCULATf  -X1N2,  SAVING  X1M3  IN  VEUF  -*2. 

1016 

rff 

987 

LAST 

1039 

7972 

52  155 

1 

CXCF 

MFAC 

1017 

RFF 

99 

LAST 

1039 

7 973 

52  125 

G 

CXCH 

VBLF  +2 

1 J 1 R 

R’^F 

12 

1 AS"^ 

1039 

7979 

■J  7 112 

1 

TO 

DMPSUB 

1019 

R'^F 

70 

LAST 

1033 

79  75 

3 9 75  2 

1 

CAF 

TWC 

ADVANCE  AODRWD  TO  X2. 

102') 

RFF 

63 

1 ACT 

1033 

79  76 

26  116 

C 

ADS 

ACDR1.D 

1021 

79  77 

0 ) 106 

1 

EXTEND 

1022 

RFF 

986 

1 AST 

1039 

7500 

9 0162 

0 

CCS 

MFAC  +5 

FFFPARE  TO  GET  -X2M3,  SAVING  -X1M2  IN 

1 023 

RFF 

989 

LAST 

1039 

75  1 1 

52  155 

1 

CXCH 

MPAC 

MFAC  +5. 

1029 

RFF 

9 90 

LAST 

1039 

7502 

52  162 

0 

CXC  F 

MFAC  +5 

1029 

RFF 

1 3 

LAST 

1C39 

7503 

0 7112 

1 

TC 

OMFSUF 

1026 

75'’9 

')  1006 

1 

EXTEND 

1027 

PEF 

9 E 

LAST 

1039 

7505 

3 0123 

1 

CCA 

veuF 

GET  X2M1,  SAVING  -X2M3  IN  V8LF  +9. 

1028 

RF.  F 

99  1 

L AST 

10  3 9 

7506 

52  155 

1 

CXCH 

MFAC 

1C29 

pop 

96 

LAST 

103  9 

75<)7 

52  !2? 

1 

CXCF 

V8LF  +9 

1030 

RFF 

19 

LAST 

1039 

75  10, 

0 7 112 

1 

TC 

DMFSUP 

1 031 

REF 

71 

LAST 

10  3 9 

7511 

3 9 752 

0 

CAF 

TWO 

ADVANCE  ACCRWC  TO  X3 . 

10  32 

RFF 

69 

LAST 

1039 

7512 

26  116 

r 

ACS 

ACCRWO 

1033 

7513 

0 0006 

1 

EXTEND 

1 0 V 4 

pop 

97 

LAST 

1039 

7519 

9 0123 

0 

CCS 

VBUF 

GFT  -X3M,  ADDING  X2ML  TC  MFAC  +5  TC 

103S 

RC'F 

992 

LAST 

1039 

7515 

52  155 

1 

CXCF 

MFAC 

rOMPLETF  TFE  Z COMPONENT  OF  THE  ANSWER. 

1076 

RFF 

99? 

LAST 

1039 

75  16 

20  162 

c 

CAS 

WPAC  +5 

1C37 

7517 

0 (10.16 

1 

EXTEND 

1038 

7520 

1 7c?2 

1 

ezF 

+ 2 

1039 

RFF 

3 

LAST 

10  2C 

752  1 

0 70  19 

c 

TC 

rvERFI WZ 

1090 

RFF 

15 

LAST 

1039 

7522 

0 7112 

1 

TC 

DNPSUB 

lOAl 

REF 

98 

LAST 

1039 

7523 

52  125 

0 

CXCH 

VBL'F  +2 

MCVE  X1M3  TC  MPAC  -»3  SETTING  UP  FOR  X3M2 

1092 

REF 

999 

LAST 

1039 

7529 

52  160 

1 

OXCH 

MPAO  ¥3 

ANC  ACC  -X3M  TC  MPAC  -*3  TC  COMPLETE  TFE 

1093 

RFF 

995 

LAST 

1039 

7525 

52  155 

1 

CXCF 

MFAC 

V COMPONENT  OF  THE  PESLLT. 

1099 

REF 

996 

1 AST 

1039 

7526 

20  160 

1 

CAS 

MFAC  F3 

1099 

7527 

0 0006 

1 

EXTEND 

1096 

7530 

1 7 532 

0 

ezF 

+ 2 
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1 

INTERPRETER 

LSEP'S  PAGE  NC.  42  E3 

S3 

10A7 

PEP 

3 

LAST 

1020 

7531 

3 7T1  7 

0 

TC 

OVERFLWT 

10A8 

REF 

16 

LAST 

1034 

7532 

0 7112 

1 

TC 

ONPSLE 

104  9 

REF 

49 

LAST 

10  3 4 

7533 

52  127 

1 

DXCH 

VBLF  +4 

GC  ADC  -X2R3  TC  XBV  TC  CCRFLETE 

THE  X 

1C50 

REF 

4 

LAST 

1021 

7534 

1 7003 

1 

TCF 

ENCVXV 

CCNPONFNT  (TAIL  END  OF  CAC). 

R 1051 

THF  1 

^DAC veuF 

SUBROUTINE  SAVES 

THE  V=CTCR  IN  NFAC  IN  VBUF 

NITHOLT  CLCEBEFING  WPAC. 

1053 

7535 

0 0006 

1 

MPACVRUF  EXTEND 

callec  bv  yxv,  vxn,  anc  unit. 

1054 

REF 

49  7 

LAST 

1034 

7536 

3 01  55 

0 

rcA 

^'FAC 

1055 

PFF 

50 

L AST 

1035 

7 537 

52  123 

0 

CXCH 

V8LF 

1C56 

7540 

0 0006 

1 

EXTEND 

1057 

REF 

49E 

LAST 

1035 

754  1 

3 C160 

0 

rcA 

H P A C *3 

1058 

REF 

51 

LAST 

1035 

7542 

52  125 

0 

DXCH 

VBLF  +2 

1 C5C 

7 54  3 

0 0006 

1 

EXTEND 

1 )50 

REF 

499 

1 AST 

1035 

7 54  4 

2 0162 

1 

DC* 

YPAC  +5 

1061 

RFF 

52 

LAST 

10  3 5 

7 54  5 

52  127 

1 

OXC  H 

VBUF  +4 

106? 

RFF 

274 

LAST 

1029 

7546 

C C002 

0 

TC 

C 

RFTLRN  TC  CALLER. 

P1063 

CnUBl 

F PRECISION  SIGN  AGREE 

ROUTINE.  ARRIVE 

WITH  INPLT 

IN  A+L.  CUTFUT  IS  IN  A + L. 

1065 

RFF 

332 

1 AST 

10?8 

7547 

10  TOO 

0 

ALSIGNAC 

CCS 

A 

TEST  LPPER  FART. 

1066 

REF 

1 

7550 

1 7 5 54 

c 

TCF 

UFFCS 

IT  IS  FCSITIVE 

1067 

RCF 

275 

LAST 

10  3 5 

755  1 

0 0002 

0 

TC 

Q 

ZEPC 

1C68 

RFF 

1 

7552 

1 7564 

0 

TCF 

UPNFG 

NEGATI VE 

1069 

R'FF 

276 

LAST 

1035 

755? 

C C002 

0 

TC 

C 

ZERC 

1070 

RCF 

191 

LAST 

1029 

7554 

56  TOl 

0 

UFPOS 

XCH 

L 

SAVE  CECRERENTED  UPPER  FAFT. 

1071 

RFF 

12 

LAST 

91  5 

7555 

6 4736 

1 

AC 

HAl  F 

1072 

REF 

13 

LAST 

1035 

7 5 56 

6 4736 

1 

AD 

HAl  F 

107? 

RFF 

333 

1 AST 

1035 

7557 

54  900 

0 

TS 

A 

SKIPS  CN  CVERFLCV. 

1074 

756C 

1 7 562 

r 

TCF 

+ 2 

1075 

REF 

192 

LAST 

1035 

756  1 

24  OL  1 

0 

I NCR 

L 

RESTCRE  LFFEP  TC  PCIGINAL  VALUE 

1076 

R = F 

193 

LAST 

10  3 5 

7562 

56  oni 

n 

xo- 

L 

SWAP  A 4 L BACK. 

1077 

REF 

277 

LAST 

1035 

7563 

0 0C02 

c 

TC 

C 

1078 

RFF 

194 

LAST 

1035 

7564 

56  TOl 

0 

UPNEG 

XCH 

L 

SAVE  CCNFLERFNTED  + DECFENENTEC  UFFEP  FT 

1079 

REF 

6 

LAST 

915 

7565 

6 4735 

1 

AC 

N PGM AX 

1080 

REF 

7 

LAST 

IC06 

7566 

6 7 7 5 2 

c 

AC 

NEGCNE 

ICRl 

RFF 

334 

L AST 

1035 

7507 

54  10) 

0 

TS 

A 

ICP? 

7570 

1 7572 

1 

TCF 

+ 2 

CENT  INCPEYENT  IF  NO  OVERFLOW. 

1083 

REF 

195 

LAST 

1035 

757  1 

24  OOl 

0 

INCR 

L 

IC84 

REF 

196 

LAST 

1035 

75  72 

56  001 

0 

XCH 

1 

1085 

7573 

4 CCOO 

0 

cr> 

RAKE  NEGATIVE  AGAIN. 

lOflf, 

PFF 

278 

LAST 

iri34 

7574 

0 0TO2 

0 

TC 

0 
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P1087  INTERPRETIVE  TNSTRLCTirNS  UHCSE  EXECUTICF  CCFSISTS  CF  PRINCIPALLY  CALLING  SUEKCUTINES. 


1 CE9 

REF 

17 

1 AST 

1035 

7575 

7112 

1 

CPPl 

TC 

OMPSUP 

DPP  INSTPUC.TICN. 

1C90 

REF 

15 

1 AST 

1C32 

7576 

1 

6065 

1 

TG  F 

DANZIG 

1091 

REF 

18 

1 AST 

10  3 6 

7577 

0 

7112 

1 

CMPR 

TC 

DPFSLB 

109? 

DCF 

1 

7600 

) 

7152 

1 

TC 

PCUNCSUP  +1 

(f ( A ) = +0 ) . 

1093 

R'=F 

16 

LAST 

1036 

76-  1 

1 

6C65 

1 

TCP 

DANZIG 

109A 

76>'2 

0 

9006 

1 

DDV 

FXTFNC 

1095 

BEE 

65 

LA  ST 

1035 

76('3 

5 

9 116 

1 

INC  = X 

ACDRNC 

MOVE  CIVIOEND  INTO  BUF. 

109  6 

7605 

3 

COC  1 

0 

DCA 

0 

1 097 

PEE 

2 

LAST 

100  3 

7605 

1 

7612 

1 

TCP 

BCDV  +5 

1098 

76C6 

r 

A/ 

C0C6 

1 

BDOV 

extend 

NCVE  CIVISCP  INTC  MPAC  SAVING  «FAC,  TEE 

1099 

PEE 

66 

LAST 

1036 

76  )7 

5 

0 116 

1 

INDEX 

ADORND 

DIVIDEND,  IN  BL'F. 

1 100 

761C 

3 

OOU  1 

0 

CCA 

0 

1 101 

REF 

500 

L AST 

1035 

76  1 1- 

5 2 

c c 

1 

CXCE 

P FAC 

1102 

REF 

91 

LAST 

1025 

7512 

52 

131 

0 

+ 5 

CXCE 

BLF 

1 103 

REE 

19“= 

LAST 

1 039 

7613 

3 

5755 

1 

CAE 

ZERO 

CIVIDE  RCUTIMES  IN  BANK  0. 

1 lOA 

REF 

21 

LAST 

1016 

7615 

55 

00  5 

1 

T S 

E BANK 

1105 

RPF 

2 

LAST 

819 

7615 

1 

2 353 

1 

TCP 

nCV/BDDV 

1 l'i6 

r'ef 

67 

LAST 

1036 

7616 

D 

0116 

1 

SETPO 

CA 

ACDRkC 

POST  SET  TC  WORK  AREA,  OR  EBANK  TRQLBLE. 

1 107 

REF 

22 

LAST 

1013 

7617 

55 

166 

1 

TS 

PLSHLOC 

1 108 

REF 

1 

7620 

1 

6C66 

c 

TCP 

NCIBNKSVv 

NO  FBANK  SNlTCE  REQUIRED. 

1 199 

REF 

196 

LAST 

1036 

7621 

3 

575  5 

1 

TSLC 

CAP 

ZEPO 

SHIFTING  RC'JTINES  I.CCATEC  IN  BANK  OC  . 

1110 

REF 

22 

LAST 

1036 

7622 

55 

005 

1 

TS 

FBANK 

1111 

PFF 

1 

7623 

1 

2 172 

c 

TCP 

TSLC2 

111? 

PEE 

7 

LAST 

995 

7625 

3 

6077 

1 

GSHIFT 

CAE 

LCW7 

LSEC  AS  NASK  AT  GENSHIFT.  THIS  FRCCESSES 

1113 

R'^F 

23 

LAST 

10  3 6 

7625 

55 

005 

1 

TS 

FBANK 

ANY  SHIFT  INSTRUCTION  (EXCEPT  TSLC)  KITH 

11)5 

PEE 

1 

7626 

1 

2215 

0 

TCP 

genshift 

AN  ACCPFSS  (RTUTINRS  IN  BANK  0). 
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Pin  F 

THE  FOLLCHNG 

1 s thf 

FRCICGLE 

TC  V/SC.  IF  TFE 

PRESENT  VCCE 

IS  VECTOR, 

IT  'AVES  THE  SCALAR  AT  > 

IN  BLE 

Pill  7 

ANE 

CALLS 

, TFF 

V/SC 

RCUTINF  IN' 

BANK  0 

• 

IF  THE  PRESENT  PCDE  IS  SCALAR, 

IT  FCVES 

TFE  VECTOR  AT  X INTC  "-FAC 

, SAVING 

Rll  19 

THE 

SCALAR  IN 

f'PAC 

IN 

PIIF  BEFCRF  CALLING  TFF  V/SC  RCUTINF  IN  BANK  C. 

1120 

FFF 

2P 

1 AST 

1F32 

7627 

10  162 

1 

V/SC  CCS 

PCCE 

1121 

PPF 

1 

763  ) 

1 76AI 

1 

TCF 

nv/SC 

FOVE  VECTOR  INTC  NPAC. 

1 122 

RFF 

2 

LAST 

1027 

7631 

1 76A  1 

1 

TCF 

CV/SC 

1 123 

7632 

0 0006 

1 

VV/SC  EXTENO 

U2A 

RFF 

68 

LAST 

1036 

7633 

5 0116 

1 

INCEX 

ACDRWO 

1125 

763A 

2 OCCl 

C 

CCA 

0 

1126 

RFF 

92 

LAST 

1036 

76  35 

52  131 

c 

V/SCl  OXCF 

HUE 

IN  ECTF  CASES,  VECTOR  IS  NCF  IN 

MPAC  ANC 

1127 

Rcp 

197 

LAST 

1C36 

7636 

3 A755 

1 

CAF 

ZERO 

SCALAR 

IN  ELF. 

1128 

RFF 

2A 

LAST 

1036 

7637 

5A  CCA 

1 

TS 

FBANK 

1129 

PFF 

1 

76AQ 

1 265A 

0 

TCF 

V/SC2 

1130 

76A1 

C CCC6 

1 

CV/SC  EXTEND 

1131 

PPF 

69 

LAST 

10  37 

76A2 

5 0 116 

1 

INOE  > 

ADDRFO 

1132 

7oA3 

3 0003 

1 

CCA 

2 

1 1 33 

REF 

501 

LAST 

1036 

76AA 

52  16C 

1 

CXCH 

FFAC  +3 

1 13A 

76A5 

0 0006 

1 

EXTEND 

1135 

R=F 

7C 

1 AST 

1027 

76A6 

5 0116 

1 

INDEX 

ACCPWC 

1136 

76A7 

3 CC05 

1 

CCA 

A 

1137 

RFF 

502 

LAST 

1037 

7650 

52  162 

0 

CXCF 

MPAC  +5 

1128 

REF 

1C7 

LAST 

IC  1 1 

765  1 

A A 753 

c 

CS 

CNE 

CFANGE 

FCCE  TC  VECTOR. 

1 1 39 

OFF 

29 

1 AST 

1037 

7652 

5A  163 

1 

TS 

MCOE 

1 1 AF 

7653 

0 0006 

1 

FXTEND 

1 lAl 

RFF 

71 

LAST 

1037 

765A 

5 0116 

1 

INDEX 

ACPPNC 

11A2 

7655 

3 000  1 

0 

DCA 

0 

1 1A3 

RFF 

503 

LAST 

1C37 

7656 

52  155 

1 

CXCF 

MFAC 

IIAA 

REF 

1 

7657 

1 76  3 5 

1 

TCF 

V/SCl 

FINISH 

FPCLCGUE  AT  CCFFCN  SECTION. 

"'4J 
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PI  14S 

SIGN 

AND  1 

rONPLFMENT 

INSTRLCTICNS. 

1146 

RFF 

72 

LAST 

10  37 

7660 

50  116 

1 

SIGN 

INDEX 

ADDRWD 

CAIL  CCMF  INSTRUCTICN  IF  RCFC  AT  X IS 

1147 

7661 

10  JOO 

0 

res 

n 

NECAT  IVE  NCN-ZERO. 

1 148 

REF 

1 7 

1 AST 

1C36 

7662 

1 6064 

1 

TCF 

DANZIG 

1149 

76b3 

1 7665 

1 

TCF 

+ 2 

1150 

PFF 

2 

LAST 

icr  = 

7 6 6.4 

1 76  73 

0 

TCF 

CCNP 

cr  the  ccmflement. 

1151 

pep 

73 

LAST 

1038 

766  5 

50  1 16 

1 

INDEX 

ACDRkD 

1152 

7666 

in  not 

1 

CCSL 

CCS 

1 

1153 

PEF 

18 

LAST 

1C3F 

7667 

1 6064 

1 

TCF 

DANZIG 

1154 

RFF 

19 

LAST 

1038 

7670 

1 6064 

1 

TC.F 

DANZIG 

1 1 = 5 

REF 

3 

LAST 

1C3E 

76  7 1 

1 7673 

0 

TCF 

CCMP 

1 1 56 

RFF 

20 

1 AST 

1038 

7672 

1 6064 

1 

TCF 

DANZIG 

1157 

7673 

0 00U6 

1 

COMP 

EXTEND 

CCNFLEMENT  DP  MFAC  IN  EVERY  CASE. 

1158 

PEF 

504 

LAST 

1037 

7674 

4 0 155 

1 

CCS 

PPAC 

1 159 

R = F 

505 

LAST 

10  3 8 

7675 

52  155 

1 

rxCF 

MFAC 

1 16P 

REF 

30 

LAST 

1037 

7676 

1 1 163 

1 

CCS 

MCDE 

FITFER  CCMPLEMENT  MPAC  +3  CR  THE  PEST  CF 

1 161 

RFF 

1 

7677 

1 7710 

1 

TCF 

DCCMP 

THE  VECTCR  ACCUMULATOR. 

1162 

RFF 

2 

L AST 

1038 

7 700 

1 7710 

1 

TCF 

OCOMP 

1163 

7701 

0 0006 

1 

EXTEND 

VFCTDR  CCMPLEMENT. 

1 1 64 

REF 

506 

t AST 

1038 

7702 

4 0 160 

1 

CCS 

MPAC  +3 

1165 

REF 

507 

LAST 

103  8 

77  13 

52  160 

1 

CXCF 

MPAC  +3 

1166 

77C4 

0 0006 

1 

FXTENC 

1 167 

REF 

508 

LAST 

1038 

7705 

4 0 162 

c 

DC  s 

MPAC  +5 

1168 

RFF 

509 

LAST 

1038 

7706 

5?  162 

n 

cxr  F 

MFAC  +5 

1 169 

RFF 

21 

LAST 

1038 

7707 

1 6064 

1 

TCF 

DANZIG 

1176 

PEF 

510 

LAST 

103  8 

7710 

4 0 156 

1 

DCCMP 

CS 

MPAC  +2 

1171 

RFF 

511 

1 AST 

1038 

771  1 

54  156 

1 

TS 

MPAC  +2 

1172 

REF 

22 

LAST 

1038 

77  12 

1 6064 

1 

TCF 

DAN  Z IG 
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PI  173 

7HF 

FCLICMNC  ‘■FCPT 

SHIFT  CODES  REOLIRE  AC  ACCRESS  V,CRC: 

R117A 

1 . 

SRI 

TP  SR4 

scalar 

SHIFT  RIGHT. 

R U7S 

i . 

SR  IP 

TO  SR4P 

SCALAR 

SHIFT  RIGHT  ARC  RFUND. 

RU76 

3. 

SL  1 

TO  SI  4 

SEAL  AR 

SHIFT  LEFT. 

P 1 177 

4. 

SLIP 

TO  FL4R 

SCALAR 

SHIFT  LEFT  ANC  RCUNO. 

R1178 

5. 

VSR  1 

TP  VSPF 

vector 

SHIFT  RIGHT  (ALWAYS  PCLNCS). 

Rll  79 

6. 

VSl  1 

TO  VSL8 

VECTOR 

SHIFT  left  (NEVER  ROUNDS). 

R 1 1 PO 

THF 

FCLLCklNG  CCOF' 

RECLIRE  AA  ArCP^SS  WHICH  NAY  PE  TNCEXFf:=* 

PI  IR! 

1 . 

SR 

SCALAR 

SHIFT  RIGHT. 

R11E2 

2. 

SRP 

SCALAR 

SHIFT  RIGHT  aNC  RPLND. 

P1183 

SL 

scalar 

SHIFT  LEFT. 

PI  184 

4 . 

F 1 P 

SCALAR 

SHIFT  left  and  rclno. 

R1  1 FR 

r ^ 

VSP 

VECTOR 

SHIFT  RIGHT. 

R UB6 

6. 

VSL 

VECTOR 

SHIFT  LEFT. 

R1187 

’4  IF  THF  accress 

IS  INCEXFD 

, ANC  the 

INDEX  MCOIFICATION  RESULTS  IN  A NEGATIVE  SHIFT  CCLNT,  A SHIFT  CF  THE 

R 1 189 

ABSOLUTE  VALUF  CF 

THF  rruAT 

IS  DCNE  IN 

THE  OFFCSITE  CIRFCTION. 

1190 

00,2017 

BANK 

no 

1191 

REF 

1 

COUNTX 

F 1/INTER 

1192 

PEF 

18 

LAST 

103C 

Cn,2C17 

3 6245 

1 

SHCPTT 

CAF 

SIX 

SCALAR  SHORT  SHIFTS  COME  HERE.  THE  SHIFT 

1 193 

REF 

29 

LAST 

1010 

0 1,2  120 

7 0C20 

1 

MASK 

r YP 

CCLNT-1  IS  ACW  IN  SITS  2-3  CF  CYR.  THE 

I 194 

RTF 

11 

LAST 

916 

iM  ,2021 

54  C2l 

0 

TS 

SR 

RCLNCING  BIT  IS  IN  BIT!  AT  THIS  PCINT. 

1195 

PEF 

30 

LAST 

1039 

GO, 2022 

10  020 

I 

CCS 

C YR 

SEE  IF  RIGHT  CR  LEFT  SHIFT  CESIREC. 

1196 

PFF 

1 

OP  ,20 2 3 

1 2ni 

1 

TCF 

TSSL 

SHIFT  LFFT. 

1 197 

'1,2024 

0CC24 

1 

SRCCV 

DEC 

20 

NRTEMF  SETTING  FOR  SR  EEFOPE  DCV. 

1198 

PEF 

12 

LAST 

1039 

PO, 2125 

50  02  1 

1 

TSSR 

INDEX 

SR 

GET  SHIFTING  EIT. 

1 199 

REF 

S f 

lART 

. 904 

CU,2026 

3 4 736 

1 

CAF 

8IT14 

12(lfl 

RFF 

14 

LAST 

1C2E 

TP, 2027 

54  135 

1 

TS 

NFTENF 

120  1 

PFF 

31 

1 AST 

103  9 

< 1 ,2'i30 

11  T20 

1 

CCS 

CYR 

SEE  IF  A RGLNC  IS  DESIRED. 

12d2 

PEF 

1 

CO, 2031 

0 2050 

0 

R IGHTP 

TC 

NFACSBN'C 

YFS  - SHIFT  RIGHT  AND  ROUND. 

12  )3 

R = F 

4 

1 AST 

1030 

(’ll,  2'J32 

1 6963 

0 

TCF 

NEWNCDF 

SET  NCCE  TC  CF  (C(AI  = 0). 

1204 

REF 

15 

LAST 

103  9 

90,2  '33 

3 3 135 

0 

MFACSHR 

CA 

MPTEMP 

DC  A TRIPLE  PRECISION  SHIFT  RIGHT. 

1205 

Cli.2034 

C CCC6 

1 

EXTEND 

1206 

PEF 

512 

LAST 

1038 

,2035 

7 :i56 

1 

NP 

NPAC  +2 

12F7 

REF 

5 13 

LAST 

1039 

Cr  ,2036 

54  156 

1 

+ 3 

TS 

MFAC  +2 

(EXIT  FRCN  SCPT  ANO  A8VAL). 

1208 

RRF 

16 

1 AST 

1C39 

C9, 2937 

3 C135 

c 

CA. 

NFTENF 

129C 

CO  ,2  040 

')  0006 

1 

EXTENT 

12  111 

PEF 

514 

LA  'T 

1039 

C'  ,204  1 

7 0154 

0 

NP 

NFAC 

SHIFT  NAJOP  PART  INTO  A,L  ANC  PLACE  IN 
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1211 

REF 

515 

LAST 

1039 

IJ  ,2092 

52  155 

1 

OCH 

MPAC 

1212 

REF 

1 7 

LAST 

1C39 

r.o  , 2092 

2 C135 

C 

CA 

NFTEMF 

1213 

nn,  2'i99 

0 C006 

1 

EXTEND 

1219 

P'^F 

1 97 

LAST 

1035 

0 1 ,2  .>95 

7 000  1 

1 

MR 

L 

1215 

P'^F 

5 16 

LA  ST 

lC9f 

TO, 2096 

20  156 

1 

CAS 

MFAC  +1 

1216, 

RCF 

23 

LAST 

1038 

00, 2 '97 

1 6 06  9 

1 

TC  F 

DANZIG 

R 121  7 

RPAC 

SHIFT 

RIGHT  ANC 

RCLNC 

SLEPCLTI NFS. 

1210 

REF 

517 

L AST 

1090 

CG ,2^50 

3 0 156 

0 

RFACSRNC 

CA 

MFAC  +2 

1219 

00  ,2  >51 

U 3 006 

1 

extend 

122P 

RFF 

18 

LAST 

lC9r 

rC  ,2052 

7 0125 

1 

NF 

MFTEMP 

1221 

RFF 

318 

LAST 

10  90 

Oh ,2052 

56  155 

r 

XCH 

MPAC  +1 

1222 

■1  ' ,2059 

C C006 

1 

EXTFNC 

1223 

RPF 

19 

1 AST 

109C 

f C , 2G55 

7 C135 

1 

NP 

NFTFNf 

1229 

REF 

519 

LAST 

16'90 

00,2056 

56  155 

0 

XCH 

MPAC  +1 

1225 

REF 

198 

LAST 

109r 

CC,2057 

6 ooni 

0 

AC 

L 

1226 

00,2060  • 

6 OOi’O 

1 

VSHR  2 

COUBLE 

1227 

RFF 

520 

LAST 

1090 

ij  i ,206  1 

59  156 

1 

TS 

MPAC  +2 

122P 

CO  ,2C62 

1 2C69 

c 

TCF 

+ 2 

1229 

RFF 

521 

LAST 

1H90 

OO ,2063 

26  155 

1 

.ADS 

MPAC  +1 

123G 

R'^F 

198 

LAST 

1C37 

CO  ,2C69 

3 9755 

1 

CAF 

ZERO 

1231 

RFF 

522 

1 AST 

1C9C 

CO, 206'= 

59  156 

1 

3 ' 

MFAC  +2 

123? 

REF 

523 

LAST 

1090 

' ,,2066 

56  159 

1 

XC  H 

MPAC 

12^’ 

00,2067 

0 0006 

1 

EXTEND 

1239 

RFF 

2l' 

LAST 

109C 

CC.2C7C 

7 C 135 

1 

NP 

NFTENF 

1235 

pRF 

529 

LAST 

1 09(1 

0 1 ,207  1 

20  155 

1 

CAS 

MPAC 

12’6 

R'^F 

279 

LAST 

1025 

C0,2C72 

0 00.12 

0 

TC 

C 

1237 

RFF 

21 

L AST 

1090 

00 , 2073 

3 0135 

0 

V SHRRNC 

CA 

MFTEMP 

1238 

00 , 2079 

0 0006 

1 

EXTEND 

1239 

REF. 

52^ 

LAST 

1090 

r C , ? 0 7 5 

7 C155 

1 

NF 

NFAC  +1 

129  > 

RRF 

526 

1 AST 

109L 

OD , 2)76 

59  155 

1 

TS 

MPAC  +1 

1291 

REF 

I 99 

1 AST 

IC9C 

f C , 2 0 7 7 

56  COl 

0 

XCH 

L 

129? 

RFF 

1 

00,2100 

1 2060 

1 

TCF 

VSHR2 
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PPAC  , + 1. 

CPIGINAL  CINPAC  +1). 

C-UAPAKTEEO  NO  OVERFLOW. 


WF  HAVE  TC  Cr  ALL  THREE  POLTIPLIES  SINCE 
MPAC  +1  ANC  PFAC  +2  NIGM  HA^E  SIGN 

fisagrefhent  with  a shift  right  of  1. 


TRIAL  MNGF  PART. 

(FINISH  VECTCR  CCNFGNENT  SHIFT  RIGHT 
AND  RCLNC. 

GUARANTEED  NT  CVFRFLCW. 


SETTING  TC  ZEPC  SC  FCLLCWING  CAS  WCRKS. 


AGAIN  NT  OVERFLEW. 


ENTRY  TC  SHIFT  RIGHT  ANC  RCLNC  “PAG  WHEN 
MPAC  CONTAINS  A VECTOR  CCNPCNENT. 


GO  ADC  ONE  IF  NECESSARY  ANC  FINISH 
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GAP; 

L IMERFFETEP 

P12-!.3  ROLTINF  FOR  SHCRT  SCALAR  SHIFT  LEFT  (ANC  RAYEE  PCUNC). 


1299 

REF 

13 

LAST 

1039 

00,2111 

3 002  1 

1 

TSSL 

CA 

SP 

129  5 

RPF 

22 

LAST 

IF^r 

C'’,21  '2 

59  135 

1 

•tl 

TS 

MPT  EFP 

1299 

00,2103 

C 0CD6 

1 

+ 2 

EXTEND 

1297 

RFF 

527 

LAST 

1090 

0.)  ,2119 

3 01  55 

0 

CCA 

MPAC  +1 

129  8 

RFF 

528 

LAST 

1091 

CO  ,2105 

2C  156 

1 

CAS 

MFAC  +1 

1299 

RFF 

529 

1 AST 

109  1 

O'l,  2 1 It 

t C159 

1 

AD 

MPAC 

1250 

REF 

53r 

LAST 

1091 

o ,i  ,2107 

6 1159 

1 

AC 

MPAC 

1251 

P.FF 

531 

LAST 

109  1 

00,2110 

59  159 

0 

TS 

MFAC 

1252 

09,211) 

1 2113 

1 

TCF 

+ 2 

1253 

REF 

9 

LAST 

1025 

00,2112 

59  121 

1 

TS 

OVFINC 

A1259 

1255 

PEF 

23 

LAST 

1091 

00,2113 

10  135 

1 

CCS 

MPTEMP 

1256 

RFF 

2 

1 AST 

1(39 

I’D, 21  19 

1 2102 

1 

TCF 

TSSL  tl 

1257 

RFF 

32 

LAST 

1039 

00,2115 

10  020 

1 

CCS 

CYP 

1258 

RFF 

2 

LAST 

1036 

00,2116 

0 7191 

1 

RCLNC 

TC 

RCUNDSUB 

1259 

REF 

29 

LAST 

109C 

00,2117 

1 6069 

1 

TCF 

DANZIG 

1290 

RFF 

25 

LAST 

109! 

00,2120 

1 6069 

1 

TCF 

DANZ IG 
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GET  SHIFT  CCLAT  FCR  SR. 


ENTRY  FERE  FREY  SL  FCR  SCALAPS. 
SHIFTING  LEFT  CNE  PLACE  AT  A TIRE  IS 
FASTER  THAN  DCING  THE  NHCLE  SHIFT  FITH 
nlltirlies  ASSURING  that  FRECUENCY  CF 
SHIFT  COLNTS  GOES  DOWN  RAPIDLY  AS  A 
FUNCTICN  OF  THEIR  HAGNITUCE. 

CVERFLCN.  (LEAVES  0 VE PF LC k-C C P PEC T E E 
PESLLT  ANYWAY). 

LCCP  CN  CECRENENTED  SHIFT  CCLNT. 


SEE  IF  PCUNC  WANTED. 

YES  - RCLNC  AND  E > I T. 

SL  LEAVES  A ZERO  IN  CYP  FOR  NO  ROUND. 
NO  - EXIT  IRREOIATL 


i 

i 

i 

i 
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P1261 

V'^CTCP 

SFIFTTAC  RCLTUES. 

1262 

RFF 

2 

LA  ST 

233 

CO  ,2121 

3 6757 

0 

SHCRTV 

126? 

RFF 

33 

LAST 

1061 

00,2122 

7 0020 

1 

126A 

RFF 

26 

LAST 

1061 

00,2123 

56  135 

1 

1265 

RFF 

36 

LAST 

1062 

00,2126 

10  C2C 

1 

1266 

RFF 

1 

00,2125 

1 2165 

1 

1267 

(0,2126 

00176 

1 

CCT176 

1268 

REF 

25 

LAST 

If  62 

CO, R 127 

50  135 

0 

VSSR 

126<; 

prF 

59 

LAST 

1039 

On  ,7  130 

3 6736 

1 

1 27P 

REF 

2 6 

LAST 

1(62 

00,2131 

5 6 13  5 

1 

1271 

1 

00,2132 

0 2073 

1 

127? 

PEF 

532 

LAST 

1061 

00,2133 

52  155 

1 

1 273 

RFF 

533 

LAST 

1062 

00,2136 

52  160 

1 

1276 

R'^F 

536 

LAST 

1062 

00,2135 

52  155 

1 

1275 

RFF 

2 

LAST 

1062 

00,2136 

0 2073 

1 

1276 

RFF 

5 3 5 

L AST 

1062 

00,2137 

5 2 15  5 

1 

1277 

RF  P 

536 

LAST 

1062 

00  ,2  1^,0 

52  162 

0 

1278 

RFF 

5^7 

LAST 

1062 

CO  ,2161 

52  155 

1 

1279 

FFF 

3 

LAST 

1062 

00,2162 

0 20  7 3 

1 

12Pr 

PFF 

1 

00,2163 

1 7623 

1 

ASA  202 

11  12-1.  7 1 

19:C9  AUG.  11,1S6S  SKIPPER  .097  FACE  1062 
USER'S  PAGE  NO.  69  E3  S3 

CAF 

LCW3 

SAVE  3 BIT  SFIFT  COUNT  - 1 KITFCUT 

MASK 

C YR 

EDITIAG  CYP. 

TS 

MPTEMP 

CCS 

CYP 

SEE  IF  LEFT  OR  RIGhT  SUFT. 

TCP 

VSSL 

VECTOR  SFIFT  LEFT. 

CfT 

176 

LSEC  IN  PROCESSED  SHIFTS  MTH  - CCLAT. 

INOEX 

MPTFMP 

(ENTRY  FRCM  SF).  PICK  LP  SHIFTING  BIT. 

CAF 

B IT16 

MPTEMF  CCNTAINS  ThE  SHIFT  CCLNT  - 1. 

TS 

PfTEPF 

TC 

VSHRRND 

SHIFT  X CCMFCNENT. 

nxcF 

«FAC 

SUAP  X AND  Y CCMPCNENTS. 

cxr.H 

MFAC  +3 

CXCh 

MPAC 

TC 

VSHRRNC 

SHIFT  Y COMPCNENT. 

CXCH 

MPAC 

SkAP  Y AND  Z CCMFCNENTS. 

CXCF 

MPAC  +5 

CXCF 

MFAC 

TC 

VSHRRAO 

SHIFT  2 CCMFCNENT. 

TC  F 

VRCTATFX 

RESTORE  COMPONENTS  TC  PROPER  PLACES. 
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L INTERPRETER 


LSER' S PAGE  NG.  50  E3  S3 


P12P1 

VICTOR 

SHIFT  1 

LEFT  - 

CCAF  CAE 

flACE  AT  1 

TIME. 

12R2 

RFF 

27 

LAST 

10A2 

C0.21AA 

5A  135 

1 

-1 

TS 

P PTE  HP 

12R3 

00.21A5 

0 0006 

1 

VSSL 

EXTENO 

12RA 

RFF 

53F 

LA'T 

10A2 

00 ,21A6 

3 0155 

0 

CCA 

MFAC 

1 2R5 

REF 

539 

1 AST 

10A3 

C0.21A7 

20  155 

1 

CAS 

MFAC 

I2E6 

00,2150 

0 0006 

1 

EXTEND 

1287 

00,2151 

1 2153 

0 

BZF 

+ 2 

12BR 

RFF 

3 

LAST 

1025 

00,2152 

C 7C22 

0 

TC 

OVERF  LCV. 

12RP 

00,2153 

C CO 06 

1 

EXTEND 

12911 

RFF 

5A0 

LAST 

10A3 

C0,?15A 

3 C16C 

0 

CCA 

RFAC  +3 

1291 

RFF 

5A1 

1 AST 

10A3 

00,2155 

20  160 

1 

DAS 

MPAC  +3 

1292 

00,2156 

0 0006 

1 

EXTEAC 

129  3 

00,2157 

1 2161 

1 

ezF 

+ 2 

12<^4 

pop 

A 

LAST 

1035 

00,2160 

0 70  17 

0 

TC 

OVERFLV.Y 

1295 

CO, 2161 

C CC06 

1 

EXTEAC 

1296 

RFF 

5A2 

1 AST 

10A3 

00,2162 

3 0 162 

1 

OCA 

PFAC  +5 

1297 

REF 

5A3 

LAST 

lOAT 

00,2163 

20  162 

0 

CAS 

PPAC  +5 

129R 

C0.216A 

0 0006 

1 

EXTEND 

1290 

00,216= 

1 2167 

1 

BZF 

+ 2 

1 300 

RFF 

A 

LAST 

IC3A 

00,2166 

0 701A 

0 

TC 

CVERFLWZ 

1301 

REF 

28 

LAST 

10A3 

CO, 2167 

10  135 

1 

CC  S 

MF  temp 

1302 

RFF 

2 

LAST 

10A2 

00  ,2170 

1 21AA 

0 

TCF 

VSSL  -1 

1303 

REF 

26 

LAST 

ICA  1 

CC,2171 

1 6CFA 

1 

TCP 

OANZ  IG 

SUET  ING  LOOP. 


LCCP  CN  CECRFPENTEr  SHIFT  COUNTER. 
EX  IT. 
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L INTERPRETER 


P 1 3UA 

TSLC 

- TPIPLF  SHIFT 

LEFT  ANC 

CCLNT.  SHIFTS  MFA( 

: LEFT  UNTIL 

R1306 

THF 

COMPL  EMFNT 

OF  the 

■ NUMBER. 

OF 

PHIFTS 

REQUIRED 

IN  X. 

13C7 

PRF 

29 

LAST 

10A3 

00,2172 

5A 

135 

1 

T SLC2 

TS 

MFTEMP 

1308 

REF 

A 

LAST 

1028 

I'D,  2 17T 

r 

6726 

1 

TC 

BRANCH 

1300 

00.217A 

1 

2176 

1 

tof 

+ 2 

1310 

RFF 

1 

00,2175 

1 

2212 

0 

TCF 

ENCTSLC 

1311 

RFF 

12 

L AST 

8A5 

01, 2 176 

0 

7262 

0 

TC 

TPAGREE 

1312 

REF 

5AA 

LAST 

10A3 

'll  ,2177 

3 

,1  15A 

1 

CA 

MPAC 

1313 

REF 

1 

CC  .2200 

1 

22C7 

1 

TCF 

TSLCTEST 

131Pt 

RFF 

30 

LAST 

lOAA 

no,  2 2iT  1 

2A 

135 

0 

TSLCLOQP 

I NCR 

MPTEMP 

1315 

C C ,2202 

0 

00 '16 

1 

EXTENC 

1316 

RFF 

5A5 

L AST 

lOAA 

' ' . 2 203 

•a 

0 1.5  6 

c 

DCA 

MPAC  +1 

1317 

REF 

5a6 

LAST 

lOAA 

01 ,2204 

20 

156 

1 

CAS 

MPAC  +1 

1318 

REF 

5A7 

LAST 

10^,4 

QC)  ,22  15 

6 

C 15  A 

1 

AC 

MPAC 

1319 

REF 

SAB 

1 AST 

lOAA 

Ci'l,  2 216 

2 6 

1 5A 

0 

ADS 

MPAC 

1320 

00  ,2207 

6 

0000 

I 

TSLCT  EST 

COUBLE 

132  1 

00,22)0 

5A 

COO 

c 

OVSK 

1322 

REF 

1 

1 1,2211 

1 

2 20  1 

1 

TCF 

TSLCLCCP 

1323 

RFF 

31 

LAST 

lOAA 

00,2212 

A 

0135 

1 

ENCTSLC 

CS 

MFT  EMP 

132A 

REF 

1 

00,2213 

1 

6626 

1 

TOF 

STCREl 

19:09  AUG.  11,1969  SKIPPER  .097  PAGE  lOAA 
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GREATER  TEAN  .5  IN  MAGNITLCE,  LEAVING 

START  ev  ZEROING  SHIFT  CCLNT  (IN  A NGN). 
EXIT  WITH  NC  SEIFTING  IF  ARGUMENT  ZERO. 

STORES  ZERO  SFIFT  COUNT  IN  THIS  CASE. 

MAY  CAUSE  UPSHIFT  OF  CNE  EXTRA  PLACE. 

BEGIN  NCRMALI ZATICN  LCCP. 

INCRFMENT  shift  COUNTER. 


SEE  IF  (ANOTHER)  SHIFT  IS  REGLIREC. 

YFS  - increment  count  ANC  SHIFT  AGAIN. 


STORE  SHIFT  COUNT  ANC  RETURN  TC  CANZIG 
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P13?5 

the  FOLLrUMl  RCLTTNFS  FRCCGS'ES  THE  GENERfL  51-TFT  !^STRLCTIC^S  EF,  ERR,  EL,  flNC  SLR. 

R 132  7 

THE 

GIVEN  ADDRESS  IS 

RECnCEC  AS  FCLLGWS: 

R 1 32P 

SITS  1-7 

SHIFT  rciM  (SLFACCRESSI  LESS  T|-A^  125  CECIRAL. 

R 1 329 

PIT  Q 

PSniDC  SIGN  FIT  (DETECTS  CHANGE  IN  SIGN  IN  INDEXED  SFIFTSI. 

R 1331 

BIT  9 

D F^R  lFFT  shift,  4NC  1 FCP  RIGHT  SHIFT. 

R1332 

BIT  13 

1 FCR  TER^'TNAL  RCLND  CN'  SCALAR  SHIFTS,  0 CTHEfkISE. 

R1333 

PITS  11-13 

0. 

R 1339 

PIT  19 

1 . 

R133‘i 

BIT  15 

'• 

R1336 

THE 

AECVF  ENCnCTNG  IS 

CCNE  FV  THE  YHL  SYSTEM. 

1337 

RFF 

79 

LAST 

103E 

CO, 2219 

7 

C 1 16 

0 

GENSHIFT 

PASK 

ACCPhC 

GET  SHIFT  CCUNT,  TESTING  FDR  ZERO. 

133B 

REF 

335 

LAST 

LD35 

■".(1,2215 

10 

nno 

0 

CCS 

A 

( APRI  VES  V«  ITH  C (A  1 = LCW7  1 . 

133S 

RFF 

1 

00,2216 

1 

2229 

0 

TC  F 

GFNSHFT2 

IF  NON-ZERC,  FRCCEED  '«11H  dfcrf.mentec  CT 

139'> 

REF 

3 3 

L AST 

9 09 

00,2217 

•3 

9792 

1 

CAF 

RITIO 

ZEFC  SHIFT  CCLNT.  NT  SHIFTS  NEECEC  EUT 

139  1 

REF 

75 

LAST 

1095 

00,2220 

7 

0116 

0 

MASK 

ACORWD 

HE  MIGHT  HAVE  TC  RCLND  MFAC  CN  SLR  ANC 

139  2 

RFF 

33f 

L A'7 

1C95 

on,  2 221 

10 

COO 

0 

CCS 

A 

SPP  (SCALAR  CNLYI. 

1393 

REF 

3 

1 AST 

1"91 

■j  1,2222 

0 

7 19  1 

1 

TC 

RCLN'DSLP 

1399 

PFF 

27 

LAST 

1093 

0(1  ,2223 

1 

6069 

1 

TC  F 

DANZ  IG 

1395 

REF 

’2 

LAST 

1099 

00,2229 

■=9 

135 

1 

GENSHFT2 

TS 

MFTEPR 

CFCREMENTEC  SHIFT  COUNT  TO  MPTEmP. 

139N 

R'F 

35 

LAST 

902 

1 1,2225 

■a 

9 799 

1 

CAF 

BITS 

TEST  MFAMNG  CF  LCW  SEVEN  EIT  CCUNT  IN 

1397 

00,2226 

0 

0006 

1 

EXTENC 

MPTEMf  NCn. 

1398 

REF 

76 

LAST 

1095 

CO, 2227 

7 

C 116 

c 

NP 

ACDR'aC 

139' 

RFF 

1 

00 ,2230 

7 

6 2‘=0 

1 

MASK 

1 an2 

JLMFS  CN  SHIFT  OIRECTICN  (BIT8I  ANC 

13  5*' 

REF 

337 

LAST 

1095 

C0,2'»3  1 

50 

• no 

1 

INDEX 

A 

1351 

00,2232 

1 

2233 

0 

TCF 

* 1 

CRIGINAL  SHIFT  CIRECTICN  (PIT  91. 

1352 

RFF 

1 

00  ,2233 

1 

2332 

0 

TCF 

R IGHT- 

NEGATIVE  SHIFT  CCLNT  FCR  SL  CR  SLR. 

1353 

PFF 

1 

'■0,2239 

1 

2392 

1 

TCF 

LEFT 

SL  CP  SLR. 

1359 

RFF 

1 

■'0,2235 

1 

2 3 36 

1 

TCF 

LFF-f- 

NEGATIVE  SHIFT  CCLNT  HITH  SR  CF  SFR. 

j 
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L INTERPRETER 


F13NS 

GENEPAt  SHIFT  PTGHT. 

1356 

REF 

31 

LAST 

103  8 

00 ,2236 

13  163 

1 

R IGHT 

CCS 

MODE 

1357 

R = F 

1 

00,2237 

1 22  7 7 

C 

TCP 

GEN'S  CR 

1358 

RFF 

2 

LAST 

1046 

' 0,2240 

1 2277 

0 

TCP 

C,fn  SCR 

1 ’59 

REi^ 

a a 

LAST 

1C45 

CO, 2241 

3 0)35 

0 

CA 

MPT  EA'P 

1 360 

RFF 

1 

00,2242 

6 3 733 

0 

VR  IGHT2 

AD 

NEG12 

1361 

37,2243 

0 0306 

1 

EXTEND 

1 362 

REF 

1 

CO, 2244 

6 2127 

1 

EZA'F 

VSSR 

1363 

R'-F 

8 

1 AST 

1'35 

1’  1,  224  5 

6 7 752 

G 

AO 

negcnf 

136A 

REF 

3A 

LAST 

1046 

00,2246 

54  135 

1 

TS 

MPTEMP 

1365 

RFF 

199 

LAST 

1C4C 

00, 2247 

3 4 755 

1 

CAF 

ZEPC 

1366 

RFF 

2)1 

LAST 

l'-‘40 

00, 2250 

54  001 

1 

TS 

L 

136  ? 

RFF 

549 

LAST 

IC44 

CC ,2251 

56  154 

1 

XCH 

MFAC 

1368 

FEF 

5 EFi 

L AST 

1046 

00,2252 

56  155 

C 

XCH 

MFAC  +1 

136S 

R'-F 

1 

on  ,2253 

0 2272 

1 

TC 

SETROLNC 

13  7C; 

REF 

55  1 

LAST 

1046 

00,7254 

20  1 = 5 

1 

CAS 

MFAC 

A1371 

1372 

RFF 

552 

LAST 

1046 

00  ,2255 

56  157 

1 

XCH 

MFAC  +3 

1373 

REF 

F 5 3 

LAST 

If  46 

0.0,2256 

56  160 

c 

XCH 

MFAC  +4 

13  74 

• prp 

2 

L AS"F 

10  4 6 

■•’,  2257 

0 7272 

1 

TC 

SETRCLNC 

1375 

RFF 

55A 

LAST 

IC46 

Ct'  ,2260 

20  16i’ 

1 

CAS 

MFAC  +3 

1376 

RFF 

555 

L AST 

1046 

00,226 1 

56  16  1 

) 

XCH 

MFAC  +5 

1377 

RFF 

556 

LAST 

1046 

00 ,226  2 

56  162 

1 

XCH 

MPAC  +6 

1378 

REF 

a 

LAS’’ 

1046 

00,2263 

0 2272 

1 

TC 

SETRCUNC 

1379 

RFF 

557 

L AST 

1046 

33,2264 

2C  162 

0 

CAS 

WPAC  1-5 

138C 

RFF 

35 

LAST 

1 046 

00,2265 

10  135 

1 

CCS 

MPTEMP 

138) 

RFF 

36 

LAST 

1046 

00,2266 

54  135 

1 

TS 

M FTFMF 

1 382 

RTF 

1 

00,? 267 

1 2242 

0 

TCF 

VR IGHT2 

1383 

70 

04604 

1 

BIASLC 

DEC 

.2974  B- 

138A 

REF 

28  ■ 

LAST 

1045 

■^>,  227  1 

1 6064 

1 

TCF 

DANZIG 

1385 

•'  ' ,2272 

6 3000 

1 

SETRCUNC  CnuBLE 

1386 

RFF 

558 

LAST 

1046 

30, 2273 

54  156 

1 

TS 

MPAC  +2 

1387 

R8f 

2 )0 

1 AST 

1046 

0.3, 2274 

3 47  = 5 

1 

CAF 

ZEPC 

1 388 

RFF 

2C1 

LASt 

1CA6 

00,2275 

56  C31 

0 

XCH 

L 

1389 

RFF 

783 

LAST 

1C4C 

■ '',  2 276 

C CC02 

C 

TC 

0 

1S:0S  AUG.  11,1969  SKIPPER  .097  PAGE  10A6 


USER'S  PAGE  NO.  53  E3  S3 


SEF  IF  VPCTCR  GR  SCALAR. 


SEE  IF  SFIFT  COUNT  LESS  THAN  lAD. 


IF  SC,  BRANCH  AND  SHIFT  IMMEDIATELY. 

IF  NCT,  FECUCE  yRTFRP  EY  A TCTAL  CF  lA, 
AND  DC  A SHIFT  RIGHT  AND  RCLNO  BY  lA. 
THE  RCUNF  AT  THIS  STAGE  MAY  INTRODUCE  A 
CNE  BIT  ERRCRIN  A SHIFT  FIGHT  15C. 


X CCRFCNENT  NCN  SHIFTED,  SC  MAKE  LF  THE 
RCUNC1NG  CUANTITY  (C  IN  A AND  C OR  +- 1 
IN  L ) . 

REPEAT  THE  A6CVE  PRCCESS  FCR  Y AND  2. 


NO  CVERFLOVv  on  these  adds. 


SEE  IF  DCNE,  CCING  FINAL  DECREMENT. 


SORT  constant 


MAKES  LP  ROUNDING  QUANTITY  FROM  ARRIVING 
CIA).  L IS  ZERO  initially. 

RETURN  AND  DC  THE  DAS,  RESETTING  L TO  C. 


gap: 


ASSENPLE  REVISION  life  CP  aGC  PRCGRAv  LL^'INARY  BY 


I INTFPFRETFR 


P13SP  PROCESS  SP  ANO  SRB  FTP  SCALiPS 


1391 

PEF 

37 

LAST 

1046 

1,2277 

3 

C135 

0 

1392 

REF 

2 

LAST 

1046 

0-1 , 2300 

6 

3 733 

0 

1393 

'■0,230 

C 

CCC6 

1 

1394 

REF 

1 

00%  2 30  2 

6 

2322 

0 

1395 

RPF 

9 

LAST 

ir4f 

00 ,2  303 

6 

7752 

0 

1394 

PEF 

38 

LAST 

104  7 

CO, 2304 

54 

135 

1 

1397 

PFP 

201 

LAST 

1046 

00,2305 

3 

4755 

1 

1 390 

PFF 

559 

1 A CT 

1C46 

re  ,2306 

56 

154 

1 

1399 

REF 

560 

LAST 

1047 

0‘0, 230  7 

56 

155 

0 

14CC 

PFF 

561 

LAST 

104  7 

''0,2  310 

54 

156 

1 

140  1 

REF 

39 

LAST 

104  7 

00,2311 

10 

135 

1 

14"? 

PEF 

40 

LAST 

1047 

90,2312 

54 

135 

1 

140 

pep 

3 

LAST 

U46 

00,2313 

0 

2300 

0 

14^4 

00,2^14 

226  50 

1 

1405 

ref 

34 

LAST 

1045 

>0,2315 

3 

4742 

1 

14C6 

REF 

77 

LAST 

1045 

CO, 2316 

7 

C116 

0 

1 407 

REF 

333 

L AST 

1045 

00,2317 

1C 

000 

0 

14C8 

RPF 

4 

LAST 

1045 

00 ,2320 

0 

7141 

1 

1409 

PFF 

29 

LAST 

1046 

00,232  1 

1 

6C64 

1 

1410 

RFF 

41 

L AST 

1047 

0'T,  2322 

50 

135 

0 

1411 

RFF 

6C 

1 AST 

1042 

CC  ,2323 

3 

4736 

1 

1412 

'PFF 

42 

LAST 

1C47 

CO, 2324 

54 

135 

1 

141  3 

REF 

35 

LAST 

1047 

00,2325 

3 

4742 

1 

1414 

REF 

78 

LAST 

1047 

CO , 2326 

7 

Cl  16 

0 

1415 

PEF 

339 

LAST 

1047 

00,2327 

1C 

OCO 

0 

1416 

PFF 

1 

Cr'T,233C 

1 

2031 

0 

1417 

RFF 

1 

00,233 1 

1 

2033 

1 

GENSCP 
+ 1 


+ A 


SLCPEFI 


DCSSFFT 
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19:09  AUC.  11.1969  SKIPPER  .097  PAGE  10A7 


LSER'S  PAGE  NG.  54  F3  S3 


CA 

mptemp 

AC 

NEG12 

EXTEND 

BZMF 

DCSSHFT 

AC 

NFGCNF 

IS 

MPTEMF 

CAF 

ZERO 

XCF 

MPAC 

XCH 

MPAC  +1 

TS 

MPAC  +2 

CCS 

MFTEMF 

TS 

MPTFMP 

TC 

CENSOR  -H 

DEC 

. 5884 

CAF 

B ITIC 

MASK 

ACORRC 

CC  S 

A 

TC 

RCUNCSUB 

TCF 

DANZIG 

INDEX 

MPTEMP 

CAF 

B IT14 

TS 

MFTEMF 

CAF 

6 IT  10 

MASK 

ACCPHC 

CC  S 

A 

TCF 

P,  TGHTR 

TCF 

MPACSHR 

SEE  IF  T|-e  CPICINAL  SMFT  COUNT  RAS  lESS 
THAN  14P. 

CG  THE  SHIFT  TWPECIATELY  IF  SC. 

IF  NOT,  CECRFPENT  SHIFT  CCLM  BY  14C  ANC 
SHIFT  MAC  PICHT  14  PLACES. 


SEE  IF  FINISHEC,  CO  FINAL  DECREMENT. 


SCPT  CCNSTANT. 

FINISHED  WITH  SHIFT.  SEE  IF  RCLNC 
WANTEC. 


CC  SC  ANC/CR  EXIT. 
PICK  LF  SHIFTING  EIT. 


SEE  IF  terminal  PCUND  CESIREC. 


YFS. 

JUST  SHIFT  RIGHT. 


t-.,z 

'1 


4 


gap:  /SSSCPBLE  PFVTSION  lU  CP  4GC  PRCGRA«  LUMINARY  0Y  NASA  202U12-C71 


L IMPPFFETER 

PlAie  PROCESS  THE  RIGHT-  (SL(R)  hITH  A NEGATIVE  CCLNTI,  LEFT 


1A?Q 

PEF 

A3 

LAST 

1.IA7 

00,2332 

A 

0135 

1 

R IGHT- 

CS 

MPTFNP 

IA2I 

RFF 

1 

00 ,2  333 

6 

2126 

0 

AC 

OCT  176 

1A22 

RFF 

AA 

LAST 

I CAP 

C0,233A 

5A 

135 

1 

TS 

MFTEMF 

1A23 

P"F 

1 

O '-  ,2335 

1 

2236 

0 

TC  F 

P IGHT 

1 A2A 

RFF 

2 

LAST 

ICAP 

CC  ,2336 

A 

2126 

1 

LEFT- 

CS 

CCT176 

1A25 

REF 

A5 

I ART 

lOAB 

00,2337 

6 

G135 

Q 

AD 

MPTEMP 

1A26 

00 ,2340 

A 

OOno 

0 

CCM 

1A27 

REF 

A6 

LAST 

lOAP 

CO, 23A  1 

5A 

135 

1 

TS 

MFTFNF 

1 A2  8 

REF 

32 

LAST 

l<iA6 

00, 23A2 

10 

163 

1 

LEFT 

CCS 

MCDE 

1A29 

RFF 

1 

00 ,2  3A3 

1 

2 346 

0 

TCF 

GENSCL 

1A30 

RFF 

2 

L AST 

1CA8 

CO, 23AA 

1 

23A6 

r 

TCF 

GENSCL 

1A31 

REF 

3 

LAST 

iriA3 

0--,  T34S 

1 

2 145 

1 

TCF 

VSSL 

1A2? 

RFF 

79 

LAST 

1C  A 7 

CO , 23A6 

A 

cue 

0 

GENSCL 

CS 

A CEPWC 

1 A33 

00, 23A7 

0 

0006 

1 

EXTEND 

1A?A 

RFF 

A7 

L AST 

893 

00 ,2350 

7- 

4 746 

1 

MP 

6 IT6 

IA35 

RFF 

35 

LAST 

10A2 

CO, 2351 

5A 

020 

1 

TS 

CYR 

1A35 

RFR 

3 

L AST 

10  A 1 

■'0,2  35  2 

1 

210  3 

0 

TCF 

TSSL  +2 
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ANC  LEFT  CPTICNS. 

GET  ABSCLUTE  VALUE  - 1 CF  SHIFT  CCUNT 
UNCERSTANDING  THAT  BITE  (PSELDC-SIGM 
HAS  1 INITIALLY, 
nc  NORNAL  SHIFT  RIGHT. 

SAHF  FRCLOGUE  TO  LFFT  FOR  IN'CE>ED  RIGHT 
SHIFTS  HHCSE  NET  SHIFT  CCLNT  IS  NEGATIVE 


SINCE  LEFT  SHIFTING  IS  SCNE  CNE  PLACE  AT 
A TIME,  NO  CCMPARISCN  WITH  lA  NEEC  BE 
CCNF.  FCR  scalars,  SEE  IF  TERMINAL  ROUNC 
DFSIREO.  FCR  VECTCRS,  SHIFT  I ^ N E C I A T E L Y . 

PUT  PCUNEING  EIT  (BIT  K CF  ADCRWCIINTC 
BIT  15  CF  CYR  WHERE.  THE  RCUNCING  BIT  CF 
A SHORT  SHIFT  LEFT  WCLLC  BE 


DO  THE  SHIFT 


3" 


2". 


1 
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P1A37  SCALAR  CIVISICF  I NST FiJCT  I CNS  , CCV  AN C ECrVi  ARE  FYECLTFD  FERE.  AT  THIS  FCINT,  THE  CIVICFNC  IS  IN  PFAC 

R1A39  AND  THE  DIVISOR  IF  BUF. 


lAAD 

PFF 

108 

LAST 

1037 

00,2353 

4 4753 

C 

CCV/ECDV 

CS 

ONE 

IMTIAIIZATICN. 

lAAl 

P9F 

1 

0.1  ,2354 

54  136 

1 

TS 

CVS  IGN 

+-1  FCP  POSITIVE  CLCTTENT  - -0  FCR  AEG. 

lAA? 

R'^F 

1 

00,2355 

54  137 

c 

TS 

OVNCP'-CT 

CIVICFNC  NCP«AL  IZATION  CDLNT. 

1AA3 

OFF 

1 

00,2356 

54  140 

c 

TS 

MAXOVSh 

NEAP-CNE  CIVICE  FLAG. 

lAAA 

PF<= 

93 

LAST 

1F37 

Cn,2357 

10  130 

1 

CCS 

euF 

FOFCE  8LF  PCSITIVE  KITH  THF  NAJCP  PART 

1AA5 

OFF 

1 

00,2360 

1 2516 

c 

TCF 

ecFPCs 

NCN-ZERC  . 

1AA6 

00 ,236  1 

1 2363 

1 

TCF 

+ 2 

1 AA7 

OFF 

1 

00,2362 

1 253  1 

0 

TCF 

ELFNFG 

14A8 

FEF 

562 

L AST 

104  7 

6.1  , 2 36  3 

54  156 

1 

BLFZERO 

TS 

PFAC  +2 

ZFFC  THIS. 

lAAP 

RFF 

13 

LAST 

1044 

00,2364 

0 7262 

0 

TC 

TPAGREE 

FCRCE  SIGN  agreement  PEFCPE  CVERFLCF 

1950 

OFF 

563 

1 AST 

104S 

CO, 2365 

1C  154 

c 

CCS 

PFAC 

TEST  TC  SEE  IF  MPAC  NCN-ZEPO.  (TOO  BIG! 

1451 

PFF 

1 

.1- , 2366 

1 2414 

0 

TCF 

nvF  + 

MAJOR  PART  CF  CIVIDENC  IS  PCSITIVE  NCN-0 

1 452 

CO, 2367 

1 2371 

1 

TC  F 

+ 2 

1453 

FfF 

2 

L AST 

1C4S 

CO, 237P 

1 2413 

1 

TCF 

CVF+  -1 

MAJCP  FART  CF  CIVIDENC  TS  NFG.  NON-ZERC 

1454 

RFF 

94 

LAST 

1049 

O ' ,2  371 

56  131 

1 

XCF 

BUF  +1 

SHIFT  CIVIDPNC  AND  DIVISCP  LFFT  14. 

1455 

PFF 

c C 

FAST 

IC4S 

CO  , 2 372 

56  1 30 

c 

XCF 

EUF 

1456 

PFF 

564 

LAST 

104C 

00,2373 

56  155 

c 

XCH 

MPAC  +1 

145? 

RFF 

565 

LAST 

1049 

'1  1 ,2374 

56  154 

1 

XCF 

MPAC 

1458 

REF 

96 

LAST 

1049 

or  , 2375 

K 130 

1 

CCS 

BLF 

TRY  AGAIN  CN  FCRMER  MINOR  PART. 

1459 

'REF 

1 

11,2376 

1 2422 

0 

TCF 

BLF  + 

1460 

10,2377 

1 2401 

1 

TCF 

*2 

CVERFLCF  CN  ZFRC  CIVISCP. 

1461 

Pf  F 

1 

■10,2400 

1 2416 

1 

TCF 

8LF- 

146? 

RFF 

566 

LAST 

1049 

00,24)  1 

4 0154 

0 

CS 

MPAC 

SIGN  CF  MPAC  CETEPMNES  SIGN  CF  FFSLLT. 

146  3 

CO, 2402 

0 1C06 

1 

SGNCVrVF 

EXTEND 

1 464 

■11, 241)3 

6 2405 

1 

BZPF 

1-2 

146  5 

off 

2 

1 AST 

1049 

';0 ,2414 

24  136 

0 

INCR 

eVSIGN 

NFGMAX  IN  MPAC  PERHAPS. 

1466 

pec 

26 

LAST 

1028 

';:i,24'15 

3 4733 

1 

CVCVF 

CAF 

PCSPAX 

CN'  CIVISION  OVERFLOW  OF  ANY  SORT,  SET 

1467 

RRF 

567 

1 AST 

104c 

■ '■,2406 

54  154 

f 

TS 

PPAC 

SFT  CF  MPAC  TC  +-FCSMAX. 

146F 

pep 

1 

rC,24C7 

0 2630 

0 

TC 

FINALCV  +3 

1469 

REF 

109 

1 AST 

1049 

CO, 2410 

2 4 7 53 

1 

CAF 

ONE 

SFT  CVERFLCW  INCICATCP  ANC  EXIT. 

147C 

REF 

5 

LAST 

1041 

00,241  1 

54  121 

1 

TS 

OVF  INC 

1471 

RFF 

■3  r 

LAST 

1047 

C ,2412 

0 6C64 

0 

TC 

CAN  Z K 

1472 

RFF 

3 

LAST 

1049 

•:  ',2413 

24  136 

C 

-1 

I NCR 

DVSIGN 

1473 

RFF 

97 

LAST 

1049 

00 ,2414 

4 0131 

0 

OVF* 

CS 

BUF  M 

LCAC  LOV-FR  CRCEP  RAPT  CF  CIVISCF. 

14  74 

REF 

1 

00,2415 

1 24U2 

1 

TCF 

SGNOVCVF 

GET  S IGN  OF  RESULT. 

1 A75 

0 ,2416 

0 0006 

1 

BUF- 

EXTEND 

IF  8LF  IS  NEGATIVE, 

CC^flE^E^T  IT  ANC 

1476 

REF 

9F 

LAST 

K49 

■■n,?4l7 

4 C131 

0 

CCS 

RUF 

MAINTAIN  eVSIGN  FOR 

FINAL  CLOTIENT  SIGN. 

1477 

RFF 

99 

1 AST 

1C49 

CO,  2420 

52  1’  1 

c 

CXCH 

PLF 

1478 

REF 

4 

LAST 

1049 

0 ) ,2421 

24  136 

0 

INCR 

CVS  IGN 

NCW  -C. 

GAP 
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IMTFPPPETER 

1479 

PEF 

568 

LAST 

1349 

00,2422 

14BC 

RFF 

1 

00,2423 

148  1 

00,2424 

148? 

REF 

1 

00,2425 

148’ 

RFF 

56  9 

LAST 

105C 

00,2426 

14  84 

PEF 

2 

LAST 

105C 

C',  2427 

14F5 

RFF 

31 

1 AST 

1049 

00 ,2430 

1486 

RFF 

2 

LAST 

105C 

CO  ,2  43  1 

1487 

RFF 

32 

L AST 

1050 

0", 2432 

I486 

' t ,2433 

1489 

RFF 

570 

LAST 

105C 

00,2434 

1490 

RFF 

571 

LAST 

105C 

OO, 2435 

1491 

RFF 

5 

LAST 

1C49 

00,2436 

10  154 

rt 

BLF  + 

CCS 

NFAC 

1 2437 

1 

TCF 

MPAC  + 

1 2426 

1 

TCF 

+ 2 

1 2433 

c 

TCF 

MFAC- 

10  155 

1 

CCS 

NPAC  +1 

1 2437 

1 

TCF 

8PAC  + 

1 6064 

1 

TCF 

DANZ  IC 

1 2433 

0 

TCF 

PFAC- 

1 6C64 

1 

TCF 

DANZIG 

G 0006 

1 

PFAC- 

PXTENC 

4 C 155 

1 

CCS 

PFAC 

52  155 

1 

DXCH 

MPAC 

24  136 

0 

I NCR 

CVSIGN 

t ■ 
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FCPCE  RPAC  FCSITIYE,  CPECKING  PCR  ZERC 
niYIOENO  IN  THE  FRCCES5. 


Exn  INNEDIATBLY  CN  ZERC  CIVICENC. 


FOPCP  MPAC  POSITIVE  AS  BLF  IN  BLF-. 


NOV,  +1  OP  -0. 
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1A92 

REF 

572 

LAST 

1C5C 

00,2437 

4 C154 

0 

RFACt 

rs 

MPAC 

1 A93 

RFF 

10 

LAST 

1047 

C',  2 4 40 

6 7 7 52 

C 

AD 

NEGONF 

1A9A 

RFF 

100 

LAST 

104  9 

Oo  ,2441 

6 0130 

0 

AO 

0LF 

1AS5 

RFF 

340 

1 A ST 

1C4  7 

Cn ,2442 

1C  COO 

r 

CCS 

A 

1496 

R'F 

1 

00,2443 

1 2505 

1 

7r  F 

DVN'OPR 

14^7 

' ' ,2444 

60001 

0 

-1/2+2 

CCT 

60001 

1490 

00,2445 

1 2446 

1 

7CF 

+ 1 

1499 

REF 

14 

LAST 

1035 

00, 2446 

3 4736 

1 

CAF 

HALF 

1 500 

OO  ,2447 

6 OOOO 

i 

ecu  EL  £ 

150] 

REF 

57? 

LAST 

1051 

ni  l ,7,^50 

6 0 155 

c 

AC 

M F A C ♦ 1 

15C2 

RFF 

574 

LAST 

1051 

" 1 ,2451 

54  155 

1 

TS 

MPAC  +l 

1503 

RFF 

2C2 

LAST 

104  7 

CO, 2452 

3 ^755 

1 

CAF 

7ERr 

1 5C4 

RFF 

77 

LAST 

1049 

01)  , 2453 

6 F 733 

1 

AO 

PCSMAX 

1506 

RFF 

575 

1 AST 

105  1 

00,2454 

26  154 

0 

ACS 

MPAC 

1506 

PCF 

1 5 

LAST 

10'  I 

00,7455 

3 4736 

1 

CAF 

HALF 

1507 

00,2456 

6 OOOO 

1 

DOUBLE 

I 50E 

RFF 

10  1 

LAST 

1051 

TO  ,2457 

6 0131 

1 

AD 

PUF  +1 

15. '9 

RFF 

102 

1 AST 

105  1 

CD, 2460 

54  131 

c 

7S 

BLF  +1 

1510 

REF 

2C3 

1 AST 

1051 

00  ,2461 

3 4755 

1 

CAF 

ZEPO 

1511 

RFF 

2E 

LAST 

1C5  1 

CO  ,2462 

6 4733 

1 

AC 

PCSMAX 

1517 

' rff 

1 >3 

LAST 

1051 

10, 2463 

26  130 

1 

ADS 

BLF 

151  3 

REF 

576 

1 AST 

10  5 1 

no  ,2464 

4 C154 

0 

CS 

MFAC 

1 514 

RFF 

104 

LAST 

1051 

00,2465 

6 C130 

0 

AD 

BUF 

1515 

RFF 

341 

LAST 

1051 

'.'.J,  2466 

in  000 

0 

CCS 

A 

1516 

RFF 

2 

LAST 

1C5  1 

00,7467 

1 2505 

1 

Tf  F 

CVNQPM 

1517 

RFF 

15 

LAST 

1F31 

00, 2470 

00133 

0 

LPLF2 

ACRES 

BLF2 

151  P 

RFF 

1 

Ofi  ,2471 

1 2405 

0 

TCF 

ovnvF 

151  9 

REF 

2 

LAST 

1049 

00,2472 

54  140 

0 

7S 

KAxnvsw 

1520 

RFF 

577 

LAST 

105  1 

UO ,2473 

4 0155 

1 

CS 

MPAC  +1 

1521 

REF 

ir  5 

LAST 

U51 

CO,  2474 

6 C131 

1 

AC 

PUF  + 1 

1522 

00,2475 

C C006 

1 

EXTEND 

1573 

REF 

2- 

LAST 

1051 

00,2476 

6 2405 

1 

B7MF 

DVOVF 

1524 

REF 

3 

LAST 

1051 

'■  0,24  77 

1 2505 

1 

TCF 

OVNORM 
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I.  SEP'  S PAGE  AC.  58  E3  S3 

ChECK  FCP  ClYISICN  CVERFICV..  IF  THE 
RAJCR  FART  CF  TM  CIVICENC  IS  LESS  THAN 
THE  MAJCR  FART  CF  THE  CIVISCR  EV  AT 
LEAST  TViC,  WE  CAA  PPOCEEC  IMMECIATELY 
WITHCLT  ACRAALIZATirN  FRCCUCING  A CVPAX. 
LSFC  lA  S0RTSL8. 

IF  THE  AEOVE  COES  NOT  FOLC,  FORCE  SIGN 
AGP.EEMEAT  lA  AIJPERATOR  AAC  CEACNIAATCR 
TO  FACILITATE  OVERFLOW  AMC  AEAR-OAE 
CFECK  lAG. 


SAKE  ECR  eUF. 


CFECK  MAGNITUCE  OF  S IGA-C CPREC  lEO 
CFEFAACS  . 

CIVIDE  OK  - WILL  NOT  BECCFF  MAXCV  CASE. 

DTVISCR  ACT  LESS  TFAA  CIVICENC  - CVF. 

IF  TFE  ("AJCF  FARTS  OF  TFE  DIVIDEND  AND 
CIVISCR  ARE  ECUAL,  A SFECIAL  AFFRCXIMA- 
TICN  IS  LSEC  (PRCVIDEC  TFE  CIVISICA  IS 
FCSST  ELF  , CF  CCURSE  ) . 


IF  NO  OVERFLOW 


GAP;  ASSPf'BLF  RFV^SI^^  116  fF  AGC  PRCGOfl"  LU^'1^AFY  BY  NASA  20211  12-071  1S:CS  AUG.  11,1S6S  SKIPPER  .097  PAGE  1052 


L TNTEPPRETFR 
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1525 

0 3,2500 

'1  0006 

1 

EUFNCRM 

EXTEND 

ADC  -I  TC  AUGNENT  SHIFT  CCLNT  ANC  SMET 

1526 

PEP 

2 

LAST 

10A9 

00,2601 

2A  137 

1 

ALG 

CVNCFNCT 

LEFT  CNE  PLACE. 

1527 

UC,  25''2 

G 0006 

1 

1 52F 

RFP 

lOF 

1 AST 

1051 

'10  ,2503 

3 0131 

1 

rcA  > 

'BUE^ 

1529 

REF 

1'.7 

LAST 

1052 

O'l, 

2C  131 

0 



1530 

PFF 

108 

LAST 

1052 

on, 25'. 5 

3 0130 

0 

CVNCRP 

CA 

BUF 

SEE  IF  DIVISCP  NCPNALIZEC  YET. 

1531 

CO  ,25fi6 

6 OOO'J 

1 

CCUBLE 

1532 

CO,  2 5'  7 

5A  CCC 

c 

CVSK 

1 533 

REF 

I 

OU  ,2  51.'» 

1 2 50U 

1 

TCF 

BLFNORM 

NP  - SHIFT  LEFT  CNE  ANC  TPY  AGAIN. 

1 53A 

PFF 

57R 

last 

1051 

00,25 1 1 

52  155 

1 

rxcF 

MFAC 

CALL  DIVIDEND  NORM AL  I Z AT  ICN  SEOLENCE 

1535 

PFF 

3 

1 AST 

1052 

00,2512 

50  13  7 

1 

INDEX 

n\<NORNCT 

FP  ICR  TC  CC  INC  THE  CIV  ICE  . 

1 536 

PFF 

1 

■ 10,251  3 

n 2565 

0 

TC 

MAXTEST 

1537' 

OFF 

579 

1 AST 

1052 

iy>,  251A 

5A  156 

1 

TS 

YFAC  +2 

RETURNS  UlTH  CIVISICN  CCNF  ANC  C(A)  = C. 

1 53P 

REP 

33 

LAST 

1U50 

00 ,2515 

1 6Q6A 

1 

TCF 

DANZIG 

1539 

PFF 

3F2 

LAST 

1051 

0(3,2516 

10  000 

0 

euFPcs 

CCS 

A 

15A0 

REF 

2 

LAST 

lOAS 

L L ,2517 

1 2A22 

0 

TCF 

BLF  + 

TC  BUF*  IF  BUF,  IS  GREATER  THAN  <1. 

15A1 

PEF 

1 09 

LAST 

1052 

>0 ,2520 

A 0131 

0 

CS 

BUF  +1 

IF  RUE  IS  +1,  FCRCING  SIGN  AGREEMENT 

15A2 

-30,2  521 

0 CCC6 

1 

EXTEND 

MAY  CAUSE  ELF  TO  BECOME  ZERO. 

1 5A3 

REF 

3 

LAST 

10  5 2 

"1,2522 

6 2^22 

1 

BZMF 

BLF  + 

BRANCH  IF  SIGNS  AGREE. 

1 5AA 

- pPF 

16 

LAST 

1051 

00,2523 

3 A736 

1 

CA 

HALF 

SIGNS  CISAGREE.  FORCE  AGREEMENT. 

15A5 

!■  ,2525 

6 ccnc 

1 

+ 6 

DDUBLE 

1 5A6 

RPF 

1 10 

LAST 

1052 

' 3,2525 

26  131 

0 

ADS 

BUI  + 1 

15A7 

PFF 

2(]c 

LAST 

K<=1 

L0,2526 

3 4755 

1 

CA 

ZERO 

15AB 

RFF 

1 1 1 

1 AST 

1C52 

00,2527 

54  13C 

1 

TS 

BCE 

15AC 

PFF 

1 

00 ,2  530 

1 2363 

1 

TCF 

eUFZERO 

1550 

OFF 

343 

LAST 

1C52 

CO, 2531 

10 

COO 

0 BLFNEG 

CCS 

A 

1551 

REF 

2 

1 AS'c 

1049 

1-1,2532 

1 

2 4 16 

1 

TCF 

BLT- 

TC  euF-  IF  EtF  IS  LESS 

THAN  -1  . 

1 552 

OFF 

112 

1 AST 

1(5  2 

00,2533 

3 

0131 

1 

CA 

BUF  +1 

IF  BUF  IS  -1 , FORCING  S 

IGN  AGREEMENT 

1553 

30,2534 

0 

C0Q6 

1 

EXTEND 

MAY  CAUSE  EUF  TC  BECOME 

ZERC. 

1554 

PEF 

3 

LAST 

1052 

00,2535 

6 

2416 

0 

BZMF 

BLF- 

PRANCH  IF  SIGNS  AGREE. 

1555 

RFF 

17 

LAST 

1052 

00,2536 

4 

4736 

0 

CS 

HAL  F 

SIGNS  CISAGREE.  FORCE 

AGREEMENT. 

1556 

REF 

2 

LAST 

1049 

fl.i,  2537 

1 

2 524 

1 

TCF 

RLFPrs  +6 
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P1557  THF  FCILCKING  ARE  PRCLOGLES  TO  SHIFT  THE  OIVIDENC  ARRIVING  IN  A ANC  L EfFCRF  TFF  CIVILE. 


1599 

REF 

16 

1 AST 

1061 

00, 2560 

22 

021 

1 

-210 

L XCH 

SR 

SPECIAL  FPCLCGUE  FTP  UNIT  WHEN  THE 

1560 

CO,  2 561 

0 

0006 

1 

EXT  ENC 

LENGTH  CH  THE  ARGUMENT  WAS  NOT  LFSS  THAN 

1561 

RPF 

IP 

LAST 

1C52 

00,2562 

7 

6 736 

C 

MP 

HALF 

.5.  IN  THIS  CASF,  EACH  CCMFCNENT  MLST  EE 

156? 

RFF 

202 

1 AST 

1066 

00,2563 

56 

001 

0 

XCF 

L 

SHIFTED  RIGHT  CNE  TO  PPCCLCE  A HALF-UNIT 

1563 

PFF 

1 5 

LAST 

1053 

CO  , 2566 

6 

CC21 

1 

AC 

SP 

VFCTCP. 

1566 

REF 

203 

LAST 

10 ‘=3 

00,2565 

56 

00  1 

0 

XCH 

L 

1565 

RFO 

1 

00 ,2566 

1 

2571 

1 

TC  F 

GENDDV  +1 

WITH  CP  CIVICENO  IN  A,L. 

1566 

00,2567 

20 

OCl 

1 

C0CL8L 

FPCLCGUE  WHICH  NORMALIZES  THE  FIVIOENC 

1567 

00,2550 

20 

071 

1 

CDOUBL 

WHEN  IT  IS  KNOWN  THAT  NC  CIVISICN 

1568 

00 ,2551 

20 

001 

1 

rcouEL 

GVERFLOW  WILL  CCCUR. 

1569 

00,2552 

20 

001 

1 

CDCLPL 

157G 

00,2553 

20 

00  1 

1 

CCnLBL 

1571 

CO, 2556 

20 

07  1 

1 

CCCLRl 

1572 

00,2555 

2C 

00  1 

1 

DOCLBL 

1573 

00,2556 

20 

TOl 

1 

CCOUBL 

1576 

00,2557 

2C 

CC  1 

1 

CnCLBL 

1575 

no, 2560 

20 

001 

1 

nOCUBL 

1576 

00,2561 

20 

001 

1 

CCCUPl 

1577 

CO,  2 <=6  2 

20 

CO  1 

1 

CDCLPL 

1578 

00,2563 

20 

00  1 

1 

CDOLPL 

1579 

REP 

58C 

LAST 

1052 

CO, 2 566 

52 

155 

1 

CXCF 

PFAC 

1580 

RFF 

3 

LAST 

10  51 

00,2565 

10 

160 

0 

MAXTEST 

CCS 

MAXDVSN 

0 IF  NAJCPS  MIGHT  PE  =,  -1  CTHEFWISE. 

1581 

00 ,2566 

06552 

0 

8 lASF  I 

CEC 

.6192  6-1 

SORT  CONSTANTS 

1582 

PFF 

1 

CO, 2567 

1 

2662 

1 

TCF 

MAxnv 

CHECK  TC  SEE  IF  THEY  ARE  NCW  ECUAL. 
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PI583  the  FOLLCWiaG  IS  A GENEPai  PURPOSE  CCUEL'^  PPFCISICN  CIVISICN  PCUTIKE.  IT  CIVICES  HPAC  EY  EUF  ANC  LEAVES 

R1585  the  result  tn  YPAC.  TEE  ECLLCWING  GONCITIONS  MUST  BE  SATISFIED: 

R1586  1.  THF  CIVISOF  (EUF)  ."UST  BE  POSITIVE  ANC  NCT  LESS  TRAN  .S. 

R1587  ?.  tee  CIVIDFEO  (MPAC)  «UST  EE  PCSITIVE  UITP  THE  MAJOR  PAFT  CP  MEAC  STRICTLY  LESS  TEAN  THAT  CF  ELF 

Rises  (A  SPECIAL  APPROX  IMATIGE  , MAXCV,  IS  'JSEC  WEEN  "''EE  MAJOR  PARTS  ARE  FCUAL). 

RISE!  UNOERSTANCI  KG  THAT  A /B  = C <■  S(P/E)  V«EERE  S = 21-14)  AKC  Q ANC  P ARE  CLCTIENT  ANC  REMAINCER,  RESPEC- 

R1593  TTVELY,  THE  FOLLOWING  AFPRCX  IM AT  ION  IS  OBTAINEC  BY  MULTIPLYING  ABOVE  ANO  EELQE  BY  C - SC  ANC  NEGLECTING  TERMS  CF 

RISES  ORDER  S-SOLARED  (FCSSTPIY  INTFCCUCTNG  ERROR  INTO  THE  1 CW  TWO  PITS  CF  TEE  RESULT).  SIGN  AGREEMENT  IS  LNNECESSARY. 


PI  59  7 

A ^ 

SB  . 

IP  - 1 

QC  ) 

A 4 SB 

R1  599 

— = C 

4 SI 

--)  WHERE 

C 

ANO  R 

ARE  QUOTIENT  AND  REMAINDER 

1 PF  RESPECTIVELY. 

R16H1 

r 4 

SD 

I c 

) 

C 

1603 

REF 

581 

LAST 

1053 

oo, 2570 

52'  155 

1 

GENDCV 

DXGH 

MPAC 

WE  NEEC  A ANC  6 CNLY  ECF  FIRST  CV. 

16C4 

00 ,25  71 

0 0006 

1 

+ l 

EXTEND 

(SPECIAL  UNIT  PROLOGUE  ENTERS  HERE). 

1605 

REF 

113 

LAST 

1C52 

00,2572 

1C  13C 

1 

DV 

RLF 

A NEW  CCNTA  INS  C ANC  L , P . 

1606 

RFF 

582 

LAST 

1HS4 

H ),  2573 

52  155 

1 

OXCH 

MDAC 

160  7 

REF 

5'E3 

LAST 

10  5 4 

00  ,2574 

4 0154 

0 

PS 

MPAC 

FORM  CIVIOENO  FCR  MINOR  PART  OF  RESULT. 

1608 

00,2575 

C 0006 

1 

EXTEND 

16CS 

RFF 

114 

LAST 

1C54 

00,2576 

7 013  1 

0 

MP 

BLF  41 

1610 

P.^F 

5E4 

LAST 

1C54 

CO,  2 577 

6 C155 

c 

AC 

MPAC  41 

CVEPFLCW  AT  THIS  POINT  IS  POSITIVE  SINCE 

161  1 

0 ),2600 

54  000 

0 

OVSK 

P IS  FCSITIVE  IN  EVERY  CASE. 

1612 

OO  ,2601 

1 2606 

1 

TCF 

45 

1613 

Of  , 26''2 

0 P0C6 

1 

EXTEND 

CVEPFLCW  CAN  EE  REMCVEC  BY  SUBTRACTING  C 

1614 

REF 

115 

LAST 

1054 

00,2603 

60  13  ) 

0 

SU 

BUF 

(BUF)  CNCE  SINCE  R IS  ALWAYS  LESS  THAN  C 

16  15 

RFF 

e ^ c 

LAST 

1C54 

OC  ,26  '4 

24  154 

1 

INCF 

MPAC 

IN  THIS  CASE.  INCR  COMPENSATES  SUBTRACT. 

1616 

PEF 

1 • 

00, 2605 

1 2610 

0 

TCF 

4-DCWN 

(SINCE  CIA)  IS  STILL  FCSITIVE). 

161  7 

00 ,2606 

0 J006 

1 

45 

EXT  END 

CIA)  CAN  BE  MADE  LESS  THAN  C IN  m/sgm- 

1618 

ref 

1 

t'C  ,2607 

6 2620 

1 

B7MF 

-LF 

TUCF  EY  CIMIMISHING  IT  BY  C (SINCE  C IS 

A1619  NCT  UPSS  THAN  .5)  UNLESS  CIA)  = f)  . 
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162.) 

CO, 261C 

r 

CCC6 

1 

+ CCNN 

EXTEND 

1621 

RFF 

1 16 

LAST 

105A 

00,2611 

60 

1 130 

0 

SU 

BUF 

1622 

00,2612 

0 

00.06 

1 

EXTEND 

1623 

CO,  26  1? 

1 

26  16 

C 

ezF 

+ 3 

162A 

00  ,2616 

0 

00  16 

1 

EXTEND 

162  = 

REF 

1 

CO, 26  15 

6 

2626 

0 

PZMF 

ENCMAXDV 

1626 

RFF 

586 

1 AST 

105A 

00, 2616 

26 

1 56 

1 

+ 2 

INCR 

MPAC 

1627 

RFF 

2 

LAST 

10A9 

00 ,2617 

1 

2625 

0 

TCP 

F INALCV 

1628 

nO,262C 

C 

CCC6 

1 

-UP 

EXTEND 

1629 

REF 

3 

LAST 

1 055 

00,262  1 

1 

2630 

1 

BZF 

FTNALPV  +3 

1630 

CO, 2622 

0 

0006 

1 

EXTEND 

1631 

REF 

587 

1 AST 

1055 

00,2622 

26 

156 

c 

D1  M 

MPAC 

1672 

REF 

1 1 7 

LAST 

1055 

00  ,2626 

6 

0130 

0 

ENCMAXCV 

AC 

BUF 
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IR  POSITIVE,  REDUCE  CMY  IF  NECESSARY 
SINCE  TFF  COMPENSATING  INCR  NIGHT  CAUSE 
CVEPFICW. 

nCNT  SUBTRACT  UNLESS  RESULT  IS  PCSITIVE 
CR  ZERC. 

KEFP  SUETRACT  HERE  ANC  CCMPENSATE. 


IF  ZFPC,  SET  MINOR  PART  CF  RESULT  TC 
ZERC. 

IF  NEGATIVE,  ADO  C TO  A,  SUBTRACTING  CNE 
TC  CGNPENSATE.  CIN  is  CK  HERE  SINCE  THE 
MAJOR  PART  NEVER  GOES  NEGATIVE. 
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1633 

00 ,2625 

22  007 

0 

F INALCV 

ZL 

163A 

00,^626 

C CCC6 

1 

extent 

1639 

PEP 

1 18 

LAST 

1055 

00,2627 

10  130 

1 

DV 

BLF 

1636 

PEE 

5B8 

LAST 

10^5 

00,2630 

59  155 

1 

+ 3 

TS 

MPAC  +1 

1637 

REF 

6 

LAST 

1050 

00,263 1 

10  136 

1 

CCS 

DVS IGN 

1633 

REF 

281 

LAST 

1 196 

00,2632 

0 000  2 

0 

TC 

0 

1639 

REF 

2E2 

LAST 

1C56 

00,2633 

0 C002 

0 

TC 

C 

16A0 

REF 

283 

LAST 

105  6 

00, 2639 

0 0002 

o 

TC 

0 

16A1 

00 ,2635 

0 C006 

1 

EXTENT 

16A2 

RFF 

989 

LAST 

1056 

00,2636 

9 C 155 

1 

CCS 

M PAO 

1693 

RFF, 

590 

L ART 

1056 

00,2637 

5 2 15  5 

1 

CXCF 

MPAC 

1699 

RFF 

205 

LAST 

1052 

00,2690 

3 9755 

1 

CAF 

ZERO 

1695 

REF 

289 

LAST 

1056 

CO,  269  1 

C CC02 

C 

TC 

C 

CS  AUG.  11,1969  SKIPPER  .097  PAGE  1CE6 
USER'S  PAGE  NC.  63  E2  S3 

CC  CV  TC  CBTAIN  MINOR  PAR1  CP  RESULT. 


LEAVE  RESULT  POSITIVE  UNLESS  C(OVSIGN)= 

-0. 


SO  WE  ALWAYS  RETURN  WITH  CIA) 


0 
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P1696 

IF  THE  MAJOR  PARTS 

cf  the  divisor  anc  CIVICENC 

ARE  EGUAL,  EUT 

THF  MINCF  FARTS  ARE  SUCF 

THAT  TFE 

P1648 

Cl  VIi'END 

IS  STRICTIY 

LESS  TFAN  the  OIVISDP  IN 

MAGNITUDE, 

THE  FOLLOWING 

APPRCXIMATICN  IS  USED.  THE  ASSURFTICNS 

R 1650 

APE 

THE 

SAME 

AS  the 

GENERAL 

RCUTI Nt 

WITH  THE 

ACCITICN  that  SIGN  AGREEMENT  IS  NECESSARY  (B,  C,  € 

D POSITIVE) . 

R1652 

C 4 

SB  . 

(C 

+ 

e - 0) 

R 1653 

— = 37777  + S (- 

) 

R1659 

r + 

SO 

( 

C 1 

R1655 

THE 

DIVISICN  MAY  BE 

FPRFCRMEO 

IMMEDIATELY  SINCE 

BIS  STRICTLY 

LESS  than  D anc  C is  NCT 

LESS  TFAN  .5 . 

1657 

REF 

591 

lAST 

1056 

00,2692 

9 0159 

0 

MAXCV 

CS 

MFAC 

SFE  IF  MAXDV  CASE  STILL 

HOLDS  after 

1658 

REF 

1 1 9 

1 AST 

1056 

00,2693 

6 cno 

c 

AC 

BLF 

NC  FMAL  I ZAT ICN. 

1659 

00,2699 

0 0006 

1 

EXTEND 

1660 

00,2695 

1 2697 

1 

ezF 

42 

1661 

REF 

2 

LAST 

1053 

00,2696 

1 2 5 70 

c 

TCP 

GFNODV 

MFAC  ACW  LESS  THAN  EU F 

- EIVIEE  AS  USUAL 

1662 

REE 

29 

LAST 

105  1 

00,2697 

3 9733 

1 

42 

CAE 

POSMAX 

SET  MAJOR  PART  OF  RFSLLT. 

1663 

REF 

592 

1 AST 

1057 

00,2650 

5R  159 

c 

TS 

MFAC 

1669 

REF 

1 20 

LAST 

1057 

00,2651 

9 0131 

0 

CS 

BUH  4 1 

FORM  CIVIOENO  CF  MINCF 

FAFT  CF  RESULT. 

1665 

REF 

c c 3 

1 AST 

1057 

0 ) ,2652 

6 0155 

0 

AC 

MFAC  41 

1666 

REF 

7 

LAST 

1055 

00,2653 

1 2629 

1 

TCF 

ENCMA  XCV 

GC  ACE  C AAC  EC  CIVICE, 

ATTACFING  SIGN 

A1667 

BEFORE  EXITING. 

GAP 
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P1668  VFCTrp  riVICFC  BY  SrALAP,  V/SC,  TS  EYECUTEC  FERE.  THE  VEC7CR 


167C 

PFF 

1 10 

LAST 

1C6  9 

CO, 2656 

6 6753 

C 

V/SC2 

C' 

CNE 

1671 

REF 

6 

LAST 

1052 

00,2655 

56  137 

0 

TS 

DVNORMCT 

167? 

REF 

5 3 

1 AST 

1035 

CO, 265c 

56  127 

1 

TS 

VeUF  *5 

1673 

REF 

1 

00,2657 

0 30  10 

0 

TC 

VECAGPFE 

16  7A 

PEF 

121 

LAST 

1057 

00 ,2660 

52  131 

0 

CXC  8 

BUF 

1676 

RTF 

7. 

LAST 

878 

CO, 2 661 

n 7567 

,1 

TC 

ALS  IGNAG 

1676 

PFF 

122 

L AST 

1058 

00,2662 

52  131 

c 

DXCH 

BLF 

1677 

RFF 

123 

LAST 

1068 

01 ,2  663 

10  13'1 

1 

CCS 

BUF 

1678 

R FT 

1 

00,2666 

1 2721 

c 

TCP 

/8UF  + 

1679 

00,2665 

1 2667 

0 

TCF 

+ 2 

1680 

RFF 

1 

CO, 2666 

1 2715 

1 

TCF 

/euF- 

1681 

REF 

126 

LAST 

1058 

CO, 2667 

5.6  131 

1 

XCH 

euF  +1 

1682 

REF 

1 26 

LAST 

1068 

00,7670 

56  130 

0 

XCH 

BLF 

1683 

REF 

596 

LAST 

ICEl 

CO  , 26  7 1 

56  155 

c 

XC8 

MPAC  +1 

1686 

RFF 

696 

LAST 

1068 

00, 2672 

56  156 

1 

XCH 

MPAC 

1686 

00,2673 

0 0006 

1 

EXTEND 

1686 

00,2676 

1 2 6 76 

c 

ezF 

+ 2 

1687 

RFF 

' 3 

LAST 

10  5 1 

r-0,2  6 75 

1 2605 

0 

TCF 

nvcvF 

1688 

REF 

596 

LAST 

1058 

CO  ,2676 

56  160 

0 

XCH 

M F A C +6 

1689 

RFF 

597 

LAST 

1058 

C'.),  26  77 

56  157 

1 

XCH 

MFAC  +3 

16PC 

00,2700 

0 0006 

1 

EXTENO 

1691 

CC,2701 

1 2 703 

0 

BZF 

+ 2 

1692 

PPF 

6 

L AST 

1058 

00, 2702 

1 2605 

c 

TCF 

OVCVF 

1693 

PEF 

698 

1 AST 

1058 

00 ,270  3 

56  162 

1 

XCH 

MFAC  +6 

1696 

RFF 

599 

CAST 

1058 

CQ,2'o;6 

56  161 

1 

XCH 

HPAC  +5 

1696 

00, 2705 

0 0006 

1 

EXTEND 

1 6>^6 

CO, 2706 

1 271  ) 

1 

PZF 

+ 2 

1697 

pep 

c 

LAST 

1068 

Cl.  . 2707 

1 260  5 

0 

TCF 

OVCVF 

1698 

REF 

126 

LAST 

1058 

00,2710 

in  1 30 

1 

CCS 

BLF 

1699 

RFF 

2 

LAST 

1058 

CO, 2711 

1 2721 

0 

TCF 

/8LF  + 

1 700 

REF 

6 

LAST 

1058 

00,2712 

1 76C  5 

0 

TCF 

DVC'VF 

1 7C1 

RFF 

2 

LAST 

1068 

00,7713 

1 2715 

1 

TCF 

/8UF- 

1702 

RFF 

7 

LA  ST 

1C58 

00,2716 

1 2605 

c 

TC.F 

Dve  VF 

1703 

00,2715 

0 0006 

1 

/BUF- 

EXTEND 

1706 

REF 

127 

LAST 

1058 

00,2716 

6 0131 

0 

CCS 

BUF 

1705 

REP 

1 2B 

LAST 

1058 

CO, 2717 

52  131 

0 

C XCH 

BLF 

1796 

PEF 

56 

L 'ST 

1068 

0 1 ,2720 

26  127 

0 

INCP 

VeUF  +5 

tSEP'S  PAGE  AC.  65  E3  S3 

S NCh  IP  NPAC  FITH  SCAIAP  IP  ELP. 

initialize  CIVICFND  NGRP'ALIZAT  icn  cclm 
APC  CIVISICP  SIGN  REGISTER. 

FCPCE  SIGN  AGREEMENT  IN  VECTOR 

SIGN  AGREE  SUP 

FORCE  DIVISOP  POSITIVE  FITH  ^'AJCR  PART 
NCN-ZERC  ( IF  FOSS  IBLE  ) . 

SHIFT  VECTCP  ANC  SCALAR  LEFT  lA. 

CHECK  FCR  CVERFLOVi  IN  EACH  CASE. 


ZEPC  CIVISCP  - CVERFLCR. 

ON  NEGATIVE,  CCNPLEMENT  ELF  ANC  MAINTAIN 
CVSIGN  IN  VRUF  +5. 
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1707 

CO, 2721 

C CCC6 

1 

/BLF  + 

EXTFNC 

1 T'  e 

REF 

129 

LAST 

1058 

00 ,272? 

3 0131 

1 

CCA 

BLF 

1709 

REF 

1 6 

LAST 

105  1 

00,2723 

52  134 

0 

CXCF 

BUF2 

1710 

REF 

1 

00,2724 

1 2 73  2 

1 

TCF 

/NCPN 

1711 

oo  ,2725 

0 6C06 

1 

/NCRR2 

EXTENC 

1712 

REF 

c 

LAST 

105E 

00,2726 

24  137 

1 

ALG 

OVNCPNCT 

1713 

00,2727 

O 0006 

1 

EXTEND 

1714 

REF 

130 

LAST 

1059 

00,2730 

3 0131 

1 

CCA 

euF 

1716 

FFF 

m 

1.  AST 

1C59 

00, 273  1 

2C  131 

C 

CAS 

BLF 

1716 

REF 

132 

LAST 

1059 

00  ,2732 

3 013  1 

0 

/NORM 

CA 

BUF 

1717 

00,2733 

6 CCCC 

1 

CCLELE 

171R 

00,2734 

54  OCO 

c 

OVSK 

1719 

RfEF 

1 

OO  ,2735 

1 2725 

1 

TC  F 

/NORN'2 

1720 

R FF 

1 

00,2736 

0 2 750 

1 

1C 

V/SCCV 

1721 

RCF 

600 

1 AST 

l'T5E 

00,2737 

52  163 

1 

CXCH 

MFAC  +3 

1722 

RFF 

601 

LAST 

1C59 

OO  ,2740 

.52  155 

1 

CXCF 

NFAC 

1723 

REF 

602 

LAST 

1059 

CF.2741 

52  160 

1 

CXCH 

NFAC  +3 

1 724 

DCF 

2 

LAST 

1059 

00  ,2742 

3 2753 

1 

TC 

V/SCDV 

1729 

RFF 

6C^ 

LAST 

1059 

00  ,2  743 

5 2 16  2 

0 

CXCH 

NFAC  +5 

1 7’6 

R = F 

604 

L AST 

1059 

00,2744 

52  155 

1 

CXCH 

MFAC 

1727 

RFF 

605 

LAST 

1059 

00  ,2745 

52  162 

o 

CXCH 

MPAC  *5 

1 728 

REF 

3 

LAST 

1059 

00 ,2746 

0 275C 

1 

TC 

V/SCCV 

1729 

RFF 

2 

LAST 

1042 

00,2747 

1 7423 

1 

TCF 

VROTATE  X 

ISiCS  AUG.  11,196S  SKIPPER  .097  FACE  lOSS 
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LEAVE  ABSICRIG  CIVISCR)  IN  ELF2 
FTP  OVERFLOW  TESTING 
NCFNAU2F  CIVISCR  IN  EU  F . 

IF  LESS  THAN  .5,  AUGMENT  OVNCPNCT  ANC 
CCUELE  CIVISCR. 


SEE  IF  CIVISCR  NOPMALIZEC. 

OCUBLE  AND  TRY  AGAIN  IF  NCT. 

CC  X CCNFONENIT  CIVICE. 

SUPPUY  ARGURENTS  IN  USUAL  SECUENCE. 

Y CCRFCNENT. 


Z CCRECNEN'T. 

GC  RE-APRANGE  CCRFCNENTS  EEFCPE  EXIT. 


i 

i 


4 
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P1730  SUBPOUTIPf  USFC  BY  V/SC  TO  CIYIOE  VECTCR  CCVPCNENT  IN  Y0AC,+1  PV  7PE  SGALAR  GIVEN  IN  EUR. 


173? 

REF 

c c 

LAST 

1C56 

CO  ,2750 

3 C127 

0 

V/SCC V 

CA 

VeUF  +5 

REFLECTS  SIGN  CF  SCALAR. 

17^3 

REF 

7 

LAST 

K’5  6 

00,2751 

5F  136 

1 

TS 

DVSIGN 

173A 

PEP 

6C6 

LAST 

1059 

0:t  ,2752 

10  159 

0 

CCS 

MPAC 

FCPCE  NFAC  POSITIVE,  EXITING  CN 

1 7^5 

PEE 

1 

00,2753 

1 2767 

1 

TCF 

/MPAC+ 

1 73R> 

00,2759 

1 2(56 

C 

TC  F 

+ 2 

1 737 

RFE 

1 

00,2755 

1 2763 

0 

TCF 

/PPAC- 

1733 

RPR 

607 

LAST 

1C6C 

00,2756 

1C  155 

1 

CCS 

MFAC  +1 

1 73  9 

PPF 

2 

LAST 

1060 

00,2757 

1 2767 

1 

TC  F 

/NPAC<- 

17A0 

RFE 

2f  5 

LAST 

1056 

00,2760 

0 0002 

0 

TC 

0 

1791 

RER 

2 

LAST 

106C 

CO, 2761 

1 2 76  3 

c 

TCF 

/NFAC- 

179? 

PPF 

2 86 

L AST 

106P 

00  ,2762 

0 0002 

0 

TC 

0 

1 793 

PC  ,2763 

T 0006 

1 

7PFAC- 

EXTENT 

USUAl  CCMPLEMENT  ING  AND  SE^fTING 

1 799 

REF 

608 

1.  AST 

10  6 C 

Oil  , 2769 

9 C155 

1 

DCS 

PFAC 

1 795 

RFE 

6O9 

LAST 

1060 

O')  ,2765 

52  155 

1 

CXCF 

MPAC 

1796 

RPP 

8 

LAST 

106C 

00,2766 

2'9  13  6 

c 

INCR 

DVSIGN 

1 797 

PPF 

1 1 1 

LAST 

K 58 

01, 2767 

9 9753 

0 

/PPAC+ 

CS 

ONE 

INITIALIZE  NEAR-CNE  SWITCH. 

1798 

REF 

9 

1 AST 

1053 

CO ,2770 

59  190 

0 

TS 

YAXDVSW 

1799 

PPF 

61C 

LAST 

ir  60 

00 , 27’'  1 

9 C159 

C 

CS 

MPAC 

CHECK  FCSSIBLR  CVERFLCW. 

1750 

PEE 

17 

LAST 

1 059 

0.1 ,2772 

6 013  3 

0 

AC 

BUF2 

UNNGRNALIZEO  INPLT  DIVISOR. 

1751 

PPF 

■j  4 9 

1 AST 

1052 

CO,  2 7 7^ 

1C  COC 

c 

CCS 

A 

1 7P? 

PEE 

1 

on ,2779 

1 300.9 

1 

TCF 

ddvcall 

NCT  NEAF-CNE 

1 713 

ro,2775 

1 2777 

0 

Tf  F 

+ 2 

+0  IS  JLST  POSSIBLE 

1759 

REF 

8 

LAST 

1058 

CO, 2 776 

1 2905 

0 

TCF 

DVCVF 

NC  FCFE 

1 755 

PEE 

5 

LAST 

1060 

00,2777 

59  190 

0 

TS 

MAXDVSVy 

SIGNAL  FCSSIBLE  NEAR-CNE  CASE 

1 756 

RFE 

P 1 1 

LAST 

1060 

00,3000 

9 0155 

1 

CS 

MPAC  +1 

SEE  IF  CIVISICN  CAN  BE  DONE 

1 757 

RER 

18 

1 ASP 

1C6C 

CP , 300  1 

6 C 139 

1 

AD 

BLF2  +1 

1 758 

00,3002 

0 0JU6 

1 

EXTEND 

175c 

PEP 

9 

LAST 

106C 

CC  ,3003 

6 29)5 

1 

ezNF 

DvrVF 

1 760 

RPR 

612 

1 AST 

1060 

00 , 3009 

52  155 

1 

CrvCALL 

CXCF 

MPAC 

CALL  FRF-CIVICe  N C PP AL  I Z A T I CN  . 

1761 

RFF 

6 

LAST 

1059 

00 ,3 00 5 

50  13  7 

1 

INDEX 

OVNORMCT 

1762 

REF 

2 

LAST 

1052 

rO,3C06 

1 2565 

1 

TCF 

MAXTEST 

G^P;  /'SSEMBLE  REVISION  lit  CF  AGO  PfiCGRAw  LLMINARY  EY  AA  «A  20211  12-071 
L IN7EPPPETFP 


1 763 

lO,3C07 

32506 

0 

SLCPELC 

EEC 

.8329 

1769 

REF 

287 

t AST 

106C 

C0.3C1C 

56  C02 

n 

\, 

VECAGREE 

XCF 

e 

1765 

PFF 

613 

1 AST 

106C 

,3111 

52  155 

1 

OXCH 

MPAC 

176.6 

P'^F 

a 

LAST 

IC5E 

C !,30l? 

0 7597 

0 

TC 

ALSIGAAG 

1767 

REF 

619 

L AST 

1061 

00, 3f  13 

52  155 

1 

rxCH 

RFAC, 

1 768 

REF 

615 

LAST 

106  1 

00,3019 

5 2 160 

1 

CXCF 

MPAC  *3 

1769 

REF 

9 

LAST 

106  1 

00,3015 

0 7597 

c 

TC 

ALSIGAAG 

1 779 

Rcf 

616 

LAST 

106  1 

00,3016 

52  160 

1 

OXCH 

MPAC  *3 

1771 

PEF 

6 17 

L AST 

1C6  1 

C0,?C17 

52  162 

0 

CXCF 

PFAC  +5 

1772 

PFF 

5 

1 AST 

1061 

(5,3020 

0 7597 

c 

TC 

ALSIGAAG 

1773 

REF 

618 

LAST 

1061 

00,3021 

52  162 

0 

r xcH 

MPAC  +5 

1779 

RFF 

395 

LAST 

106C 

00,3022 

0 oono 

1 

TC 

A 

19:09  AUC.  11,1949  SKIPPER  .097  PAGE 
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SAVF  C lA  A 
SIGNACREE  MPAC 

SICA  /CPEE  RPAC  +3 


1C4  1 


SIGNACREE  APAC  *5 


gap: 


ASSPI'BLe  RPVISION  116  CF  AGC  PRCGRAV  LUMNAFY  PY 


L INTRRFRFTFP 

P1  775  the  F^LLCWI^G  RCUTINE  EXECLTES  TFF  LMT 


1 777 

RFF 

2 

LAST 

1058 

00,3323 

1 3'’  10 

0 

UNIT 

1778 

REF 

3 

LAST 

10’  1 

TO, 3024 

0 7535 

0 

1779 

RFF 

?.';6 

L AST 

1056 

CO, 3025 

3 47  5 5 

1 

1 783 

REF 

6 

LAST 

1049 

00 ,3026 

56  121 

0 

1781 

REF 

2C 

1 AST 

917 

C0,3C?7 

54  141 

1 

1782 

PFF 

1 

! 0,3030 

0 2317 

1 

1 7E3 

REF 

21 

LAST 

1062 

00 ,303  1 

3 0141 

0 

1784 

RFF 

7 

LAST 

1 C6.2 

CO,3C32 

56  121 

f 

1 788 

0 1, 3933 

:■  0006 

1 

1786 

CO  ,3034 

1 3C36 

0 

1787 

REF 

in 

LAST 

106C 

00,3035 

I 240  5 

0 

1 788, 

01,3036 

0 0006 

1 

1 78" 

REF 

6 19 

LAST 

U 61 

,3'-,37 

3 0 155 

0 

1 79r 

FGF 

46 

L AST 

1"  16 

''<) , 3040 

50  120; 

1 

1791 

RFF 

1 

00,304 1 

5 2 14  3 

1 

179? 

REF 

1 

00,3042 

C 3343 

c 

1793 

RFF 

6 20 

LAST 

1062 

00, 3043 

10  154 

0 

1794 

TO, 3 "44 

1 305  1 

1 

1798 

REF 

204 

L AST 

1083 

■ i,3''45 

54  CCl 

1 

1 796  - 

RFF 

47 

LAST 

1062 

01,3046 

50  120 

1 

1 797 

RFF 

1 

CO , 3047 

52  C45 

1 

1 798 

REF 

1 1 

LAST 

1062 

Cti,  3080 

1 2415 

0 

1 799 

REF 

2 

1.  AST 

566 

00,3081 

4 4317 

1 

1809 

RFF 

47 

LAST 

104  E 

CO, 3^52 

6 C135 

0 

1 801 

REF 

346 

LAST 

1061 

00,3053 

10  000 

0 

1802 

to,  3 0 54 

4 COCO 

0 

1803 

REF 

1 

00, 3055 

1 3133 

1 

1 EC4 

Rr-F 

1 

(<o  ,3056 

1 3065 

0 

1808 

REF 

1 

00,3057 

4 A7fi 

1 

1 806 

R = F 

48 

1 AST 

1062  ' 

00,3060 

54  135 

1 

1 807 

RFF 

6 2 1 

LAST 

1062 

i , ,306  1 

3 0154 

1 

1808 

RcF 

208 

LAST 

10  6 2 

C-.  , 3062 

54  001 

1 

SPALL 

1809 

Rop 

207 

1 AST 

1062 

TO  ,3  16  3 

3 4755 

1 

1810 

REF 

1 

CO , 3064 

1 3112 

1 

1811 

REF 

49 

LAST 

1062 

i ',  3"65 

10  135 

1 

LARGE 

1812 

R«^F 

1 

CO , 3066 

1 3074 

0 

1813 

REF 

1 

00, 3f 67 

4 2024 

1 

1814 

REF 

50 

LAST 

1062 

00,3  >7.1 

54  135 

1 

1815 

00, 3C  71 

0 0006 

1 

1816 

PFF 

622 

. L AST 

1062 

OT  , 3072 

3 C155 

0 

20211 12-C71 
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INSTRLCTICN,  WHICH 

TAKES  TFE  LMT  CE  TFE  VECTCR  IN  PFAC. 

TC 

VECAGREE 

FCPCE  SICN  AgREEPENT  IN  VECTCR 

TC 

MFACVeUF 

SAVE  ARGUMENT  IN  VBUF 

CAP 

ZEPC 

PLST  SENSE  CVEPFLCW  IN  FCLLCUINC  CGT. 

XCF 

OVF IMP 

IS 

TEPl 

TC 

VSOSUB 

rCT  PFAC  WITH  ITS  ELF. 

CA 

TEMl 

XCH 

C V F I N C 

EXTEND 

FZF 

+ 2 

TCF 

DVr  VF 

EXTEND 

CCA 

PFAC 

LEAVE  the  SCUARE  OF  THE  LENGTH  OF  THE 

INOFx 

Fixirc 

APGLPENT  IN  LVSCUARE. 

CXCH 

L VSOUARE 

TC 

SCPTSLR 

GC  TAKE  THE  NDRPALIZEC  SQUARE  ROOT. 

CCS 

MPAC 

CHECK  FCP  LMT  CVERFLCW. 

TOE 

+ 5 

MPAC  IS  NOT  LESS  THAN  .5  UNLESS 

IS 

L 

INDEX 

F IXLOC 

CXCF 

LY 

TCF 

DYOVF 

INPUT  TC  SCRTSCe  WAS  0 . 

CS 

FCURTEEN 

SEE  IF  THE  INPUT  WAS  SC  SPALL  THE  THE 

AD 

PFTEPF 

FIRST  TWC  REGISTERS  OF  THE  SCUARE  WERE  0 

CCS 

A 

f CP 

IF  SO,  SAVE  THE  NEGATIVE  CF  THE  SHIFT 

7CF 

SPALL 

CrUNT  -16C. 

TCF 

LARGE 

(THIS  IS  USUALLY  THE  CASE.) 

CS 

THIRTEEN 

IF  THE  SHIFT  COUNT  WAS  EXACTLY  14,  SET 

TS 

PFTEPF 

THE  PRE-CIVIDE  NCRM  CCLNT  TC  -13C. 

CA 

mfAC 

SHIFT  THE  LENGTH  RIGHT  14  BEFCRE  STCRING 

TS 

L 

(SPALL  EXITS  TC  THIS  FC  INT  ) . 

CAE 

ZERO 

TCF 

LARGE? 

Cr  TC  STCPF  LENGTH  ANC  PRCCEEC. 

CCS 

MCTE  PF 

PCST  ALL  CASES  CCME  HERE. 

TCF 

LARGE  3 

SEE  IF  NC  NORPALIZATICN  WAS  PECLIFEC  EY 

CS 

SROnv 

SCFT,  ANC  IF  SC,  SFT  UF  FOP  A SHIFT 

TS 

MPTFMP 

RIGHT  1 6EFCPE  CIVICIPG  TC  FRCCUCE 

EXT  ENT 

THE  DESIRED  HALF  UNIT  VECTOR. 

CCA 

MPAC 

gap: 

L 

1617 
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RFF  2 lAST  1062  CO,  30  73  1 3 1 12  1 TCF  LARGE2 


G4P: 


/'SSEf'HLE  REVISION  116  CP  AGO  PRCGPAf'  LUMINARY  BY 


INI': 

RFRFTFp 

. - 

leip 

C3,  30  74 

4 COCO 

0 LARGE3 

1819 

REF 

51 

LAST 

1062 

0-1, 30  7 5 

54  135 

1 

1820 

6 .1,30  76 

4 COO  ) 

n 

1821 

REF 

347 

1 AST 

1062 

00, 3 C 77 

SC  000 

1 

1822 

RFF 

61 

LAST 

1057 

on  ,31'10 

3 4 736 

1 

1823 

RPF 

133 

LAST 

1C5S 

CO  ,310  1 

54  130 

1 

1 P2A 

00 , 3 102 

C C006 

1 

1825 

RFF 

623 

1 AST 

1062 

00,3133 

7 0155 

1 

1825 

REF 

134 

LAST 

1065 

CO,  3K4 

5 6 13C 

C 

18^7 

01,3105 

0 0006 

1 

1828 

REF 

6 2 4 

LAST 

1064 

CO, 3106 

7 0154 

0 

1820 

REF 

206 

LAST 

1C62 

00,3107 

56  00  1 

c 

1P3'> 

RFF 

135 

LAST 

1064 

00,31Ul 

6 '113  1 

0 

18’1 

REY 

2C7 

1 AST 

1064 

'"',311  1 

56  001 

0 

1837 

REF 

48 

LAST 

1062 

'1,3112 

50  120 

1 LARGE2 

1 833 

RFF 

2 

LAST 

1062 

O')  ,3113 

52  .045 

1 

183A 

RFF 

112 

LAST 

1066 

fin,  0 1 

4 4753 

C 

1835 

RFF 

6 

LAST 

10  6'. 

00,3115 

54  140 

0 

1835 

RFF 

S6 

LAST 

1C6C 

,3116 

52  123 

0 

1837 

REF 

625 

LAST 

1064 

01,3117 

52  155 

1 

1838 

RFF' 

1 36 

LAST 

1064 

00 ,3  120 

52  131 

0 

1 830 

REF 

1 

CO,  M21 

0 3151 

1 

1 8A  1 

pff 

57 

LAST 

1064 

no, 3122 

52  125 

() 

1881 

RFF 

676 

LAST 

1064 

On,?l?3 

52  155 

1 

184? 

RFF 

627 

1 AST 

1065 

00,3124 

52  16C 

1 

1843 

REF 

2 

LAST 

1064 

00,3125 

n 3151 

1 

1844 

RFF 

58 

LAST 

1065 

00,3126 

52  127 

1 

1845 

PEF 

628 

1 AST 

1064 

00,3127 

52  155 

1 

1 845 

REF 

6-2  9 

LAST 

1064 

on  ,3130 

52  162 

0 

1847 

REF 

1 

1 AST 

K64 

CO, 0131 

C 3151 

1 

1848 

PEF 

3 

LAST 

1059 

00,,  3 132 

1 742  3 

1 
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CCP 

LEAVE  NEGATIVE  CF  SHIFT  COLNT-1  FCR 

7S 

HFTFNF 

FRECIVICE  LFEl  SFIFT. 

CCP 

PICK  LP  PEOLIRFO  shifting  BIT  TC  LNNCRM 

INCEY 

A 

ALIZE  the  SCPT  RESULT. 

f AF 

B IT  1 4 

IS 

RUE 

EXTEND 

PP 

MPAC  +1 

XCH 

BLF 

EXTEND 

(UNNORMALIZF  THE  SCRT  FCR  LVl. 

NF 

VFAC 

XCH 

L 

AG 

BLF 

XCF 

L 

INDEX 

F IXLCC 

CXCF 

L V 

LENGTH  NCH  STORED  IN  NCRK  AREA. 

CS 

ONE 

TS 

MAXOVSN 

NC  MAXCV  CASES  IN  UMT. 

rxCF 

VPUF 

PREPARE  X CPMFCNENT  FOR  DIVIDE,  SETTING 

c xr> 

MPAC 

LENGTH  CF  VECTCR  AS  CIVISCR  IN  EUF. 

EXC  F 

euF 

TC 

UMTCV 

DXCH 

VBUF  +2 

DC  Y AND  Z IN  USUAL  FASFICN  SC  WE  CAN 

cxr  F 

MPAC 

EXIT  THRCLGH  VREITATEX. 

CXCH 

MFAC  +3 

TC 

UNI TDV 

CXCF 

veuE  +4 

CXCH 

MPAC 

CXCF 

MPAC  +5 

TC 

UMTCV 

7CF 

VRGTAlFx 

ANC  EXIT. 
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P1849  IF  TFE  LENGTH  OF  THF'ARGLRENT  LECTOR  HAS  LESS  THAN  2(-28),  EACH  CCRPCNEFT  »-UST  BE  SFIfTEC  LEFT  AT  LEAST 

RIBM  lA  PLAGFS  BEFORE  TFF  CIVICF.  PCTE  THAT  IN  THIS  CASE,  TFE  MAJOR  PART  OF  FACH  CCRPCNENT  IS  ZERO. 


1653 

RFF 

■=2 

LAST 

1C6A 

CO  , 133 

5A  135 

1 

SRAl  1 

TS 

MFTEFP 

NEGATIVE  CF  PRE-CIVICE  SHIFT  CCLNT 

1 85A 

RFF 

208 

LAST 

1062 

00,-’13A 

3 A755 

1 

CAF 

ZERC 

SHIFT  EACH  CCNPCNENT  LEFT  lA. 

1855 

RFF 

5F 

LAST 

106A 

00,3135 

56  123 

1 

XCF 

veuF  ti 

1856 

REF 

60 

LAST 

1065 

CO, 3 136 

56  122 

C 

XCF 

veuF 

1B5  7 

RFF 

61 

LAST 

1065 

00,3137 

56  125 

1 

XCH 

veuF  +3 

1858 

REF 

6 2 

LAST 

1C65 

C0,31AC 

56  12A 

0 

XCF 

VPUF  +2 

1850 

Rop 

63 

L AST 

1065 

CO, 3 lA  1 

56  127 

C 

XCH 

V8LF  +5 

1 860 

PEF 

6 A 

LAST 

1065 

00  ,?1A2 

56  126 

1 

XCF 

veUF  +A 

186  1 

RFF 

53 

LAST 

1065 

00,31A3 

A C135 

1 

CS 

F FTEF  F 

186  2 

PFF 

3A8 

LAST 

106A 

00,R1AA 

50  COO 

1 

INDEX 

A 

1 E63 

PEF 

62 

L AST 

1C6A 

00,31A5 

3 A736 

1 

CAF 

BITIA 

1 86A  , 

00, 3 1A6 

C CC06 

1 

EXTFNP 

1 865 

REF 

630 

1 AST 

10  6 A 

Oo , 3 ia7 

7 0 15A 

C 

FP 

FPAC 

1866 

RFF 

1 

00,3150 

1 3062 

1 

TCP 

SFALL2 

1867 

REF 

A 

LAST 

SA3 

A76  1 

thirteen 

= 

CCTI5 

1 86  8 

PFF 

1 

A317 

FCURTFEN 

= 

0CT16 

186S 

RFF 

I 3 

LAST 

A5S 

A317 

CCTl  6 

= 

Pin 
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P187C 

THE 

FrLLCNiNG  PCLTINE  SETS 

LF 

THE  GAIL 

TC  THE 

DIVIDE  RCUTINFS. 

FfPCF  NFAC  FCSITIVE  IF  FCSSIBLE,  SETTINC- 

1871 

REF 

631 

1 AST 

1065 

OT , 3 1 5 1 

1C  154 

0 

LNITDV 

CCS 

HPAC 

1B7? 

RFF 

1 

00,215? 

1 3170 

0 

TCF 

IJMPAC  + 

DVSIGN  ACCORDING  TO  THE  SIGN  CF  HFAC 

1873 

00, 2152 

1 3155 

1 

TCF 

+ 2 

SINCE  THE  CIVISCR  IS  ALWAYS  POSITIVE 

187A 

PEF 

1 

00,3154 

1 2162 

0 

TG  F 

ywpAC- 

HFRE. 

1875 

RTF 

622 

LA  FT 

1066 

00,3155 

10  155 

1 

CCS 

HFAC  +1 

1876 

PFF 

2 

LAST 

1066 

00,2156 

1 2170 

c 

TCF 

UNPAf + 

1877 

RFF 

268 

LAST 

106  1 

00  ,3157 

0 000  2 

0 

TG 

0 

EXIT  IPNEOIATELY  CN  ZEPC. 

1878 

RFF 

2 

LAST 

1066 

CO,316C 

1 2162 

c 

TCF 

UNFAC- 

1 879 

RRF 

289 

LAST 

1066 

00,3161 

0 0002 

c 

TG 

0 

1 88C 

RFF 

2C9 

LAST 

1065 

00,316? 

4 4755 

0 

UHPAC- 

CS 

ZERO 

IF  NEGATIVE,  SET  -C  IN  DVSIGN  FCR  FINAL 

1881 

REF 

9 

LAST 

106G 

00,3162 

54  136 

1 

TS 

DVS IGN 

CCNFLEHFNT . 

1882 

00,3164 

0 0006 

1 

EXTEND 

188’ 

REF 

623 

1 AST 

1066 

00,3165 

4 C155 

1 

CCS 

MFAC 

PICK  LP  ABSOLUTE  VALUE  CF  ARG  AND  JLHP. 

18PA 

PFF 

5A 

LAST 

1065 

00,3166 

50  125 

0 

INOE  X 

MFTCRP 

1F85 

PFF 

3 

L ACT 

1060 

00 ,3167 

1 2564 

c 

TCF 

MAXTFST  -1 

1886 

REF 

10 

LAST 

1066 

00,3170 

54  136 

1 

UNFAC+ 

TS 

DVSIGN 

SET  DVSIGN  FOR  POSITIVE  OLOTIENT. 

1887 

RFF, 

634 

LAST 

1066 

<>0,?17  1 

52  155 

1 

DXCH 

MPAC 

1888 

PFF 

c:  E 

LAST 

1066 

00,3172 

50  135 

0 

INDEX 

HPTENP 

1889 

RFF 

4 

LAST 

1066 

00,3173 

1 2564 

c 

TCF 

HAXTEST  -1 

Gap: 
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P1890 

MISCELLANECLS  UNARY 

1B91 

RCF 

1 

00,31 79 

189? 

PRF 

39 

LAST 

1052 

00,31 75 

1P9S 

PFF 

3 3 

LAST 

1098 

00,3176 

1899 

REF 

3 

LAST 

819 

OO  ,3177 

1895 

PEF 

9 

LA'T 

10  6 7 

CO, 3200 

1 896 

REF 

2 

LAST 

1062 

Oi>,  3 20  1 

1 E97 

RFF 

39 

LAST 

1C67 

00,32m? 

189r' 

00, 320? 

1890 

REF 

635 

LAST 

1066 

00  ,3209 

19U0 

RFF 

99 

LAST 

1069 

00,3205 

190  1 

PEF 

? 

LAST 

1062 

00, 3 2.0  6 

rPERATIONS. 


0 3300 

1 

DSQ 

TC 

ososue 

1 6J69 

1 

TCF 

DANZIG 

10  163 

1 

ABVAI.  AP  S 

CCS 

McrE 

1 3226 

0 

TCF 

ABS 

1 3226 

r 

TCF 

AES 

0 33  17 

1 

A8VAL 

TC 

VSGSLB 

22  163 

0 

LXCF 

MCCE 

0 0006 
3 0155 

1 

0 

EXTEND 

CCA 

MPAC 

50  120 

1 

INDEX 

F IXLCC 

52  093 

1 

CXCM 

LVSQLARE 
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PAGE  1067 

S' 
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NO.  79 
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SCLARE  Yt-e  OP  CCNTEMS  CF  VfAC. 


APVAL  CP  APS  INSTRUCTICN. 
DO  ABS  CA  SCALAR. 


CC7  PfAC  hlTF  ITSELF. 

MOCE  IS  NOW  OP  (L  ZERG  AFTER  OAS). 

STCRF  SQUARE  CF  LENGTF  IN  WORK  AREA. 
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L I'^TFRPRETco  USER'S  PAGE  NO.  75  E2  S2 

P1902  FRCGRAN  CFSCRIPTICN-  SURROUTINE  SCRT 

R19C3  FUNCTICNAL  DFS C P ! PT 1 CN- F C UB L F FRECISION  SCUAR E FCCT  RCUTINF 

R1904  This  PROGRAM  TAKES  TEE  SQUARE  ROOT  OF  THF  27  CR  28  POST  SIGNIFICANT  PITS  IN  THE  TRIPLE  PRECISION  SET  OF 

91906  NLPeERS-MPAr,PPAC4l , a\0  MFACt2.  THE  PCO^  IS  RETURNED  DOUBLE  PRECISION  IN  NFAC  AND  NFAC+I. 

R190B  WARNING-  THIS  SURROUUNE  LSFS  A TRIPLE  FRFCISICN  INPUT.  THE  pROGPAPPER  MUST  ASSURE  THE  CONTENTS  CF  MPAC+2 
R19ln  ESPECIALLY  IF  THE  CONTENTS  MPAC  IS  SMALL  OR  ZERO.  FQR  DETAILS  SEE  STG  NENC  NC.9A9. 

R1912  CALLING  SEQUENCE-  IN  INTERPRETIVE  ''CCE  I.E.,  FCLLCWING  TC  INTPRET.SQRT  NC  ADDRESS  IS  ALLCWEC 

P191A  INPUT  SCALING  THF  BINARY  POINT  IS  ASSUMEC  Tr  THE  RIGHT  OF  BIT  15.  THE  ANSWER  IS  RETURNED  WITH  THE  SAME  SCALING 

R1916  SLFPOUTINES-  GE NS  CP , N F AC S H R , SCRT SU ® , A BOR T 

R1917  ABORT  EXIT  hcDF-  ARGRTS  ON  NEGATIVE  INPUT  -1.2X10F-6  (77775  OCTAL)  OR  LESS. 

R1919  OISPI.AYS  error  0CD=  1392 

RL92I’  ABORT 

R1921  COT  13C3 

R192?  pEBRIS  - LOCATIONS  BU F , MPT  EM P , ADDR WD  ARE  USED 


1923 

DCF 

2 

LAST 

106? 

00  ,32 j7 

0 

3343 

0 

SCRT 

TO 

SCRTSLB 

TAKE  the  SCLAPE  ROOT  CF  MPAC. 

1929 

REF 

5f 

LAST 

1966 

on, 2210 

10 

135 

1 

CCS 

mftfnf 

FETURNEC  NCRMALIZEO  SQUARE  ROOT.  SEE  IF 

1925 

00,3211 

1 

3213 

0 

TCF 

+ 2 

ANY  LN-NCPNAL TZATICN  RECUIREC  ANC  EXIT 

1926 

REF 

35 

LAST 

10j6  7 

CO  ,32  12 

1 

6064 

1 

TCF 

DANZIG 

IF  NOT. 

1927 

PFF 

3 

L AST 

lOA  7 

O', 32  13 

6 

3733 

0 

AD 

NEG12 

A RIGHT  shift  CF  PCPE  THAN  13  COULD  BE 

192  0 

00,3214 

D 

0006 

1 

EXTEND 

RFCUTREO  IF  INPUT  WAS  ZFRC  IN  NFAC,4l. 

1929 

PEF 

1 

00,3215 

6 

3221 

0 

BZMF 

SORTSHFT 

GOES  HERE  IN  MOST  CASES. 

1939 

09, 3?  16 

2 2 

007 

0 

ZL 

IF  A LCNC  SHIFT  IS  RECUIREC,  GC  TC 

1931 

80 

LAST 

1048 

09,3217 

22 

116 

1 

LXCH 

ACOPWD 

GENERAL  RIGHT  SHIFT  ROUTINES. 

1932 

REF 

9 

LAST 

1047 

CO, 3220 

1 

2303 

1 

TCF 

GENSCR  +4 

ACCRWC  WAS  ZERO  TO  PREVENT  RCLNC. 

1933 

REF 

57 

1 AST 

1U6  8 

9(',  3221 

50 

135 

r 

SQF.TSHFT 

INDEX 

mftemp 

SELECT  SHIFTING  BIT  ANC  EXIT  THROUGH 

19?A 

pep 

3E 

LAST 

1018 

00 ,32  22 

3 

9735 

1 

CAF 

P IT  15 

SHIFT  ROLTINFS. 

1935 

PEF 

5 8 

L AST 

1068 

00, t2?t 

5 9 

135 

1 

TS 

f'FTFHF 

1936 

REF 

219 

LAST 

1066 

00,3224 

3 

9755 

1 

CAF 

ZFP.n 

TC  ZERC  MFAC  *2  IN  THE  FRCCESS. 

1937 

RFF 

2 

LAST 

104  7 

CO ,3  225 

1 

2J36 

1 

TCF 

MFACSHR  +3 

1938 

RFF 

5 

LAST 

U14A 

00, 3226 

C 

6 72  8 

1 

ARS 

IC 

BRANCH 

TEST  SIGN  CF  NFAC  ANC  CCMPLEMENT  IF 

1939 

REF 

36 

LAS’- 

106  8 

9' ,3227 

1 

6064 

1 

TCF 

OANZ  IG 

19A'i 

RTF 

37 

LAST 

1068 

OO, 323C 

1 

6C84 

1 

TCF 

OANZIG 

19A1 

RFF 

A 

t AST 

1038 

On  , 3 2 3 1 

1 

7673 

0 

TCF 

COMP 

gap; 
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19A2 

REF 

22 

L AST 

1C  3 3 

00, 3232 

4 4 7 5 1 

1 

VCEF 

cs 

FCL’R 

ISA  3 

PPP 

23 

1 AST 

1036 

on  ,3233 

26  166 

1 

ACS 

PLSHLCC 

19AA 

00,3234 

0 000  6 

1 

extfac 

19A5 

fiPP 

349 

1 AST 

1065 

00,3235 

5 CCCC 

1 

INDEX 

A 

1 CA6 

00,3236 

3 0003 

1 

CCA 

2 

19A7 

RFF 

636 

INST 

1067 

CO, 3237 

52  16C 

1 

CXCH 

HFAC  *3 

19A8 

10, 3240 

0 0006 

1 

EXTEND 

19A9 

REF 

24 

LAST 

1069 

00,3241 

5 0166 

0 

INDEX 

PLSHLCC 

1950 

I'',  3242 

3 CCO  I 

C 

CCA 

0 

1951 

RFF 

637 

LAST 

1069 

0 ) ,3243 

52  162 

0 

CXCH 

MPAC  +5 

1952 

REF 

2 

1 AST 

1033 

00,3244 

1 5524 

0 

TCP 

VNC.DE 

1993 

RFF 

3 

LAST 

1067 

00,3245 

0 33  1? 

1 

VSQ 

■"C 

VSCSLB 

1 994 

RFF 

1 

UO , 3246 

1 73  35 

1 

TCF 

OPOOE 

1955 

00, 3247 

0 CC06 

1 

PUSH 

EXTFND 

1 956 

vREF 

638 

L AST 

1069 

0 1,  3250 

3 0155 

0 

DCA 

MPAC 

1997 

REF 

25 

LAST 

1C69 

00,3251 

50  166 

c 

INDEX 

PUSHLCC 

1958 

on, 3252 

52  QQI 

1 

CXCH 

0 

1959 

REF 

35 

LAST 

1067 

oo  ,7253 

50  163 

0 

INCEX 

MODE 

I960 

RpF 

c 

1 AST 

1013 

(0, 3254 

3 6 24  7 

c 

CAE 

NC. wCS 

1961 

RFF 

26 

1 AST 

1069 

0’>,  3 25  5 

26  166 

1 

AOS 

“LSHLCC 

1962 

REF 

36 

1 AST 

1C69 

00,3256 

10  163 

1 

CCS 

"CEE 

1963 

REF 

1 

00,3257 

1 3272 

1 

TCF 

TPLSH 

1964 

RFF 

33 

LAST 

1068 

00 ,3260 

1 6064 

1 

TCF 

DANZ  IG 

1965 

CO,  3 26  1 

.)  OC06 

1 

EXTEND 

1966 

REF 

639 

LAST 

1069 

00 , ’262 

3 0160 

0 

DCA 

MPAC  +3 

1967 

REF 

27 

LAST 

1069 

00  ,3263 

50  166 

0 

INDEX 

FLSHl CC 

196  8 

no, 3264 

51 ' 775 

0 

CXCH 

0 -4 

1969 

00, 3265 

n 0006 

1 

EXTEND 

1970 

R = F 

640 

LAST 

106' 

FQ  ,3266 

3 0162 

1 

CCA 

MPAC  <5 

1971 

RFF 

28 

LAST 

1069 

ro, 2267 

50  166 

c 

INDE  X 

PLSHLCC 

1 97? 

00,3270 

51  '■’77 

1 

CXCH 

0 -2 

1973 

REF 

. 39 

LAST 

1069 

00,3271 

1 6064 

1 

TCF 

DANZIG 

1974 

REE 

64  1 

LAST 

1069 

OU, 3272 

3 0156 

0 

TPUSH 

CA 

MPAC  *2 

1975 

RFF 

2 

LAST 

1012 

00 , 3273 

1 6557 

1 

TCF 

ENDTPUSH 

1976 

RFF 

50 

1 AST 

1067 

no, 3?74 

50  12C 

1 

RVC 

INDEX 

FIXLCC 

1977 

REF 

10 

LAST 

1015 

0.0, 32  75 

3 0052 

0 

CA 

CPRE  T 

1978 

RFF 

22 

LAST 

1C27 

00,3276 

54  117 

1 

TS 

PCLISH 

1979 

REF 

5 

LAST 

10  16 

Oil,  32?? 

1 6655 

0 

TCF 

GCTC  +4 
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VECTCR  CEFINE  - ESSENTIALLY  tre6tS 
SCALAR  IN  MPAC  AS  X CCNFCNEM,  PUSHES  LP 
FCR  Y AND  THEN  AGAIN  FOR  Z. 


RCCe  IS  NCN  VFCTOR. 

CCT  NfAf  WITH  ITSELF. 

MODE  IS  NOV.  OP. 

PUSH  CCWN  MFAC  LEAVING  IT  LCAOEC. 

PUSH  CCWN  FIRST  TWO  REGISTERS  IN  EACH 

INCPEHENT  FUSHCCWN  POINTER. 


PUSH  CCWN  "FAC  +2. 

DCNE  FCR  DP. 

CN  VECTCR,  PUSH  COWN  Y ANC  Z CC"PCNENTS. 


H2 


RVC  - FFTURN  IVA  CPRET. 


(ASSUNE  CPRET  FCINTS  TC  FIXEC  CNLY.I 
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GAP: 


I INTFPFFETEB 


P1980 

THE  1 

FOLLCkING  SL8RCUTIAFS  ARE 

LSEC  IN  SC  LARIN G 

MPAC,  IN 

P1982 

special 

CASFS 

OF  CNPSUE  ANC 

CCTSUP,  1 

PUT 

IN  TO  SAVE  SCMF 

TIME. 

19F3 

PEF 

642 

LAST 

1C69 

00, 3 300 

3 C'  55 

0 

CSCSUe  CA 

MPAC  +1 

198A 

00,3301 

0 CC06 

I 

EXTENT 

19R5 

00,3302 

7 0000 

0 

SQUARE 

1986 

RFF 

643 

LAST 

107f 

0 J ,3303 

54  156 

1 

TS 

MPAC  +2 

1987 

rff 

211 

LAST 

1068 

0 »,  3304 

3 4 7 5 5 

1 

CAE 

ZERO 

198P 

REF 

644 

LAST 

107C 

00  ,3305 

56  155 

0 

XCF 

MPAC  +1 

198'’ 

GO, 3306 

0 CC06 

1 

EXTENT 

1 RQ'i 

PEF 

649 

LAST 

l'.i7;. 

'>0,3307 

7 0154 

0 

MP 

MPAC 

1991 

CO  ,3310 

20  OOl 

1 

CCCUEL 

1992 

REF 

646 

1 AST 

107C 

00,3311 

20  156 

1 

CAS 

MPAC  +1 

1 993 

PFF 

647 

LAST 

i07r 

00  ,3312 

56  154 

1 

XCF 

MPAC 

1 994 

CO, 33  13 

0 0006 

1 

extent 

1 999 

00,3314 

7 '"COO 

c 

SQUARE 

1996 

PEF 

648 

LAST 

I07r 

'^  > ,3815 

20  1 55 

1 

CAS 

MPAC 

1997 

RFF 

290 

LAST 

1066 

00,3316 

C CC02 

r 

TC 

C 

1998 

0 1,  3317 

3 0006 

1 

VS0SU8  EXTEND 

1999 

RFF 

8 

LAST 

1025 

CC  ,3320 

22  137 

1 

CXCF 

CCTPET 

2000 

rff 

2 

LAST 

1C67 

iO, 3321 

0 33C0 

1 

TC 

Dscsue 

2091 

PFF 

649 

LAST 

107C 

00,3322 

52  16) 

1 

CXCF 

MPAC  F3 

2002 

REF 

6EC 

LAST 

107G 

C3  , 3323 

52  155 

1 

CXCF 

MPAC 

2003 

REF 

137 

LAST 

1 064 

00, 3324 

52  13  1 

0 

CXCH 

BLF 

2004 

PEF 

651 

L AST 

107G 

00 , 3 32  5 

3 0156 

n 

CA 

MPAC  +2 

20;)8 

PEF 

128 

LAST 

1C7C 

' 3326 

54  132 

C 

TS 

BUF  +2 

2006 

PEF 

3 

LAST 

1070 

00,3327 

0 3 300 

1 

TC 

0 SQSUB 

2007 

RFF 

652 

LAST 

1C7C 

01,3330 

52  156 

1 

rxcF 

MPAC  +1 

200  8 

9EF 

1 39 

LAST 

107C 

On, 3331 

20  132 

0 

CA  s 

BLF  +1 

2009 

RFF 

653 

LAST 

1070 

OO  ,3332 

6 0154 

1 

AC 

MPAC 

2C10 

ref 

1 4C 

LAST 

107f 

GO , 3333 

6 C13C 

c 

AT 

BUF 

201  1 

PFF' 

141 

1 AST 

107C 

00,3334 

54  130 

1 

TS 

BLF 

2012 

00,3335 

1 3 3 3 7 

1 

TCF 

+ 2 

2013 

REF 

8 

LAST 

1062 

’00,3336 

54  121 

1 

TS 

CVFI NC 

2014 

RFF 

654 

LAST 

107  0 

00 , 3337 

52  162 

0 

CXCH 

MPAC  <-5 

2''15 

RFF 

6 5 5 

LA  ST 

1C7C 

00,3340 

52  155 

1 

CXCF 

MPAC 

2016 

RFF 

4 

1 AST 

107(1 

OO, 3341 

0 3300 

1 

TC 

DSCSUB 

2C17 

rff 

1 

00 ,3342 

1 721  1 

1 

TCP 

ENTDOT 
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eCTH  THE  SCALAR  AAC  YECTCR  SEASF.  IFE'i  ARE 

SQLARES  IFF  SCALAR  CCMEMS  CF  FPAC. 

FCPN  2 (CFCSS  TERM  ) . 

ANC  MAYBE  OYFRFLOF. 

AAC  SET  A TC  A ET  CVERFLCU  . 


DCTS  THE  VECTOR  lA  APAC  WITH  ITSELF. 
SCLAPE  THE  X CCAPCAEAT. 

Sr  WF  CAA  EAC  lA  CCTSUE. 

SQUARE  V CCAPCAEAT. 


IF  CVERFLCW. 


SCLAPE  Z CCAPCAEAT 
ENC  AS  lA  DCTSU8. 


GAP  : 
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P2018  rOUBLE  PPECISIfN  SGUARE  RfOT  ROUTINE.  TAKE  TEE  SCUAPE  PCCT  CF  TEE  TPIPlf  PRECISICN  (RFAC  +2  USEC  CMY 

P2A'2n  IN  NORPALI  ZATl  CM  CCNTFNTS  CF  «PAC  ANC  LEAVE  THE  NOPPALIZEC  RESULT  IN  MPAC  (CIMPACI  GREATER  THAN  OR  ECLAL  TC 


R2022 

.51. 

THE 

R IGFT 

SHIFT 

COUNT  ( 

2023 

REF 

212 

LAST 

1070 

no  ,3343 

2024 

R FF 

59 

LAST 

1068 

00,3344 

2026 

■^FF 

656 

LAST 

1 I7f 

TT  , 3345 

2026 

OfF 

1 

00,3346 

2027 

00,3347 

2028 

REF 

1 

00,3350 

2029 

REF 

657 

1 AST 

1071 

'k»  , 3351 

2030 

RFF 

65P 

L AST 

107  1 

00, 3355 

2031 

rff 

659 

LAST 

1071 

)'l  , 3353 

20  2^ 

l>r|T 

14 

LAST 

953 

'lO,  3354 

2033 

RFF 

60 

1 AST 

1071 

00,3355 

2C34 

REF 

660 

LAST 

1071 

C ) , 3356 

2035 

RFF 

2 

LAST 

107  1 

00,3357 

2036 

00 ,3360 

2037 

PFF 

1 

00, ^3t) 

2038 

PFF 

661 

LAST 

1071 

00,3362 

2C39 

RFF 

662 

1 AST 

1071 

00  ,3363 

2040  . 

RFF 

15 

LAST 

1071 

3364 

2041 

REF 

61 

1 AST 

1071 

00, 3365 

2042 

RFF 

6 6? 

1 AST 

1071 

00,3366 

2043 

PEF 

3 

LAST 

1071 

'"0,3367 

2C44 

RFF 

291 

LAST 

1070 

00 ,33  70 

2C45 

RFF 

2 

LAST 

107  1 

'3,2371 

2 046 

0 r F 

1 

Oo, 3372 

2047 

REF 

350 

LAST 

1069 

00, 3373 

2048 

RFF 

1 

00, 3374 

2C49 

REF 

664. 

LAST 

1'7I 

f'o  ,3375 

2050 

R=F 

2 1 3 

LAST 

1071 

1 1,3376 

2051 

RFF 

2 

L AST 

1071 

00,3377 

2C52 

RFF 

2 

LAST 

107  1 

00,3400 

2053 

RFF 

3 

LAST 

107  1 

00,3401 

2054 

RFF 

27 

LAST 

I'M? 

1'',3412 

2C‘=41 

prp 

1 

CO, 3403 

2055 

00,3404 

2G56 

RFF 

1 

00,3405 

LNNCRPAIIZE)  IS  LEFT  II  FFTEPF. 


3 4755 

! 

SCPTSLE  CAF 

Z ERG 

5A  135 

I 

TS 

mftepf 

lO  154 

0 

CCS 

PFAC 

I 3405 

I 

TCF 

SPFACt 

I 335  1 

I 

TCP 

+ 2 

I 3373 

I 

TCF 

SORTN'EG 

56  I56 

0 

XCH 

MFAC  +2 

56  I 55 

0 

XCF 

MFAC  +l 

54  154 

0 

TS 

MPAC 

3 4 757 

c 

CAF 

SEVEN 

54  135 

I 

TS 

MPTEPP 

lO  154 

0 

CCS 

MFAC 

I 3405 

I 

TCF 

SPPAC+ 

I 3362 

I 

TCF 

+ 2 

I 33  76 

I 

TCF 

ZERCANS 

56  155 

0 

XCH 

MPAC  +l 

54  1 54 

0 

TS 

MPAC 

3 4 757 

c 

CAF 

SEVEN 

26  135 

I 

ADS 

MPTEMP 

lO  154 

0 

CCS 

MFAC 

I 3405 

I 

TCF 

SMPACi- 

0 000  2 

0 

TC 

Q 

I 33  76 

I 

TCF 

ZERCANS 

I ’45  3 

I 

TCF 

F 1 XRCCT 

10 

COO 

0 

SCPTNEC 

CCS 

A 

1 

3402 

0 

TCF 

SCRTA8RT 

10 

155 

1 

CCS 

MPAC  *1 

3 

4 7 55 

1 

ZERCANS 

CAF 

ZERO 

1 

3453 

1 

TCF 

F I XRCCT 

1 

3 40  2 

0 

TCF 

SeRTABP.T 

1 

3453 

1 

TCF 

F TXPCCT 

52 

165 

1 

SCRTAePT 

CXCH 

LCC 

0 

5716 

1 

TC 

PCCOrc 1 

213Q2 

C 

CCT 

213C2 

6 

2444 

1 

SFPAC  < 

AO 

- 1/2  + 2 

START  PY  ZFRCING  RIGHT  SHIFT  CCLM. 

CHECK  FCR  FCSITIVE  ARGUPENT,  SUFTING 
FIRST  SIGNIFICANT  MPAC  REGISTER  INTC 
PFAC  ITSELF. 

SEE  IF  RAG  CF  ARGURENT  LESS  THAR  lO(-A). 
MPAC  IS  ZERO  - SHIFT  LEFT  M. 

AUCPCNT  right  SHIFT  COUNTER. 

SEE  IF  MFAC  NCV>  PNZ. 

NEGATIVE  BUT  LESS  THAN  IP(-A)  IR  RAG. 
ZFPC  - SHIFT  LEFT  14  AGAIN. 

AUGRFNT  FIGHT  SHIFT  COUNTER. 

SCRT(C)  = 0. 

CC  NCT  LEAVE  SCRTSUE  WITH  -n  IN  RFAC. 

ARGUMENT  IS  NEGATIVE,  BUT  SEE  IF  SIGN- 
CCPRFCTEC  argument  IS  LESS  THAN  lO(-A) 

IN  RAGMTLCE.  IF  SC,  CALL  ANSVER  ZFFC. 
FCRCE  ANSWER  TO  ZERO  HERE. 


SEE  IF  ARGUMENT  GREATER  THAN  CP  ECUAL  TC 
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2057 

00 , 34m6 

Q OO116 

1 

EXTEND 

2C5P 

REF 

1 

00,3497 

6 3456 

0 

ezMF 

SRTEST 

2059 

REF 

665 

LAST 

1C7  1 

G ), T41C 

52  155 

1 

CXCH 

MPAC 

2069 

RPF 

16 

LAST 

1053 

90,3411 

22  021 

1 

1 XC  H 

SR 

2C6  1 

CO, 3412 

0 0006 

1 

EXTENT 

2062 

RFF 

19 

t ART 

lO-^S 

GO, 3413 

7 4 736 

c 

MR 

HALF 

2C63 

PPF 

666 

LAST 

1072 

00,3414 

52  155 

1 

CXCF 

MPAC 

206A 

REF 

1 7 

LAST 

1C72 

00,3415 

56  121 

1 

XCF 

SR 

2 "65 

RFF 

667 

LAST 

10  7 2 

00, 3416 

26  155 

1 

ADS 

MPAC  61 

2066 

REF 

1 

00 ,3417 

3 2314 

■'l 

ARGHI 

CAE 

SI GPEHI 

2067 

00, 3420 

9 0QC6 

1 

EXTEND 

zcm 

REF 

668 

LAST 

1972 

09, 342  1 

7 0154 

0 

MR 

MPAC 

2069 

RFF 

1 

99,3422 

6 3566 

0 

AD 

e lASF  I 

2'T7f) 

REF 

142 

LAST 

107C 

3 423 

54  13G 

1 

+ 4 

TS 

BLF 

2C71 

REF 

669 

L A'T 

1072 

09 ,3424 

3 0154 

1 

CA 

MPAC 

2072 

CO, 3425 

22  CC7 

f 

ZL 

2073 

00, 3426 

0 QC06 

1 

EXTEND 

2C7A 

RCF 

143 

LAST 

1072 

.'1,3427 

10  13.J 

1 

CV 

BUF 

2075 

00, 343C 

C CCC6 

1 

EXTEND 

2076 

OFF 

2m 

1 AST 

1072 

00,3431 

7 4736 

0 

MP 

HALF 

2077  - 

RFP 

144 

LAST 

IC72 

00,3432 

26  130 

1 

ACS 

BUF 

2078 

90,3433 

0 0006 

1 

EXTEND 

2C79 

PEF 

21 

LAST 

1072 

OM ,3434 

7 4736 

0 

MP 

HALF 

20BO 

OFF 

6 7C 

LAST 

1072 

00 , 3435 

52  155 

1 

CXCF 

MPAC 

2081 

00 ,3436 

0 0006 

1 

EXTEND 

2CP2 

RFF 

145 

LAST 

1C72 

09 ,343  7 

1C  130 

1 

CV 

BUF 

208  3 

REF 

146 

LAST 

1072 

00, 3449 

54  131 

0 

TS 

BUF  +1 

2084 

REF 

214 

LAST 

1971 

■VI,  3441 

3 4755 

1 

CAF 

ZERO 

2085 

ROP 

2CB 

LAST 

IC64 

00,3442 

56  001 

0 

XCF 

L 

2986 

00,3443 

f)  001(6 

1 

EXTEND 

2087 

RFF 

147 

LAST 

1072 

00,8444 

10  130 

1 

CV 

BUF 

20PP 

REF 

209 

LAST 

1F72  ■ 

CO , 3445 

54  001 

1 

TS 

L 

2089 

RFF 

148- 

LAST 

1072 

00, 3446 

3 C 131 

1 

CA 

BLF  +1 

2090 

RFF 

671 

LAST 

1072 

00 , 3447 

20  155 

1 

CAS 

MPAC 

2091 

0(1, 34  5’3 

C CGC6 

1 

EXTEND 

2092 

RFF 

1 

00,3451 

1 3455 

1 

BZF 

TCOBNKCC 

2093 

RFF 

30 

LAST 

1C  5 7 

CF ,3452 

3 4733 

1 

CAF 

PCSMAX 

2094 

REF 

672 

LAST 

1072 

00,3453 

54  154 

0 

F T XRCCT 

TS 

MPAC 

2095 

RFF 

673 

LAST 

1072 

n.'i  ,34  54 

54  155 

1 

TS 

MPAC  +1 

2Q9f 

PEF 

292 

LAST 

K 7 1 

00,3455 

C CCC2 

c 

TCC8NK00 

TC 

C 
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.5. 

IF  SC,  SFE  IF  UES£  THAN  .25. 

WF  WIUU  TAKE  THE  SQUARE  P.COT  CF  HPAC/2. 
SHIFT  RIGHT  1 AND  GC  TC  THE  SCPT  PCUTINE 


GUAPANTEFC  NG  CVERFUCW. 

ARGUMENT  BETWEEN  .25  AND  .5.  GET  A 
LINEAR  APPROXIMATION  FOR  THIS  RANGE. 

XO/2  = (wpAC/2MSL0PEhI)  + BIASHI/2. 

XCi/2  (ARGLC  ENTERS  HERE). 

SINGLE-PREC  ISICN  THPCUGHCLT. 


(MPAC  /2)  /( XC/2) 


XI  = XO/2  ♦ .5IMPAC/2) /(XC/21. 


FCRN  UP  >1/2. 

SAVE  ANC  BRING  OUT  ARGUMENT. 

TAKE  CF  CUCTIENT  WITH  XI. 

SAVE  MAJGR  PART  OF  QUOTIENT. 

FORM  MNCR  PART  CF  CUCTIENT  USING 
(REMA INDER ,C 1 . 


IN  PREPARATION  FOR  CAS. 

X2  = >1/2  + ( mpaC  /2 ) X 1 
CVERFLCWS  IF  ARG.  NEAR  FOSMAX. 


RETURN  TC  CALLER  TO  UNNORMALIZE,  ETC 


G*VP:  AS'PPBLP  SFVISIOA  116  CF  4C-r  LIJMIN/SPY  EY  NASA  20illl2-C71 


INTFFFP  FTFR 

20P7 

RTF 

1 

07,3456 

6 4737 

0 

SRTEST 

AD 

QUARTER 

2058 

O'l,  3457 

C CCC6 

1 

EXTENC 

20P9 

PEF 

1 

Oil,  3460 

6 3502 

0 

BZNF 

SGRTNCRN 

2100 

REF 

67A 

LAST 

1072 

00,3461 

52  155 

1 

CXCH 

NPAC 

2101 

REF 

18 

1 AST 

1072 

00,3462 

22  02  1 

1 

LXCH 

S R 

2102 

00,3463 

0 0006 

1 

EXTEND 

2103 

PEF 

22 

LAST 

1C72 

on  ,3464 

7 4 736 

0 

NF 

HALF 

?!0A 

RFF 

675 

L AST 

1073 

GO, 3465 

52  155 

1 

CXCH 

MFAC 

2KS 

PEF 

19 

LAST 

1073 

'I't  , 3466 

56  021 

1 

xr  H 

SR 

21  fT 

R'-F 

6 76 

LAST 

IF  73 

00, 3467 

26  155 

1 

ACS 

MPAC  +1 

2107 

PFF 

1 

00, 3470 

3 3007 

0 

ARGLO 

CAF 

SLCPELC 

2KP 

00,3471 

C C006 

1 

EXTENC 

21' '9 

PFF 

677 

LAST 

1073 

CC  , 34  72 

7 C 154 

c 

HP 

NPAC 

2110 

R'^F 

1 

OO, 3473 

6 2270 

0 

AD 

BIASIC 

211  1 

R'^F 

1 

00,3474 

1 3423 

0 

TC  F 

ARGHI  +4 

2112 

1.'  T , 3 4 7 5 

C CC06 

1 

SCRTNN2 

EXTENC 

2113 

RFF 

678 

LAST 

1073 

00,3476 

3 0156 

0 

CCA 

MPAC  +1 

2116 

pef' 

6 79 

1 AST 

1073 

00,3477 

2C  156 

1 

CAS 

NPAC  +1 

2116 

PEF 

6 80 

1 AST 

1:173 

O'l , 3 500 

6 0 154 

1 

AD 

MPAC 

2116 

RFF 

681 

LAST 

1073 

C'-.i  ,3“:'U 

26  154 

0 

ACS 

MPAC 

2117 

RFF 

62 

1 AST 

107  1 

00,3502 

24  135 

c 

SCRTNCPN 

INCP 

MPTEMP 

2118 

Oil,  35  )3 

0 0006 

1 

EXTEND 

2 119 

REF 

6E2 

LAST 

1 C73 

00 ,3  504 

3 C156 

0 

CCA 

MFAC  +1 

21  ’0 

PEF 

68’ 

L AST 

1073 

00,350= 

20  156 

1 

CAS 

MPAC  +1 

2121 

off 

6B6 

LAST 

1073 

00  ,3  5' 16 

6 0154 

1 

AC 

MPAC 

2122 

RFF 

_6P  = 

LAST 

1073 

CT  ,’5'A7 

26  154 

c 

ATS 

MPAC 

2123 

nr,  ,3510 

6 0000 

1 

OOLBLF 

212A 

REF 

19 

LAST 

A63 

OO  ,3511 

54  922 

0 

TS 

CYL 

2125 

REF 

2- 1 

1 AST 

1073 

00, ’5  12 

10  C22 

c 

NCRNTEST 

CCS 

CYl 

2126 

RTF 

21 

1 AST 

1F>73 

00,3=13 

10  C22 

c 

res 

C Yl 

2127 

PFF 

1 

00,3514 

1 3475 

0 

TGF 

SCPTNM2 

2128 

REF 

2 

L AST 

1073 

O'l,  ’515 

1 34  17 

1 

TCF 

ARGHI 

2129 

PEF 

1 

00 ,3516 

1 3470 

0 

TGF 

ARGLC 

1S:CS  ALG.  SKIPPER  .OS7  PAGE  1C73 
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ARG(.P<EA7  KAS  LESS  THAK  .5,  SEE  IP  LESS 
TEAK  .25. 

IF  SC,  BFGIA  KCPPAL  IZAT  ICA. 

IF  EFIKEFN  .5  A\0  .25,  SHIFT  PIGHI  1 AFC 
START  AT  ARGLH. 


FC  CVERFLCW. 

(NCFFAIIZED  APGUNENT  EETPEEN  .125  AFC 
.25 

BEGIN  SOLARE  RCCT. 

SHIFT  LEFT  2 AFC  IFCPENENT  RIGHT  SHIFT 
CrUNT  (FCR  TEP«<IFAL  UF  FC  R H A L I Z A T I CM  . 


(NO  OVFRFLCH ) . 

FIRST  TINE  THROUGH,  JUST  SHIFT  LFFT  1 
(PLTS  IF  EFFECTIVE  RIGHT  SHIFT  SIFCE 

KE  WANT  npac/21. 


(AGAIN  NT  CVFRFCnw). 


SEE  IF  ARGUMENT  NOW  NCRNALIZEC  AT 
GRFATFR  than  .125. 

NO  - SHIFT  LEFT  2 NCRE  ANC  TRY  AGAIF. 
YPS  - FCW  EETHlFEN  .5  ANC  .25. 

ARGLNEFT  FCH  BETWEEN  .25  ANC  .125. 
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1S:C9  ALG.  I 1 , 15f S skipper 
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.097  RAGE  107A 
E3  S3 


P2130  IB  IGCKCPETR  K FlINCTICN  PACKAG'^. 


R2  1?  1 


THE  FCLLCMNG  TR  I GC  N f E T R I C FUNCTICKS  ARE  AVAILABLE  AS  INTERPRETIVE  CPFRATIONS: 


R2133  1.  SIM 

P213A  2.  CrS 


GCMPLTES  (1/2ISINFI2  FI  NFAC). 
CCMFUTES  (1/2 KCSINE ( 2 PI  MPAC  1 . 


R213‘= 

R2136 


3.  ASIN 

4.  ACOS 


CCwcuTES  (1/2FI IAPGSINF(2  MPAC). 
CCMPLTES  (1/2PI)ARCCC:SINF(2  PFAC). 


R2137 

S I N- 

■ASIN 

A NO  1 

ros-ACGS 

1 APE  MUTUALLY  INVERSE,  IE 

S1N(AS  IN(X )1  = X. 

213^8 

REF 

6 

LAST 

106F 

on, 251 7 

0 

6726 

1 

CCSI NE 

TO 

BPANCE 

FINES  CrSINF  USING  THE  IDENTITY 

2139 

O'),  352  ) 

1 

3523 

1 

TCF 

•f  ? 

CGS(X)  = SIMFI/2  - AES(X)). 

214'^ 

'’EF 

1 

GO, 3521 

1 

3526 

1 

TCF 

PRFSINE 

2141 

rff 

2 

1 AST 

1U74 

00  , 5 22 

1 

2526 

1 

1CF 

PRFSINF 

2142 

00,3523 

0 

00  16 

1 

•t3 

EXTEND 

2143 

REF 

6P6 

LAST 

1073 

CO, 3524 

4 

C155 

1 

DCS 

MFAG 

2144 

R>^F 

687 

L AST 

1 >■'4 

00,3525 

52 

155 

1 

DXCH 

MPAC 

2145 

RFF 

2 

LAST 

107? 

00,3526 

3 

4737 

0 

PPESINE 

CAF 

CLAPTER 

Pl/2  SCALED. 

2146  , 

RFF 

688 

1 AST 

1074 

00,3527 

26 

1 54 

c 

ADS 

MFAC 

2147 

RFF 

689 

LAST 

1074 

00,3530 

52  155 

1 SINE 

DXCH 

MPAC 

DOLBLE  ARGUMENT. 

2148 

^■',’531 

2C  PCI 

1 

DDCLPL 

2149 

00, 2532 

54  one 

C 

eVSK 

SEE  IE  CVEPFLGVv  PRESENT. 

21  5C 

00,3533 

1 3 536 

0 

TC  F 

+ 3 

IF  NOT,  ARGUMENT  GK  AS  IS. 

2151 

00,3534 

P C0C6 

1 

EXTEND 

IF  SC,  WE  LOST  (CR  GAINEDI  PI,  SO 

2 15? 

no, 3535 

4 QOOl 

1 

nc  0A» 

CCMPLEMENT  MFAC  USING  THE  IDENTITY 

A21‘=3 

SINtX-(-))°I  1 = SIN(-X). 

2154 

REF 

6 90 

LAST 

1074 

no,  2*^36 

52  155 

1 *2 

DXCH 

MPAC 

215'^ 

RFF 

691 

LAST 

1074  , 

00,3537 

3 0154 

1 

CA 

MPAC 

SEE  IF  APGUMENT  GREATEP  THAN  .5  IN 

2156 

00 , 3 54i 

6 COOO 

1 

rCLBC= 

MAGNITUDE.  IF  SO,  REDUCE  IT  TO  LESS  THAN 

2157 

RFF 

210 

LAST 

1072 

OO, ’541 

54  PPl 

1 

TS 

L 

.5  {+-PI/Z  SCALECl  AS  FGILCWS: 

2 158 

R5F 

1 

00, ’542 

1 3553 

0 

TCF 

SM 

2159 

REF 

351 

1 AST 

1071 

no, ’543 

5C  POO 

1 

INDEX 

A 

IF  PGSriVE,  FCRM  PI  - X,  IF  NFGATIVE 

216G 

RFF 

4 

LAST 

853 

00,3544 

3 4735 

1 

CAF 

MEGl/2  +1 

USE  -FI  - X. 

2161 

CO, 3545 

6 OCOQ 

1 

DCLRLE 

2162 

OJ, 2546 

0 CCP6 

1 

EXTEND 

2163 

REF 

692 

LAST 

1074 

00,3547 

60  154 

1 

SU 

MPAC 

GUARANTEED  NC)  OVERFLOW. 

2164 

RFf 

692 

1 AST 

1074 

00, ’55C 

54  154 

c 

TS 

M FAC 

2165 

REF 

694 

L )'ST 

1074 

00, 3551 

4 0155 

1 

CS 

MPAC 

■H 

2166 

REF 

69" 

laft 

1074 

CP  ,3552 

54  155 

1 

TS 

MFAC 
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L 

2167 

216P 

INTFRPRETFR 
REF  6S6  LAFT 

1076 

00, 3553 
CC,3556 

d 0006 

3 C155 

1 SNl 
0 

E7TFN0 
CCA  8FAC 

USER'S  PAGE  NO.  62  63  S3 

SET  UP  TC  EVALUATE  FASTINGS  FCIYNCMIAL 

2166 

RFF 

19 

LAST 

106C 

00,3555 

52  13^ 

C 

CXCH 

0LF2 

217C 

FEF 

5 

LAST 

10  70 

00,3556 

0 3300 

1 

TC 

Dsosce 

SCCAPE  FFAC. 

217  1 

RPF 

2 

LAST 

851 

00,3557 

0 7225 

0 

TC 

PCI  Y 

EVALUATE  fourth  CRDFR  PCLYNOMIAL. 

217? 

00,3560 

00003 

1 

CFG 

3 

2173 

00,3561 

1666  1 

0 

2DFf 

t .3926SS07S6 

2173 

00,3562 

37325 

1 

?1  7^. 

00 , 3563 

53250 

c 

20FC 

- .66596371  1 1 

2176 

00,3566 

60  766 

1 

?175 

00,3565 

12166 

1 

2PEG 

+.318758717 

217S 

00,3566 

21276 

1 

2176 

00,8567 

75666 

1 

2CFC 

- .076780269 

2176 

00, 3 5 7( 

7167  1 

c 

2177 

00,3571 

00236 

0 

2DEC 

+ .009696088 

2177 

00,3572 

32  757 

c 

2178 

RFF 

1 

0(J,  3573 

2 2670 

0 

CAF 

LBUF2 

MULTIPLY  8Y  ARGUMENT  ANC  SHIFT  LEFT  2. 

21  7c 

REF 

19 

LAST 

lC3t 

00,3576 

0 7111 

1 

TC 

CRFSUe  -1 

2180 

00,2575 

C 0006 

1 

FXTEAD 

21R1 

REF 

6S7 

LAST 

1075 

00  ,3576 

3 0156 

0 

CCA 

MPAC  +1 

21«2 

RTF 

68P 

LASf 

1075 

00,3577 

20  156 

1 

CAS 

WPAC  +1 

2183 

REF 

699 

LAST 

1075 

on, 3600 

6 0 156 

1 

AO 

MPAC 

2186 

RFF 

700 

1 AST 

1075 

00 ,360  1 

26  156 

0 

ACS 

MPAC 

NEITHER  SHIFT  CVERFLCV.S. 

2186 

00,3602 

C CC06 

1 

EXTEAC 

2186 

REF 

701 

LAST 

1075 

00, 3602 

3 C156 

c 

OCA 

MPAC  +1 

2187 

PPF 

7F2 

1 AST 

1075 

CO , 3606 

20  156 

1 

CAS 

MPAC  +1 

2188 

REF 

703 

LAST 

1075 

00,3605 

6 C 156 

1 

AD 

MPAC 

21  88 

REF 

7C6 

1 AST 

1 07  5 

00,3606 

26  156 

0 

ADS 

MPAC 

2160 

REF 

60 

1 AST 

106S 

00,3607 

1 6C66 

1 

TCF 

DAAZIG 

2- 


gap: 


/'SSPMRLP  revision  116  OF  AC  PRCGRA«  LLPINARY  BY 


1.  INTERPRETFR 


P2  IS  1 

ARCS 

IN/ARCCrS  RFLTINE 

' • 

219? 

REF 

1 

on, 3610 

3 362  1 

0 

APCSI N 

21S3 

no  , 36, 1 1 

1 3613 

1 

219A 

RFF 

1 

00,3612 

3 3 7 1 3 

1 

ARCCCS 

2195 

REF 

1 

O ),  3613 

59  136 

1 

2196 

R8F 

7 

LAST 

1C79 

00,3619 

0 6726 

1 

2197 

PEF 

1 

00, 3615 

1 262  5 

1 

2198 

RFF 

1 

00 ,3616 

1 3731 

0 

2199 

ro, 3617 

C CCC6 

1 

2200 

REF 

705 

LAST 

lii75 

9)0 , 3620 

9 0155 

1 

2 201 

PFF 

796 

LA'T 

1076 

00,3621 

52  155 

1 

2202 

RFF 

1 

00, 3622 

3 3739 

1 

220? 

ROF 

2 

LAST 

1076 

00,3623 

56  136 

n 

220A 

RFF 

1 

CO  , 36R9 

59  137 

0 

2205 

RFF 

23 

last 

1073 

no, 2625 

9 9 736 

C 

ACCSST 

22C6 

R = F 

7C7 

last 

1076 

00,3626 

6 0159 

1 

2207 

RFF 

352 

LAST 

1979 

00,3627 

1C  OCO 

c 

2208 

REF 

1 

00, 3630 

1 3 72  1 

1 

22 '^'9 

REF 

1 

CO, 363) 

1 3707 

0 

LfSIAEX 

2210 

RFF 

1 

00, 3632 

1 3 692 

c 

2211 

REF 

7C8 

last 

1076 

00 ,3633 

1)  15  5 

1 

221? 

R^F 

2 15 

LAST 

19  72 

00 , 36  39 

3 9 755 

1 

2213 

RFF 

1 

0(),  3635 

1 26  3 7 

1 

2219 

REF 

2 

LAST 

1076 

no  ,3636 

1 3692 

0 

22  1 5 

RFF 

7 09 

LAST 

1076 

GO, 3637 

59  155 

1 

ACCS=C 

2216 

PGF 

?10 

L AST 

1076 

0 ), 3690 

59  159 

n 

2217 

RFF 

•3 

LA'T 

1076 

00, 3691 

0 C136 

2218 

0 ) , 3692 

0 0C06 

1 

ACC5ST2 

2219 

RFF 

Ml 

last 

1076 

on  , 3693 

9 0155 

1 

222C 

REF 

29 

LAST 

1C76 

on, 3o99 

6 9736 

1 

2221 

prc 

712 

LAST 

1076 

no  , 369  5 

52  155 

1 

2222 

R = F 

?r 

LAST 

1075 

OO  ,3696 

52  139 

0 

2223 

REF 

3 

LAST 

loee 

00,369? 

C 3393 

0 

2229 

RFp 

63 

1 AST 

1073 

00 ,3650 

10  135 

1 

2225 

R'^F 

1 

00 ,3681 

1 3 719 

1 

SA  2021112-071 
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SKIPPER 

.097  PAGE  1C76 

LSER'S  PAGE 

NC.  83 

F3  S3 

CAF 

LASI NEX 

CCYFUTE  ARCSIN  8Y  USING  THE  ICENTITY 

TCF 

+ 2 

APCSIN(X)  = PI/2  - ARCCCS(X). 

CAF 

LCAN21G 

(FXITS  IPMECIATELY). 

TS 

F SCAPE 

TC 

EPANCF 

TFST  SIGN  CP  INPUT. 

TCF 

ACOSST 

START  IRRECIATEly  IF  FCSITIVF. 

Tf.  F 

ACOSZERO 

APCCCS(C)  = PI/2  = .25. 

EXTFNC 

IF  NEGATIVE,  USE  THE  ICENTITY 

DCS 

MPAC 

ARCCrS(X)  = FI  - ARCCOS(-X),  FCPCING 

CXCF 

MPAC 

ARGUMENT  PCSITIVE. 

CAF 

TCSUPTR 

SET  EXIT  TC  Cn  A8QVE  EEFCPE 

XCH 

ESCAPE 

ARCSIN/ARCCCS  CCNSIDFRATICNS. 

TS 

ESCAPE? 

CS 

HAl  F 

test  RAGMTUCE  CF  INPUT. 

AC 

MPAC 

CCS 

A 

TCF 

ACQSCVF 

THIS  IS  FRCEAELY  AN  CVERFLCW  CASE. 

TCF 

ASINFX 

TCF 

ACCSST2 

NC  CVERFLCW  - FRCCFFD. 

CCS 

MPAC  +1 

IF  RAJCP  PART  IS  .5,  CALL  ANSWER  C 

CAF 

ZERO 

UNLESS  MINOR  PART  NEGATIVE. 

TCF 

Acrs=c 

TC  F 

AC0SST2 

TS 

PFAC  +1 

TS 

MPAC 

TC 

ESCAPE 

extent 

NCW  THAT  AFGURENT  IS  IN  PRCFER  RANGE, 

CCS 

MPAC 

BEGIN  CCRPLTATICN.  USE  HASTINGS 

AC 

HALF 

AFFCOX  IMAT  ICN  ARCCOS(X)  = SQR T ( I- X 1 F ( X ) 

CXCH 

MPAC 

IN  A SCALEC  VFRSICN  WHERE  P(X)  IS  A 

CXCF 

euF2 

SEVENTH  CRCER  “OlYNCRiIAL. 

TC 

SCRTSUe 

RETURNS  with  NORRALTZEC  SGUARE  ROOT. 

CCS 

MPTFMP 

SEE  IF  ln-ncpralizaticn  fecuirec. 

TCF 

ACCSSFfi 

IF  SO. 
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2226 

RFF 

713 

LAST 

1076 

00 , 3652 

5.2  155 

1 

ACCS3 

CXCF 

MPAC 

SET  LF  FCR  PCIYNCMAL 

EVAILAT  ICN. 

2227 

REF 

21 

LAST 

1C7L 

00,3651 

52  134 

0 

CXCF 

6UF2 

2220 

REF 

714 

LAST 

107  7 

n , 36  54 

52  155 

1 

CXCF 

PFAC 

2229 

RFF 

3 

LA'T 

1075 

07,3655 

0 7225 

0 

TC 

POLY 

2 2 3'' 

00,3656 

OCC06 

1 

CEC 

6 

22SI 

00,3657 

1 3240 

0 

20EC 

+.3535531F5 

CCEFFICIENTS  APE  C 2 ( + I) / F I S C FT ( 2 ) NFEPE 

2211 

C0,366C 

23633 

0 

2212 

00,3661 

74  72  1 

c 

2DEC* 

-.048301 7006 

E + 1 * I 

2232 

00, 1662 

47775 

1 

223  3 

00, 3663 

0’440 

0 

2CEC’> 

+.0200273385 

E+2*  NFERE  C STANDS  FCR  ORIGINAL  CDEFFS. 

2211 

OO, 3664 

2C237 

0 

221A 

00 , 3665 

75067 

1 

ECEC* 

- 1 1293  1 66  3 

8 + 3* 

223A 

60, ’666 

7C742 

1 

2235 

00 ,’667 

03436 

0 

2DEC* 

+.00695311612 

e+4* 

22’5 

00,367C 

26756 

1 

22H6 

03,1671 

74C37 

0 

20EC* 

-.00394617957 

E + 5* 

2236 

01) , 3672 

57640 

1 

2237 

00,3673 

03046 

0 

2CEC* 

+.001501297736  P+6* 

2237 

o ),  3674 

07143 

0 

2233 

00 , 1675 

76654 

1 

2DEC  X 

- .UUC284  1603’4  e + 7* 

223P 

CO,  36  76  . 

42244 

c 

2219 

REF 

2 

LAST 

1075 

00, 3677 

3 2470 

0 

CAE 

LBLF2 

DC  FINAL  MLI TIFLY  ANC 

GC  TC  ANY 

22AC 

REF 

20 

LAST 

1C7^ 

CO, 37CO 

0 7111 

1 

TC 

CPFSUE  -1 

EP  ILOCUE  SECUENCES. 

22A  1 

RFF 

4 

LAST 

1076 

06, 371  1 

0 0 136 

c 

TC 

ESCAPE 

2 2A2 

" ' ,3702 

0 0006 

1 

SUETR 

EXTEND 

FPILOGLF  FCR  NEGATIVE 

INPUTS  TC  AFCCCS. 

22A1 

RFF 

715 

L AST 

1C77 

O’ , 3 703 

4 0 155 

1 

CCS 

MPAC 

22AA 

REF 

25 

LAST 

1 i 1 7 6 

00,3714 

6 4736 

1 

AO 

HALF 

FCFNS  FI  - AFCCCS  (-X) 

= AfiCCCS  ( X ) . 

22A5 

REF 

716 

LAST 

1077 

00  ,1705 

52  155 

1 

CXCF 

MPAC 

22A6 

RFF 

2 

LAST 

1076 

00, 3706 

0 G137 

1 

TC 

ESCAPE2 

GC  TC  FCSSIEl  C ARCSIN 

EP  ILCGUE  . 

22A7 

00, 3707 

J 0306 

1 

AS  IN  EX 

EXTEND 

22A8 

RFF 

7 1 7 

LAST 

K 77 

00,3710 

4 0155 

1 

CCS 

MPAC 

ARCSIN  FPILOGLE  - GET 

ARC  S 1 N ( X ) 

?2A° 

REF 

1 

1 AST 

ir74 

00,3711 

6 4 737 

0 

«0 

CLARTER 

= FI/2  - APCcrsix). 

225C 

REF 

718 

1 AST 

1077 

00  ,3712 

52  15  = 

1 

CXCF 

MPAC 

22‘=1 

REF 

• 4 1 

LAST 

1075 

00,3713 

1 6064 

1 

LCANZ IG 

TCF 

DAN  7 IG 

GAP:  ASSF^BL6  REVISION  116  OF  AGO  PRCGRA^  LUNINAFY  BY  NASA  2021112-371 


I.  INTFRFRFTFP 


225? 

REF 

353 

LAST 

1076 

O'l  ,3714 

50  001 

1 

ACCSSHR 

INCEX 

A 

2253 

PFF 

63 

LAST 

10  6 5 

00,3715 

■3 

4 736 

L 

CAE 

BIT14 

2254 

REF 

64 

LAST 

1076 

on , T 7 1 6 

54  135 

1 

TS 

MFTENF 

2255 

RFE 

4 

LAST 

1042 

30, ’717 

) 

2073 

1 

TF 

VSHPPNC 

2256 

ref 

1 

OiJ,  372C 

1 

3652 

1 

TCF 

ACFS3 

2257 

00,3721 

0 

0006 

1 

ACQSGVF 

EXTEND 

2258 

REF 

2 

LAST 

1076 

00,3722 

1 

3637 

1 

EZF 

AC0S=0 

2250 

Ou, 3723 

0 

0006. 

1 

ACOSAEPT 

EXTENT 

22591 

REF 

28 

LAST 

1071 

00 ,3724 

3 

0165 

0 

CCA 

LCC 

22592 

REF 

1 

0 1 , ’725 

0 

5 722 

c 

TC 

A LARNl 

22593 

00, 3726 

0 130  1 

1 

CCT 

1301 

226'’ 

REF 

2 16 

LAST 

1076 

CC.3727 

3 

4755 

1 

CAF 

ZERO 

2260  1 

REF 

3 

LAST 

1C7E 

00, ’733 

1 

36  37 

1 

TCF 

Acrs=o 

226  1 

REF 

4 

LAST 

1077 

00,3731 

3 

4737 

c 

ACCSZERC 

CAF 

qlarter 

2262 

REF 

4 

LAST 

1 C7E 

00,3732 

1 

364C 

1 

TCF 

ACCS=0  +1 

2263 

00,3733 

7 7 76  3 

c 

NEG12 

DEC 

- 12 

2264 

REF 

1 

10,3734 

1 

3 702 

0 

TfSUFTP 

TCF 

SUBTP 

1S:CS  AUG.  11,1969  SKIPPER  .097  PAGE  1C78 


USFF'S  PAGE  NC.  85  E2  S3 

THE  SHIFT  RIGHT  IS  LESS  THAN  19  SINCE 
THE  INPUT  WAS  NON-ZERO  CP. 

CP  SHIFT  R IC-HI  AND  RCLNC. 

FPCCFEC. 

IF  PAJCR  PART  WAS  CNLY  1 NCFF  THAN  .5, 
CALL  answer  zero. 

IF  CVEFFLCW,  CALL  ANSWER  ZERO  ELT 
SCLNO  AN  ALARH. 


ACCS(C)  = FI/2. 

SET  HFAC  ANC  EXIT  VIA  ESCAPE. 
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SKIPPER  .C97 


PAGE  1C7S 


1.  interpreter  USER'S  PAGE  NC.  86  E3  S3 

P22FE  THE  FCLLfUIAG  lASTRlCTICAS  APE  AVAILABLE  FCR  SETTING,  MOCIFYING,  AND  BRANGFING  CN  INOE>  PEGISTEPS: 


R2267 
R22F8 
R 2?t9 
P227" 
P2271 
R 2272 


1.  A XT 
I . Axr 
T.  L XA 
A.  LXC 
5.  SXA 
t . xr  H X 


ADDRESS  TC  INDEX  TPLE. 

ACCRPSS  TO  INDEX  COMPLERENTEC. 

LCAC  INDEX  EPTR  EFASAELE. 

LEAD  INDEX  CENPLEMENTED  PROM  ERASABLE. 

STCPE  INDEX  IN  ERASAELF. 

exchange  index  PEIGSTEP  ViITH  ERASABLE. 


R2273 

R227A 

P227S 


7.  INCP 

8.  XAD 

9.  XSU 


INCREMENT  INDPx  REGISTER. 
erasable  ACC  TC  INDEX  REGISTER. 
ERASABLE  SUBTRACT  PRCN  INDEX  REGISTER. 


R2276 


10.  TTx 


BRANCF  CN  INDEX  REGIS1FR  AND  DECREMENT. 


2277 


2278 

Rcp 

1 

2279 

REF 

1 

2280 

PEE 

2 3 

2281 

PEE 

4 

2282 

REF 

29 

2283 

REF 

«2 

228A 

REF 

2 

2285 

REF 

24 

2286 

REF 

1 

22B7 

REF 

1 

2288 

REF 

25 

2289 

2290 

REF 

2 

2291 

REF 

2 

2292 

PEE 

26 

2293 

2294 

REF 

3 

2295 

PEE 

3 

2296 

PEE 

5 

2297 

PEE 

30 

2298 

REF 

27 

2299 

2300 

REF 

4 3 

1 AST 

1069 

01,2345 

01 , 2345 
01 , ?34t 

LAST 

998 

01,2347 

LAST 

ICOF 

Cl  ,2  35C 

LAST 

1C77 

01,2351 

LAST 

107S 

01 ,2352 

LA4T 

1C79 

01,2353 

LAST 

1C79 

01.2354 

01.2355 

01.2356 

LAST 

IT  79 

n , 2357 
•n  ,2360 

LAST 

1079 

01, 2361 

LAST 

1079 

01  ,2362 

LAST 

1079  ■ 

01.2363 

01.2364 

LAST 

1079 

01 ,2365 

1 AST 

1079 

f 1,2366 

1 AST 

1079 

01,2367 

LAST 

1079 

01 ,2370 

1 AST 

1079 

01.2371 

01 .2372 

0 2442 

1 

A XT 

3 C117 

0 

50  130 

0 

X store 

54  046 

1 

1 6C64 

1 

0 2442 

1 

AXC 

4 C117 

1 

0 234? 

c 

0 2430 

1 

LXA 

50  in 

c 

3 COOO 

1 

1 2347 

1 

0 2430 

1 

LXC 

50  117 

0 

4 COCO 

c 

1 234? 

1 

0 2430 

1 

SXA 

5C  130 

c 

3 0046 

0 

50  1 1 7 

0 

PSTOPPl 

54  000 

c 

1 6064 

1 

BANK 

01 

C0LNT4 

$1  /I NTEP 

TC 

TAGSUe 

CA 

PCLISF 

INDEX 

1 NDEXLCC 

TS 

X 1 

TCP 

DANZIG 

TO 

TAGSLB 

cs 

PCLISF 

TC 

XSTOPE 

TC 

15ADRERS 

TNOEX 

PCLISF 

CA 

0 

TCP 

XSTCPE 

TC 

1 5ADRFR  S 

INDEX 

PCLISF 

rs 

0 

TCP 

XSTCPE 

TC 

15ADR'^R  S 

INDEX 

1 NOEXl CC 

CA 

XI 

INDEX 

PCLISF 

1S 

0 

TCF 

OANZ  IG 

SELECT  APPROPRIATE  INDEX  REGISTER. 
CONTAINS  C(FIXLCC)  CP  C ( F I X L C C ) ■•  1 . 


LOAD  INDEX  REGISTER  FRCP  ERASABLE. 


LCAC  NCX  REG  FRCP  ERAS/ELE  CCP PL EP EN T EC  . 


STORE  INDEX  REGISTER  IN  ERASABLE. 


) 


CtP: 


ASSF^RLE  REVISION  lift  CF  AFC  PROGRAM  LUM  INAR Y BY 


L INTFRPPFTER 


2301 

REF 

A 

L AST 

107S 

01,237^ 

0 243C 

1 

XCH  X 

2302 

PFF 

28 

LAST 

1 079 

»1  ,237A 

50  117 

0 

2303 

FI  ,2375 

3 OOOf) 

1 

23  lA 

RTF 

6 

1 AST 

1079 

01,2376 

5C  130 

c 

2305 

REF 

31 

LAST 

1079 

U ,2377 

56  046 

0 

2306 

REF 

1 

FI, 2A00 

1 2 3 7C 

c 

2307 

RCF 

5 

L AST 

1080 

01,2401 

1 2430 

1 

XAO 

2308 

RCE 

29 

LAST 

If.BC 

01 ,2402 

50  117 

0 

2319 

M,  2 40  3 

3 COCO 

1 

2 310 

R<=F 

7 

LA'T 

1080 

01  ,24:14 

50  131 

0 

X AC2 

2311 

PFF 

32 

1 AST 

1C8C 

Cl  ,2405 

26  146 

1 

2312 

PFF 

4A 

L AST 

10  79 

01,2416 

1 6064 

1 

2313 

REF 

o 

LAST 

1079 

01  ,2407 

1 2442 

1 

INCP 

231 A 

REF 

3r 

1 AST 

108F 

Cl,241f 

3 C 1 1 7 

0 

231  ft 

RFF 

1 

a 1, 24  1 1 

1 2404 

1 

2316 

RTF 

6 

LAST 

108C 

01,2412 

0 2430 

1 

XSU 

2317 

RFF 

31 

LAST 

108C 

01,2413 

50  117 

0 

2318 

01  ,2414 

4 0000 

0 

2319 

RFF 

2 

LA  ST 

1080 

01,2415 

1 2 4)4 

1 

2320 

PFF 

4 

LAST 

10  80 

01,2416 

0 2442 

1 

TIX 

2321 

RTF 

8 

LAST 

1080 

11  ,2417 

50  130 

0 

2322 

RFf 

12 

LAST 

Fft7 

01,2420 

4 CC50 

C 

2313 

REF 

9 

L AST 

1080 

■'1,242  1 

50  130 

0 

2324 

RFF 

T 3 

LAST 

1 C8C 

01,2422 

6 CC46 

0 

2325 

.1,2423 

C 0CC6 

1 

2 32  6 

REF 

45 

LAST 

1080 

n ,2424 

6 6064 

0 

232  7 

REF 

10 

1 A ST 

108C 

01 ,2425 

50  130 

0 

DCTI X8P 

2328 

RFF 

34  ■ 

L AST 

1080 

01,2426 

56  C46 

c 

2329 

RFF 

6 

LAST 

1069 

01,2427 

1 6651 

1 

2021112-071 
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PAGE  loeo 


TC 

1 5ADPERS 

INCEX 

PCL  ISF 

CA 

0 

INDF  X 

I NDEXLCC 

XCF 

X 1 

TCF 

^'STCFFl 

TC 

1 5ADRFR  S 

INCEX 

PCL  ISF 

CA 

n 

TMCEX 

INDEXLOC 

ACS 

X 1 

TCF 

DANZIG 

TC 

TAGSUB 

CA 

PCLISH 

TCF 

XAD2 

TC 

15ACREPS 

INDEX 

PCLI SH 

CS 

0 

TCF 

XAC2 

USER'S  PAGE  NO.  £7 

excfanc-f  incex  register  with 


E2  S3 
ERASABLE . 


ADD  ERASABLE  TC  INDEX  REGISTER. 

KNCRING  OVERFLOWS. 

INCREMENT  INDEX  REGISTER. 

SUBTRACT  ERASABLE  FROM  INDEX  REGISTER. 


TC  TAGSLB  EPANCF  AND  CECREMENT  CN  INCEX. 

INCEX  INDEXLCC 

CS  SI 

INDEX  INDEXLCC 

AC  XI 

extend  nc  cpepaticn  if  cecpementec  incex  is 

eZMF  DANZIG  NEGATIVE  OR  ZERO. 


INCEX  INCEXLCC 

XCH  XI  IGNORING  CVERFLCWS. 

TCF 


GCTC 


CO  THF  BPANCF  USING  THE  CADP  IN  FCLISH 


gap: 

ASSSPBLE  1 

REVISION  116 

CF  fGC  FRCGFAP  LUPINAFY  6Y 

NASA  2021112-071 

19: C9  AUG.  ) 1 , 196  9 

SKIPPER  .C97  PAGE  ICEl 

L 

IMFRPPfTFR 

CSFR'S  FACE 

NC.  66  E3  S3 

P2330 

SLPRruT  IPF 

TC  rrPVFPT 

AN  ERASABLE  ACCRESS  ( 1 1 

BITS)  TD  AN 

FBANK  SETTING  AND  SLBACDRFSS. 

2332 

REF 

3 2 

EAST 

1C8C 

01,2430 

4 C117 

1 

1 5 ADPEP 

s c s 

FCL ISF 

233^ 

RFF 

2 

LAST 

1008 

01,2431 

6 4 7 7 2 

! 

AD 

DEf45 

23’A 

REF 

354 

LAST 

1078 

01 , 3432 

10  003 

0 

CCS 

A 

COES 

IFF  ACORESS 

POINT  TC  THE  VCPK  AREA? 

7335 

REF 

51 

1 AST 

106  9 

01 , 7433 

3 C120 

1 

CA 

FIXLCC 

YES. 

ACC  FIXLOC 

. EBANK  CK  AS  IS. 

2336 

11 , 2434 

1 244  1 

0 

TCP 

+ 5 

73  3? 

PFF 

t 

LAST 

1008 

01 ,2435 

3 5007 

0 

CA 

OCT  1400 

NO  . 

SET  ERANK  6 

P*AKE  CP  SL8ACCRESS. 

233fl 

RFF 

33 

1 AST 

1081 

01 , 2436 

56  1 17 

0 

XCH 

PCLI SH 

2 33  5 

RFF 

63 

LAST 

1016 

'1  ,2437 

54  C03 

0 

TS 

FBANK 

73A0 

PFF 

14 

LAST 

ICl  6 

01, 2440 

7 4^57 

C 

NASK 

LC),8 

23A1 

RFF 

34 

LAST 

108  1 

0 1, 2441 

2 6 117 

1 

+ 5 

ADS 

PCLI SH 

FALl 

INTC  TAGSUE 

, ANC  PETLRN  VIA  C. 

R 73A2 

SLBPrLTl PE 

UHIGE  SFTS 

TIE  ACCRESS  CF  ThE  SFECIFIFC  INCEX 

IN  INCEXLCC 

. (ACUALLY 

, THE  ACORESS  -36C.) 

234A 

RFF 

52 

1 AST 

1081 

01 , 2442 

3 0120 

1 

TAGSLP 

CA 

F I XI  CC 

23A5 

RFF 

11 

1 AST 

1080 

^'1  ,2443 

54  130 

1 

TS 

INrExLOC 

23A6 

PFF 

36 

LAST 

1046 

Cl  , 2444 

10  120 

1 

CCS 

CYR 

eiT  1 

5 S FE  Cl  FI  ES 

INDEX  . 

73A7 

RFF 

12 

L AST 

108  1 

01, 2445 

24  130 

0 

I NCR 

I NDEXLCC 

n FEANS  LSE  X2. 

23AP 

RFF 

293 

LAST 

1072 

01 ,2446 

J 0002 

0 

TC 

0 

2349 

RFF 

294 

LAST 

1081 

01 ,2447 

0 C0C2 

c 

TC 

C 

1 FCR 

XI  . 
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02350  MISCFl LAAFCUS  OPERATICN  CODES  HTH  DIRECT  ADDRESSES.  INCLUCEC  HERE  ARE: 


R2352 

1 . 

ITA 

STORE 

GPRFT  (RETURN  ACDRESS)  IN 

ERASABLE. 

P 235A 

2. 

CALL 

CALL  A 

SUEROUTINE,  LEAVING  RETURN  IN  QPRET. 

R2356 

3. 

PTP 

return 

TG  BASIC 

LANGUAGE  AT  THE 

GIVEN  ACCPFSS. 

R7356 

4. 

BE  I 1 

FRANCE 

IF  THE  FIGF  ORDER  OF  MPAC 

TS  ZERO  (SINGLE  PRFCISICM. 

P2360 

5. 

BOV 

BRANCH 

CN  CVEFFLCN. 

R236I 

6 . 

GOTO 

SIMPLF 

SECUENCF 

CHANGE. 

2’62 

REF 

37 

LAST 

1081 

01  ,245C 

10  020  1 

RTE/EFIZ 

CCS 

CYR 

2363 

REF 

-3  C 

LAST 

1C81 

01,2451 

3 Cl  17  C 

PTB 

CA 

PCL  ISH 

236A 

PFF 

*5 

L AST 

9 33 

01,2452 

0 4621  0 

TC 

SHC ALL 

-1  SC  A "TC  C"  FPCN  PCLTINE  LEACS  TC  CANZIG 

236  5 

REF 

719 

LAST 

1C7  7 

01,2453 

10  154  0 

RHI  Z 

CCS 

NFAC 

2366 

PFf 

46 

1 AST 

1C8C 

1,  2454 

1 6C64  1 

TCF 

DANZIG 

2367 

PFF 

7 

LAST 

1080 

01  ,2455 

1 6651  1 

TCF 

GOTO 

2^68 

REF 

A7 

LAST 

1CF2 

0 1 ,2456 

1 6C64  1 

TCF 

DANZIG 

2369 

pFF 

8 

LAST 

1 J82 

01 , 2457 

1 6651  1 

TC  F 

GCTC 

2 3 70 

RPF 

9 

LAST 

1070 

01 ,2460 

10  121  1 

ECV( e ) 

CCS 

OVF IND 

BRANCH  CN  OVERFLOW  TO  BASIC  CP  INTEFP. 

2371 

01 ,2461 

1 2463  C 

Tf  F 

+ 2 

2372 

RFF 

48 

LAST 

1082 

01 , 2462 

1 6064  1 

TCF 

DANZIG 

2373 

RFF 

10 

1 AST 

10F2 

01 ,2463 

54  121  1 

TS 

CVFINC 

2374 

RFF 

38 

LAST 

1082 

01,2464 

1C  020  1 

CCS 

CYR 

2’75 

RFF 

1 

01 ,2465 

1 2451  1 

TC  F 

RTB 

IF  BASIC. 

2376 

01 , 2466 

CC360  1 

BETCBE 

CCT 

3 60 

2377 

REF 

9 

t AST 

1082 

01,2467 

1 66E  1 1 

TCF 

GCTC 

gap:  ASS6^RLF  REVISmN  116  CF  A GC  FPCGRAM  LUMINARY  8Y  NASA  2CZ1112-on 

L TMTFRPPFTFR 


237B 

RFF 

’9 

1 AST 

1082 

Cl  , 2A7F 

1C 

C2C 

1 

0ZE/GCTC 

CCS 

CVR 

2379 

RFF 

8 

LAST 

1076 

01  ,?A71 

0 

6726 

1 

TC 

BRANCH 

23PO 

RFF 

09 

LAST 

108? 

Cl ,2672 

1 

6064 

1 

TCF 

OAN  Z IG 

23B] 

FFF 

in 

1 AST 

1002 

01, 2A72 

1 

6 6 5 1 

1 

TCF 

GC^C 

23R? 

PEF 

59 

LAST 

1003 

01 ,2A7A 

1 

6064 

1 

TCF 

OAMZ  IG 

2383 

REF 

AO 

1 AST 

1083 

Cl , 2A75 

1C 

C2C 

1 

RFL/eHN 

CCS 

CYP 

23RA 

REF 

1 
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30 

lAST  1CP6 

5126 

9 1169 

0 

CFAKG2 

CS 

LCF 

NEGATIVE  LOC  SHOWS  JOB  = INTERPRETIVE. 

ITRAOE  (6) 

REFERP  TP 

"CHANG2". 

REF 

211 

lAST  107A 

5127 

59  00  1 

1 

TS 

L 

gap: 

ASSEVPLF  RfVl^TPN'  Ilf,  CF  AGC  PROGRAM  LUMINARY  BY  NASA  2C21112-C71 

IGiCS  AUG.  11 

,196? 

SK  lopEP 

.097  FACE  1096 

1. 

FXFCLTIVP 

LSEP* 

S PAGE 

NO.  2 

EC  S3 

0OB3 

REF 

LAST 

1C9S 

5 13C 

3 5163 

C 

+ 2 

CAF 

EXECEANK 

0033  5 

REF 

30 

LAST 

1096 

5131 

54  006 

0 

TS 

BBANK 

003A 

PFF 

2 

LAST 

109  6 

5132 

1 2 7''6 

0 

TCP 

CI-ANJCB  -1 

#SSf»'PLE  REVISION  116  CE  C-C  PROGRAM  LUMINARY  BY  NASA  20illl2-C71 


GAP: 

I EXECUTIVE 

P.)03S  TO  voluntarily  suspend  a JCB  INTIL  THE  CCIPIETIEN  OF  SERE 


00  37 

REF 

31 

LAST 

1095 

5133 

54  164 

0 

JC6SLEFP  TS 

LCC 

003R 

R'^F 

C 

LAST 

1096 

5134 

3 5163 

0 

OAF 

EXFCEANK 

0039 

OFF 

27 

LAST 

1095 

5 13  5 

54  CC4 

1 

TS 

FBANK 

0040 

P.EF 

1 

5136 

1 2777 

0 

TCF 

JC8SLP1 

P0041 

TO  AWAKEN 

A JCB  PUT 

10  SLEEP  IN 

i THF  ABCVE  FASHION: 

004? 

5137 

0 0004 

0 

jnBKAKE  INHINT 

00421 

REF 

■a 

LAST 

1095 

514C 

54  065 

0 

TS 

NEWLCC 

0043 

RFF 

72 

1 AST 

1034 

5 14  1 

4 A752 

1 

CS 

TWO 

QC44 

REF 

306 

1 AST 

1095 

5142 

26  00  2 

1 

ACS 

0 

004'= 

REF 

6 

LAST 

1C  9 7 

5 143 

3 5163 

C 

CAF 

EXECEANK 

0046 

REF 

26 

1 AST 

1097 

5144 

56  004 

c 

XCH 

FBANK 

CC47 

REF 

1 

5145 

1 3024 

0 

TCF 

JC8WAKE2 

P0O48 

TO  CHANGF 

THF  PPinPITY  CF  A 

JCB 

‘ CURRENTLY  LNCEP  EXECUTION 

0C49 

5146 

0 0004 

0 

PRIOCHNG  INHINT 

0050 

REF 

5 

LAST 

10  95 

5 147 

54  063 

r» 

TS 

NEWPR  10 

0051 

PFF 

7 

LAST 

1097 

5 150 

3 5163 

0 

CAF 

E XEC8ANK 

005? 

PEF 

31 

LAST 

1096 

5151- 

56  006 

1 

XCH 

8BANK 

0053 

REF 

9 

LAST 

101  7 

5 152 

54  165 

1 

TS 

8ANKSET 

0054 

FEF 

307 

1 AST 

109  7 

5153 

3 0CC2 

0 

CA 

0 

0055 

REF 

1 

5 154 

1 3073 

1 

TCF 

PPICCH2 

R0058 

TO  REMOVE 

A JOB  FROM 

execut; 

I VE 

CONSICERATICNS : 

00'=o 

RFF 

8 

LAST 

1097 

5155 

3 5163 

0 

EN'DOFJOE  CAP 

EXECBANK 

0060 

REF 

29 

1 AST 

IC97 

5156 

54  004 

1 

TS 

FEANK 

0061 

RFF 

1 

5157 

1 3104 

c 

TCP 

FNOJCBl 

0062 

pop 

2 

LAST 

1095 

5160 

3 1161 

0 

FNCFINC  CA 

EXECTEM  1 

0063 

REF 

30 

LAST 

1097 

5 16  1 

54  004 

1 

TS 

PEANK 

0064 

REF 

2 

LAST 

5?? 

5162 

1 6744 

1 

TCF 

Q+2 

0066 

REF 

2 

LAST 

1095 

5163 

02602 

1 

EXFCEANK  CACR 

F INCVAC2 

0066  5 

REF 

720 

LAST 

1082 

5164 

00  110 

1 

EAKEPRET  ACRES 

MFAC  -360 
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USER'S  PAGE  NO.  3 EE  S3 

ANTICIFATEC  EVENT  (I/O  EVENT  ETC.): 


EXIT  IS  VIA  FINCVAC/NCVAC  PRGCECURES. 


NFR  PRICPITY  ARRIVES  IN  A.  RETURNS  TC 
CALLER  AS  SOON  AS  NEW  JOB  PRIORITY  IS 
MGI-EST.  FFFFARE-  fCR  PCSSIELE  EAS  IC- 
STYLE  CHANGP-JCP. 


RETURN  TC  CALLER  AFTER  JCE  ENTRY 
CCRFL  ETE  . 


LCMRfAC  +6) 


LCC (CPRET ) 


GAP:  /'SSFNRLF  REVISmN  116  CF  AGC  FRCGPAw  LUPUARY  PY  AASA  202U1P-C71 


1 FYFCLTIYF 


P0C67  LOCATE  AVAILABLE  VAC  AREA. 


0068 

01, 2612 

BANK 

01 

■ n068E 

REF 

1 

CCIINT* 

tT/EXEC 

■1069 

RPP 

3 

L AFT 

109  7 

Cl , 261? 

54  061 

1 

F INDVAC2 

TS 

E XECTEMl 

C07C 

REF 

4 

LAST 

244 

11  ,2603 

10  410 

1 

CCS 

VACIUSE 

0071 

REF 

1 

Cl  , 2604 

I 2621 

1 

TCP 

VACFCUNC 

007? 

REF 

3 

1 AST 

244 

01,2615 

10  454 

0 

CCP 

VAC2LSE 

0073 

REF 

2 

LAST 

1098 

01 , 2616 

1 2621 

1 

TCF 

VACFOUNO 

0074 

REF 

3 

LAST 

24-! 

C1,26C7 

1C  52C 

C 

res 

VAC3LSF 

0't7S 

REE 

3 

1 AST 

1098 

11,261 

1 2621 

1 

TCF 

VAC  FOUND 

0076 

REF 

■a 

LAST 

244 

Cl  ,261  1 

1C  6')4 

1 

CCS 

VAC4USF 

0177 

REF 

4 

1 AST 

1098 

01, 26  12 

1 2621 

1 

TCF 

VACFCLNC 

0C78 

REF 

3 

LAST 

244 

01  ,2613 

10  660 

0 

CCS 

VAC5LSE 

0C79 

RFF 

c 

LAST 

1C9E 

01  ,26  14 

1 262  1 

1 

TCF 

VACFCLNC 

0(i79P 

RFF 

4 

LAST 

109  8 

11 ,2615 

22  06  1 

0 

LXCH 

EXLCTERl 

0C7P4 

REF 

308 

1 aft 

1097 

01,2616 

3 100  2 

0 

CA 

0 

1081 

RFF 

3 

LAST 

24E  , 

Cl, 2617 

0 5 706 

c 

TC 

BAI LCUT  1 

0081 

11,2620 

31201 

0 

OCT 

3 1201 

008? 

REF 

73 

LAST 

109  7 

Cl ,2621 

6 4752 

c 

VACFCLNC 

AC 

TWO 

1183 

01, 2622 

22  GC7 

0 

Zl 

0CE4 

REF 

361 

LAST 

1094 

01  ,2623 

5 ) 000 

1 

1NCE> 

A 

0189 

0 1 , 2624 

21' 777 

r 

LXCH 

0 -1 

0086 

CFF 

6 

LAST 

1097 

11,2625 

26  C63 

0 

AOS 

NFkvPRIC 

CCP7 

PEF 

2 17 

LAST 

107E 

01,2626 

3 4755 

1 

NC VAC2 

CAF 

ZFRC 

0088 

RFF 

5 

LAST 

46F 

01, 2627 

54  C64 

1 

TS 

LCCCTR 

1089 

pep 

1 

11,26  30 

3 2635 

0 

CAF 

MO. COPES 

0090 

RFF 

1 

01  ,2631 

54  062 

1 

NCVAC3 

TS 

EXECTFM2 

0091 

RFF 

6 

L AST 

1C9E 

01,2632 

50  G64 

0 

INDEX 

LCCCTR 

009? 

REF 

12 

LAST 

858 

01 ,2633 

10  167 

0 

CCS 

PRIORITY 

0093 

REF 

1 

01,2634 

1 2675 

0 

1CF 

NEXTCCRF 

0094 

01,2635 

occ;  7 

f 

NC. GORES 

CEC 

7 

0095 

REF 

2 

1 AST 

1098 

01,2636 

1 2675 

0 

TCF 

NEXTCCRE 

A0096 
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USER'S  PAGE  NO.  4 


EO  S3 


(SAVF  CALLUP'S  EANK  FIRST.  ) 


NO  VAC  AREAS 

RESERVE  this  VAC  AREA  BY  STORING  A ZERO 
IN  ITS  VAC  USE  REGISTER  ANC  STORE  TLE 
ACLRESS  CP  THF  FIRST  WCRC  CF  IT  IN  TFE 
LOW  NINF  BITS  OF  THE  PRIORITY  WORD. 


NOVAC  ENTERS  HERE.  FINE  A CCRE  SE1. 

SEVEN  SFIS  CF  ELEVEN  RECISTEPS  EACH. 

EACH  PRIORITY  REGISTER  CONTAINS  -C  IF 
THE  CCRR ESPCNC  ING  CORE  SET  IS  AVAILABLE. 

AN  ACTIVE  JOB  HAS  A POSITIVE  PRIORITY 
BUT  A CCRMANT  JOB'S  PRIORITY  IS  NEGATIVE 


GAP: 


ASSFW6LE  KEVISRJN  116  CF  AGC  PRCGRAN  LLMNAFV  6Y  NASA  202111.^-071 


L FXFCUTIVF 


CC97 

REF 

7 

LAST 

1C9E 

Cl, 2637 

3 CC63 

1 

rcPFCLNC  CA 

NFWPP  IC 

9098 

REF 

7 

LAST 

1098 

01, 2640 

50  C64 

0 

INDEX 

LCrCTR 

0099 

R£F 

13 

LAST 

1098 

01 ,2641 

54  167 

0 

TS 

priority 

0100 

RFF 

9 

LAST 

85E 

01  ,264? 

7 5304 

1 

HASK 

LCW9 

9101 

PFF 

S 

LAST 

1099 

'll,  2643 

50  064 

0 

INDEX 

LCCCTP 

010? 

RFF 

29 

LAST 

1069 

01  ,2644 

54  166 

1 

TS 

PUSHLCC 

J103 

REF 

9 

LA  ST 

1099 

Cl, 2645 

1C  064 

1 

CCS 

C CCCTR 

91  9A 

REF 

1 

01 , ?646 

1 2662 

0 

TC  F 

SETLOC 

0109 

REF 

1 1 

LAST 

1C82 

01 ,2647 

54  121 

1 

TS 

CVFINC 

91  16 

RFF 

30 

LAST 

1099 

Cl, 2650 

3 0 16  6 

J 

CA 

PLSHLCC 

0107 

OFF 

54 

LAST 

1 183 

31  ,265  1 

54  120 

0 

TS 

F IXLOC 

0108 

RFF 

6 

LAST 

995 

01,2652 

10  067 

1 

SPFCTEST  CCS 

NFW jce 

0109 

RFF 

2 

1 AST 

1099 

'3  1, 26  5 3 

1 2662 

0 

TCF 

SETLCC 

0110 

REF 

10 

LAST 

10P6 

ri  ,2654 

C 5675 

0 

TC 

CCSHCLE 

9111 

RFF 

11 

l.AST 

1099 

01,2655 

C 56  7 5 

c 

TC 

CCSHCLF 

9112 

RFF 

7 

L AST 

1099 

01 , 2656 

54  067 

1 

TS 

NFWJOB 

0 113 

RFF 

4 

LAST 

1097 

Cl  ,2657 

52  066 

0 

CXCH 

NFWLCC 

0 1 14 

RFF 

32 

LAST 

1C97 

01, 2660 

52  16  5 

1 

CXCH 

LCC 

0115 

RFF 

1 

01  ,?66  1 

1 516') 

1 

TCF 

ENCFIND 

0 116 

REF 

C 

1 ACT 

1C99 

01,2662 

5?  C66 

c 

SETLCC  CXCH 

NFWLCC 

0117 

Iiff 

19 

LAST 

1099 

01 , 2663 

50  C64 

6 

INDEX 

LCCCTP 

0118 

REF 

33 

LAST 

1099 

01  ,2664 

52  165 

1 

CXCH 

LCC 

9119 

P = F 

8 

LAST 

1099 

01 , 2665 

50  C67 

0 

INDEX 

NEW jce 

0120 

REF 

14 

LAST 

1099 

01,2666 

4 3167 

0 

CS 

PRIORITY 

9 121 

PFF 

P 

1 AST 

1099 

01 ,2667 

6 G063 

1 

AC 

NEWPP IC 

912? 

01,2670 

0 C006 

1 

EXTEND 

0123 

REF 

2 

LAST 

1099 

01  ,2671 

6 5163 

0 

eZMF 

ENDFINO 

0124 

RFF 

1 1 

LAST 

1C99 

01,2672 

3 CC64 

c 

CA 

1 CCCTP 

0125 

PFF 

9 

LAST 

1099 

01,2673 

54  06  7 

1 

TS 

NFWJOB 

C126 

RFF 

3 

LAST 

1099 

01,2674 

1 516U 

1 

TCF 

ENCFIND 

9127 

OFF 

1 

1 1,26  75 

3 3034 

0 

NFXTCCRE  CAF 

CCRF INC 

0128 

PFF 

12 

LAST 

1099 

01 , 2676 

26  064 

1 

ADS 

LCCCTP 

0129 

PEF 

2 

LAST 

109F 

Cl  ,2677 

10  162 

1 

CCS 

EXECTFM2 

9139 

REF 

1 

01,2730 

1 263  1 

0 

TCF 

NCVAC3 

01392 

REF 

C 

LAST 

1098 

01  ,2  701 

22  06  1 

0 

CXCH 

FXECTEMl 

9 1 ’'14 

PFF 

3C<; 

LA'T 

109F 

31  ,2702 

3 0 30  2 

c 

CA 

G 

9131 

RFF 

4 

L AST 

1098  ■ 

01,2703 

0 5 706 

f 

TC 

BAl LCLTl 

0132 

01  ,2704 

3123? 

0 

OCT 

312D2 
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SET  TPF  PRICRTTV  CP  THIS  JCE  IN  THE  CCPE 
SFT'S  FPTCFITY  R>=G1STEP  ANC  SET  THE 
JOB'S  PLSH-DCPN  FCINTEP  AT  THE  EECINNINC- 
OF  the  work  area  anc  overflow  INCICATCP 

OFF  TO  PREPARE  FOR  I N T ER F P F T I \E  PPCGPAPS 

IF  COPE  SET  ZERO  IS  BEING  LOADEC,  SET  LP 
CVFINC  ANO  FIXLCC  IPWECIATELY  . 


SEE  IF  ANY  ACTIVE  JOBS  UAITING  (RARE). 
POST  EE  ANAKENEC  BUT  UNCFANGEC  JCE. 


+r  SHCVS  ACTIVE  JOB  AIFEACY  SET. 


SET  UF  THE  LCCATiCN  REGISTERS  FOR  THIS 


This  INCEX  INSTRUCTION  INSURES  THAT  THE 
HIGHEST  ACTIVE  PPIOFITY  WILL  BE  CCPFAPEC 
WITH  THE  NEW  PRIORITY  TC  SEE  IF  NEWJOB 
SHCULC  EE  SET  TC  SIGNAL  A SWITCH. 

LCCCTF  IS  LEFT  SFT  AT  THIS  CORE  SET  IF 
THE  CALLER  WANTS  TC  LCAC  ANY  "FAC 
REGISTERS,  ETC. 


NC  CCFE  SETS  AVAILAELE 


cap  : 


a'SPPBLE  REVISION  116  CF  AGC  FRCGFfiN  LUI^IN^PY  6Y 


L fxfclttvf 


P0133 

THE  1 

FCl LCWING  PFUTINF  SWAPS 

CCPE  SET  0 

013A5 

REF 

36 

LAST 

105C 

61  ,27G5 

22 

166 

1 

-2 

1135 

P^'F 

10 

L AST 

1C57 

01, 2706 

30 

165 

0 

- 1 

0136 

01 ,2707 

0 

O 'l 

0 

CEANJCe 

0136  2 

01,2710 

0 

OC06 

1 

01366 

REF 

15 

LAST 

95  3 

01,2711 

06 

00  7 

1 

01366 

RFF 

2 12 

LAST 

109  5 

01,2712 

56 

COl 

0 

0 136  8 

REF 

1C 

LAST 

1095 

'’1,2713 

5C 

C67 

c 

+ 6 

0137 

PEF 

35 

LAS-^ 

1 lOO 

'1,2716 

52 

165 

1 

0138 

RFP 

36 

LAST 

1 IOC 

11,2715 

52 

165 

1 

013R2 

RFF 

1 1 

LAST 

1 l''C 

01,2716 

30 

165 

0 

01  3E6 

)1  ,271  /• 

0 

0006 

1 

013Pf 

REF 

16 

LAST 

HOC 

Cl ,272C 

01 

00  7 

1 

0139 

REF 

721 

LAST 

1097 

01, 2721 

52 

155 

1 

0160 

RFF 

11 

LAST 

HOC 

01,2722 

50 

067 

u 

0161 

'’EF 

72? 

LAST 

1 IOC 

01,2723 

52 

155 

1 

0162 

REF 

723 

1 AST 

1100 

01,2726 

52 

155 

1 

0163 

REF 

726 

LAST 

nor 

Cl  ,2725 

52 

157 

0 

•)166 

RFF 

12 

LAST 

1 IOC 

01,2726 

50 

C67 

0 

0166 

REF 

725 

LAST 

1 100 

•tl  ,2727 

5 2 

157 

0 

0166 

RFF 

726 

LAST 

1 !'’( 

01  ,2730 

52 

157 

c 

0167 

PFF 

727 

L AST 

1 100 

01,2731 

52 

16  1 

c 

016P 

PFF 

13 

LAST 

1 1 00 

01 ,2732 

5U 

067 

0 

0169 

RFF 

728 

LAST 

HOC 

Cl , 2733 

52 

161 

c 

01  6n 

REF 

729 

LAST 

1 100 

01,2736 

52 

161 

n 

0161 

RRF 

1 3f 

lAST 

1 100 

01,2735 

52 

163 

1 

015? 

REF, 

16 

LAST 

HOC 

01.2736 

50 

C67 

0 

0153 

REF 

731 

LAST 

HOo 

'11  ,2  7 37 

52 

163 

1 

0156 

REF 

732 

LAST 

1 IOC 

Cl  .27P-0 

52 

163 

1 

0165 

PFF 

218 

LAST 

1058 

01, 2 761 

3 

6 7 55 

1 

0156 

REF 

12 

LAST 

1095 

01,2762 

56 

121 

0 

0157 

01,276? 

0 

CC06 

1 

0168 

01,2766 

1 

276  7 

0 

0155 

REF 

31 

LAST 

1C55 

01  ,2765 

6 

0166 

1 

0 160 

REF 

32 

LAST 

HOC 

0 1 ,2766 

56 

166 

1 

0161 

RRF 

33 

LAST 

11  or 

01  ,'>767 

52 

167 

0 

0162 

REF 

1 = 

LA'T 

HOC 

Cl ,2  ?5f 

5C 

C67 

c 

0163 

PEF 

36 

LAST 

1100 

"1,2751 

52 

167 

0 

0166 

REF 

35 

LAST 

1100 

01,2752 

52 

167 

0 

0165 

RFF 

10 

1 AST 

1055 

01,2753 

3 

5006 

0 

0166 

REF 

15 

LAST 

1095 

01,2756 

7 

0167 

0 

0167 

REF 

c i; 

L ACT 

1055 

01  .2755 

56 

120 

0. 

1163 

REF 

36 

1 AST 

HOC 

01,2756 

10 

166 

1 

0165 

RFC 

’15 

LAST 

1100 

01  ,7757 

3 

6755 

1 

C17C 

pep 

1 

Cl  ,2760 

1 

2 7 6 5 

c 

20  211  12-0  71 
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WITH  THAT  WHOSE  RELATIVE  ADORESS  IS  IN  NEWJCB. 


1 XCE 

LCC 

CAE 
INF  INT 
EXTENC 

BANKSET 

BANKSET,  NCT  PBANK,  HAS  RIGHT  CDNTENTE. 

POP 

SLPERBNK 

PICK  LF  CURRENT  SEANK  ECR  EECCN 

xr  1- 

L 

LDC  IN  A AND  BBCDN  IN  L. 

INDEX 

NEW jce 

SWAP  LCC  ANC  EANKSET. 

CXCH 

LCC 

CXCF 

LCC 

CAE 

EXTEND 

BANKSET 

WRITE 

SUFERENK 

SET  SBANK  FOR  NEW  JOB. 

rxCH 

WRAC 

SWAP  MULTI-PURFCSE  ACCLMULATCP  AREAS. 

INDEX 

NEWJOe 

CXGH 

HFAC 

DXr  H 

MPAC 

CXCF 

HFAC  +2 

INDEX 

NEW JCE 

CXCL 

MPAC  *2 

CXCE 

MFAC  -*2 

CXCH 

MFAC  +6 

INDEX 

NEWJOB 

CXCH 

MFAC  +6 

CXCH 

MFAC  +6 

exCF 

MFAC  <6 

INDEX 

NEWJCP 

CXCH 

MPAC 

CXCH 

MFAC  +6 

CAE  ■ 

7ERD 

XCH 

EXTEND 

QVFINC 

MAKE  PLSHLCC  NEGATIVE  IF  CVFIND  NZ. 

B2F 

t 2 

CS 

PUSHLOC 

TS 

PLEHLCC 

CXCH 

PLSHLOC 

INDEX 

NEWJCE 

CXCH 

PL'HLCC 

CXCH 

PUSHLCC 

SWAPS  PUSHLCC  AND  PRICRIIY. 

CAE 

LCW9 

SET  FIXLCC  TC  EASE  OF  VAC  AREA. 

RASK 

PRIORITY 

TS 

F IXLCC 

cc  s 

PLSHLCC 

SET  CVERFLCW  INCICATCR  ACCCRCING  TC 

CAF 

Z FRO 

ICF 

ENCPRCHG  -1 

GftP: 


ASSFNBLE  REVISIPN  116  TF  AGC  PRCGRAW  LUPINAPY  8Y  AASA  2021112-071 


I FXFCUTIVF 


0171 

RFF 

37 

LAST 

1100 

01,2761 

8 0166 

1 

cs 

PUSHLCC 

0172 

REF 

■=e 

LAST 

1 ICl 

01,2762 

S8  166 

1 

TS 

PLSHLCC 

0173 

PEF 

1 13 

LAST 

106A 

01, 2763 

3 8753 

1 

CAF 

ONc 

C17A 

REF 

13 

LAST 

nor 

01 ,2768 

56  121 

0 

XCF 

OVFINC 

0179 

RFF 

16 

1 A ST 

l 100 

^1, 276S 

58  C67 

1 

TS 

NFN jce 

0176 

01,2766 

0 000  3 

1 

ENOPRCFG  REl IN7 

0177 

PFF 

37 

LAST 

nor 

Cl  ,2767 

52  165 

1 

CXCF 

LCC 

0178 

01,2770 

0 0006 

1 

EXTEND 

0179 

"1,2771 

6 2773 

0 

eZMF 

+ 2 

0180 

01,2772 

52  cce 

c 

CTC° 

1S:CS  AUG.  11,1969  SKIPPER  .097  PAGE  llCl 
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BASIC  JOBS  HAVE  POSITIVE  ACCRESSES,  SC 
Cl SFATCF  W ITF  A ETCe. 

IF  INTEPFREYIVE,  SET  LF  EEANK,  ETC. 


RAP 


ASSP^0LE  REVISION  116  OF  AGC  PRCGRAP  LLPINARV  BY  FASA  2021112-C71 


L 

FXECLTI VF 

0 IP  1 

C 1 , 2 7 73 

A CCCC 

r 

CCR 

0182 

PFF 

1 lA 

LAST 

ll'l 

"1.277A 

6 A75’ 

1 

AD 

CNE 

0183 

REF 

3E 

LA'T 

110  1 

01  ,’775 

5A  16r 

0 

TS 

LCC 

0186 

pep 

1 

01,2776 

1 6053 

c 

TCP 

I NTRSN 

ROl  87 

CORPl FT  E 

JCESLFFP  PREPARATIONS 

• 

01«8 

01  ,2  777 

C CCOA 

0 

JCeSLFl 

INF  INT 

GIRO 

REF 

16 

1 AST 

line 

f 1,3CCC 

A C 167 

c 

CS 

PRICRITY 

0190 

pt-F 

17 

1 AFT 

1102 

0 1 , 3 T 1 1 

5A  167 

G 

TS 

PRIOR  ITV 

0191 

RPF 

8 

LAST 

K 36 

Cl  ,302 

3 6077 

1 

CAF 

LCW7 

0192 

RRF 

32 

L AST 

1097 

■'1,300? 

7 CCC6 

r 

PA  SK 

BBANK 

01921 

r 

c 

.)  00U6 

1 

EXTEND 

01922 

REF 

17 

LAST 

HOC 

0 1 , ’ F r,  c 

CA  CC7 

1 

PGP 

SUPEPENK 

0193 

PFF 

12 

LAST 

lion 

01 , 30  ) 6 

5A  165 

1 

TS 

BANKSET 

01 9 A 

R = F 

2 2G' 

LAST 

lice 

Cl  ,3007 

A A755 

c 

CS 

2ERC 

■)19? 

RFF 

1 A9 

1 AST 

K 72 

C 1 , 3R  10 

5A  13  1 

c 

JGPSLR2 

TS 

BLF  41 

01  96 

PFF 

1 

01',3'U  1 

1 3121 

1 

TCF 

EJSCAN 

0196  1 

0 1 , 3 C 1 2 

C rCCA 

c 

N I.GHANG2 

INF  INT 

0196  1 1 

REF 

17 

LAS'F 

1 101 

01,3913 

10  06  7 

1 

CCS 

NEW JCB 

C19612 

0 1 ,301 A 

1 3017 

0 

TCF 

43 

019613 

C ,3)15 

0 CC03 

1 

PELTNT 

Cl 961A 

REF 

1 

01,3016 

1 3217 

1 

TCF 

AOVAN  +2 

01962 

REF 

TA 

LA  ST 

1C98 

01,3017 

3 A752 

0 

CAF 

Twe 

01963 

■■1,3020 

0 000  6 

1 

EXTEND 

C196A 

RFF 

3C 

1 AST 

898 

01 ,392  1 

05  Oil 

1 

WHR 

DSALPOIT 

01968 

REF 

39 

LAST 

11C2 

L 1 , 3022 

52  165 

1 

CXCH 

Lcr 

01966 

RFF 

3 

1 AST 

1096 

Ol,  3'i23 

1 2713 

1 

TCF 

CHANJCB  4 

19:09  AUG.  11,1969  SKIPPER  .097  PAGE  11C2 


USER' S PAGE  KC.  8 PO  S3 


EPILOGUE  TO  JCe  CFANGE  FOR  IMERPREIIVE 


RF  SOME. 


KKZ  PRICRITY  SHOWS  JOE  ASLEEP. 


SAVE  CLC  SUPEREANK  VALUE. 


HOLDS  - HIGHEST  PRIORITY. 

SCAN  FOR  HIGHEST  PRIORITY  ALA  EKCCFJOE. 

CUICK...  OORT  LET  NFhJCE  CHANGE  TO  *C  . 

NFRJOE  STILL  PNZ 

KFWJPP  HAS  CHANGEC  TO  40.  WAKE  UP  JOB 
VIA  NLDIPECT.  (VERY  RAPE  CASE.) 


TORN  CK  ACTIVITY  LIGHT 
ANC  SAVE  AtCRESS  INFO  FOR  BENEFIT  OF 
A FCSSIELE  SLEEPING  JOI E . 


^SSE^BLE  PEVISTTN  116  CF  iCC  FRCC-R4''  LUPIN&PV  6y  NAS^  20^11  li-C71 


GAP: 

L FXFCL'TIVP 


P01R7 

TO  WAKE  UF 

A jre,  each  core 

SET 

IS  FOUND  TO  LCCATE  ALL 

P0199 

LOC 

REGISTER  OF  ANY 

SUCH  JCP 

PATCHES 

THAT  SUPPLIEC  8Y  THE  CALLER 

R0201 

LCCCTP 

IS  SET 

TO  -1 

AND  NC  further  ACTION  TAKES 

PLACE. 

02'i? 

PFF 

6 

LAST 

1099 

Cl  , ’;i7A 

54  06  1 

1 

JCBWAKE2 

TS 

E XECTEM  I 

0203 

RFF 

221 

LAST 

1102 

'01  ,3C25 

3 4755 

1 

CAF 

ZERO 

020A 

REF 

13 

1 AST 

1C99 

11, 3026 

54  C64 

1 

TS 

LCCCTP 

0205 

RFF 

2 

1 AST 

1098 

Cl  ,3027 

3 2635 

0 

CAF 

NC. COPES 

0?i'6 

REF 

•a 

LAST 

less 

Cl , 3030 

54  062 

1 

JCEWAKE4 

TS 

EXECTEP2 

0207 

PFF 

lA 

LAST 

1 1J3 

Cl, 3031 

50 

c 

INDEX 

LCCCTP 

02CP 

P=F 

IR 

1 AST 

110? 

01 ,3332 

10  167 

u 

CCS 

PRIORITY 

0209 

REF 

1 

f 1, 30” 

1 3C36 

C 

TCP 

JCEWAKE3 

0210 

U,  303A 

00014 

1 

COPE  INC 

DEC 

12 

0211 

RFF 

1 

01  ,3035 

I 3045 

1 

TCF 

WAKETEST 

021? 

PFF 

2 

LAST 

109C 

01 , 3036 

2 3C34 

c 

JOEWAKE? 

CAF 

CCRE INC 

0213 

REF 

15 

LAST 

1103 

01 ,3037 

?6  064 

1 

ACS 

LCCCTR 

021  A 

REF 

A 

LAST 

1 IC3 

r 1 , 3CAC 

10  C62 

1 

CCS 

EXECTFP2 

0215 

RFF 

1 

01 , 304  1 

1 .3030 

0 

TCF 

J0BWAKE4 

0216 

RFF 

1 1 S 

LAST 

1 102 

01,3342 

4 4753 

0 

CS 

CNE 

0217 

RFF 

16 

LAST 

1103 

Cl , ’C43 

54  C64 

1 

TS 

LCCCTP 

021  H 

PFF 

A 

1 AST 

109S 

01,3044 

1 5161 

1 

TCF 

FNCFIND 

0219 

REF 

6 

LAST 

1 OSS 

Cl  ,3C45 

4 0065 

0 

WAKETEST 

CS 

NEWLCC 

0220 

RFF 

1 7 

1 AST 

1 1C3 

01, 3046 

50  064 

0 

INDEX 

LCCCTP 

0221 

REF 

AO 

LAST 

no? 

Cl  ,3047 

6 0 164 

1 

AC 

LOC 

022? 

' 1 , 335C 

C CC06 

1 

EXTENC 

0223 

01  , ’15  1 

1 3053 

r 

BZF 

+ 2 

022A 

RFF 

2 

LAST 

1103 

01  ,’  )5? 

1 3036 

C 

TCF 

J0BWAKE3 

0225 

RFF 

1 8 

LAST 

1103 

Cl , 3053 

50  C64 

0 

1 NDEX 

LFCCTP 

0226 

RFF 

19 

1 AST 

1 103 

01 , 3054 

4 0167 

0 

CS 

PPIOPI TY 

0227 

REF 

c 

1 AST 

109S 

01 ,3055 

54  063 

0 

TS 

NEWPR  IC 

022R 

RFF 

19 

1 AST 

1 103 

01 , 3C56 

50  C64 

0 

INDE  X 

LCCCTP 

022S 

RFF 

?0 

1 AST 

1103 

01  ,3057 

54  167 

0 

TS 

PRIORITY 

0230 

RFF 

1 

Cl  , 3'060 

4 4 350 

1 

CS 

FEANKPSK 

0231 

REF 

7 

LAST 

1 103 

01 , 3061 

7 0065 

0 

PASK 

NEWLCC 

0232 

REF 

3 

LAST 

1015 

Cl , 3062 

6 4 741 

1 

AC 

2K 

0200 

RFF 

8 

LAST 

in? 

0 1 , 3C62 

56  C65 

1 

XCH 

NEWLCC 

023A 

RFF 

? 

1 AST 

! 103 

"1 , 3064 

7 435  ) 

1 

PASK 

FPANKPSK 

0235 

REF 

20 

LAST 

110’ 

Cl ,3C65 

50  064 

0 

INDEX 

L CCCTC 

0236 

RFF 

1 ? 

LAST 

1102 

01,3066 

6 C165 

c 

AD 

BANKSET 

0237 

REF 

9 

LAST 

1 103 

01  ,3067 

54  066 

0 

TS 

NEWLPC  ♦ 

023R 

REF 

21 

LAST 

110’ 

Cl , ’C7C 

10  C64 

I 

CCS 

LCCCTP 

023° 

PFF 

3 

LAST 

1099 

01 , 3071 

1 2662 

n 

TCF 

SETLCC 

C2AC 

RFF 

1 

C 1 , 3 ■ 72 

1 2653 

0 

TCF 

SFFCTFST 

1S:CF  ALG.  11,1969  SKIFFEP  .097  fAGF  1103 

USER'S  PAGE  NO.  S EC  S3 

JCBS  VvHlCH  ARE  ASLEFF.  IF  TFF  FCACR  IN  TFE 
, TEAT  JOE  TS  AkiAKFNEO.  IF  NO  JCB  IS  FO.NC, 

PEGTN  CORE  SET  SCAN. 


active  JCe  - CHECK  NEXT  CCRE  SET. 

12  REGISTERS  FER  CrPE  SET. 

SLEEPING  JCB  - SEE  IF  CADP  M4TCFES. 


EXIT  IE  SLEEPING  JOB  NCT  FCLNO. 


IF  PATCH. 

EXAMINE  NEXT  CCRE  SET  IF  NC  PATCH. 
PE-CCPFL FMENT  PRIORITY  TO  SHOW  JOB  AWAKE 


PAKF  UP  THE  2CACR  OF  THE  HAKE  ACORESS 
LSING  THE  CAOF  IN  NEWLCC  ANC  THE  EEANK 
HALF  CF  BBANK  SAVED  IN  BANKSET. 


I 


SPECIAL  TREATPENT  IF  THIS  JOB  WAS 
ALREACY  IN  the  RUN  (01  FCSITICN. 


GAP  : 
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19:0S  AUG.  1 1 , IStS  SKIPPER 


097 


PAGE  IICA 


L EXECUTIVE 


USER'S  PAGE  NO.  10  EO  S3 


P02A1 

FRTCPITY 

CHANGF.  TI-4NGE  THE 

CCNTENTS  OF 

PRIORITY  AND  SCAN 

FCR  tee 

JOE 

CF  FIGFEST  PRICFITY. 

02A3 

REF 

41 

LAST 

11C3 

Cl  ,3C73 

54  164 

0 PPICCF2 

TS 

LCC 

02AA 

REF 

222 

LAST 

1103 

01,3C74 

3 4755 

1 

CAF 

ZERO 

SFT 

FLAG  TC  TELL  ENCJCE  SGANNER 

02A5 

PPF 

150 

1 AST 

1 ri2 

01 ,3075 

54  130 

1 

TS 

BLF 

JOB 

I S 

STILL  FIGHEST  FRICRITY. 

0246 

REF 

1 1 

1 AST 

1 IOC 

Cl ,3076 

3 5 1)4 

C 

CAF 

LCt»9 

0247 

REF 

21 

LAST 

1103 

01,3077 

7 C167 

0 

MASK 

PRIORITY 

024F 

RFF 

10 

LAST 

1103 

01  ,3  1.)) 

6 0063 

1 

AD 

NEWPR in 

0249 

RFF 

22 

LAST 

1104 

01,3101 

5 4 167 

c 

TS 

PRIORITY 

02S1 

0!  , n )2 

4 0000 

0 

CCM 

0201 

RFF 

1 

01 ,3l.)3 

1 301  ) 

1 

TCF 

JCeSL  F2 

ANC 

TC 

EJSCAN  . 

r.ftP:  fSSFf'RLE  PFVtSION  lie  OF  A GC  PROGRAM  LUMINARY  BY  NA'A  20211U-071 
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lies 


P025? 

RELEASE  7HI 

S CORE  SFT  AND  VAC 

APFA  AAC 

SCAN  FCF  TFE  JOF 

CF  MCFFST  ACTIVE  PRIORITY. 

02  5A 

01 ,3104 

0 0004 

0 

ENOJDBl 

INHIM 

02  F 9 

R8F 

223 

LAST 

1 104 

oi ,3l>5 

4 4755 

0 

CS 

ZFRO 

7256 

PFF 

1 5 1 

LAST 

1 1C4 

01  , ? 1 16 

54  121 

C 

IS 

PUF  +1 

0257 

PEF 

23 

LAST 

1 104 

01,3107 

56  167 

1 

XC  H 

PRI PPI TY 

025F 

REF 

12 

1 AST 

1 104 

01,2110 

7 5004 

1 

MASK 

LCN9 

02581 

REF 

213 

LAST 

1100 

Cl , 3 1 1 1 

54  00  1 

1 

TS 

L 

025E2 

REF 

2 

1 A ST 

1095 

01,311? 

4 

0 

CS 

fakepre  T 

025P2  1 

REF 

2 14 

LAST 

1105 

Cl, ^113 

6 CCCl 

C 

AC 

L 

02583 

01,3114 

0 0006 

1 

EXTEND 

C25f  A 

REF 

2 

1 AST 

1102 

01  ,3  1 15 

6 3121 

0 

BZMF 

ejscan 

NO VAC  EN00FJ06 

0289 

RFF 

215 

LAST 

1105 

01,3116 

1C  COl 

1 

COS 

L 

0260 

REF 

3t2 

1 AST 

1098 

01,3117 

50  00  ) 

1 

INDEX 

A 

0261 

Cl  ,312C 

54  000 

0 

TS 

0 

0262 

REF 

24 

LAST 

1105 

01,3121 

10  20  3 

1 

E JSCAA 

CCS 

priority 

+ 12C 

C263 

PEF 

1 

01  ,3122 

0 3 172 

ri 

TO 

EJl 

026A 

R^f 

12 

LAST 

1C9P 

C 1 , ’123 

0 56  75 

0 

TC 

CCSFCLF 

0265 

01, ’124 

1 2125 

c 

ICF 

+ 1 

0266 

REF 

25 

L AST 

1105 

01,3125 

10  217 

1 

CCS 

pricrity 

+24C  EXAMINE  EACH  PRIORITY  R8GIS1ER  TC  FINC 

0267 

OFF 

2 

LAST 

1105 

01,3126 

0 2172 

0 

TC 

F J1 

TFF  JCe  CF  EIGHFST  ACTIVE  PRIORITY. 

0268 

RFF 

13 

LAST 

1 105 

01,3127 

0 5675 

0 

TC 

CC5H0LF 

0269 

01 ,3130 

1 3131 

0 

TCF 

+ l 

0270 

PFF 

2i 

1 AST 

1105 

01,3131 

n 232 

1 

re  s 

priority 

+ 360 

0271 

PEF 

3 

LAST 

1105 

01,3132 

■1  3172 

0 

TC 

FJl 

0272 

RFF 

27 

LAST 

1105 

01,3132 

676  10 

1 

-CeSFR 

-CCS 

priority 

02  73 

•’1,  3134 

1 2135 

1 

TCF 

+ i 

C27A 

RFF 

2F 

LAST 

11C5 

01,3115 

10  247 

1 

CCS 

PRIOR ITY 

+ 4tC 

0275 

PFF 

4 

LAST 

1105 

Cl, 2136 

0 2172 

C 

TC 

EJl 

0276 

RFF 

14 

LAST 

1 105 

01,3137 

0 5675 

0 

TC 

CeSHOLE 

0277 

Cl  ,314C 

1 3141 

1 

TCF 

+ 1 

0278 

REF 

29 

LAST 

1 1)5 

•11,3141 

10  263 

1 

ers 

PRIORITY 

+ 600 

0279 

PEF 

5 

LAST 

1105 

01 ,314’ 

0 3172 

0 

TC 

EJl 

0280 

PFF 

15 

LA  FT 

1 105 

C 1 ,’l 42 

C 5675 

c 

TC 

CrSECLE 

0281 

"1,’144 

1 2 145 

c 

TCF 

6 1 

02E? 

REF 

30 

LAST 

1 10  5 

LI , 1145 

10  27  7 

1 

CCS 

PRICRITY 

+ 72C 

0283 

RFF 

6 

LAST 

1105 

Cl, ’146 

0 3172 

0 

TC 

EJl 

0284 

PEF 

16 

LAST 

1105 

01, 3147 

0 5675 

0 

TC 

CCSHCLE 

0285 

01,3150 

1 3151 

0 

TEF 

+ 1 

0285  1 

RFF 

31 

LAST 

1 105 

01,2151 

10  31? 

1 

CCS 

PRIORITY 

+ 84D 
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L EXECUTIVE 


02852 

REF 

7 

LAST 

1105 

01,315? 

C 

3172 

G 

Tf 

E J1 

02853 

REF 

17 

LAST 

1 10  5 

01,3153 

0 

56  7 5 

C 

TO 

CCSHCLE 

02E5A 

01 , 315/, 

1 

3155 

1 

TCF 

+ 1 

USER’S  PAGE  NO.  12  EO  S3 


gap:  ASSEf'BLF  RFVISION  116  OF  AGC  PRCGRAm  LGMINAPY  BY  RASA  2021H2-C71 

L FxeruTive 


PG286 

EVAL 

LATE 

fHE  RFSLLTS 

CF  THE 

SCAN. 

0287 

REF 

152 

L AST 

1 105 

01,3155 

10  131 

0 

CCS 

8CF  +l 

02E8 

OFF 

18 

LAST 

1106 

01  ,3  156 

0 5675 

0 

TC 

CeSHOLE 

0289 

OFF 

19 

LAST 

1 1C  7 

C 1 , ; 1 5 ■( 

C 5 F T= 

r 

TC 

CCSHCIE 

0290 

01,3160 

1 3162 

0 

TCF 

+ 2 

0291 

PEE 

2 

LA  «T 

219 

Cl ,3161 

1 3207 

0 

TCE 

OURRYJCE 

0292 

REF 

153 

LAST 

1107 

Cl, 3162 

1C  130 

1 

CCS 

BLF 

0293 

01 ,3163 

1 3165 

1 

TCF 

*2 

0299 

REF 

2 

1 * ST 

1 ICC 

01,216' 

1 2 76  5 

c 

TCF 

ENCPRCEG 

0295 

OFF 

363 

LAST 

110  5 

01,3165 

50  000 

1 

INDE  X 

A 

C2S6 

01,3166 

2' 7777 

0 

CAF 

n -1 

0297 

REF 

1 

01,3167 

6 2133 

0 

AD 

-CeSPR 

029H 

RTF 

18 

LAST 

1102 

01, ’170 

59  067 

1 

TS 

NEWJCB 

0299 

REF 

9 

LAST 

1102 

01 ,3171 

1 2 705 

0 

TCF 

CFANJCP 

0300 

REF 

159 

LAST 

lie  7 

Cl, 3172 

59  122 

0 

E J1 

TS 

BLF  *2 

Q3C1 

RFF 

155 

LAST 

1107 

01  ,3173 

6 0131 

1 

AC 

BLF  n 

0302 

REF 

369 

LAST 

1 1C7 

01,3179 

10  OCO 

0 

CCS 

A 

0303 

PFF 

15o 

L "ST 

1117 

01,3175 

9 C 122 

c 

CS 

BLF  *2 

0309 

PEE 

1 

01,3176 

1 3202 

0 

TCF 

E J2 

0305 

C 1 , 3 1 7 7 

13  2CC 

1 

NCCE 

03'<6 

REF 

310 

LAST 

1099 

01 , 3200 

50  002 

0 

INDEX 

0 

0 30  7 

01 ,3201 

0 COO? 

) 

TC 

2 

0308 

REF 

157 

L AST 

1 107 

91, 2202 

59  13  1 

0 

E J2 

TS 

PLE  +1 

C309 

01 ,3203 

0 0006 

1 

EXTEND 

0310 

RFF 

I5f 

LAST 

11C7 

Cl  ,3209 

2 2 130 

c 

GXCF 

ELF 

0311 

RFF 

159 

LAST 

1 107 

01,3205 

50  130 

c 

INDEX 

BLE 

0312 

01 ,3206 

0 000? 

0 

TC 

2 

19:09  AOC  . 11  ,1969 
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LSER' S PAGE  NC.  13  EC  S3 


SEE  IF  TFEFF  ARE  ANY  ACTIVE  JOES  WAITING 


EUF  IS  ?EPC  IF  TMS  IS  A FPICCFNG  ANC 
CHANGED  PPICFTTY  IS  STIIL  FIGFEST. 


CTHEPWISE,  SET  NEWJCE  TC  TFE  RELATIVE 
ACCRESS  r.F  THE  NEW  JOB'S  CCRE  SET. 


- CLC  HIGH  FPICRITY. 

NEW  HIGH  PR  lOR  ITY. 

PROCEED  WITH  SEARCH. 

FOR  LOCATING  CCS  PRIORITY  + > INSTR. 


gap:  ASS^"HLE  RFVISIPN  116  TF  AGC  FPCGR/'*'  LU^INAFY  PY  ^ASA  ^02  11  12-071 
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097  PAGE  lice 


L EXECUTIVE 


USEE'S  PAGE  NG.  lA  E0S3 


P031  A 

ICLTNG  ANT 

f C'^PUTER 

ACTIVITY 

(GRFEN)  LIGHT  MAINTENANCE.  THE 

IDLING  RCLTINE  IS  NCT  A JCE  IN  ITSELF, 

R031  6 

PUT 

RATFER  A 

SL8PCLT1NE  CF  THE  ExECLTI 

VF. 

031P 

REF 

A 

1 AST 

29  1 

1361 

EPANK= 

SELFPET 

SELF-CF'CK  STCRAGE  IN  EEANK. 

03  19 

RTF 

22A 

LAST 

1105 

Cl  , 3207 

A A755 

0 

CLRRY jce 

CS 

ZERO 

SET  NEWJC0  TC  -C  FOR  IDLING. 

0320 

RFF 

19 

LAST 

1107 

C 1 , ? 2 1 0 

5A  C67 

1 

TS 

NFWJCe 

0321 

01,3211 

0 0003 

1 

RFL  TNT 

0322 

RFF 

75 

LAST 

1102 

01  , T212 

A A752 

1 

CS 

TWO 

TURN  OFF  TFE  ACTIVITY  LIGHT. 

0323 

01,321 3 

0 CC06 

1 

extend 

C32A 

REF 

31 

LAST 

1102 

01  ,321A 

03  01  1 

1 

WANT. 

OSALMOUT 

0328 

RFF 

20 

LAST 

1 loe 

01,3215 

1C  C67 

1 

ACVAN 

CCS 

NEW JCE 

IS  A NEWJOE  ACTIVE  ? 

0329 

RFF 

1 

•'1,32  16 

1 3C12 

0 

TCP 

NLCHANG2 

YES...  CNE  PECLIRING  « CHANGE  JCB. 

C33" 

RFR 

76 

LAST 

lice 

01,3217 

3 A752 

0 

CAF 

TW'C 

NEW  JOB  ALREADY  IN  POSITICN  FCP 

0331 

Rcp 

1 

"1,3220 

1 3226 

c 

TCF 

NLDIPECT 

EXECUTION. 

0 3 31  7 

RFF 

5 

LAST 

1108 

01,3221 

3 136  1 

1 

CA 

SELFRET 

0331  E 

REF 

2 16 

LAST 

1105 

Cl  ,3  222 

5A  001 

1 

TS 

L 

PUT  RETURN  ADDRESS  IN  L. 

0332 

RFF 

1 

01,3223 

3 3225 

1 

CAF 

SELFBANK 

0333 

RFF 

5 

LAST 

596 

01  ,322A 

1 5166 

1 

TCF 

SUPDXCHZ  ♦ 1 

AND  DISPATCH  JOB. 

03338 

REF 

6 

LAST 

iloe 

1351 

FBANK= 

SEIFRET 

033A 

REF 

3 

1 AST 

292 

U , 3225 

56102 

1 

SELF6ANK 

BBCCK 

SFl FCHK 

0335 

1 ,3226 

0 00-36 

1 

MJCI P ECT 

EXT  ENE 

TURN  TFE  GRFEN  LIGHT  BACK  ON. 

0336 

REF 

32 

LAST 

1118 

1,3227 

0 5 on 

1 

FOR 

DSALMCLT 

0337 

RFF 

A? 

LAST 

1 lOA 

Ui  ,3230 

52  165 

1 

cxr  F 

LOG 

JCPS  STARTED  IN  this  FASHICN  MLST  BE 

03372 

RRF 

LAST 

1 loe 

"1,3231 

1 '165 

1 

TCF 

SLPCXCHZ 

03376 

5165 

PI  CCK 

2 

IN  FIXED-FIXED  SC  CTFEPS  NAY  USE. 

03379 

RFF 

2 

LAST 

1095  TC 

1098  : 

59  59A 

cruNT* 

J t/EXEC 

R03379 1 

9UPCXCFZ 

- ROUTINE  TO  TRANSFER  TO  SLRERBANK. 

R033792 

CALI  IKG 

'RCLEFCE 

A03379? 

TCF 

SUDOXCHZ 

WITH  2CACR  CF  DESIRED  LOCATION  IN  A + 

0338 

REF 

21  / 

LAST 

1 108 

5 165 

56  COl 

0 

SLPDXCFZ 

XCF 

L 

BASIC. 

C33R1 

5166 

0 000  6 

1 

+ 1 

EXTEND 

03382 

REF 

18 

LAST 

1 102 

■ =167 

Cl  CC7 

1 

FPITE 

SLFER6NK 

03383 

REF 

33 

LAST 

1102 

5170 

5A  006 

c 

TS 

BBANK 

033SA 

ref 

2 18 

LAST 

line 

5171 

0 nool 

0 

TC 

L 

0339 

5 172 

7 7 6 7 7 

1 

NEC,  IOC 

CCT 

77677 
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L WAMLI'T 


ISER'S  PAGE  AO.  1 EO  S3 


CATE  - 10  OCTOBER  1S66 
LEG  SECTION  - V^A  ITL  1ST 
ASSEMBLY  SIABLRST  REV  5 


R00073  WCC  4EY  KFRAAA  (TklCClE  IN  54)  3/2B/6E  SKIPPER  REV  13. 

R0007S9 


ROOOl  PROGRAM  CESCPIPTT^^ 

R0003  PTC  NO  - 2 

RC005  MOn  BY  - KILLER  (OTPAX  INCPEASEC  TC  162.5  SEC) 

R00072  Nine  3 BY  KERNAN  ( INHTMT  TNSEPTEO  AT  KAITIIST)  2/28/68  SKIPPER  REV  4 


P1008  FIJACTICNAl  CESCRIPTTCN- 

ROnoo  PART  TF  A SECTICN  CF  P ROG R A PS , -W A I TL  I ST , TASKOVER,  T3RUPT,  ISED  TC  CALL  A PRCGRAN,  (CALLED  A TASK), 

ROOD  WMCI-  IS  TO  BEGIN  IN  E(A)  CE  N T I S EC  C NOS  . WAITLIST  LPEATES  TIME3,  LSTl  AND  LST2.  THE  MEANING  EE  TERSE  LISTS 

P0013  ECLLCW. 


3" 


I 


R0C14  C(TINE3)  = 16384  -(Tl-T)  G EN T IS ECON C S , (T  = PRESENT  TIME,  Tl-TIME  ECR  TASK!) 

R0016 


ROOl  7 

C (L  S 1 1 ) 

-(T2-T  1 )+  1 

ROOie 

C ( LSTl  n ) = 

-(T3-T2)+l 

R0019 

CaSTl  +2)  = 

-( T4-T3  ) + l 

PCC2F 

R0021 

R0022 

C(LST1  +6 ) = 

-( TE-T7)  + 1 

R 00?T 

C (LSTl  «7  ) = 

-(T9-T8  ) + l 

RO024 

C(LST2) 

2CACP  CF  TASKl 

RO025 

C(LST2  +2  ) = 

2CADR  OF  TASK2 

R0C26 

R00  27 

R002R 

C (LST2  +14)  = 

2CACR  OF  TASKS 

R0C29 

C(L'T2  +16)= 

2CACR  CF  TASK9 

R0030  WARNINGS- 

RCC31  

8003? 

R0033 

R0C34 

R0O35 


1)  1 <=  C(A)  <=  )62S:C  (1  C^NTISECCNC  TC  162.5  SEC) 

2)  9 TASKS  MAXIMUM 

3)  TASKS  CALLEC  LNCER  INTRRRLFT  INEIEITEC 

4)  TASKS  END  BY  TC  TASKOVER 


R0C36  CALLING  SFCUENCE- 


R0C37 

R0039 

R004P 

80041 

R0042 


1 - 1 

CA 

OELTAT  (TIME  IN 

CENTISECCNGS  TC  TASK  START) 

1 

TC 

WAITLIST 

1 +1 

2CACF 

CES  TREE  TASK 

1 +2 

( MINOR 

OF  2CACR) 

1+3 

RFL  INT 

(RETURNS 

EEPE  ) 

R0C421  TMDOLE- 

R0O422  

R0O423 

R30425 


TwIDCLE  IS  FDR  USE  WEEN  TEE  TASK  BEING  SET  DP  IS  IN  TEE  SAME  EBANK  AND  EBANK  A$  TEE  USER.  TN 
SUCH  CASES,  IT  INPRCVES  UPCN  WAITLIST  BY  ELIMINATING  TEE  NERO  FOR  TEE  8PCCN  HALF  OF  TEE  2CADP  , 


GAP:  ASSFI'Bl.F  REVISION  116 

L WAIT!  1ST 


RO0A2  T 

SAVING 

ROOM’ 

! - 1 

P09431 

1 

R0CRP2 

■ L+1 

ROO‘,33 

L + 2 

POL  MS 

NCFMAL  FXT-'  ^-CFES- 

CF  ACC  FFCGRA*'  LUMNARY  pV  NASA  2021112-C71  1S:CS  AuG.  ll,lStS  SKIPPER  .CS7  PAGE  lllC 

LSFP'S  PAGE  NC.  2 EO  S3 

A WORE.  TWICCLE  IS  LIKE  WAITLIST  IN  EVERY  RESPECT  EYCFPT  CALLING  SECUENCE,  7C  KIT- 

CA  DELTA! 

TC  TWICCLE 

ACPt-s  CESiPrr  task 

RELl"’'  (RETURNS  HERE) 


R OOAA 

R0D4F 

RCCA6 

PDDA7 


RTOAP 

R or  AC 
RT050 

ROD  SI 

R005? 

R0053 

RCCSA 

R0055 

RDDS6 


AT  1+3  CF  CALLING  SEGUENCE 
ALARM  CP  ABORT  EXIT  wCOES- 
TC  aeCPT 

nCT  1203  (WAITLIST  CVERFLCW  - TCC  NANY  TASKS) 

ERASABLE  1 MT  1 A L I ZAT  1 C N PFCUIRFC- 

ACCCNPLTSHEC  "Y  FRESH  S T A R T , --LST 2 , . . . , LST2  +16  =ENCTASK 

LSTl  , LSTl  +7  =NFGl/2 

GUT  PUT-- 

LST!  AND  LST2  (.PCATEC  WITH  NEW  TASK  ANC  ASSCCIATEC  TINE. 

CEER  TS- 

CFNtf/SI  S-  a ,C,I 

other  - WAITPXIT,  WAITACR,  WAITTENF,  WAIT6ANK 
CFTAILEC  ANALYSIS  CF  TIMINC- 


P0057  CCNtrcL  WILL  NCT  BE  PETLRNEC  TC  THE  SFECIFIEC  ACDRFSS  (2CACR)  IN  EXACTLY  DELTA  T CF N T I SEC C N C S . 

RD0S9  the  APPROXIMATE  T IMC  MAY  BE  CALCLLATED  AS  FCLLCWS 


RCC6C 
P006  1 
R7062 
ROCto 
R006A 
R0066 
RT0A7 
PO06P 
RT0  69 
R0071 


LET  TC  = THc  TIME  CF  the  TC  WAITLIST 

LET  TS  = TC  +1A7L  + CCLMER  INCPFRENTS  (SET  LF  TIME) 

let  X = TS  -(  lOfTS)  AlOO  (VARIANCE  HRCM  CCLNTEPS) 

LET  Y = LENGTH  CF  TIME  CF  INHIBIT  INTERRUPT  AFTER  T3RLPT 

L = T Z ='  length  CF  TIME  TC  PRCCESS  TASKS  IrHICH  ARE  CUE  thIS  T3RUFT  EUT  CISPATCHED  EARLIER. 

( Z="  , USUAL  LY  ) 

LET  CELTC  = ThR  /CTLAL  time  TAKEN  TC  GIVE  CCNTPCL  TC  2CACR 
then  CELTC  = TS+DELTA  T -X  +Y  +Z  +1.CSNS«‘  +CCLNTERSX< 

*-TH£  TIME  taken  by  HAITI  1ST  ITSFLF  AND  THE  COUNTER  TICKING  DURING  THIS  WAITLIST  TIME. 


R0O72  IN  SHORT,  THE  ACTUAL  TIMc  TO  RETURN  CONTROL  TC  A,  2CADF  IS  ALGMENTEC  BY  THE  TIME  TC  SET  UP  THE  TASK.'S 

R0P7A  INTERRUPT,  ALL  CCUNTERS  TICKING,  THE  T3RUPT  PROCESSING  TIME.  THE  WAITLIST  PROCESSING  TIMf  AND  THE  FCSSIRUITY 

RD076  OF  CTHFR  TASKS  INHIBITING  THE  INTERRUPT. 


0077 


51  t3 


ELOCK  02 


G4P: 


/iSSf^BlE  REVISION  116  CF  ACC  FRCGRA”  LUMINARY  BY  NASA  20iU12-C?l 


1 

RAI T1 1ST 

0078 

OFF 

19 

L A'T 

22  1 

E3,  190C 

EBANK= 

LSTl 

0C7C 

PFF 

1 

COUNT  A 

I 1/WA  IT 

0C795 

5 173 

0 030  9 

C 

TUCCL'^ 

• INHl  NT 

noflc 

REF 

219 

L AST 

HOP 

5 179 

59  VCl 

1 

TS 

L 

OCfll 

pFF 

31 

lAST 

1072 

5 175 

3 9733 

1 

CA 

PCSMAX 

0082 

REF 

3 1 1 

LAST 

1107 

5 1 Tt 

26  C02 

1 

ADS 

C 

0C83 

PFF 

39 

LAST 

1 108 

5177 

3 C006 

1 

CA 

B8ANK 

OCP32 

52C0 

0 0006 

1 

( 

■EXTENT 

PEF 

19 

LAST 

iloe 

52C  1 

C9  C07 

1 

• OCR 

SLFEFEN'K 

CC6A 

REF 

229 

1 AST 

11  11 

52;i? 

56  00  1 

0 

1 

XCF 

L 

008AS 

5203 

C CCC9 

0 

KAITl  1ST 

INF  INT 

0085 

PEF 

312 

1 AST 

1111 

52^9 

56  C02 

n 

XC  H 

Q 

0CF6 

PFF 

1 

5205 

59  061 

1 

TS 

WAITEXIT 

008Y 

52^6 

C 0CC6 

1 

EXTENC 

0088 

OFF 

2 

L AST 

1111 

5207 

5 0061 

0 

iNoe  X 

WAI  TE  XI  T 

0089 

5210 

3 OCOl 

0 

CCA 

0 

0090 

REF 

1 

5211 

59  063 

c 

- 1 

TS 

RAITACR 

COSl 

PFF 

1 

5212 

3 5220 

1 

CL  Y2 

CAE 

WA  ITBB 

0092 

REF 

•3  5 

LAST 

mi 

5213 

56  3 J6 

1 

XCF 

B8ANK 

0093 

srp 

I 

52  19 

1 3 2 32 

r 

TCF 

RAI  T2 

9 0C9A 

RETURN  TF 

CALLFP  after  TASK 

INSERT  ICN  : 

0095 

REF 

3 

1 AST 

1111 

5215 

52  C62 

1 

LVKTLIST 

CXCFi 

RAITEXIT 

0096 

REF 

77 

LAST 

1 108 

5216 

6 9 ?52 

0 

AD 

TRO 

0097 

5217 

5?  006 

o 

CTCe 

0099 

RFF 

15 

L AST 

1111 

E3,  190C 

EEANK= 

L'Tl 

OlOO 

PFF 

2 

1 AST 

111  1 

5220 

32063 

WAITEE 

BBCON 

RIA  IT2 

ROlOl 

RETURN  TC 

CAILFR  +2 

AFTER  RAITING  OT  SFECIFIFC 

AT  caller  ^ 

01  i2 

RFF 

313 

LAST 

1111 

522  1 

53  CC2 

c 

F IXDELAY 

INDEX 

0 

01^3 

5222 

3 0000 

1 

CAE 

n 

0109 

PEF 

319 

LAST 

1 1 1 1 

5223 

29  CC2 

c 

INCP 

Q 

RC105 

RETURN  TC 

CALLFR  +1 

AFTER  WAIT  INC  TFE  ft 

AS  ARRIVING  IN  A. 

0106 

RFF 

315 

LAST 

1 1 1 1 

5229 

56  CC2 

c 

vaoofiay 

XCF 

0 

0107 

PFF 

2 

LAST 

nil 

5225 

59  06  3 

r 

TS 

RAITADR 

01C8 

RFF 

36 

LAST 

nil 

5226 

3 0006 

1 

CA 

BBAN'K 

0109 

5227 

C P0C6 

1 

EXTENC 

0110 

REF 

20 

LAST 

nil 

5230 

09  007 

1 

RDR 

SUFERBNK 

0111 

REF 

221 

LAST 

nil 

5231 

59  001 

i 

TS 

L 

3112 

RFF 

1 

5232 

3 C - 5 c 

0 

CAE 

OELAYEX 

0113 

off 

9 

LAST 

nil 

5233 

59  061 

1 

TS 

RIAITEXIT 

0119 

RFF 

1 

5 239 

1 5212 

i 

TC  F 

DLY2 
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TASK  LISTS  IN  SWITCFEC  F BANK. 

SAVE  EELAY  TINE  IN  L 
CFEATINC  CVERFLCW  ANC  C-1  IN  C 


SAVE  CEITA  T IN  C ANC  RETURN  IN 
RAITEX  IT  . 

IF  TWICCLING,  THE  TS  SKIPS  TC  FERE 
PICK  UP  2CACR  OF  TASK. 

PBCCN  RILL  PEFAIN  IN  L 

ENTRY  FRCM  FIKCELAY  ANC  VAPCELAY. 


BCTF  FCniNES  RUST  BE  CALIEC  UNCEP 
RAITLIST  CCN'TPCL  AND  TERPINATF  THE  TASK 
IN  RF  ICF  TFEY  were  CALIEC. 

CT  TC  C.  TASK  ACRES  TO  RAITACR. 

EEANK  IS  SAVED  DURING  DELAY. 

ALE  SEANK  TC  BdCCN. 

GC  TC  TASKCVFP  AFTER  TASK  ENTRY. 


gap: 

1 


ASSEMBLE  PEVISIC'N  116  CF  AGE  FRfGPAN  LUMNAPY  PY  AASA  2021112-071 
WAITL  1ST 


TASKCVER  -2 


19:C?  AUG,  11,1969  SKIPPER 
USFF’S  PAGE  NO.  A 
RETURNS  TC  TASKCVER 


.097  PAGE  1112 
E2  S3 


nils 


PEF  67  I AST  959 


5235  1 5257  0 CELAVEx  TCP 


GAP: 

ASSFP0LF  RPVl'inN  Ilf  CF  AGC  PPrGRAfc  LU»<IFAFV  BY  FASA  2021112-071 

19:09  AUG.  11, 

19<9 

SKIPPER 

.097  PAGE  1113 

L 

V.AITI  1ST 

1 SEF’  S 

PAGE 

NO.  5 

£3  S3 

POll  e 

pnOTA  5K 

MST 

3E  FfTEPEr 

IN  FTXEC-FIXEC 

so  IT  IS 

C 1ST  INCUISFABLE  PY 

ITS  ACRES  ALCNF. 

0118 

RFF 

16 

LAST 

1 1 1 1 

E3 

190C 

EBANK= 

L STl 

..z 

0119 

PFF 

1 

5236 

72537 

0 

ENOT  ASK 

-2CACR 

SVCT3 

0119 

REF 

1 

5217 

73  7 19 

1 

0120 

REF 

28 

LAST 

920 

5290 

10  076 

1 

SVCT3 

CC  S 

FLA0V.P02 

CPIFT  FLAG 

0121 

RCF 

68 

LAST 

1112 

5 291 

1 

5261 

0 

TCF 

TASKOVER 

0 122 

REF 

69 

LA  ST 

111’ 

5 2 9 2 

1 

52  6 1 

C 

TCF 

TASKCVEP 

0123 

5293 

1 

5299 

1 

TC  F 

♦ 1 

112’  1 

PFF 

•a 

LAST 

223 

5299 

11' 301 

0 

CKIPUSE 

CCS 

IMICACR 

CTN'T  CC  NRCrMY 

IF  SCNECNF  ELSE  IS  IN 

01232 

REF 

1 

5295 

1 

5 2 5 6 

1 

TCF 

SVCT3X 

I NLST AL  L . 

01233 

5296 

1 

525  1 

c 

TC  F 

+ 2 

0123‘ 

RFF 

2 

LAST 

1113 

5 29  7 

1 

5256 

1 

TC  F 

SYCT3X 

01235 

PFF 

3 

LAST 

1113 

5250 

1 

5256 

1 

TC  F 

SVCT3X 

0129 

REF 

1 

5251 

3 

7726 

0 

+ 3 

CAF 

PR  IC35 

CCPPENSATE  FOR  NBC  COFFFICIENTS  CMY. 

0125 

P = F 

25 

LAST 

882 

5252 

0 

5''72 

1 

TC 

NCVAC 

ENABLE  EVERY 

81.93  SECONDS 

0126 

RFF 

6 

LAST 

852 

E3 

1960 

EBANK= 

N8DX 

012  7 

RPF 

1 

5253 

03563 

1 

2CACR 

NBCCNLY 

0 127 

REF 

1 

5259 

19C63 

1 

012R 

REF 

7 : 

LAST 

1113 

5255 

1 

5261 

0 

TC  F 

TASKOVER 

0128  1 
01282 

PFF 

1 5 

LA  ST 

779 

5256 

5257 

f 5221 
00769 

C SVCT3X 
1 

TC 

CEC 

F IXCELAY 
500 

CBLAY 

PAX  CF  2 TI>AES  FCR  IMLZERO. 

01263 

REF 

2 

LAST 

1112 

526C 

0 529T 

1 

TC 

SVCT3 

CHECK 

CP  IFT  FLAG  AGAIN. 

gap: 
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19:09  AUG.  1 1 , 

195  9 

SKIPPER 

.C97  PAGE  lllA 

L 

HiA  )tl  1ST 

USEE' S 

PAGE 

NO.  5 

E3  S3 

P012S 

BEGIN  TASK 

INSFRTICN. 

0 1 3.  > 

01,3232 

EANK 

01 

0131 

RTF 

1 

CCUNT^K 

$t/WAI T 

0 132 

PPP 

1 

01  ,’232 

59 

C62 

1 

l,AIT2 

TS 

WA IT8ANK 

EEANK  CF  CALI  ING  PROGRAH. 

01322 

REF 

316 

LAST 

1111 

01,3233 

3 

CCC2 

0 

CA 

C 

0132A 

01  ,3239 

0 

CC06 

1 

EXTEND 

01325 

RFF 

1 

Cl  ,3335 

6 

3 5 29 

1 

PZMF 

W A ITPCCH 

0130 

FEF 

2 

1 AST 

2 2t 

01 , ’236 

9 

0026 

1 

CS 

TI  YF3 

013A 

REF 

36 

LAST 

1095 

01  ,3237 

6 

9 794 

1 

AD 

8 IT8 

BIT  8 = CCT  2CC 

0 135 

P.FF 

365 

LAST 

110  7 

Cl, 329C 

10 

COO 

C 

CCS 

A 

TEST  200  - C(T  1ME3  ) 

• 

IF  POSITIVE, 

AO  136 

IT  MEANS 

THAT  TIME’  CVERFLCR 

HAS  CCCLRRFC  PfilCR  TC 

CS 

T I NF3 

AND  THAT 

AOl  37 

C (T  INE3  1 

= T - 

T1  , INSTEAD  CF 

l.C  - ( T 1 - T 1.  the 

FCL  LCVtl  NG 

FCLR 

A013H 

ORDERS  SET  C(A) 

=70-11+1 

IN  either  gasp. 

0109 

REF 

2 

LAST 

1091 

ni  ,3291' 

6 

6112 

0 

AD 

OCT9COO 1 

gvepficr  has  ccclrrec. 

SET 

CIA)  = 

0190 

REF 

365 

LAST 

1119 

01  ,’292 

9 

CCCO” 

0 

CS 

A 

T - T 1 + 1.0-  20  1 

R0191 

NCFHAL  CASF  (r(A) 

NNZl  YIELDS 

SAME  C ( A 1 : 

: - ( -(  1 

.f-(  1 1- 

Til  + 2CC)  - 1 

0192 

REP 

1 

Cl ,3393 

6 

3371 

1 

AD 

CCT902O1 

0193 

RPF 

’17 

1 AST 

1119 

C 1 , 3299 

5 

CCC2 

c 

AC 

Q 

RESULT  = TC  - T1  + 

1. 

C199 

PEF 

367 

LAST 

1119 

01 ,3295 

10 

000 

0 

CCS 

A 

TEST  70  - 71  t 1 

0195 

RFF 

1 7 

LAST 

1113 

.1,3296 

6 

1900 

1 

AC 

LSTl 

IF  TC  - T1  POS,  GO 

TO 

KTLST5 

KITH 

0196 

PFF 

1 

■a,  3 29  7 

] 

3211 

(1 

TCF 

lvTLST5 

CIA)  = (TC  - n ) + 

C (L  STl  1 = 

TC-T2+ 1 

0197 

Cl  , 3250 

13 

251 

0 
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C 0003 

1 

RELINT 

0316 

5276 

5 0017 

1 

RESLME 

1S:CS  AUG.  ll.ises  SKIPPER  .097 
LSFF'S  FACE  AC.  13 


FAGE  1121 
E3  S3 


IF  +1  RETURN  TO  T3P.LPT,  IF  -0  FESLPE. 
ClSPATCh  NEXT  TASK  IF  IT  UAS  DUE. 

PFSTOPE  SUPEPEANK  BEFCPE  RESUME  IS  CCNE 
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L 


WA  irt  1ST 


LSEP'S  PAGE  NO.  lA 


E3  S3 


P0317  ICAGCAIL 


R03IP  PPCGPAY  CESCRTPTICN 

R031<;  focgp/im  written  PY  W.F.  VANCFVER 

R037'"  POO  Bv-  P.  PEIANSCN  TC  ACC  C C C LP  EN  T AT  ICN 


CATE-  17  PARCF  19F7 
LOG  SECTION  V.AIU  I ST 


ASSEP6LY  SCNCISK  REV.  ICC 


R032I  FUNCTICNAI.  CESCP  IPT  ICN- 

RU322  LCNGCAM  IS  CALLEC  WITH  THE  CELTA  TI^E  ARRIVING  IN  A,L  SCALED  AS  TIPE2.TIHE1  KITH  THE  2CACR  CF  THE  TASK 

R032A  IMPECIATELY  FOLLCViING  THE  Tr  ICNGCALL.  FCP  EXAPPLE,  IT  PI  IGHT  BE  CONF  AS  FOLICWS  WHERE  TIPFLOC  IS  THE  NAPIE  CF 

R0326  A CD  REGISTER  CONTAINING  A DELTA  TIME  AND  WHERE  TASKTCOO  IS  THE  NAPE  CF  THE  LCCATICN  AT  WHICH  ICNGGALl  IS  TC 
RC32P  START 

R0329  CAILING  SEOUEMCE- 

A0330  EXTEND 

A0331  CCA  TIMgLCC 

AO  332  TC  ICNGCALL 

A0333  2CADR  TASKTCDC 

R03’A  NGPPAl  EXIT  MCDE- 

P033S  n . TC  WA  ITL  1ST 

R0336  2).  CTCe  ITP  L+3  CF  CALLING  ROUTINE  1ST  PASS  THRU  lONGCYCL) 

R0337  3).  CTCB  (TO  TASKGVER  ON  SLRSFCLENT  PASSES  THPL  LCNGCYCL) 

R033R  ALARM  PR  AFORT  fxlT  pCi5F- 
R033S  NONE 

R03A0  OUTPUT- 

R03A1  LCNGTIPE  and  LCNGTIMEU  = CELTA  TIME 

R03A?  LONGFXIT  AND  LCNGEXI-'  + l = RETLRN  2CACR 

R03A3  LCNGCACP  ANC  LCNGCADR-tl  = TASK  2CACR 

PD3AA  A = SINGLE  FPECISICN  TIME  fCR  WAITLIST 

ROTA*^  EPASAPLE  INITIALIZATION- 

P03A6  A = most  significant  PART  CP  DELTA  TIME 

R03A7  L = LEAST  SIGNIFICANT  PAPT  CF  CELTA  TIME 

R03A8  Q = address  OF  2CADR  TASK  VALLE 

R03A9  CE'ERIS- 
P035O  A ,c  ,L 

R03‘il  LCNGCACR  ANC  LCNGCACR-U 

R03S2  LCNGFXIT  ANC  LfNGEXIT4l 

RD3S3  LONGTIME  AND  LCNGTIMF+1 

R0354  ***  the  following  IS  TO  BE  IN  FIXEC-FIxEC  ANC  LNSWITCHED  EPRASIBLE  *** 

03SS  5277  BLOCK  02 

D3S6  RFF  A2  LAST  n 2G  E3.1ACC  EBANK=  LSTl 

03F7  REF  1 5277  S3' 153  0 LCN'CCALI  CXCH  LONGTIME  CBTAI  N THE  DELTA  TIMF 

035E  5300  0 00U6  1 EXTENC  OBTAIN  THE  2CADR 


A 


GAP: 

as'Fhblf 

REVISION  116 

CF  AGC  FPCGRAw  LUMIAAPY  BY  NASA  2021112-071 

1 

WAITL  1ST 

0359 

PEE 

325 

1 AST 

1119 

53)1 

5 0002 

0 

NOX 

Q 

0360 

5302 

3 OOOl 

0 

CCA 

0 

0361 

PEF 

1 

c 3^3 

53*197 

0 

CXCH 

LCNGCACR 

0362 

5 309 

» 0OJ6 

1 

EXTEND 

0363 

fFF 

1 

5305 

3 53fC 

c 

CCA 

LGCL2CCR 

036A 

5306 

52  006 

c 

CTCB 

0365 

PFF 

93 

LAST 

1122 

E3 , 1900 

EBANK= 

LSTl 

0 366 

PEE 

1 

5 307 

03953 

0 

LGCL2CCR 

2CA0P 

LAGCALL2 

0366 

PFE 

1 

5310 

02063 

0 

R0367 

THE 

FOLLOWING  MAY  BE  lA  - 

A SWITCHEC 

6AAK,  lACLUDIAG 

ITS  ERASABLE 

n?6P 

01,3953 

BANK 

01 

0365 

RTF 

2 

LAST 

1119  TC 

1121  : 

195  195* 

COLNT  * 

f 1/WAIT 

037'' 

REE 

I 

01, 3953 

2? ' 935 

1 

LAGCfllL? 

LXCH 

LCAGFX  IT 

+ l 

0371 

REE 

78 

LAST 

1111 

01 , 3959 

3 9 ■(‘=2 

c 

CA 

TWC 

03  72 

REE 

326 

LAST 

1123 

01 ,3955 

26  002 

1 

ADS 

C 

0373 

PEE 

2 

LAST 

112’ 

01,3956 

55*939 

1 

TS 

LCNGEXI T 

037  31 

REF 

2 

LAST 

1122 

01 , 3957 

3 1152 

c 

CA 

LCNGTIME 

0 3732 

REF 

376 

LA  'T 

HIT 

Cl  ,39(jC 

1 0 000 

0 

CCS 

A 

03733 

REF 

1 

01,3961 

1 3967 

c 

TCP 

LCNGCYC  L 

0373A 

01  ,3962 

1 3969 

0 

TCF 

♦ 2 

03735 

REF 

1 

01,3963 

1 3 522 

0 

TCF 

LCAGPCCH 

03  73  6 

REE 

3 

LAST 

1123 

01 , 3969 

3 1153 

1 

+ 2 

CA 

LCNGTIME 

♦ 1 

0373? 

EXTEND 

03736 

PFE 

2 

LAST 

1123  V 

s^l . 3 F 6 6 

6 3 522 

l' 

> 

eZAE 

LCAGPCCH 

R037A 

1 

WA  1 U 15  1 1 ASK  iCf  v'  1 

0375 

01 , 3967 

0 0006 

1 

LCNGCYCL 

EXTEND 

0376 

REE 

1 

01 ,39  7C 

9 3501 

1 

CCS 

DPBIT19 

0377 

PEF 

LAST 

1123 

01,3971 

21*153 

0 

CAS 

LCNGTIME 

0376 

OFF 

5 

LAST 

1123 

01,3972 

U*  153 

0 

CCS 

LONGTIME 

+ 1 

0379 

PFE 

1 

01,3973 

1 3512 

c 

TCF 

MCCHT  TME 

A0380 

A038I 

A0382 

A0363 

A03PA 

0385 

01 , 3979 

. 13  975 

c 

NOOP 

C3E6 

01  ,3975 

1 3976 

0 

TCF 

+ 1 

0387 

RFF 

6 

LAST 

1123 

>•1  , 39  76 

11*152 

1 

CCS 

LCAGT IME 

0388 

PEE 

2 

LAST 

1123 

<J1  , 3977 

1 3512 

0 

TC  F 

MUCHTIMF 

0369 

Cl  ,35CC 

000  )0 

1 

CPPI*  19 

CCT 

OCf  00 

0390 

01,3501 

2Cpr*? 

c 

CCT 

2CC00 

AC3S1 


1S;CS  AUG.  H.lStS  SKIPPER 
USER' S PAGE  NO.  15 


.097  PAGE  1123 
E3  S3 


NCK  GC  TC  the  AFFPOPBIAIE  Sk^HCFEC  EAM< 
FCF  THE  REST  CF  LCNGfALL 


SAVE  Tt-E  CrPP.FCT  PR  FOR  PETLPN 
CFTAU  tee  return  ACCPESS 


CHECK  FfR  LEGITTNATE  CELTA-71RE 

HI-CPCEP  CK  -->  ALL  TS  CK  . 

HI-QRCEP  ZERO  — > CHECK  LC-CRDER. 

HI-CPCER  NEC.  -->  NEC.  CT 

CHECK  LC-CRCEP  FCR  ZEFC  CF  NEGATIVE. 

EAC  CELT/-TIFE.  ABCRT 


CAN  WE  SLCCESFULLY  TAKE  AECLT  1.25 
PINUTES  CFF  OF  LONGTIME 


THE  RFASCNieC  BEHIND  THIS  PART  IS 
INVCLVEC,  TAKING  INTO  ACCOUNT  THAT  THE 
WGRCS  "A'l  ACT  BE  SIGNEC  CCRRECTEC  (CF 
PASIC  INSTRLCTIONS 

Cr  ACT  SICA  CCRRECT)  AAC  THAT  WE  SUETRAC 
TED  BITIF  (I  CVER  half  the  PCS.  VALLE 

p efpesentible  in  single  WCRC) 

CAA:T  GET  HERE  ♦♦««x****+ 


LCAGCALL 


G«P: 


ASSEMBLE  REVISION  116  CF  4GC  FRCrRa^  LUMINARY  BY  NASA  20Z1112-071 


IStCS  AUG.  11.1S6S  SKIPPER  .097  PAGE  112A 


L 

KAI TL  I 'T 

USER'S  PAGE  NO.  16 

E3  S’ 

7392 

RPP 

66 

1.  AST 

1C91 

Cl  . ’502 

3 9 7 36 

1 

LASTTIRE 

CA 

eiT19 

GET 

BACK  THE  CCPPECT  CELTA 

TFOP  WAITLISI 

O’.  Cl 

RFF 

7 

1 AST 

1123 

01 ,39  i3 

27  • 153 

0 

ACS 

LONGTIME  +1 

0395 

RFF 

37 

IA<T 

EES 

Cl  , 3509 

C 52C3 

C 

TC 

WAITLIST 

0396 

OEF 

99 

LAST 

1 123 

F3,  1970 

EBANK= 

L STl 

0397 

REF 

1 

0 1 , 3 57  5 

03517 

1 

2CACR 

GETCACR 

THE 

ENTRY  TC  CUR  LCNGCADR 

0397 

RFF 

1 

C 1 , 3506 

C2C63 

C 

0399 

REF 

1 

01 , 3507 

3 3521 

1 

L ONGRTRN 

CA 

TSKOVCOR 

SET 

IT  IF  SC  that  CNLY  THE 

FIRST  EXIT  IS 

0900 

REF 

3 

LAST 

1 123 

01,3510 

53*  935 

r 

CXCE 

LCNGEX IT 

TO 

THE  CALLER  CE  LONGCAIL 

09  7 1 

01,  ’cil 

52  ':f6 

C 

cTce 

THE 

PEST  APE  TC  TASKOVEP 

0972 

RFF 

67 

1 AST 

1129 

75l  ,^512 

3 9 736 

1 

MUCHT IM  E 

CA 

B IT19 

ViF 

HAVE  CVEP  CUR  ABCUT  1.25 

HINLTES 

0909 

REF 

36 

LAST 

1129 

01,351’ 

C 52C3 

c 

TC 

waitlist 

SC 

SET  UP  FCR  another  CYCLE 

THROUGH  HERE 

0905 

REF 

95 

LAST 

1129 

E3,  19.10 

EBANK= 

L ST] 

C9T6 

REF 

2 

LAST 

1123 

01,3519 

C3967 

) 

2CACP 

LCNGCYCL 

1906 

'1, ’515 

C2C63 

0 

097R 

RFF 

1 

01,3516 

1 3507 

1 

TCF 

LONGRTRN 

NCW 

EXIT  PRCPERLY 

R0909 

***  WAITLIST  TASK  GETCACP  *♦* 

1)910 

REF 

2 

LAST 

1123 

: 1 1 , 3 5 1 7 

5’  ' 197 

0 

GFTCACR 

CXCF 

LCNGC ADR 

GET 

THE  LCNGCALL  THAT  WE  WISHEC  TO  START 

091  1 

71  ,35’7 

52  076 

0 

CTCB 

AND 

TRANSFER  CCNTPCL  TC  11 

0912 

PfF 

71 

LAST 

1113 

FI, ’521 

C5261 

1 

TSKOVCCR 

CFNACR 

T AckCVEF 

0913 

RFF 

9 

LAST 

1129 

01, 3522 

C , 4 7 C 

c 

L ONGPCOh 

DXCH 

L CNGF  XI T 

09  19 

Cl  ,3523 

1 3525 

1 

TCF 

+ 2 

7919 

OFF 

6 

LAST 

me 

01,  ’529 

52  C62 

1 

KAI TFCCH 

CXCH 

WAITEXIT 

.7916 

REF 

2 

LAST 

1C71 

01,3525 

0 5716 

I 

+ 2 

TC 

PCOOOO  1 

09  17 

1 ,352  6 

? 1209 

1 

CCT 

21209 

gap:  flSStPBte  ftEVISIPN  116  CF  AGC  PROGRflP  LUMINARY  6Y  NASA  2021112-071  19 

L LATITUCE  LCNGITUrE  SUeorUTiKpc 

ROOOl  SUPRCLTINF  TP  CCNVEPl  RAO  VFCICR  AT  GIVEN  TINE  TC  1AT,LCNG  ANC  ALT 

ROOO?  CALLING  SEWUENCE 

PC003  L-1  '■AIL 

POOA'A  L LAT-LCNG 

ROOP"^  SUFROUTINES  MSEC 

POCCF  P-TC-RP,ARCTAN,SETGAMMA,SETPE 

R00O7  ERASABLE  TNI^.  RFC. 

',T  ■ 

oonoR  Axr  ,-Avr  ,A7r,TErFEM  (?ft  at  launch  time) 

R0CC9  ALPHAV  ^ PPSITICN'  VECTCR  METEPP  B-29 
POOIY  NFAC--  TIME  (CSECS  B-28) 

ROOIl  ERACPIAG  =1,  TC  CCMFUTE  EARTH  RACIUS.  =0  FOR  FIXFO  EARTH  RACILS 
PI012  LUNAFl AG=0  FOR  FARTH.l  FTP  MCCN 

R0P>13  OUTPUT 

ROriA  lATIUOF  IN  LAT  (R^VS.  P-0  I 

R0015  LONGITUDE  IN  I CNG  (PEVS.  B-0) 

R0016  ALTIT1.CE  IN  AIT  MpTEFS  F-29 


'TOI  7 

30,3762 

eank 

30 

oni  fl 

PFF 

1 

13,2CCr 

SETICC 

LATL  CNG 

O-Yl  c 

13,2391 

EANK 

0020 

R FF 

1 

CCLNTX 

$t/LT-LG 

0021 

RFN 

7 

1 AST 

964 

E4, 1431 

EBANK= 

ALPHAV 

0022 

13  ,2351 

40220 

C 

LAT-LCNG 

STO 

SETPC 

T02^ 

REF 

2 

LAST 

145 

1’, 2352 

C3674 

1 

I NCCR  FEX 

0024 

13,2353 

noool 

0 

00 

0025 

13,2354 

24007 

0 

STCVL 

6C 

0026 

PFF 

0 

1 AST 

1125 

13,2355 

C2C32 

1 

ALPHAV 

0027 

13 ,2356 

51406 

1 

PUSH 

A8VAL 

0028 

REF 

2 

1 AST 

115. 

13 ,2257 

I617C 

1 

STCCL 

AL  PHAM 

0029 

PRF 

6 

1 AST 

1093 

13,2360 

24307 

0 

ZEPCVEC 

CC3T 

13,2361 

71414 

0 

EOFF 

cns 

0031 

REF 

6 

LA  ST 

964 

13,2362 

C1T43 

C 

LLNAFLAG 

003? 

PEE 

1 

13,?363 

26364 

1 

callptrf 

0033 

1 3 ,2364 

77624 

1 

CALLRTPP 

CALL 

0034 

REF 

5 

LAST 

97  1 

13,2365 

5 1677 

r 

R-TC-PF 

OO’B 

13,2366 

77656 

1 

LN  IT 

0036 

REF 

9 

LAST 

1125 

13 ,2357 

26032 

C 

STCALL 

AL  FHAV 

0037 

RFF 

1 

13, 237( 

2655C 

c 

SETGANMA 

CC38 

13 ,237  1 

77624 

1 

CALL 

0039 

RFH 

1 

13, ?272 

2656C 

c 

SETPF 

004*^ 

13, 2373 

63545 

0 

OLCAD 

DSC 

0041 

R = F 

1C 

LAST 

1125 

13,2374 

02032 

1 

ALPHAV 

004? 

13,2275 

63525 

c 

FCCL 

nsc 

CC43 

PEE 

1 1 

LAST 

1125 

13,2376 

02034 

1 

ALPHAV  +2 

0044 

13,2377 

7 54  15 

c 

CAC 

SCPT 

:09  AUG.  11,1969  SKIPPER  .097  PAGE  11 
LSER*  S PAGE  NC.  1 EO  S3 


SAVE  TINE  IN  6-70  FCR  p-TC-RP 
C-SC=  R FCR  R-TC-EP 

ABS.  VALUE  CF  R FCR  ALT  FCRMLLA  BELCH 
SET  NFAC=0  FCR  EA PT H , NCN- 7 EPC  FCR  NCCN 
LSF  CCSm  TC  GET  NCN-ZERC  IN  NFAC 
0=EAPTH,  1=MC0N 


RF  VFCTfP  rCNVFFTEO  FRTN  R B-29 
LNIT  RP  P-1 

U2=  1/2  SINL  FOR  SETRE  SLEP  RFLCH 
SET  CANNA=B2/A2  FCP  earth, =1  FOR  MCON 
SEAL  EC  e-1 
CALC  RE  METERS  B-29 


GAP:  ASSEt-SLP  REVISION  116  CF  AC-C  feCGBAR  LURINAPY  BY 

I lATITUCE  LONGITUCF  SLBPOLTINES 


0CA5 

13 ,2400 

76405 

1 

00A6 

PPF 

1 

13,2401 

CCC  1 1 

1 

004  7 

REF 

7 

LAST 

684 

13, 2402 

14021 

1 

CC4F 

RPP 

12 

LAST 

1125 

13,2403 

02036 

0 

0040 

RTF 

7 

LAST 

584 

13,2404 

34C23 

I 

ooso 

PFF 

4 

1 AST 

584 

13,2405 

26510 

1 

005  1 

PFF 

c 

[.AST 

526 

13,2406 

1512  } 

0 

0052 

REF 

1’ 

1 AST 

1126 

13,2407 

C2032 

1 

0C53 

RFF 

5 

1 AST 

1126 

13 ,2410 

14  J21 

1 

0054 

PFF 

14 

LAST 

1126 

13,2411 

02F34 

1 

0055 

REF 

8 

LAST 

1126 

13,2412 

34023 

1 

0056 

PFF 

c 

LAST 

1126 

13,2413 

26510 

1 

0057 

PFF 

5 

LAST 

526 

13,2414 

15122 

1 

005fl 

PFF 

3 

1 AST 

1125 

13, 2415 

C207O 

1 

0055 

13,2416 

nb25 

0 

0060 

FFF 

2 

LAST 

145 

13,2417 

C36  7 3 

c 

0C61 

PFF 

5 

LAST 

926 

n ,2420 

35124 

0 

0062 

RFF 

Q 

LAST 

112  = 

13,2421 

C3674 

1 

NASA  202 

11  12-071 

15:C5  AUG.  11,1565  SKIPPER  .097 

PAGE 

LSEF'S  FACE  NC.  2 

F4  S3 

CMP 

SLIP 

GARPF 

STOOL 

CCSTH 
ALFHAV  +4 

CCS(LAT)  e-1 

STCALL 

S INTH 
APCTAN 

S IN (L  AT  » e-1 

STCCL 

LAT 

ALPHA  V 

LAT  BO 

STOOL 

crsTF 
ALPHAV  *2 

CCSILCNGl  E-1 

S TC  A L L 

S INTH 
APCTAN 

SIMLCNGI  E-1 

STCDL 

LCNG 

ALPHAM 

LCNG.  REVS  E-0  IN  RANGE  -1/2 

TC  1/2 

CSU 

ERAOR 

ALT=  R-RE  METERS  8-25 

STCALL 

ALT 

I NCCR  FEX 

Exn  FITh  AIT  k’ETEPS  B-25 

1126 


GAP: 


<SSeP9LE  PEVISION  life  CF  AGO  PRCGRAN  LUPIAARY  by  AASA  2021112-C71 


L MTITLCF  tCNGITUDF  SLPPCUTI^FS 


P0063 

StBRCLTINE  TO 

convert 

1 AT,LCNG 

, Al  T AT 

GIVEN  TIRE 

TC  PACIUS  VECTCR 

POONA 

CAl 1 ING 

SFCUEN'CF 

RrC6? 

1-1 

CALL 

R006N 

1 

L ALOTOR V 

RO0N7 

StPROUTlNES  ISEC 

P0C6F 

SETGAPMA , SETPF  ,RF-TC 

-R 

R00N9 

ERASAPL  F 

IN  IT 

. REC. 

RCC7G 

AXC 

,AYG  , AZC 

,TEP|-Fw 

SET  AT  LAUNCH 

T IFE 

R0071 

1 AT 

— 

I.ATITIIOF  (REVS  BOl 

R0P72 

LCNG-- 

LCNGITIICE  (PFVS  60  1 

R007-> 

AL  T — 

ALTITUDE 

(FETEPS 

) E-29 

R007A 

RFAC-- 

T I^E 

( rSECS 

0-2P  ) 

R007  5 

PPACFLAC  =I 

TC  CCNFDTf  FARTF 

RADIUS, 

=0  FOR  FIXED  EARTH  RADIUS 

P0076 

LtNAF|AG=0  FOP  EAPTP 

,1  FCR  ^TCN 

R00  7 7 

OUTPUT 

RCC7P 

R-\PCTCR 

IN  Al PHAV  (NETFFS  E-29 1 

0079 

13, 2A22 

A022C 

C 

L ALQTCRV 

STC 

SETPC 

DOHO 

REF 

A 

L AST 

I 126 

13, 2A23 

0367A 

1 

I NCCRFE  X 

OOP! 

13 ,2A28 

00001 

0 

OC 

)082 

13,2A25 

3ACC7 

1 

stcali 

6C 

0C83 

PFF 

2 

LAST 

1125 

13 ,2A26 

26  5 50 

0 

SETGAFIMA 

OOPA 

1 3 , 2A27 

735A5 

1 

DLCAC 

SIN 

0085 

REF 

6 

LAST 

1126 

13, 2A30 

C1120 

0 

LAT 

CCPF. 

13 , 2A31 

652  75 

1 

CMPR 

POOL 

0087 

PpF 

2 

LAST 

1126 

13, 2A32 

OCOll 

1 

GAPRF 

0088 

PEP 

7 

1 AST- 

1127 

13, 2^,33 

01120 

0 

l.AT 

0089 

13,2A3A 

653A6 

0 

CCS 

PCCL 

0090 

REF 

6 

LAST 

1126 

13, 2A35 

0 1122 

1 

L CNG 

0C9) 

13  ,?A36 

57356 

0 

S IN 

OPPK 

0092 

13 , 2A37 

7 1525 

0 

FCDL 

CCS 

0093 

REF 

8 

L AST 

1127 

13, 2AA0 

Cl  120 

r 

LAT 

CC9A 

13 ,2AA1 

71525 

0 

PCDL 

COS 

0095 

REF  . 

7 

1 AST 

1127 

13, 2AA2 

C 1 122 

1 

LCNG 

0096 

13, 2AA3 

55A75 

1 

DF1PR 

VDEF 

0097 

13.2AAA 

A1A56 

0 

UNIT 

PUSH 

0098 

REF 

15 

LAST 

1126 

13,2AA5 

36C32 

C 

stcall 

ALFHAV 

CCP9 

P£F 

2 

LAST 

1125 

13,2AA6 

26560 

0 

SETRE 

oloo 

13 ,2AA7 

A31A5 

0 

CLCAC 

BCPP 

Oloi 

REF 

7 

LAST 

1125 

I3,2A50 

2A007 

c 

ZERCVEC 

016? 

REF 

7 

1 AST 

1125 

13 ,2A51 

01  7A3 

0 

LUNAFLAG 

0 19  3 

REF 

1 

13, 2A52 

26A5A 

c 

C ALLRFRT 

01  9 A 

13,2A53 

777A6 

1 

COS 

0105 

13  ,’A5A 

7762A 

1 

CALLFPPT 

call 

010ft 

PEF 

6 

LAST 

97C 

13,2A55 

557  16 

1 

R F-TC-R 

C107 

PPF 

16 

LAST 

1127 

13  ,2A56 

16032 

1 

STOCL 

ALPHAV 

010  8 

RFF 

1 

LA  ST 

1126 

13 ,2A57 

02673 

0 

E RAOM 
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LAT.LCNG.ALT  TC  R VECTOR 


6-7C=  TIFF  FCR  RP-TC-P 
GAFPA=B2/A2  FCR  EARTH, 1 FCR  FCCK  E-1 

CCSaONG  iroSfLAT  ) IN  FPAC 
LMT  RF=  SIK  (LCNG  )CCS  (LAT  ) 2-2C 

PD  2 GAFFA*SIK(LAT)  C-IC 

C-1C=  GAPFAASIML  AT  ) e-2 
PC  A 2-3D  = COS(LAT)  B- 1 TENFCRARILY 

PO  2 

PC  A 2-3C=  SINILGING  )CnS  (L  AT  ) 0- Z 

PD  F A-En  = CCS(LATt  R-1  TPPPCRARUY 

PC  A FPAC=  CCS(LCNG)CCS(LAT ) 0-2 
0-5C=  UNIT  RP  FCP  RP-TC-P  Step. 

/ILPFAV  <9=  SIM  FCP  SETRE  SUER. 

RE  PET'^RS  B-2S 

SET  PFAr=T  POP  EARTH, NCN-ZERC  FCP  PCCN 


L9E  CCS(C)  TC  GET  NCN-2EPC  IN  PPAC 
EXIT  with  unit  R VFCTCR  in  PPAC 


^J^P:  ASSEMBLE  BEVISI^^  116  CF  4GC  PPCGP4''  LUMNAFY  6Y  6AS6  20211  12-071 


19:0';  AUG.  11,1969 


SKI PPEP 


097  fflGF  1128 


LATITUCE  LONCITIIOF  SUPPOUT  INF  S 


LSEF'S  PAGE  NC. 


0109 

1 3,2460 

74215 

1 

CAC 

V >SC 

(PE  <•  AIT)  (LMT  R)  NETEFS  E 

0110 

PFF  6 

LAST  1126 

13,2461 

Cl  124 

1 

ALT 

0111 

RFF  17 

LAST  1127 

13, 2462 

02032 

1 

ALPHAV 

01  12 

13,2463 

7 777? 

0 

VSL  1 

D METERS  5-29 

0113 

PFF  18 

LAST  112P 

13,2464 

36C32 

C 

STCALL 

ALPHAV 

EX  IT  V.  IT  F R IN  meters  E-29 

OIK 

RFF  4 

LAST  1127 

13,2465 

036  74 

1 

INC DR  PE  X 

ROUE 

SUBRPLTINF  TO  CPPFLTF 

earth 

RADIUS 

PO  1 1 6 

INPUT 

P.0117 

1/2  S 

IF  L''T  IN  ALFFAV  «4 

Rone 

OUTPUT 

ROl  K 

fabtf 

PAniUS  IN  FRAFM  AND  1 

MFAC  C3ETERS  B- 2 9 ) 

0120 

13,2466 

63545 

0 

GETER  AC 

CLOAC 

DSC 

0121 

PFF  19 

LAST  1128 

13,2467 

C2C36 

C 

ALFHAV  *4 

S IN**2  (L  ) 

0122 

13,2470 

44352 

0 

SL  1 

BOSU 

0 123 

REF  1 

13,2471 

24  J05 

1 

CPl/2 

crs**2(L  ) 

012P 

13,2472 

44  27E 

1 

CPFR 

BCSL 

012E 

RFF  1 

13  , 2473 

26507 

1 

EF 

0126 

RFF  2 

1 AST  112E 

13 , 24  74 

2 400  5 

1 

DFl/2 

0127 

13, 2475 

75465 

1 

BODY 

SCPT 

0128 

RFF  1 

13 ,2476 

26503 

0 

82XSC 

0129 

13,2477 

77622 

1 

SR4R 

0130 

RFF  4 

LAST  1127 

13,2500 

03673 

0 

STORE 

FPADP 

OK! 

13,2501 

7 7616 

0 

FVC 

ROni  1 

TFF  FCUrwiNG  CONSTANTS  KERF 

COPPLTEO  1 

kith  A=63 

78166  , E = 

63E67E4  YfTFPS 

R01312 

B2>Sr=  1 

!**2  SCALEC  P- 

51 

RO  K I 3 

B2/A2=  B**2/A**2  SCALED  B- 1 

R01319 

EF=  ( 1-E9*?/A9*? 1 SCALFO  B- ) 

013? 

13,2502 

00446 

1 

E2XSC 

2CEC 

.0179450689 

b**2  SCALEC  8-51 

0132 

13,2503 

CC3CE 

1 

0133 

REF  8 

LAST  1093 

12,2004 

CPl/2 

= 

XUM  T 

0139 

13  ,2  504 

1771  1 

0 

P2/A2 

2CFC 

.9933064884  P-1 

GAMMA=  R4X2/A442  B- 1 

0134  • 

13,2505 

05  2 54 

1 

0135 

13  ,2506 

00155 

0 

EE 

2CEC 

6 .693  EU6  E-3 

( l-B  + 42/A**2 1 e-c 

0135 

13,2507 

2E250 

1 

EA  S3 


iSSEI'BLP  REVISION  lit  CF  «GC  FPCGPa*-  LLRI^^FV  FV  M>£t  20211  12-071 


gap: 

L L4T1TIJCE  I^^GITUDF  SUBPCUTINFS 

PC137  ftRCT44  $LBRCLTIFE 


P013B  CALLING  SEOl/FMCF 

P01B<3  SIN  THFT4  TM  SINTh  R-1 

ROiAo  res  THFTA  u rc'iH  e-i 

ROlAl  CALL  4RCTAN 

P 0 1 A ? C IJ I F L 1 


ROl  A3 

ARC  TAN 

THETA 

IN  1 

RPAC  AAD  THEl 

f*  e-0 

IN 

RANGE  -1/2  TC 

+ 1/2 

OlAA 

13, 25U; 

7 7600 

1 

ARCTAN 

Bnv 

ClAB 

REF 

1 

13,2511 

26512 

0 

CLROVFLW 

91A6 

13,2512 

63  545 

r 

CI  PQVFL  F 

CLCAC 

DSC 

01A7 

REF 

9 

LAST 

1126 

13,2513 

C0023 

0 

SINTH 

niAP 

13,251A 

63525 

0 

FCCL 

DSC 

01A9 

REF 

9 

L AST 

112f 

13,2515 

CC021 

1 

CCSTH 

CISC 

13,2516 

77615 

0 

CAC 

0151 

13,2517 

75A5A 

c 

ezF 

SGPT 

0152 

REF 

1 

13,2520 

26  5 36 

c 

ARCTANXX 

0153 

13,2521 

40065 

n 

BDOV 

60V 

ni  5A 

RFF 

m 

LAST 

1125 

13,2522 

fI0C23 

c 

SINTH 

015S 

RFF 

1 

13,2523 

26543 

1 

A TAN=90 

0156 

13 ,252A 

6 7542 

0 

SRI 

AS  IN 

0157 

pff 

A 

LAST 

935 

13,2525 

CC025 

0 

STCPE 

THFTA 

Cl  5F 

13,2526 

50125 

1 

PCDL 

BHN 

0155 

REF 

10 

LAST 

1125 

13,2527 

00021 

1 

CCSTF 

0160 

PFF 

1 

13,2530 

26  532 

1 

NEGCCS 

0161 

13 ,2531 

43545 

1 

CLCAC 

RVC 

0162 

13,2532 

5754  5 

1 

NEGCCS 

CLCAC 

CCCNF 

0163 

13,2533 

43244 

1 

BPL 

DAD 

016A 

RFF 

1 

13,253A 

26540 

1 

NFGCUT 

0165 

■ REF 

3 

LAST 

1128 

13,2535 

240G5 

1 

oFi  n 

0166 

PFF 

F 

LAST 

1125 

13,2536 

000  25 

0 

APCTANXX 

STORE 

TFFTA 

0167 

13,2537 

776  16 

c 

PVC 

0168 

13, 25AO 

52025 

1 

NEGL7L  1 

DSL 

GCTC 

0165 

REF 

A 

LAST 

1125 

13,2541 

24005 

1 

OPl/2 

0170 

pep 

2 

LAST 

1125 

13, 25A2 

26536 

c 

ARCTANXX 

0171 

13,25A3 

75345 

1 

ATAN=90 

DLCAO 

SIGN 

0 172 

RFF 

1 

!3,25AA 

11021 

1 

LCCPl/4 

0173 

REF 

1 1 

LAST 

1125 

13,25A5 

CCC23 

0 

SINTH 

Cl  7A 

REF 

6 

LAST 

1 1 29 

13,2546 

OC025 

0 

STORE 

TFETA 

0175 

13,2547 

77616 

c 

FVC 

0176 

RFF 

2 

LAST 

93  1 

12,2006 

2CZFR0 

OFZFPC 

19:09  AUG.  11 
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ATAN=0/n  SET  TFETA=n 


GAP:  A<:SEPBLe  ofvISIOM  lU  CF  AGC  PRCGRAP  LUPINAPY  PY  NASA  20211  12-071 

L LA1IUDE  LCNGITLCF  SLPBCUTINES 

P0177  SETGAMMA  SLBRCUTINF  

R0178  SUEBOLTINE  TO  S FT  GAN^A  FCR  TFE  LAT-LCNG  AND  LALOTORY  SLBRCUTINE 


R0179 

r,AP«A 

= B*A2/A*<‘2  FCR  FfOT(- 

POIBO 

GAP'^A 

= 1 FCR  PCCN  (P-ll 

ROIFI 

CAU  ING 

SECLENCE 

R0182 

L 

CALL 

RO  1 R 3 

1 41 

S FT  GAMMA 

ROIEA 

INPLT 

ROlPR 

LLNAFLAG  = 0 FOP  EARTH, = 1 FCR 

P.OIRN 

OUTPUT 

RC1R7 

GAPPA 

IN  GAPPP  (8-1) 

OIRR 

13,2550 

01  89 

REF  1 

13  ,2551 

0190 

REF  8 

LAST  1127  13,2552 

0191 

REF  1 

13,2553 

CIS? 

13 ,255A 

Oia? 

RFF  1 

13,2555 

OIRA 

RCF  3 

LAST  1127  13,2556 

0195 

13,2557 

0196 

0010 

(8-1  ) 


POON 


A3  1 A5 

0 

SETGAPpa 

CLCAC 

8CFF 

26505 

0 

B2/A2 

017A3 

c 

LLNAFLAG 

26  556 

c 

SETGPEX 

77735 

0 

SLOAC 

2AOC5 

1 

1 81 

COCl  1 

1 

SFTGMEX 

STORE 

GAPRF 

77616 

0 

RVC 

GAPRF 

= 

RC 

19:09  AUG.  11,1969  SKIPPER 
ISEP'S  PAGE  NC.  6 
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8PANCF  FCR  F/SFTF 
EARTH  GANPA 


PCCN  GAPPA 


G4P:  eSSfcPPLe  REVISION  116  CE  PGC  FRCGfiA*<  LUMINARY  BY  NASA  20Z1112-C71 
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I LAYIUDE  irNGITUOr  SUPRriTINES  LSER'S  PAGE  NO.  7 E<  S3 

P0197  SFTRF  SUPROUTINF  

R0198  SLPPCUTINE  TC  SET  PE  (EAFY|-  qR  yqcN  RACIUS) 

P0l<5Q  of=  t>t*  FOP  wPON 

Rf)?')>  PF=  PPFF  FOP  FIvEC  FAPTf  RAO  lUS  OR  COMPITcq  RF  FOR  FISCHER  EllIFSriD 

R0201  CAI lING  SECUENCF 

R02O2  I CALL 

R0203  !♦!  SETRE 

R020A  SLBRnLTINFS  IJ9EC 
R0205  CETEPAC 

R02CF  INPLT 

P0207  EPA0FLAG=0  FOR  FIXED  RF,  1 FCR  CC^FLTEO  EE 

R020R  ALPFiV  4A=  1/2  S INI  IF  GET'^RAC)  IS  CALLED 

R0209  LLNAFtAG=i  FOP  FARTF,=1  FTP  FCCN 

R02n  OUTPUT 

R0211  EPACR=  5U9RN  FTP  RCCN  (METERS  E-29) 

R0212  ERAOR=  ERAO  OR  CCRFLTEL  RF  FCR  EARTF  (WETERS  B-29) 


0213 

1 3, 256f‘ 

71220 

1 

SETRE 

STC 

CLCAC 

021  A 

Pt'F 

1 

13,2561 

0C051 

0 

SETRE > 

0219 

RFF 

1 

13,2562 

1000  3 

C 

50ARM 

0216 

13,2563 

7121A 

C 

BON 

ni  CAD 

EPANCF  FCR 

YCCN 

0217 

REF 

9 

LAST 

1130 

13 ,256A 

01  70  3 

1 

LUNAFLAG 

0218 

RFF 

1 

13,2‘^65 

26575 

1 

TSTRLSPF 

021  9 

OCF 

1 

13,2566 

10001 

1 

EPAO 

022ET 

13,2567 

A501  A 

0 

ECFF 

CALI 

EPACFLAG=D 

FOR  FIXED  RE,1  FCR  CCRFLTEC 

0221 

RFF 

A 

L AST 

965 

13,257C 

00  7A? 

c 

EPADFLAG 

0222 

PEF 

1 

13  ,2571 

26573 

1 

SETRXX 

0223 

REF 

1 

1 3 ,2572 

26A66 

1 

GETEPAO 

022A 

RFF 

9 

LAST 

1128 

13,2573 

376  7? 

1 

SFTR  X > 

STCALL 

ERADR 

EXIT  V.ITF 

RE  CR  RR  RETEPS  E-29 

0229  • 

REF 

2 

LAST 

1131 

I 3 ,?57A 

00051 

0 

SETRFX 

0226 

13,2575 

7721A 

0 

T STRL  SRR 

PCN 

VICAC 

EP/rFLAG=D 

, SET  RO=Pl S 

0227 

REF 

5 

L AST 

1 1-31 

13,2576 

00  70  2 

1 

ERADFLAG 

= 1 

PO  = RR 

0228 

RFF 

2 

LAST 

1131 

13,2577 

26573 

1 

SETRXX 

0229 

RFF 

lA 

LAST 

97A 

13, 260C 

02023 

1 

RLS 

0230 

13,?6:u 

6ARA6 

0 

ABVAL 

SR2R 

SCALE  EPr'< 

e-27  TC  B-29 

0231 

13,2602 

776  5C 

1 

GCTC 

0232 

PEF 

3 

L AST 

1131 

13,2693 

26  573 

1 

SETRXX 

0233 

REF 

12 

LAST 

963 

005  1 

SFTREX 

= 

S2 

G4P:  4SSEPSLf  BFVISIfiN  116  TF  AGC  FRCGP4B  LUBIN^CY  EY  N'flSA  2C21112-071  1S:C9  AUG.  Il,19f9  SKIPPER  .097  FACE  1132 
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POOni  RF-TC-Q  SUEECUTINF  

RCC02  SLBROLTIKF  TP  CPKVERT  RF  (V^CTPR  IK  PLAKETAPY  CCrPTINATE  SYST EM , E IT  PER 
P00P3  EAPTh-FIXEC  PR  MrCN-FIXEO)  Tf  P (SAME  VECTOR  IK  THE  BASIC  REF.  SYSTEM) 

P0PC9  P=MT  ( 1 )♦ ( RF  + I PXPP  ) MT=  M MATRIX  TRANSPCSE 

R00P5  CALLING  SFOUENCF 

P00P6  I CALL 

RQ007  L*1  Rf-TC-R 

ROO'IR  SUBROUTINES  USEP 
R00P9  EARTFMX  ,MCCKMX,EAFTK 

ROOlO  ITEMS  AVAILARLF  FRCM  I.AUKCF  DATA 

ROOll  509I.M=  THE  LIERATIOK!  V‘^''TCR  L OF  THE  MCCK  AT  TIME  7 I M SUB  L , E XPR  F S S E C 

PCfll2  IK  THE  MCPK-FIXEC  CECRC.  SYSTEM  FAUANS  EO 

RJOl’  ITFMS  NEPESSAPY  FPR  SLBP.  used  (SEE  CESCRIFTICK  CF  SUBR.) 

POOIR  I KELT 

R0O5  MPAC=  n FOR  EARTH  .KCK-ZERC  FCR  MCCN 

P0016  0-50=  PP  VFPTOR 

R0017  6-7E=  TIME 

P.OSlP  CUTPL1 

R')0I9  MR4C=  R VECTOR  METERS  B-29  FCR  EARTH,  B-27  FCR  MCCK 


0C20 

REF 

1 

26 ,2000 

SETLOC 

PLANT  IN  1 

0021 

26,3716 

BAKK 

0022 

RPF 

2 

LAST 

52  TC 

154: 

18 

IE* 

C0LK7* 

St  /LLRCT 

0023 

26,3716 

46020 

1 

PF-TC-R 

STC 

BFIZ 

0024 

REF 

1 

26,^71? 

CCC5C 

1 

RFPEX IT 

0'l?5 

REF 

1 

26,3720 

55  733 

0 

RPTORA 

0026 

26,3721 

77624 

1 

CALL 

COMPUTE  M MATRIX  FOR  MOON 

0027 

REF 

1 

26,3722 

5 172? 

1 

MCCK'MX 

LF=IM  FCF  MCCK  PACIANS  PC 

CC28 

26,3723 

77775 

1 

VtOAC 

0C29 

REF 

I 

26,3724 

02013 

1 

504LM 

0030  ■ 

26, 3725 

5 3 23  5 

0 

RPTORB 

VXV 

VAD 

CC31 

RPF 

1 

20,3726 

00001 

0 

504RPR 

1032 

RFF 

2 

LAST 

1132 

26,3727 

OCCCl 

C 

5 04  R F P 

0033 

26, 3730 

52105 

1 

VXM 

GCTC 

0034 

REF 

1 

26,3731 

O0025 

C 

MMATP  IX 

MPAC=P=MT(T)*(RP+LPXRP) 

0035 

REF 

1 

26,3732 

5 17  15 

0 

P FRPXXXX 

RESET  FUSFLCC  TC  0 BEFCRE  EXITING 

0036 

26,3733 

77624 

1 

RPTORA 

CALL 

EARTH  CCMPLTATICKS 

0037 

RPF 

1 

26,3734 

55743 

1 

EAPTHMX 

M MATRIX  E-l 

0038 

26,3735 

77624 

1 

CALL 

CC39 

RPF 

1 

26,3  7 36 

1 5 76  1 

0 

EARTHL 

L VECTCR  RACIAKS  SO 

0040 

26, 3737 

76521 

c 

MXV 

VSLl 

LP=m(T)*L  PAC  E-0 

0041 

REF 

2 

LAST 

1132 

26,3  740 

00025 

0 

M«<ATPI  X 
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00A2 

00A3 

RFF 

1 

26.3741 

26.3742 

7765C  1 
55725  1 

GCTC 

R PTORB 

OOA32 

rff 

1 

2A,2000 

SETLCC 

PLANTIN 

0O43A 
0043  6 

RFF 

1 

24,3677 

BANK 

COUNT* 

$$/llrot 

GUP: 


ASSFf'BLF  PEVISICN  lit  CF  A GC  FRCGBAF  LUFIAAPY  BY  AASA  2021ll?-071 
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pocAA  p-TC-pp  SLPPrfnsF 

R0O45  SUPROLTINF  TO  CONVERT  R (VECTCR  IN  REFERENCE  CCCRC.  SYSTEM)  TC  PP 
R0HA6  (VECTCR  IN  PLANETARY  COOPC  SYSTE«(  EITHER  EARTH-FIXED  CR  MOCN-FIXtC 

R00A7  PP  = H (T  )♦ ( P-LXR) 

R00A8  CAM  ING  SEOLFNCE 

POCAR  I CALL 

R005C  L+1  P-TC-RP 

RJOf'I  SLEP'^UTINPS  USED 

RCC52  PAMhHX  ,ROCNPX  .FARTHL 

R0053  INPUT 

POGBA  HFAC=  T fop  FART H .NCN-ZERC  FCP  HOON 

ROOE=  C-'50=  R VECTCR 

ROOSiS  6-7r=  time 

R0C57  items  AVAII  able  FBCM  lAlJNCH  DATA 

ROOBfi  50ALM=  THF  LIBRATICN  VECTC®  L CP  THE  HCCN  AT  TIME  T IM SUBL  , E XPR E SS E C 

R0089  IN  THE  MOnN-FIXEC  CCCRO.  SYSTEM  RADIANS  80 

ROCtC  ITEMS  NECESSARY  Prc  SUEPCUTINES  USEC  (SEE  CESCRIPTICN  OF  SUBR.) 


R0061  OUTPUT 

R90N2  MPAC=PP  VECTCR  METERS  P-29  FCR  EARTH,  8-27  FCR  MCCN 


0063 

74 , 3677 

46020 

1 

R-TO-PP 

STC 

PH  I 7 

0064 

RFF 

2 

( AST 

1132 

24, 3700 

CC'-SO 

1 

PPPEXIT 

0C6S 

PFF 

1 

24,3701 

5172  1 

1 

RTDRPA 

0066 

24,3702 

77624 

1 

CALL 

0067 

REF 

2 

LAST 

1132 

24, 3703 

51727 

1 

MCCNMX 

CC6B 

24, 3 7- 14 

61375 

1 

VLOAO 

VXN 

0069 

REF 

2 

LAST 

1132 

24, 37C5 

02013 

1 

504LM 

LF=LM 

007tl 

PEE 

3 

LAST 

1132 

24, 3706 

00025 

0 

MMA  TPI X 

00  71 

24,3707 

77772 

0 

VSL  1 

L=MT(T  )XLP  RADIANS  BC 

0072 

24, 3?  1C 

51225 

1 

RTORPP 

VXV 

8 VSL 

CC73 

REF 

3 

LAST 

1132 

24,3711 

00  001 

0 

5C4RPR 

0074 

ref 

4 

LAST 

1I3A 

24,3  712 

0000  1 

0 

504RPP 

0C7S 

24, 3-713 

7 7 72  1 

c 

MXV 

M(T)*(P-LXP|  E-2 

rc7t. 

REF 

4 

LAST 

1134 

24,3714 

00  02  5 

0 

MIMATRIX 

0077 

74,3715 

4C372 

c 

PPROX  XXX 

\SL1 

SETPC 

0078 

24, 3716 

OCOOl 

0 

00 

0079 

24,3717 

77650 

1 

GCTC 

0080 

9EF 

3 

LAST 

1134 

24, 3720 

0CG50 

1 

RFRFXIT 

OCFl 

24 ,3721 

77624 

1 

PTCIRP  A 

CALL 

EARTH  CCMFLTATICNS 

0QB2 

RFF 

2 

LAST 

1132 

24,3722 

55  743 

1 

EAPTHMX 

0083 

24, 3723 

77624 

1 

CALL 

0CP4 

REE 

2 

LAST 

113? 

24,3724 

15761 

0 

FARTHL 

0088 

24,3725 

7 765C 

1 

GCTC 

mpac=l=(-ax,-ay,o)  pad 

0086 

REF 

1 

24, 3726 

5171') 

0 

RTCRFB 

EO  S3 
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PACE  1135 
FO  S3 


RCC9A  INPLT 
R0F95  6-7C=  TIMF 

R0O96  ITEMS  AVAUAPLE  FPCM  IAijnCF  CATA 

RCC97  BSLBC.BDCT 

R0098  T IMSURC.NOOIC.NOCCOT, FSUBC  .FCCT 

R0099  CCSI=  CCS!  I)  P-1 

R0100  SIN1=  SINI  I ) P-1 

Rnm  I IS  the  angle  between  the  mean  lunar  EOLATORIAL  plane  ANO  the 

R01C2  plane  of  THF  ecliptic  (1  CEGRFE  32.1  MINUTES) 

R01O3  OUTPUT 


RCl'iA 

mmat  P 1 X 

= 3X3 

w “ATRTX  H-1 

ISTCRFC 

IN 

VAC  ARRAI 

QlOE 

2A.3727 

4C220 

0 

"CCNMX  STC 

S ETPC 

0106 

REF 

1 

2A,373C 

0CC5  1 

0 

F APTHRXX 

C1C7 

24,3731 

000  11 

1 

BD 

0108 

24,3732 

77770 

1 

AXT.l 

e PECUIRES  SL  0, 

SL  5 IN  NEWANGLE 

0M9 

24,3733 

C0C05 

1 

5 

Clio 

24  ,3734 

65345 

0 

CLCAC 

PCOL 

PO  100 

8-90=BSLBC 

0111 

RFF 

1 

24,3735 

14C17 

1 

Bsuec 

10-11C=  SCOT 

0112 

RFF 

1 

24,3736 

1401  1 

1 

BDCT 

0113 

24 ,3737 

45006 

0 

PUSH 

CALL 

PC  12C 

OllA 

RFF 

1 

24,  ’740 

5 3 7 1 2 

c 

NEWANGLE 

EX  IT  N ITH  PC  8C 

ANC  MFAC=  e REVS  BC 

01  1 5 

24,3741 

71406 

0 

PUSF 

COS 

PD  IOC 

0116 

REF 

1 

24 ,3  74  2 

1404  1 

1 

STCCL 

cce 

PC  8C  CCS ( E 1 

e-1 

0117 

24,3743 

77  756 

r 

SIM 

S IN  I P I 

P-1 

nil  f 

REF  ■ 

1 

24  ,3744 

14043 

0 

STOOL 

SCB 

SETUP 

INPUT  FCR  NEPANGLE 

0119 

REF 

1 

24,3  74  5 

1401  5 

0 

FSUBC 

8-SC=FSU80 

0120 

24,3746 

41525 

0 

POOL 

PLSH 

PC  IOC  THEN  120 

10-1 1C=FCCT 

0121 

REF 

1 

24 ,3747 

14007 

0 

FCCT 

012? 

24 ,3  75T 

45170 

0 

AXT,1 

call 

F RECUIRFS  SL  1, 

SL  6 IN  NFWANGLE 

C123 

24  ,3751 

OC004 

0 

4 

012A 

REF 

2 

LAST 

1 1 ’E 

24,3752 

53712 

c 

NEWANGLE 

EXIT  WITH  PC  EC 

ANC  MPAC=  F REVS  EC 

0125 

REF 

1 

24,3753 

14027 

1 

STOOL 

AVECTR  +2 

SAVE  F TEMF 

C126 

REF 

1 

24  ,3  754 

14013 

0 

NODin 

8-50=NCDIC 

0127 

24,3755 

41525 

c 

FOOL 

PLSH 

FC  IOC  THEN  12C 

10-  1 1C=N0CDCT 

012H 

RFF 

1 

24,3756 

14005 

1 

NCPOCT 

mpac=t 

C129 

24,3757 

45170 

r 

AXT  , 1 

CALL 

NCCE  REQLTRES  SL 

0,  SL  5 IN  NERANGLE 

013(1 

24, 376C 

0000  5 

1 

5 

0131 

REF 

0 

LAST 

1135 

24,3761 

53712 

0 

MEWANGLE 

EXIT  HTH  FD  FC 

ANO  MF/C=  NCri  FEVS  EO 

G«P: 
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0132 

29, 3762 

719C6 

C 

FLSH 

CCS 

FC 

IOC 

8-9C=  NCCI  PEVS  EO 

0133 

29,3763 

77606 

1 

PUSF 

PD 

12C 

K-11D=  CCSINOCI  1 e-1 

013A 

RFF 

2 

1 AST 

1135 

29 , 3769 

O0C25 

f 

5TCPE 

A VECTR 

0135 

29,3765 

7690  5 

1 

CPP 

SLIP 

0136 

REF 

2 

LAST 

1135 

29,t?66 

00091 

1 

CCB 

CCSINCCII  B-l 

0137 

PEF 

1 

29,3767 

19035 

1 

STCCL 

BVFCTC  *2 

FC 

IOC 

2C-25C=AVECTR=  COB* S IN ( NCO I ) 

01  3fl 

29, 3770 

76905 

1 

DMP 

SLIP 

SCE*S  IN (NCC I ) 

0 1 39 

RFF 

2 

LAST 

1135 

29,3771 

0CC93 

0 

see 

0 1 '.1 

RFF 

2 

L AST 

1136 

29,3772 

19C37 

c 

STCOL 

BVFCTF  +9 

FC 

8C 

0 1 A1 

29,3773 

91556 

1 

S IN 

PUSH 

PC 

IOC 

-siMNccn  e-1 

0192 

29,3779 

5 2376 

1 

CCCPP 

GCTr 

26-31C=BVECTR=  CCV*CCS(NCDI) 

'193 

PFF 

1 

29, 3775 

53633 

1 

PCCNPXA 

01975 

25,3633 

BANK 

25 

01976 

RFF 

1 

25,2CCC 

SFTICC 

PLANT  IN3 

01977 

25, 3633 

BANK 

C197f 

R'^F 

1 

COUNT  * 

n/LUROT 

0 198 

RAF 

3 

LAST 

1136 

25,3633 

1903  3 

1 

PCCNPYA  STCCL 

BVECTP 

FC 

3C 

S08*CCS(NCCI ) 

01981 

PFF 

3 

LAST 

1136 

25,3639 

00027 

1 

AVECTR  <-2 

MOVE  F 

FRCP  TFPF  LCC.  TC  509F 

01982 

RFF 

1 

25,3635  . 

19C07 

0 

STCCL 

509F 

01983 

25,3636 

769C5 

1 

CPF 

SLIP 

C19E9 

RFF 

3 

1 AST 

1 1 36 

25,3637 

00091 

1 

CCB 

01985 

RFF 

9 

LAST 

1136 

25,3690 

19027 

1 

STCOL 

AveCTP  +2 

0199 

PFF 

1 

25,3691 

OCC  1 1 

1 

SINNCOI 

8-' 

9C  = S1MNCCI1  e-1 

0150 

25,3692 

76905 

1 

CMP 

SLIP 

0151 

REF 

3 

1 AST 

1136 

25,3693 

0CC93 

c 

SCP 

0152 

PFF 

5 

LAST 

1136 

25,3699 

19031 

0 

STOOL 

AVECTR  +9 

0 

J153 

REF 

1? 

LAST 

F9  7 

25,3695 

06529 

1 

H16ZEPCS 

P-  130=  CVECTR=  -SCB  R- 1 

M 59 

25, 3696 

57525 

1 

POOL 

OCCPP 

FC 

IOC 

cce 

C155 

PEF 

9 

LAST 

1 1 36. 

25,3697 

00093 

0 

SCB 

0156 

25 ,365C 

63325 

0 

FCCL 

PCVL 

FC 

12C 

TPEN  PC  19C 

0157 

RFF 

9 

LAST 

1136 

25,3651 

0009  1 

1 

CCB 

Cl  5 E 

RFF 

9 

L APT 

1136 

25,3652 

00033 

1 

BVFCTP 

0159 

25,365? 

63361 

0 

vxsr 

PCVL 

FC 

20  C 

evECTR*SlNI  B-2 

0160 

REF 

1 

25, 3659 

19003 

1 

SIM 

0 16  1 

RFF  . 

1 

25,3655 

0001  1 

1 

CVECTP 

0162 

25,3656 

5336  1 

0 

VKSC 

VAD 

FC 

19C 

CVECTP«COSI  e-2 

0163 

REF 

1 

25,365  1 

19001 

0 

COST 

0169 

25,3660 

7 7772 

0 

\SL1 

01  65 

PFF 

5 

1 AST 

1139 

25, 3661 

29C91 

1 

STOVL 

MPATRTX  +12C 

FC 

8D 

P2=evErTR*S  IN  I ♦CVECTR*CCS  I F- 1 

0166 

25,3662 

63361 

0 

V/XSC 

PQVL 

PD 

19D 

0167 

REF 

2 

1 AST 

1136 

25,3663 

19CC3 

1 

SIM 

cvectr*sint  e-2 

0168 

RFF 

5 

1 AST 

1136 

25, 3669 

00033 

1 

BVECTP 

0169 

25,3665 

52361 

1 

VXSC 

VSU 

PC 

ED 

BVECTR*CCSI  e-2 

0170 

RFF 

2 

1 AST 

1136 

25,3666 

19C0  1 

0 

CCSI 

0171 

25  ,3667 

65372 

1 

VSL  1 

POOL 

PD 

19C 

0172 

RFF 

2 

LAST 

1136 

25,3670 

0000  7 

c 

509F 

8- 

130=! 

DVFCTR=EVECTR*CrSl-CVECTR*SINI  B-l 

0173 

25,3671 

7 9 3 9 6 

0 

cns 

VXSC 

0179 

RFF 

1 

25,3672 

0001  1 

1 

DVFCTP 

0175 

25, 3673 

7352  5 

1 

FOOL 

SIN 

FC 

20  C 

19-19C=  CVECTR*COSF  B-2 
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"1  76 

REF 

■a 

LAST 

ll’t 

25,36  7A 

00007 

() 

5CAF 

0177 

25, T675 

52361 

1 

VXSC 

vsu 

01  78 

PEF 

6 

LAST 

1136 

28,3676 

00025 

o 

A VFC  TR 

017C 

25,3677 

77772 

0 

VSLl 

0180 

PPP 

6 

LAST 

1136 

2 5, 3 7 EC 

1 A'-T’ 

1 

STCDL 

MHATPIX  +6 

0161 

PPC 

/, 

LAST 

1137 

25,3731 

00007 

0 

5CAF 

0182 

25.37C2 

7 4 3 86 

1 

'IN 

VXSC 

01  83 

25, 3703 

71825 

0 

POOL 

CCS 

01  BA 

R8F 

8 

LAST 

1137 

28 ,370A 

0000  7 

0 

50AF 

0188 

25,  ’7(  8 

833(1 

c 

VXSC 

VAD 

01  86 

PEF 

7 

1 AST 

1137 

25,3796 

00025 

0 

AVECTR 

0187 

25,3707 

57572 

0 

VSl  1 

VCCMF 

0188 

PFF 

7 

LAST 

1137 

25,  ’7  10 

3A025 

1 

STCALL 

MHATPI X 

0189 

REF 

2 

LAST 

I 135 

25,3711 

000  5 1 

0 

EARTHMXX 

R0190 

COMPUTE 

X=  XC  + ( XOni  ) ( T + TO ) 

R0191 

8-9C 

= xn  (REVS 

B-0  ), 

PUSHLOC  : 

SET  AT  120 

R019? 

lC-1 10= 

XOET  (PEVS/CSEC)  SCALEC  B+23 

FCF 

wfarth, 

E«28  FCR 

NOCOOT  AND 

R0193 

AND  1 

?-y27  FCR 

FCCT 

ROl  9A 

X 1 = 

CIFFERFNGE 

IN  23 

ANC  SCALING  CF 

XCCI 

,=0  FOR 

HEARTH  , 

5 FCP  NFDOCT 

RO  198 

ECCT  ANC  A FCR 

FCCT 

R0I96 

6-70 

= T 

(CSEC  B 

-28  1 , 

T IMSLBC  = 

(CSEC  8- 

-A2 

TRIPLE 

FREC.  1 

riS7 

25  ,3712 

8A3A5 

1 

NEWANCLF  CIOAC 

SR 

0198 

25,3713 

00007 

C 

60 

0199 

25, ’714 

2C(  17 

0 

1 AO 

0200 

25,3715 

72371 

1 

TAC 

TLOAD 

0291 

PEF 

1 

25,3716 

017C7 

c 

TIMSLBC 

02'i? 

PFF 

733 

LAST 

1 lOO 

25,3717 

00155 

0 

MFAC 

02f"3 

PEF 

1 

?5,372C 

1 AOl  7 

1 

STCCL 

T IMSUBM 

029A 

REF 

2 

LAST 

1137 

25,3721 

0r020 

c 

TIMSLFM  -t-l 

0205 

25,3722 

77805 

1 

CMP 

0206 

25,3723 

A3257 

r 

Si* 

OAC 

0297 

25, 3724 

2020e 

1 

5,1 

0208 

25  , 3728 

67206 

1 

PUSH 

SI  HAD 

0209 

PEF 

a 

1 ART 

1137 

25, ’ 726 

neon 

l 

T I MSUFM 

02M 

•25,3727 

A 126  1 

1 

SL 

DNF 

0211 

25,3730 

2C212 

1 

9C 

0212 

25, ’731 

000  13 

0 

inp 

9213 

25,3732 

A3257 

0 

SL* 

OAD 

021  A 

25 , 3733 

20213 

r 

IOC  ,1 

021AI 

2*=,  ’734 

7760C 

1 

BOV 

021A2 

25 ,3738 

53  736 

r 

♦ 1 

0218 

25, 3736 

776  1 6 

c 

RVC 
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PC  14C  AVECTRASINF  B-2 

Pl=  A VEfTR*S  1NF-CVFCT0«CCSF  B- 1 
FC  8C 

FT  lAC  e-13C  = CVECTR*S  INF  B-2 
FC  8C  AVECTR*CGSF  B-2 

- (AVECTR*CCSF  + CVFCTR*c INF  I B-1 


BOOT 

ANC 


ENTFR  FC  12C 


CHANGE  MOOF  TO  TP 


T+TO  CSEC  B-92 

PD  ICC  NILT  BY  XCOT  IN  lO-llC 
FC  BD  ACC  XC  IN  8-9C  AFTER  SMFTING 
SUCH  THAI  SCAL  ING  IS  8-0 
PO  lOD  SAVE  PARTIAL  ( XC  + xrCT*T  I IN  8-9C 


XCCT 

PO  80  SHIFT  SUCH  THAT  THIS  FAFT  CF  X 
IS  SCALEC  REVS/rSEC  B-C 
TURN  CFF  rvERFLCW  IF  SET  FY  SHIFT 

instrlction  before  exiting 

VPAC=X=  XO  ♦ (XCCT  ) (T -tTO  I PEVS  BO 
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L 

planetary  inertial 

CP  lENT  AT  ION 

LSER*  S FAGE 

NC.  7 EO  S3 

P02U 

earthnx  slbpoltinf  

R0217 

SUEROUTINF  TO  COMPUTE  THE  TRANSFORPAT I CN 

, PATRIX 

P FCP  THE  EARTH 

R021  e 

CALLING 

SFCLENCE 

P02  19 

L 

CALL 

R0220 

1 +1 

EAFTFMX 

R0221 

SL8RCLTINFS  LSED 

R0222 

NEWANGLE 

R027  3 

INPUT 

R022A 

INPLT 

AVAI LAPL  F 

FRCP  LALNCH 

CATi 

A ZC 

REVS  8-0 

R0  225 

TEPHFP 

CSFC  8- 

42 

RP22t 

6-7C 

= TINE  CSEC  E 

-28 

P0227 

OUTPUT 

R022B 

«WATP  IX 

= 3X3  M MATRIX  P-1  (STORFO 

IN 

VAC 

AREA  ) 

C22P2 

26 ,3743 

BANK 

26 

022RA 

RFF 

2 

LAST  1132 

26, 2C00 

SETLCC 

PLANTIM 

02286 

26,3743 

BANK 

02288 

RFF 

3 

lAST  1132 

TO  1133: 

21 

35* 

CCUNTA 

tl/LUROT 

0220 

26,3743 

40220 

0 

EARThPX 

STG 

SETPC 

SFT  8-9C=AZC 

023C 

RFF 

3 

LAST  1137 

26,3744 

0C051 

0 

FAPTHPXX 

0231 

26,3745 

OCOll 

1 

8C 

10-11C=WEARTH 

0232 

26,3746 

77770 

1 

AXT  ,1 

FCP  SI  5 , ANC  SL 

10  IN  NEWANGLE 

0233 

26,3747 

00000 

1 

0 

023A 

26, 375C 

65345 

c 

CLCAC 

POOL 

LEAVING  PC  SET 

AT  12C  FCR  NEWANGLE 

0238 

REF 

1 

26,3751 

01712 

1 

AZO 

0236 

RFF 

1 

26,3752 

1 4021 

1 

WEARTH 

0237 

26,3753 

45C06 

c 

PLSH 

CALL 

0238 

RFF 

4 

LAST  1135 

26 ,3754 

537  12 

0 

NEWANGLE 

023S 

26,3755 

4140  1 

I 

5ETFC 

PLSH 

ia-19C=504AZ 

0240 

26,3756 

OOC22 

0 

180 

COS  (AZ  ) S IN(AZ  1 

C 

0241 

26,3757 

65346 

0 

COS 

POOL 

20-37C=  MMATRIX 

= -SIMAZ)  CCS(AZ) 

c e-1 

0242 

RFF. 

1 

26,3760 

00C23 

c 

504AZ 

0 0 

1 

0243 

26, 3761 

65356 

1 

SIN 

POOL 

0244 

REF 

1 4 

IAS’  1136 

26. ’762 

06524 

1 

H I6ZERCS 

0245 

26, 376? 

73525 

1 

FOOL 

SIN 

C246 

RFF 

2 

LAST  1138 

26,3764 

00023 

0 

5C4AZ 

0247 

26,3  765 

65276 

1 

rccpp 

FOCL 

0248 

REF 

3 

LAST  1138 

26, 3766 

OOC23 

c 

5C4AZ 

C24P 

26,3767 

63346 

0 

CCS 

PCVL 

0250 

RFF 

15 

LAST  1138 

26, 377F 

06524 

1 

H I6ZERCS 

0281 

26,3771 

41525 

0 

POOL 

PLSH 

0252 

■»EF 

LAST  45C 

26,3772 

06522 

1 

H ICPH  AL  F 

0253 

26,377? 

7 7 6 5C 

1 

GCTC 

0254 

REF 

4 

LAST  1138 

26,3774 

0005  1 

0 

FARTHHXX 

GAP;  ASSE»'RLE  REVISION  116  CF  AGC  FRCGRA"  LUMINARY  BY  NASA  ZOilll2-C71 

L PLANETARY  INERTIAL  CRIFMATIfN 

P0255  FAPThL  SLPPOLTINE  

R0256  SLPRCLTINF  TC  CCPFLTE  L VEC^rF  FCF  EARTF 

P0257  CALLING  SFOLENCF 

R')2SP  L CAU 

R025S  L+1  FARTFl 
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.097  FACE  1129 
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R026O  INPUT 


R0261 

AXC  , 

ayc 

SET 

AT  L AUNCF  I IMF 

with  AYO 

IMMFC  lATELY 

FCLLChING  AXC  IN  CCRE 

0026? 

nuTOL 1 

RM263 

-AX 

R026A 

FFAC  = 

-AY 

FAC  IANS  P-0 

R026S 

0 

0269r5 

06,2761 

BANK 

06 

0269  1 

OFF 

1 

06 , 2000 

SFTLCC 

EARTHLOC 

026519 

C 6, 3761 

PANK 

02652 

OFF 

1 

COUNT* 

$$/LUROT 

0266 

06,3761 

5 75  A5 

1 EAPTFL 

CLCAC 

Of  C^P 

0?67 

OFF 

1 

06,3762 

oni6 

C 

AXC 

C268 

REF 

1 

06,3763 

1A017 

1 

STOCL 

5CALPL 

0269 

REF 

1 

06.376A 

0171A 

1 

-AYO 

0270 

RFF 

2 

LAST 

1139 

06, 3765 

1 A02  1 

1 

STOOL 

50ALPL  *2 

C271 

PEF 

A 

LAST 

323 

06,3766 

2A007 

0 

LC6ZFR0S 

027? 

RFF 

■a 

LAST 

11  3S 

C6, 3767 

2A023 

c 

STCVL 

50ALPL  +A 

0273 

OFF 

A 

LAST 

1139 

06, 377C 

OCr  17 

1 

5CALPL 

0276 

C6 ,3771 

77616 

0 

FVC 

GAP:  ASSe^'BLE  PFVISION  116  CF  < GC  PPCGPAP  LLPUARY  BY  AA'A  20211  12-071 


L PltNFTARY  INFFTIAL  rPIFMATJCN 


P027E 

CCNSIAMS 

AND 

ERASAPIF  ASSIGNMENTS 

0276 

REF  9 

LAST 

1 1 29 

12,2004 

181 

= 

0F1Z2 

0279 

RFF  13 

LAST 

1080 

0090 

RPRFX  IT 

= 

S 1 

02C( 

RFF  13 

LAST 

1131 

CC9  1 

EARTFMXX 

= 

S2 

02P1 

onor 

504RPR 

or 

C2P? 

0(1 10’ 

S INNCC  I 

= 

8C 

0283 

onic 

CVECTR 

= 

8C 

028A 

0010 

CVECTR 

= 

an 

C2E5 

CC22 

504AZ 

= 

180 

0286 

0016 

ttmslpm 

= 

14C 

0287 

0016 

904LPL 

= 

140 

028P 

C024 

AVECTR 

= 

20D 

0209 

0032 

8VFCTR 

= 

260 

C29C 

0024 

MMATR  IX 

= 

2CD 

029) 

r040 

CCP 

= 

32C 

0292 

0042 

sne 

= 

340 

0293 

0006 

504F 

= 

6C 

19;00  AUG.  11,1969  SKIPPER  .C97  PACE  llAC 


LSEP*  S FACE  AC.  9 EO  S3 


1 SCALEC  e-1 

P-10-RP  AAD  PF-TC-R  SLFR  EXIT 
EARTFPX, RCCNP X SUBR.  EXITS 
6 REGS  P fP  PP  VECTOR 

2 siMAron 

6 C VECTOR  YOON 

6 C VPnP  MCCN 

2 AZ 

3 TIME  SUP  M (MOON)  T+TO  IN  GETAZ 

6 I CR  IF  VECTOR 

6 A VECTOR  (MCON) 

6 E VECTOR  (MCCN) 

18  M MATRIX 

2 cosiei  e-1 

2 SIMP  ) e-1 

2 F (MOCM 


gap:  ASSfiPBLE  REVISION  116  CF  AGC  PRCGRAp  LUMNAPY  BY  ^ASA  20211  12-071 

I PFASUPEPFM  INCCPFCPAT  irN 


19:09  AUG.  llil9tS  SKIPPEP 
LSEP*  S PAGE  AC.  1 


.097  PAGE  llAl 
EO  S3 


PCCOI  INCCPFl  — PFRFCPPS  TFE  Six  CIAFASICNAL  STATE  VECTCP  CEVIATICA  FCR  PCSITI 

POOO?  CN  ANC  VEIOCITY  OP  TEE  !■  INE  OIPEASICAAL  DEVIATICA  CF  FC 5 I T I CA  , VEL CC  I T Y , A 

R0nn3  NO  PACAP  CP  LAACPAFK  PIAS.TFE  CUTFUT  OF  Tee  BVECTOR  ROUTINE  ALONG  WITH  T 

ROOCA  HE  EPRCR  TPANSITICA  EATFTXlV)  ARE  LSEC  AS  lAFUT  TC  TEE  FCLTIAE.TEE  CEVIA 

ROO'15  TICN  IS  OPTAIMEC  BY  CCMI’IITIAG  AN  FSTIMATED  TRACKING  «EASUREPEAT  FPCA  THE 

RC0P6  CLRREAT  STATE  VECTCP  AAC  CCAFAFIAG  IT  V,  IT E AN  ACTUAL  TRACKING  MEASLPFmFN 

R00O7  T and  applying  A STATISTICAl  EEIGHTIAG  VECTOR. 

ROOOR  lAFUT 

Pocng  OREAFLG  = 0 6CIPEASIf.AAL  eVECTCP  1=  sriPFASICAAL 

Room  W = EPRCR  TRAfSITIOA  «ATRIx  6X6  CR  SX? 

ROOn  VAPIAACE  = VARIAACE  (SCAIAF) 

ROCil?  CELTAQ  = PEASLPED  PE  V I AT  I C A ( SC  A L A P ) 

RO013  BVECTOR  = 6 CP  9 CINFNSIOAAL  BVECTOR 


RCCIA  CLIPLT 

ROniS  CCLTAX  = STATE  VECTOR  OFVIATICNS  6 OF  9 CIPEASICAAL 

R1016  71  = VECTCP  MSEC  FCR  TEE  INCC RPOP AT  ION  6 OR  S niPEASICAAL 

R0G17  GAPPA  = SCALAR 

ROOIR  OPEGA  = PPEGA  WEIGHTING  VECTOR  6 CP  9 CIPFATICAAL 

R0019  CALLIAG  SECLENCE 
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on’o  . 
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23,2553 
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CCA5 
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20 

LAST 

1161 

23,2556 

02555 

1 

W +1080,1 

00  A 6 
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LAST 

116  1 

23,2555 

75112 

1 

Zl  +180,2 

00A7 

RFF 

6 

LAST 

1162 

23,2556 

1 2665 

1 

5TCPE 

ZI  +180,2 

CGA8 

23,2557 

77775 

1 

VLCAC 

00A9 

REF 

26 

LAST 

116  1 

23, 256C 

0356  1 

1 

BVFCTCR  +12C 

0090 

23,2561 

52717 

1 

PXV* 

VAD* 

0051 

RFF 

21 

LAST 

1162 

23,2562 

02663 

1 

W +1620,1 

0052 

REF 

5 

L AST 

1162 

23, 2563 

75  112 

1 

7 I +180,2 

0C53 

RFF 

6 

LAST 

1 162 

23,2566 

1 2665 

1 

STORE 

ZI  +1F0.2 

0C5A 

23,2565 

7 7 7CC 

C 

T IX  ,1 

0099 

RFF 

1 

23, 2566 

66567 

1 

I NCCRl 

CC56 

23,2567 

63  106 

0 

IN'COR  1 

T IX,  2 

BON 

009  7 

PEP 

1 

23, 2570 

66  56  5 

1 

Z123 

0C9R 

RFF 

3 

LAST 

587 

23,2571 

02706 

1 

DPENFLG 

0059 

RFF 

1 

23,2572 

66576 

1 

T NCCFIA 

0060 

23,2573 

77775 

1 

VLCAC 

C061 

REF 

17 

LAST 

913 

23  ,2576 

06526 

1 

ZEPOVFCS 

0062 

REF 

7 

LAST 

1162 

23 , 2575 

0265? 

1 

STCPF 

Zl  +120 

0063 

23, 25  76 

7720  1 

1 

INCOR  lA 

SETPC 

VLCAD 
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23 ,2577 
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0 

0 
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REF 
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LAST 
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23, 260r 
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REF 
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LAST 
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23,2606 
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LAST 
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21636 

c 

TPNPDF 
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23 , 2607 
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0 

FCVL 

VSO 
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REF 

10 

LAST 

1162 

23, 261C 

02657 

1 

ZT  +120 

0076 

23,261  1 

76236 

0 

RTB 

TAD 

0075 

REF 

8 

LAST 

1162 

23,2612 

21636 

0 

T FNCCE 

0076 

23,2613 
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0 

TAC 
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0C77 

REF 
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1 AST 
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23,2616 
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0 
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REF 
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LAST 
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REF 
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0C86 

23 , 2625 
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REF 
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LAST 
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ccee 

REF 
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LAST 
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23 , 2627 
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TEMPVAR 
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23, 263C 
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1 
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23, 2631 
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0 

DEC 

1 

0091 

REF 

1 

23,2632 

66625 

1 

INCCP18 

009? 

23,2633 

6155  1 

1 

TNCORIC 

TLCAC 

RCLNC 

0C93 

RFF 

3 

LAST 

1162 

23,2636 

02665 

0 

TRIPA 

EVECTCF  (21 
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23,2635 

75A05  1 

OPP 

SCRT 

CCS5 

REF 

i 
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I 1 A2 

23,2636 

02670  1 

TEMPVAR 

0096 

23.2637 

76257  C 

SL* 

TAG 

0097 

23, 26AG 

57576  1 

0 ,2 

CC9R 

PEF 

A 

L AST 

11A2 

23, 26AI 

02665  0 

TRIPA 

0099 

23, 26A2 

631C1  1 

NOPP 

T NCR  ,2 

0100 

PEP 

19 

LAST 

1008 

23.26A3 

00050  1 

X2 

0101 

23  ,26AA 

77775  1 

LEG 

-2 

0102 

23,26A5 

7713A  1 

SKA, 2 

A XT  ,2 

0IC3 

REF 

2 

LAST 

I 15 

23 ,26A6 

02103  1 

NORMGAM 

OlOA 

23 , 26A7 

002A2  C 

1620 

0109 

23,2650 

AC265  1 

BDOV 

SETPD 

01C6 

RFF 

7 

1 AST 

913 

23 .265  1 

0651A  1 

DPl/ATH 

0107 

23. 2652 

OCCOl  0 

0 

0108 

REF 

2 

LAST 

1A6 

23,2653 

03500  1 

STORE 

GAPPA 

01C9 

23,265A’ 

60351  0 
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NCRM 

Oil* 

RFF 
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1 1A2 

23,2655 

C2665  0 

TPI  PA 

Oil  1 

RFF 
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23  ,2656 
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23,2657 
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CICAC 
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RFF 
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1 AST 

1137 

23,2660 

00155  0 
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Oil  A 
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LAST 
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23  ,2661 

03547  1 

DELTAC 
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AORP 
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RFF 

15 
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23,2663 

00051  0 

SI 
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23 ,766A 
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RFF 

16 

LAST 

11A2 

23,2665 

00050  1 

SI 

0119 

23.2666 

A1A71  0 

ccv 

PUSH 

01193 

23,2667 

7 7 6 50  1 

GCU 

01196 

B<^F 
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23, 267R 

A57  1 1 1 

N'EhZCCPF 

0120 

23,2671 

77731  1 -3 

SSP 

0121 

REF 

15 

LAST 

1 lA  1 

23,2672 

0CC52  C 

S2 

0122 

23,2673 

00066  1 

SAD 
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VXP* 
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REF 

11 

L AST 

1 1 A2 

23,2675 

026A3  1 

ZI 

012S 

RFF 

22 

LAST 

1 1A2 

23,2676 

7513A  0 

W +1620,2 

0126 

23  ,2677 

77206  C 

FLSF 

VLCAC 

0127 

RFF 

1 2 

LAST 

11A3 

23, 2700 

02651  1 

ZI  +6 

C120  ■ 

23 ,2701 

53  30  3 1 

VXM* 

VAD 

0129 

RFF 

22 

LAST 

11A3 

23,2702 

75112  1 

h +180C.2 

C130 

23,2703 

77206  0 

PUSH 

VLCAD 

0121 

RFF 

13 

1 AST 

1 1A3 

23,270A 

02657  1 

ZI  +I2C 

0132 

23,2705 

53303  1 

VXP* 

VAD 

0133 

RFF 

2A 

LAST 

1 1A3 

23,2706 

75070  1 

W +19ED,2 

013A 

23 , 27C7 

6 100  6 C 

FLSF 

T IX  ,2 

0135 

OFF 

1 

23,2710 

A667A  C 

I NCCP2 

C136 

23,2711 

A5575  1 

vlcac 

S FADR 

0137 

OFF 

2 

LAST 

1A6 

23,2712 

7A26C  C 

STCRE 

CPEGA  +12C 

0138 

23,2713 

A5575  1 

VLOAO 

STAOR 

0139 

REF 

t 

LAST 

11A2 

23,2  71  A 

7A266  0 

STFPF 

CPEGA  +6 

OlAO 

23.2715 

A5575  1 
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REF 

A 
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IGtCS  AUG.  11,1965  SKIPPER  .'J97  PAGE 
USER'S  PAGF  NO.  2 ES  S3 


NEPWAL  I ZAT  ICN  CCUM  -2  PCP  GAFFA 


PC  0-1  = NORM  (A) 


PD  0-  1 = DELTAC/A 


CCFPUTE  C'«EGA1,2,2 


1 1A3 


PC  2-7  = CFEGAl  , e-l3=OMEGA2, lA- 19=OFEGA3 


flSSFI*8LE  BEVtSiriN  IIF  CF  AGC  PRCGPAM  LUMINARY  BY  NASA  2021112-071 


1G:CG  AUG.  11.1969  SKIPPER 


PAGE  llAA 


GAP: 


L MTASUREPENr  INCGPFrRATICN  USER'S  PAGE  NO. 


0 lA? 

23,2717 

7 7 2 1A 

C 

ETN 

VLCAC 

01  A3 

R<"F 

A 

LAST 

1 1 A2 

23  ,2720 

02706 

1 

DPENFI  G 
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VXSC 
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23,2733 
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0,1 
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PFF 
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LAST 
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23,2735 

127  17 
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STORE 
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0157 

23 ,2  736 
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VLCAC 

0158 

PFF 
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23.2737 
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0159 

PEF 

6 
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02673 

1 
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REF 
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LAST 
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PI  16A 
ROI  6S 
R 1166 
R0167 
R016R 
R0169 
ROl  70 
R0171 
RO  1 72 
R017B 
RC  I 7A 
P0175 


INCOPP?  -INCCRPrPATFS  THE  COMPUTED  STATE  VECTCP  DEVIATICFS  INTC  THE 
FSTIPATEt  STATF  VfCTCR.  TFF  STATE  VECTOR  UPCATEC  PAY  BE  FCR  EITHER  THE 
LE"  CP  THE  CSM.ofyeRPINEC  BY  FLAG  VEHII FFL C. ( Z E RC  = LEPt  (1  = CSM) 


INPLT 

PFRPANENT  STATT  vECTCR  FTP  FITFER  THE  L FM  rR  CSM 
VEFLPFLG  = LPOATE  VEHICLE  C=LEy  1=CSy 
^ = EPRCR  TRANSITION  MATRIX 

OELTAX  = fOPFLYED  STATE  VECTOR  CEVIATIGNS 

OMENFl  G = SIZE  CF  H matrix  (ZERO  =6X6)  (1=9X91 
GAPMA  = SCAIAR  FOP  IMCORPORAT  ION 

71  = VECTCR  LFFC  IN  I NC C R FC R A T I C N 

CMEGA  = WEICFTING  VECTOR 


R0I76  CLTPLT 

RD177  LPCATED  pEPPANFM  STATE  VECTCP 


R0I7B  CALL  INC  SEQUENCE 
RC179  I CALL  INCCPP2 


ROIRO  NORMAL  EXIT 

R018I  L+1  CF  CALLING  SECUENCE 


01P2 

RFF 

1 

23 ,2Oi)0 

SET  I CC 

PEAS  INCl 

01R3 

23,2795 

BANK 

OIBA 

REF 

2 

1 A ST 

1191  TO 

1195: 

138  138* 

COUNT* 

t 1/  INCOP 

0IR6 

23,2795 

95G20 

1 

I NC0RF2 

STC 

CALL 

0186 

REF 

9 

LAST 

1199 

23, 279f 

02772 

1 

EGRESS 

C 187 

REF 

27 

LAST 

780 

23,2797 

27912 

0 

INTSTAi  L 

OIBH 

23,2750 

79375 

0 

VLCAD 

VXSC 

0189 

REF 

7 

1 AST 

1199 

23,2751 

03503 

1 

CIPEGA 

0190 

REF 

3 

LAST 

1193 

23,2  752 

03  500 

1 

GAPMA 

0191 

REF 

2 

1 AST 

127 

23,2753 

267  13 

C 

STDVL 

OPEGAM 

0192 

REF 

8 

LAST 

1195 

23,2759 

0351  1 

1 

OMEGA  <-6 

0193 

23,2755 

77  76  1 

1 

VX5C 

0199 

RFF 

9 

LAST 

1195 

23,2756 

03500 

1 

GAPPA 

C 195 

REF 

2 

1 AST 

127 

23,2  757 

26721 

1 

STCVl 

CPFGAP2 

0196 

RFF 

9 

L AST 

1195 

23,2760 

035  17 

1 

CPtGA  +12C 

0197 

23,2761 

7776  1 

1 

VXSC 

019P 

REF 

5 

LAST 

1195 

23,2762 

03500 

1 

GAPMA 

0199 

RFF 

2 

LAST 

127 

23,2763 

02727 

1 

STORE 

0PEGAP3 

0200 

23,2769 

77776 

1 

EX  IT 

0 20  1 

RFF 

1 

23,2765 

3 3296 

1 

CAF 

59DD 

0202 

RFF 

1 

23.2766 

55  • 3 15 

0 

TS 

WI  XA 

0203 

REF 

1 

23,2767 

55' 316 

c 

TS 

W IXB 

0?  Yi, 

RFF 

226 

LAST 

1 12C 

23,277F 

3 9 7 55 

1 

CAF 

ZFRC 

0205 

REF 

1 

23,2771 

55>317 

1 

TS 

7 IXA 

0206 

REF 

1 

23,2772 

55' 32C 

c 

IS 

zixe 

0207 

RFF 

109 

LAST 

972 

23,2773 

C 5353 

1 

FAZ  A 

TF 

PHA  SCHNG 

CALC.  GAPPA  * CMEGAl, 2,3 
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FS  S3 


patrix 
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L NFASLRE^PNT  IHCORFCRAYION 


020H 

23,2776 

06C22 

0 

CCI 

06022 

0209 

PER 

68 

LAST 

975 

23,2775 

C 5506 

0 

IC 

UPFLAG 

0210 

RFF 

2 

LAST 

711 

23,2776 

00236 

7 

ACRES 

REINTFLG 

0212 

BFF 

2 

lAST 

1165 

23,2777 

? 1316 

1 FAZAl 

CA 

W IXB 

0213 

PEF 

2 

LAST 

I 165 

23, 3'1'tO 

55*315 

0 

IS 

W1  XA 

021A 

PEF 

2 

LAST 

1165 

23,3001 

3 1320 

1 

CA 

2IXB 

0215 

RPF 

2 

1 AST 

1165 

23, ?002 

55*317 

1 

1S 

Z I XA 

0216 

RFF 

221 

LAST 

1015 

23 ,3003 

0 6062 

1 

TC 

INTPRFT 

0217 

23, ?006 

7315C 

1 

LXA  ,1 

LXA  ,2 

021R 

REF 

3 

1 AST 

1166 

23, 3005 

01315 

1 

UI  XA 

C219 

PEF 

3 

LAST 

1 166 

23,3006 

01317 

(1 

Z IXA 

0220 

23,3007 

70  731 

C 

SSF 

OLCAC* 

0221 

REF 

17 

LAST 

116? 

23,301'’ 

00051 

0 

SI 

0222 

23,3011 

00006 

1 

6 

02?3 

BFF 

16 

LAST 

1163 

23,3C12 

75  136 

0 

ZI  ,2 

022A 

23, 311? 

60276 

1 

CCOPP 

NORM 

0225 

RFF 

I 7 

LAST 

1 1 66 

2 3 , 3 1'.  1 6 

00052 

c 

S2 

0226 

23,3015 

65  16  1 

1 

VXSC 

XCHX  ,2 

0227 

REF 

3 

LAST 

1165 

23  ,3016 

02  713 

0 

OMFGAMl 

022B 

RFF 

18 

1 AST 

1166 

23,3017 

0CC51 

c 

S2 

0229 

23 , 3020 

57166 

1 

LXC  , 2 

XAD,2 

0230 

RFF 

20 

LAST 

1163 

23 , 3C2  1 

00067 

1 

X2 

11231 

RFF 

3 

L AST 

1 163 

23, ?C22 

02  103 

1 

NCFPGAP 

0232 

23  ,3023 

65057 

n 

VSL6 

XCHX , 2 

0233 

23 ,3026 

57576 

1 

0 ,2 

0236 

REF 

19 

LAST 

1166 

23,3025 

0005  1 

0 

S2 

0235 

23 ,3'126 

7 7653 

1 

VAO'* 

0236 

PEF 

25 

LAST 

116? 

23, ’027 

02667 

c 

H +56C,l 

023  7 

REF 

2 

LAST 

127 

23, 303C 

02735 

1 

STORE 

HCLfIN 

ri23fi 

23,3031 

57563 

1 

CLCAC* 

CCCMP 

0239 

RFF 

15 

LAST 

1166 

23,3032 

75  136 

0 

Zl  ,2 

026C 

23,3033 

7 6 301 

0 

NORM 

VXSC 

0261 

REF 

20 

LAST 

1166 

23,3036 

00  7 52 

0 

S2 

0262 

P = F 

3 

LAST 

1165 

23, 3035 

02721 

1 

CPFGAN2 

0263 

23,3036 

71126 

0 

XFHX, 2 

LXC  ,2 

0266 

REF 

21 

1 AST 

1166 

23,?C37 

CCC51 

0 

S2 

0265 

RFF 

21 

LAST 

1166 

23, 3060 

00067 

1 

X2 

0266 

23,3061 

53676 

1 

XAC  ,2 

VSl  P 

•1267 

REF 

6 

1 AST 

1166 

23.3062 

02  103 

1 

NCRPGAP 

0268 

23 ,3'I63 

57576 

1 

0,2 

0269 

23,3066 

52726 

I 

XCFX, 2 

VAC* 

0290 

RFF 

22 

LAST 

1166 

23, 3065 

000  = 1 

0 

S2 

02  = 1 

RFF 

26 

LAST 

1166 

23,3066 

02555 

0 

W <1080, 

0252 

RFF 

3 

LAST 

1166 

23,3067 

02763 

c 

STORE 

HCLOH  *6 

02  53 

23,3050 

77616 

1 

BOFF 

0256 

PCF 

c 

LAST 

1166 

23,3051 

02  766 

c 

opfnflg 

0255 

REF 

1 

23,3052 

67072 

1 

FAZB 

0256 

23 , 3053 

57563 

1 

CL0AC6 

DCOMF 

0257 

PEF 

16 

LAST 

1166 

23,3C56 

75136 

0 

n ,2 

0258 

23,305= 

7630  1 

0 

NORP 

VXSC 
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LSER 

•S  PAGE  NO.  7 

E5 

S3 

0259 

REF 

22 

LAST 

1146 

23,3056 

OCC52 

0 

S2 

0260 

R = F 

3 

LAST 

1 145 

23,3057 

02727 

1 

0REGAR3 

0261 

2 3, 30  6,0 

71124 

0 

XCFX  ,2 

LXC  , 2 

T262 

REF 

24 

LAST 

1 1 47 

23, 3C61 

0CC51 

0 

S2 

026?1 

R = F 

22 

1 AST 

1146 

23,3062 

0004  7 

1 

X2 

026A 

23,3063 

53674 

1 

XAC,2 

VSL* 

0265 

RFF 

c 

LAST 

1146 

23,2064 

02102 

1 

NCRRGAR 

C266 

23,3065 

57576 

1 

0,2 

027.7 

23,3666 

52724 

1 

XCFX, 2 

VAC* 

026S 

REF 

25 

LAST 

1147 

23, 3067 

000  5 1 

r 

S2 

0269 

RFF 

27 

L AST 

1146 

23,3070 

02643 

1 

W *1620,1 

0270 

PCF 

4 

1 AST 

1 146 

23,307! 

02751 

r 

STEPF 

HCLDh  +12C 

027! 

23, 3072 

77624 

I 

FAZB 

CALL 

0272 

REF 

It 

1 AST 

587 

P3 , 3073 

11226 

1 

GRP2FC 

0273 

23,3074 

77776 

1 

Exn 

0279 

Pi^F 

4 

1 AST 

1146 

23,3  i75 

3 1315 

1 

FAZPl 

CA 

W I XA 

START  2NC 

PHASE  CF  INCCFF2 

TC 

TRANSFER 

0275 

P FF 

1 

23,3076 

6 2247 

0 

AC 

6C0 

TEYF 

REG  TC  PERM  h MATP  IX 

0276 

RFF 

3 

1 AST 

1 146 

23, 3077 

5F  '316 

0 

TS 

UI  XR 

0277 

REF 

4 

1 AST 

1146 

23,3  10') 

3 1317 

0 

CA 

Z IXA 

0278 

RFF 

2 

LAST 

22C 

23,3l'il 

6 7 75  1 

c 

AD 

MNUS2 

0279 

REF 

3 

L AST 

1 146 

23, 3 102 

55  ■ 320 

0 

TS 

ZI  XB 

0280 

PFF 

222 

1 AST 

1146 

23,3103 

0 6042 

1 

TC 

1 NTPRFT 

0 281 

23,  ’ l'-4 

66  350 

1 

LXA  ,1 

SSP 

0282 

PEF 

c 

LAST 

1147 

23.3105 

01315 

1 

W IXA 

0283 

REF 

18 

1 AST 

1146 

23 ,3  106 

00051 

c 

S! 

0284 

23,3107 

O0C06 

1 

6 

0285 

23,3110 

77775 

1 

VLOAC 

02H6 

RFF 

5 

LAST 

1147 

23,3111 

02  73  5 

1 

HCLOVs 

0287 

REF 

28 

LAST 

1147 

23,3112 

06467 

1 

STORE 

W +540 , 1 

0288 

23,31  13 

77775 

1 

VLCAC 

0289 

RFF 

6 

LAST 

1147 

23, 3 1 14 

02  743 

0 

HCLDR  +6 

C29C 

' RFF 

29 

LAST 

1147 

23,3115 

06555 

1 

STORE 

w +ireD,i 

0291 

23,3116 

7 7214 

0 

eCFF 

VLCAC 

0292 

RFF 

, 6 

L AST 

1 146 

23,3117 

C2746 

0 

OPFN'F  LG 

C293 

REF 

1 

23,3120 

47130 

0 

FAZ85 

0294 

REF 

7 

LAST 

1147 

23,2121 

02751 

c 

HCLDl,  +12C 

0295 

REF 

30 

LAST 

1147 

23,3122 

06643 

0 

STORE 

W +1620,1 

0296 

23,3123 

52  100 

1 

FAZE2 

T TX  , 1 

GCTC 

0297 

23,3124 

47126 

1 

+ 2 

0298 

PEF 

1 

23,3125 

47136 

0 

FAZC 

DONE  YlTh 

V>  PATPI  X.  UFCAXe 

STATE 

VECTCI 

0299 

23,3126 

7 7634 

c 

RTP 

0300 

RFF 

1 

23, 3127 

46  772 

r 

FAZA 

0301 

23 ,3130 

43335 

0 

FAZ85 

SLOAC 

OAD 

0302 

RFF 

4 

LAST 

114? 

23,3131 

01221 

0 

ZIXR 

0303 

REF 

1 

23,3132 

C725  1 

0 

1200 

03'I4 

23,3133 

52C30 

0 

EEIZ 

GCTC 

0305 

REF 

2 

LAST 

1 147 

23, ’ 134 

47  126 

c 

FAZC 

03F6 

PEF 

1 

23,3135 

47122 

1 

FAZP2 

0307 

23,3136 

77624 

1 

FAZC 

CALL 

C3Ce 

REF 

17 

L AST 

1147 

23,  ->137 

11226 

1 

GPP2PC 
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GAP: 
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0309 

0310 

0311 
, 1312 

1313 
131  A 
1315 
0316 

REF 

rff 

RFF 

PFF 

PEE 

PEF 

6 

8 

2 

12 

1 

1 

LAST 

LAST 

LAST 

LAST 

586 

1166 

166 

585 

23.3160 

23. 3161 

23.3162 
23,3  163 

23.3166 
23,3165 
23,3  166 

23.3167 

53375 
01701 
02  701 
C36  72 
67116 
00707 
6 7236 
26771 

0 

C 

0 

C 

1 

1 

r 

1 

VLCAC 

STCRF 

BON 

VAC 

X789 

OELTAX  *120 

Tx^ei 

PTB 

V EFUFFLG 

DCCSR 

MCVEPLEM 

U31  7 

23  ,3150 

77T16 

c 

FAZA8 

ecvB 

AXT  ,2 

0318 

REF 

2 

LAST 

56S 

23, 3151 

57753 

1 

TCOANZTO 

0315 

23,2152 

1C001 

1 

0 

0321 

23,3153 

77Cl  6 

1 

PCFF 

AXT  ,2 

0321 

RFF 

5 

LAST 

717 

23,3156 

06  366 

0 

RCCNTHI S 

0322 

23,3155 

67157 

1 

♦ 2 

1323 

23,3156 

00002 

0 

2 

032« 

23,3157 

537  75 

1 

VI  OAC 

VSR.  6 

132  5 

PFF 

9 

LAST 

1168 

?3  ,3  160 

02665 

0 

OELTAX 

0326 

23, 3161 

57205 

1 

9 -7,2 

0327 

23,3162 

60055 

0 

VAC 

BOV 

0328 

RFF 

6 

LAST 

322 

23,3163 

01521 

0 

TOELTAV 

03?o 

PEF 

1 

23,3166 

67176 

1 

FAZABl 

0330 

RFF 

C 

1 AST 

1168 

23,3165 

25521 

0 

STCVL 

TCELTAV 

1331 

PFF 

10 

L AST 

1168 

23, 3 166 

02673 

1 

OELTAX  +6 

0332 

23 ,3167 

53257 

1 

VSP6 

VAD 

0333 

?3,317C 

5 7 202 

0 

0-6,2 

0336 

REF 

6 

LAST 

322 

23, 3171 

01527 

0 

TNLV 

0335 

23 ,31 72 

77600 

1 

BOV 

13  }6 

REF 

1 

23, 3173 

67202 

1 

FA2AB2 

0337 

RCF 

5 

LAST 

1168 

.32,  3176 

35527 

1 

STCALL 

TNUV 

03  38 

RFF 

1 

23,3175 

6721  1 

0 

F A Z A R 3 

0339 

23,3176 

5 ^ ^ 7 5 

0 

FAZABl 

VLCAC 

VAD 

0360 

REF 

13 

LAST 

781 

23,3177 

01535 

0 

RCV 

0361 

RFF 

1 1 

LAST 

1168 

23,3200 

02665 

0 

OELTAX 

036? 

REF 

16 

1.  AST 

1168 

23,321] 

01535 

c 

STORE 

RCV 

0363 

23  ,32  12 

533  75 

0 

FAZAP2 

VLOAC 

VAD 

0366 

RFF 

1 1 

LAST 

78  1 

23, 320? 

01563 

1 

VCV 

0365 

RFF 

12 

LAST 

1168 

23,  32  >6 

02673 

1 

OELTAX  +6 

0366 

PFF 

12 

1 AST 

1168 

23,3205 

01563 

1 

STCPE 

VCV 

136  7 

23, 3216 

65  136 

c 

SXA  ,2 

CALL 

0368 

REF 

6 

LAST 

298 

23,3217 

12030 

1 

PRPDY 

0365 

PFF 

J 

23,3210 

276  73 

0 

rectify 

03691 

23, 3211 

77626 

1 

FAZAB3 

CALL 

03652 

RFF 

18 

LAST 

1167 

23 , 3212 

11226 

1 

GRP2PC 

0351 

23,3213 

67C16 

1 

BCN 

RTF 

0351 

REF 

13 

LAST 

1168 

23,3216 

00707 

1 

VEHUPFLG 

1352 

REF 

1 

23,3215 

67261 

0 

CCCSM 

1353 

RFF 

2 

LAST 

3 7 

23,3216 

26  750 

1 

wcvealfw 

03  56 

?3,3?17 

77626 

1 

CALL 

0355 

REF 

1 

23 ,3220 

26171 

1 

SVDWN2 

0356 

23,3221 

77626 

1 

FAZAB6 

CALL 
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85  IF  NCCN  CRPIT,  87  IF  EAPTI- 
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0357 

PFF 

IS 

LAST 

1198 

23,3222 

11226 

1 

GPP2  PC 

Q35R 

23, 3223 

772  19 

0 

BOFF 

VLCAO 

(135S 

REF 

7 

LAST 

1197 

23  ,3229 

02  796 

0 

DMENFLG 

036') 

ocp 

1 

23,3225 

97230 

C 

FA2AB5 

03M 

REF 

3 

LAST 

1198 

23, 3226 

03972 

0 

TX789 

1362 

REF 

c 

LAST 

119F 

23,3227 

01701 

0 

STCRE 

X7B9 

•)363 

23, 3230 

66  150 

0 

FAZA85 

L XA  , 1 

SXA  ,1 

C364 

REF 

5 

LAST 

1195 

23,3231 

12772 

1 

EGRESS 

0365 

RPF 

12 

LAST 

1083 

23,3232 

000  5 2 

c 

CFPET 

03A6 

23, 3233 

7 77  76 

1 

EXIT 

C36  7 

RFF 

55 

LAST 

862 

23 ,3239 

1 963  5 

0 

TC 

POST  JUMP 

0368 

P.FF 

3 

LAST 

619 

23,3235 

27923 

1 

CACR 

INTWAKF 

0369 

23, 32  36 

5 20  39 

1 

COCSM 

RTB 

GCTC 

037C 

RFF 

1 

23,3237 

26729 

1 

PCVEFCSP 

0371 

REF 

1 

23,3290 

97  150 

0 

FAZAB 

0 3 72 

23,3291 

95039 

1 

ccrsM  1 

RT8 

CALL 

0373 

RRP 

1 

2 3 , 3 29  2 

2 6 6 7 5 

1 

MCVFACS  P 

03  7A 

REF 

2 

LAST 

298 

23, 3293 

26  119 

1 

SVDUM 

0375 

23 , 3299 

77650 

1 

GOTO 

0376 

REF 

1 

23, 3295 

9722  1 

c 

FAZAB9 

0377 

REF 

19 

L AST 

1199 

23,2523 

ZFRnO 

= 

ZEROVEC  S 

03  78 

23,3296 

00066 

1 

59Cr 

CEC 

59 

037Q 

23,3297 

7 777  1 

0 

6DD 

CEC 

-6 

0380 

23  ,3250 

10119 

1 

12CC 

CEC 

12 

0900 

RFF 

1 

22 , 2C00 

SETLCC 

RENDEZ 

0901 

22,  37  1 1 

BANK 

09C2 

REF 

1 

COUNT  X 

i }/ INCOR 

19  13 

22,  ’711 

5157  = 

1 

NFHZCCPF 

VLCAC 

AEVAl 

0909 

REF 

17 

LAST 

1196 

22,3712 

02693 

1 

ZI 

0905 

REF 

1 

22,3713 

29C95 

0 

STCVL 

NCP«Z  I 

0906 

REF 

18 

LAST 

119S 

22,3719 

0265  1 

1 

ZI  +6 

09C7 

22,3715 

91996 

1 

ABVAL 

PUSH 

0908 

22 ,37  16 

50025 

c 

CSL 

8PN 

0909 

REF 

2 

( AST 

1199 

22,3717 

00095 

0 

NCPVZI 

C910 

22  ,3720 

95723 

0 

* 3 

091  1 

22,3721 

95595 

1 

CLCAC 

STADR 

0912 

REF 

3 

LAST 

1199 

22,3722 

77732 

1 

STORE 

NQRMZI 

0913 

22.3723 

51575 

1 

VLCAC 

ABVAL 

0919 

REF 

19 

L AST 

1199 

22, ’ 739 

C265  7 

1 

ZI  <-120 

0915 

32  ,3  725 

95206 

1 

PUSH 

OSU 

0916 

REF 

9 

LAST 

1 19C 

22,3726 

00095 

0 

NCPMZI 

0917 

22,3727 

71290 

1 

BPN 

OLCAO 

091  8 

22,3730 

95733 

1 

*3 

09  19 

22,3731 

77626 

c 

STACR 

092u 

RPF 

5 

LAST 

1199 

22, 3732 

77732 

1 

STORE 

NCF  MZI 

0921 

32 ,’733 

66195 

1 

CLCAC 

SXA,  1 

092? 

RFF 

6 

1 AST 

1199 

22,3739 

00095 

0 

NCPPZT 

0923 

PFF 

7 

LAST 

1199 

22 ,3735 

01099 

1 

NCRMZ I 

0929 

22  ,3736 

62101 

u 

NCR*' 

INCP  ,1 
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LARGEST  ABVAL 


SAVE  XI 


G4P: 
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L YF4SURFYFNT  INCCP PCR AT IPN 


C425 

PFF 

36 

LAST 

1143 

22,3737 

00047 

1 

X 1 

0426 

22,3740 

OCCO? 

C 

EEC 

2 

042  7 

22, 3741 

53775 

1 

VLTAD 

VSL* 

C42P 

PFF 

20 

1 AST 

1149 

22 ,3742 

02643 

1 

L I 

0429 

22.3743 

2C201 

0 

0,1 

043  0 

RFF 

21 

LAST 

1150 

22, 3744 

26643 

1 

STCVL 

ZT 

0431 

rff 

22 

LAST 

1 1 5C 

22,3745 

02651 

1 

Z1  +6 

0432 

22, 3746 

77657 

0 

VSL* 

C433 

22,3747 

20201 

0 

0, 1 

0434 

REF 

23 

LAST 

1150 

22,3750 

26  651 

1 

STCVL 

71  +6 

0436 

RFF 

24 

LAST 

1150 

22, 3751 

02657 

1 

ZI  +120 

0436 

22,3752 

6605  7 

0 

VSL* 

S XA , 1 

0437 

22, 3753 

2C201 

0 

0 ,1 

043  8 

REF 

8 

LAST 

1149 

22.3754 

O0045 

0 

NCPMZI  +1 

0439 

RFF 

25 

LAST 

1150 

22,3755 

02657 

1 

STCRE 

ZI  +12C 

0440 

23,3756 

54  150 

1 

LXA.l 

XSL  ,1 

0441 

PFF 

6 

L APT 

1147 

22  ,3757 

12  113 

1 

NCPMGAM 

0442 

RFF 

9 

LAST 

11  50 

22  ,3760 

000  4 5 

0 

NCRM2I  +1 

0443 

22,3761 

7 7660 

1 

>SL  ,1 

0444 

RFF 

10 

1 AST 

1150 

22  ,3762 

00045 

0 

NORMZI  +1 

0448 

22,3763 

7C13C 

1 

SXA  ,1 

LXC  ,1 

0446 

REF 

7 

LAST 

1 1 50 

22,3764 

02103 

1 

NCRMGAM 

0447 

RFF 

1 I 

1 AST 

11  5l 

22 ,3  765 

00045 

0 

NCPMZI  +1 

0448 

22,3766 

40270 

0 

XAC.l 

SFTPD 

0449 

R6F 

12 

LAST 

11  50 

22 ,3767 

00044 

1 

NCRMZ 1 

0450 

22,3770 

0000  3 

1 

2C 

0451 

22,3771 

77650 

1 

GOTO 

04  52 

RFF 

2 

1 AST 

1143 

22.377? 

4667  1 

0 

INfOP2  -3 

0453 

0044 

NCPWZ I 

= 

36D 
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L CCMC  'LBROLTINES  LSFB'S  PAGE  AC.  1 EO  S3 

POOni  PRCGPAP  CFSCRIPTICN  - FMIRF  CCMC  SLBFCUTIAF  L C G SEC7ICA  CATE  - 1 SEPTEPEER  1967 

P00n3  PCO  MO.  - 0 ICG  SECTICN  - CCM  IC  SUEROUTtNES 

PCCC5  MCD  BY  KRAUSE  ASSFPBLY  - CCLCSSIS  REVISICA  88 

P0(J97 


ROOOR  FUACTTCAAL  CFSCFTFTICN  - 

ROOP9  THE  FQLLCWING  SET  CF  SUBBCUTINES  SCLVE  VARICUS  FRCBLEPS  INVOLVING  TEE  TRAJECTORY  PRODUCED  BY  A CENTRAL 

RTTl)  INVERSF-SOUARF  FORCE  ACTING  ON  A OCINT  PASS,  AS  CLTLINED  IN  THE  CPC  ANC  LGC  LLNAR  LANCING  PISSICN  GSOP,  SECTION 

R0C13  ‘=.5.1.2.  A GFNERAl  LSAGF  PC  I NT -c  F-V  I FW  HAS  TAKFN  IN  FCRHLL  A T TNG , PECHAM2ING,  AND  SCALING  THE  SLERCLTINES, 

R0019  RAThEP  than  nPTIPIZING  FACH  FCR  A FARTTCLIAR  LSE.  THEREFCPE,  PLLTIFLE  USAGE  CAN  PE  MACE  CF  THE  SLPROLTINES 

POOIT  INVOLVING  ANY  REALISTIC  SET  OF  CONSTRAINTS.  IT  SHOULD  BE  NOTED  THAT  CNLY  CNE  SET  CF  CCCING  IS  USEC,  WHETHER  THE 

R0C19  earth,  pCFN,  OP  ANY  CTHFR  CELESTIAL  PCCY  IS  SPECIFIEC  AS  THE  CENTRAL  BCCY  CF  THE  PRCBLEP,  PROVIOEC  CNE  CBSEFVES 

R002!  the  INHERENT  SCALE  ohANGF  REQUIRED  IN  PCSITICN,  VELCCITY,  PU , ANC  TIPE,  AS  OUTI.INEC  IN  PISSION  PRDGRAMPING 

R0O23  OEFINTTIFN  PFPC  NF.  1".  THIS  CAN  BE  ACCOPPLISHED  BY  SIMPLY  ACOING  TO  THE  PUTABIE  AND  INITIALIZING  THE  SUFRCU- 
RT02E  tines  APPPOPRI ATEI Y. 

P.0026  CLE  TO  THE  LMFCRMITY  CF  THE  ECUATICNS  INVCLVEC,  CODING  NAS  PIMPIZED  PY  TREATING  INCIVICUAL  ECUATICNS  ANC 

R0028  BLCCK'  CF  ECUATICNS  AS  SlIBP CUT  I N ES  CF  LCWER  RANK  WHENEVER  POSSIBLE.  AS  A RESULT,  THREE  BY-PRCCLFTS  SLPRCLTINES, 

R003O  riRFClLY  USABLE  AS  INDEPENDENT  SUPPCLTINES,  KFPE  CENEPATEC. 


R0031  PESTRIFTICNS  - 

R003?  The  CNLY  LIMITATION  IN  THE  SCOPE  CF  PROBLEp  WHICH  CAN  BE  SQLVEC  BY  A PARTICLLAR  SUBROUTINE  15  THE  SCALING 

R0034  LIMIT  OF  EACH  PARAMETER  AS  SPECIFIEO  IN  THE  GSCP.  THESE  SCALING  LIMITS  HERE  CHCSEN  SC  THAT  ALL  FEASIBLE  TRAJEC- 

RC036  1CRIE5  CCLLC  BE  HANCLFD. 

ROC37  SINCE  THE  SUBPOLTIN'^S  (EXCEPT  KEPIERI  USE  CCNPCN  'UBPCUTINES  CF  LCWEP  °ANK  WHICH  USE  ERASAPLE  CTHFR  THAN 

RP039  THE  PL9HLIST  (CUE  TC  ITS  LImITEO  SIZE)  ANC  CCPPCN  INTERPRETIVE  SWITCHES,  THE  CCNIC  SUPRCUIINES  CANNOT  EE  ALlCwEC 

RCOAl  TO  INTERRUPT  FACH  CTHEP.  IT  IS  UP  TC  THE  USER  TG  GUARANTEE  THIS  CCNCITION. 

R0063 
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1 

POOAA 

R00A6 

RQC9F 

R0050 


ROOS02 


R0n=fi3 


R0051 

R00  52 

ROdKA 

Rn056 

R005P 

R0060 

R0062 

R0063 

R006S 

R0C65 1 

R00653 

R0066 

R0C67 
R006R 
R0071 
ROC  7 7 
R0075 

R0C7C 
R007B 
ROCHO 
ROOF  1 


R0082 
POOR  3 
R00R5 
R0086 


RCC87 

R008R 

R0C89 

R0090 

R0091 

PQ092 


OCMC  SLBRCITUES  LSFR'S  PAGE  NC.  2 EO  S3 
PBOGPAP  CESCRIP7ICN  - KFPLFP  StPECLTUE  CATE  - 11  CCTCEEP  1967 

POr  AC.  -I  LCG  SECTION  - CCMC  SUPPCUTINES 
PCO  By  KRALSE  ASSEMBLY  - COICSSLS  103  AAO  SLFCAACE  222 
POr.  NO.  - 2 (AIICLST  1968)  PY  ROBERTSON:  TO  PERMT  BACKDATING  BY  RCPE  THAN  CNE  CPBITAl  PERIOO. 


PCC  NO.  - 3 (EEC  1968)  BY  ROBFRYSON:  S'JPPRESSICN  OF  7-MOCULO-l  NG 


MOB.  NO.  - A (JAN  1969)  BY  RCPFPTSCN:  CLEAR  CVFINC  AT  KFPlEP  ENTRY 


FUNCTICNAl  DFSCPIFTICN  - 

THIS  SLBPOUTINF,  GIVEN  AN  INITIAL  STATE  VFCTCR  ANC  TFE  OESIREC  TRANSFER  TINE  THRCLGH  ViHICH  THE  STATE  IS  TC 
PE  UPCATEO  ALONG  A CONIC  TPAJECTCRY,  CCNPLTES  THE  NEW,  LPDATEC  STATE  VECTCP.  THE  TRAJECTORY  NAY  EF  ANY  CCNIC 
SFCTITN  - riPCUlAR,  elliptic,  PARAEOLIC,  HYPERBCLIC,  or  RETTILINFAR  WITH  RESPECT  TC  THE  EARTH  CP  THE  NCCN.  THE 
USE  OF  THF  SUBROUTINE  CAN  BF  FXTFNOEC  USING  OTHER  FRINARY  BOCIES  PY  SIVPLE  ADDITIONS  TO  THE  MUTABLE  WITHOUT 
INTROruriNG  ANY  COCING  CHANGPS,  ACCEPTING  THE  INHERENT  SCALE  FACTOR  CHANGES  IN  PCSITKN  AND  VELCCITY.  AN  ITERA- 
TION TECHMCLF  IS  UTIIIZEC  IN  THE  CCPfUTATION. 

IF  A NEGATIVE  T I HE-CF-F I IGHT  IS  INPUT,  THE  FRCGPAP  WILL  SOLVE  FCP  THF  STATE  WHICH  WOULD  BE  PPOCLCEC  BY 
FXTPAFCLATING  THF  PCSITICN  BACKWARD  IN  TIME. 

IF  THF  ABSOLUTE  VALUE  CF  T)E  DESIPEC  TRANSFER  TINE  EXCEEDS  THF  ORBITAL  PERICO,  THE  SUBROUTINE,  THRCLGH  A 
‘-rruLAR  TFCHNIUUF,  WILL  COMPUTF  7HE  STATE  CORRESPONDING  TC  THE  DESIPEC  tire  (WHETHER  POSITIVE  CR  NEGATIVE). 


THE  RESTRICTIONS  ABF  - 

1.  (PREVIOUS  RESTRICTION  ON  THE  NEGATIVE  DESIRED  TRANSFER  TIHE  IS  NCW  DELETED.) 

7.  the  PARAMTEPS  in  THE  PRCBLEN  CANNOT  ExCEFC  THEIP  SCALING  LIMITS  AS  SPECIFIFD  IN  THE  GSCF.  IF 
ANY  OF  thE'R  limits  «RP  FxCEECEO,  THE  RESULTING  SCLLTICN  W’LL  BE  NFANINGLESS. 


THE  NUMBER  OF  ITFRATICNS  AND,  THEREFCRE,  THE  COMPUTATION  SPEED  IS  DEPENDENT  ON  THE  ACCLPACY  CF  THE 
GUESS,  XKFDNEW.  the  AGC  COMPUTATION  TIME  IS  APFPCXI MATFL Y .U6l  SFCCNOS  FOR  INITIALIZATION,  .065  SECONDS  FOR  THE 
FINAI  rCMFUTAT  IONS  , FLOS  .183  SECONDS  FOR  EACH  ITERATION. 


REFERENCES  - 

R-^79,  MISSICN  PROGRAMHINC  DEFIMTIGN  MEMO  NO.  1C,  LUNAR  LANDING  MISSION  GSCP,  SECTICN  5.5,  5GA 
MEMO  6 7- A. 


INFLT  - FRASAPLE  I n it  IAL  I ZAT UN  RECUIPEC 
A SCALE  FACTCR  » 

VARINEIFT'IN  FOWFPS  CF  2*  DESCRIPTION  AND  REMARKS 

* ♦ 

RRECT  ♦ FOP  EARTH*CP  INITIAL  PCSITICN  VECTOR  IN  METERS 

* *21  FCR  MCCN  # 
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CINjr  SLRPnuTINFS 


tSER'S  PAGE  NO. 


EC  S3 


P0093 

R009A 

R0095 

R00°7 

BCC9P 

POORfl? 

Rnno9 

ROlOO 

ROl-.l 

POICI  7 

POK? 

R0103 

RO  105 

R0106 


VPECT 


XI 


* +7  FOP 

* +5  FCP 
(3801*  NONF 

4 


7AU 


XKFPNEK 


TC 

XPPEV 


* +28 
* 

* 


+17  FCP 
+16  FOP 


+ 28 

+17  FOR 
+16  FCR 


FARTI-  *CP  IKITIAL  VELCC17V  VECTOR  IN  P FTER  S /CE  N T I SEC  CNO 
FCCA  * 

*INOEX  REGISTER  SET  TO  -2C  OR  -100  ACCCpQING  TC  WHETFER  TFE  EARTF  CR  MCCN, 

*PFSPSCT  IVELV  , IS  TFF  CENTRAl  BCDV 

♦ CFSIPED  transfer  ia  CPNTISECCNDS  (CP) 

♦ MAY  RF  PCS  OR  NEG  ANC  ABSCLLTE  VALUE  PAY  EE  GFFAtfP  CR  LFSS  T+AN  CNE  CREITAL  PERIOC. 

FAPTH*CF  GUESS  CF  ROOT  X CF  KFPLERS  FQN  IM  SOR T ( P E TER S ) . SIGN  SHCLLC  AGREE  UITH  THAT  CF  TAU. 

PCCN  * and  A8S  VALLE  SHCULC  EE  LESS  TFAN  TFAT  CORRESPONDING  TC  A PERIOD, VIZ,  2PI  SCRKSEPI- 

* MAJOR  AXIS), FOR  SPEED  OF  CCN VERGENCE  ,BLT  IF  EITFEP  CCNCITICN  FAILS,  XKEPNEF  IS  RESET 

* BY  KFPLFE  TO  A POOR  PUT  VALID  GUESS. 

*0P  PRFV.  VALLE  CF  TIPE  IN  CENTISECS.  mlST  EE  LESS  THAN  CNE  CREITAL  PERIOC. 

FARTF*CP  PRFV.  VALLE  OF  X IN  SOR T ( PETER S ) . MLST  EF  LESS  THAN  AN  X CCR RES  PC N C I N G TC  CNE 

PCCN  * CREITAL  PEP  ICC, VIZ, 2FI  S C RT (S EP  I-P A JOR  AXIS) 


R01C7  SLEPCLTINFS  CALLEC  - 

R01C8  CELTIME 

ROIOR 


RCll'  CA11.ING  SFCLPNOE  ANC  NCRPAI.  EXIT  pCCES  - 

ROin  KFPRTN-2  GOTO  MLST  BE  IN'  INTERPRETIVE  MCOE  PLT  CVFINC  ARPITPARY. 

R0113  K=FRTN-1  kFPLER  RETURNS  WITH  XPREV  IN  PPAC.  PL  IS  A1  C. 

ROlU  KPPRTN  ...  CCNTINLE 

R0115  KEPLFR  must  not  re  CAI  I FC  directly  since  an  INTERFUPTICN  OF  IT  WCLLC  DESTROY  THE  ERASSPLES  IT  NFECS  TC  COMPLETE 

R0117  THE  INTERRUPTED  JGP.  THEFEFCPF  THE  USER  MUST  CALL  CSMCONIC  OR  LEMCCNIC  WHICH  GLARANTFES  NO  INTEPPLFTS  ANC  WHICH 

R0119  Also  CALLS  KFPPREP  TC  CCVFL'TE  A GLESS  CF  XKEPNEW. 

R0120 


R0121  ABORT  Exit  mopfs  - 

R0122  NONE 

Rni23 


R012A  OLTPLI  - 


R0I25 
R0126 
R0127 
RT  12R 
R0129 
R0130 
ROl  31 
R0132 
R013A 
R0136 


* SCAl  E FAC  TCR  * 
VART  »p|  R*  tN  FCWEPS  cf  2* 


PCV 

♦ 

+ 29 

FOR 

EAPTH*CP 

♦ 

+ 27 

HCR 

PCCN  * 

VCV 

* 

+ 7 

FOP 

FARTH  *PP 

♦ 

+ 5 

FOR 

PCCN  * 

TC 

* 

+ 2P 

* C c 

XPREV 

+ 17 

FOR 

earth*dp 

* 

+ 16 

FTP 

PCCN  * 

DESCRIPTION  AND  REPARKS 
terminal  pcsiticn  vectcp  in  peters 

TEPPINAL  VELCCITY  VEGTCP  IN  P ET F RS /C ENT  I S E C 

To/NSFEF  TIPE  in  CFNTISECS  TC  WHICH  KEPLER  CONVERGED. 
VALLE  CF  X IN  SCRT(PETERS)  TC  WHCIH  KEPLER  CCNVERGED. 
CCRRESPOND  ING  TO  CNE  PERICO. 


ALWAYS  LESS  THAN  CNE  FEPICC. 
ALWAYS  LESS  THAN  THE  x 


gap: 

L 

R J137 
R0138 


R0139 

ROIAH 

POlAl 

ROIA? 

R01A3 

ROIA^ 

R01A5 

R3146 

R01A7 

ROI-iB 

PCI  A8  1 

R01A83 

R01A9 

P015P 

R0152 
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DEBRIS  - 

PARAMETERS  WUCF  MAY  BE  CF  USE  - 

* SCALE  FACTOR  * 

VARIABLFAIN  POWERS  CF  2«  CESCRIPTICN  ANC  REAARKS 

* » 

LRRECT  ♦ *•!  *CF  LMT  VECTCP  CF  INITIAL  FCSITICN 

R1  ♦ +29  FOR  FARTH*CP  MACNITLOE  CF  IMTIAl  PCSITKN  IN  METERS 

* +27  FCP  MCCN  f 

ALPHA  * -22  FOR  FARTHa-OP  INVERSE  CF  SEMIMAoCP  AXIS  IN  1/METERS 

* -20  FOR  MOON  * 

TmOCLLC  # +28  *0F  INTCGRAL  NUMBER  CF  PERIODS  IN  CFNTISECS.  WHICH  WAS  SUBTRACTED  FRCM  TAl.  1C  FRCCLCE  A 

* *TAIJ.  CF  less  than  CNF  PERICC. 

PARAMETERS  CF  NX  USE  - 

DP  parameters  - EPSIICNT,  OELX,  CELT,  RCNCRM,  XMCCULC,  PLUS  PUSHLISl  REGISTERS  C THMCLGH  390. 


G4P: 

L 

PT153 

R0155 

R0157 

fi015<> 


RC16C 

P016I 
R0163 
ROlf  5 
R0167 
R0169 
Rom 
R017? 

R0173 
ROl  7^ 
R0175 
ROl  77 
R0179 
PQlflO 
RO  in? 
R018A 
ROl  f 5 
R0187 
R0189 
R019  1 


R019? 

R1193 

R0198 

R019t 


RC197 

RO  19P 
R0199 

Rraco 

R0?0  1 
R0202 
R0203 
R02  19 
R020'5 
R02'16 
popna 
RC2C9 
R021  1 
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rCMC  SLPP'YLTINES 

PPCCRAM  CESCRTPTION  - LAPBERT  SUBROUTINE 
PTC  NC.  - 7 
MOO  BY  KRAUSE 


USER'S  PAGE  NC.  5 EO  S3 

CATE  - 1 SEPTE«FEP  1967 

ICG  SECTICN  - CCMC  SUEPCUTIKES 

ASSEMBUY  - CnUCSSUS  REVISION  8P 


FUNCTICNAI  CESCB  IPTICN  - 

7MB  SUnROUTIN'E  CALCULATES  THE  INITIAL  VELCCITY  RECUIREC  TO  TRANSFER  A RCINT-MASS  ALONG  A CONIC  TRAJECTORY 
FPCM  AK  lAITIAL  PrSITTCN  TO  A TfRMiMAL  POSITION  IN  A PRESCRIBED  TIRE  INTERVAL.  THE  RESULTING  TRAwECTCRY  RAY  EE 
A 'ECTfCN  OF  A CIRCLE,  FILIPSE,  PAPAECLA,  CH  EYFERECLA  WITH  RESPECT  TC  TFE  EARTH  OR  THE  MCON.  THE  USE  CF  THE 
SURROUTINF  CAM  RE  EXTEMnEO  L ' TNG  OTHER  PRIMARY  ECCIES  PV  SIMPLE  ACCITICNS  TC  TFE  mUTAELE  «ITFCLT  INTRODLCING  ANY 
COOING  CHANGES,  ACCEPTING  TFE  INHERENT  SCALE  FACTOR  CHANGES  IN  POSITION  AMO  VELOCITY.  AN  ITERATION  TECFNICUE  IS 
LTILIZFC  IN  the  CCMPLTATICN. 


THF  PESTRICTICNB  ARE  - 

1.  RECTILINEAR  TPAJECTCPIES  CANNOT  BE  CCMFUTEC. 

2.  AN  ACCURACY  CFGPADATICN  OCCURS  AS  THE  COSINE  CF  THE  TRUE  ANOMALY  CIFFERENCE  APPPCACFFS  <1.0. 

3.  THE  ANGLE  EEThEEN  ANY  FCSITICN  VECTOR  ANO  ITS  VELOCITY  VECTOR  MUST  BE  GREATER  THAN  1 DEGREE  97.5  MINUTES 
ANC  LESS  THAN  178  DEGREES  12.5  MINUTES. 

9.  nfgativf  tp/insfep  time  IS  ameiguols  anc  will  result  in  no  SCLLTICN. 

5.  THE  PARAmctEPS  IN  THE  PRCPIEM  MUST  NCT  EXCEFC  TFEIP  SCALING  LIMITS  SPECIFIED  IN  THE  GSCP.  IF  THE 
LIMITS  ARE  EXOFEGFO,  THF  PESLLTING  SCLLTICN  WILL  PE  MEANINGLESS. 

TFE  NUMOPP  OF  ITERATICNS  ANC,  TFEPEFOPE,  TFE  COMPLTATIONS  SPEEO  IS  OEPENDFNT  CN  THE  ACCURACY  CE  TFE  FIRST 
GUESS  OF  the  independent  VARIABLE,  COGA.  TFE  AGC  COMPUTATION  TIME  IS  APPROXIMATE- 

LY .105  SECONDS  FOP  INITIALIZATION,  .C69  SECONDS  FOR  FINAL  C C M PL T A T 1 0 N S , ELLS  .2C5  SECCNCS  FCP  EACH  ITEPATICN. 


RFEERENCFS  - 

P-979,  MISSION  PROGRAMMING  GEFINITION  MEMO  NO.  1C,  L LNAR  LANDING  MTSSICN  GSCP-SECTICN  5.5,  SGA  MPMC  67-8, 
SGA  MEMU  67-9. 


INFLT  - EPASAE^LF  INITIALIZATION  FECUIPEC 

* SCALE  FACTCP  * 

VARTAELE*1N  powers  DF  2«  DESCRIPTirN  AND  REMARKS 

♦ * 

RIVEC  ♦ *29  FOR  FAPTH*CP  INITIAL  PC'ITICN  VECTOR  IN  METERS 

♦ +?7  FOP  MOON  * 

R2VEC  * <29  FOP  EAPTH*CP  TARGET  CP  TERMINAL  FCSITICN  VECTOR  IN  METERS 

* <27  FOR  MOON  • 

TCESTREC*  <23  *0F  CESIPEC  TRANSFFR  TIME  IN  CENTISECONDS 

XI  (380)*  none  PINfiFX  REGISTER  SET  TC  -2D  CR  -IOC  ACCCRCING  TC  WHETHER  TFE  EARTF  CP  MCCN, 

♦ ‘RESPECTIVELY,  IS  THE  CENTPAL  3CDY 

GECMSGN  * NCNF  *SE  <.5  IF  CESIPEO  TRANSFER  ANGLE  IS  LESS  THAN  IPC  CEGREES,  -.5  IF  GREATER  THAN  18C  CEG. 

GUESSW  * NONF  *AN  INTERPRETER  SWITCH  TC  BE  SET  IF  NC  GUESS  CF  CCGA  IS  AVAILABLE,  CLEAR  IF  A GLESS  CF 


GAP 
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1 CCNIC  SOePnuTlNES 


USER*  S PAGE  NO.  6 EO  S3 


ROE  13 

♦ 

R021A 

CCGA 

* 

+ 5 

R02I6 

R021  7 

NCRMSW 

* 

NONE 

R0219 

R0220 

LN 

* 

+ 1 

R0222 

R0224 

VT  argtag* 

NONE 

R0226 

R0227 

ITERCTR 

NCNF 

R0227 1 

* 

R02272 

♦ 

R02273 

♦ 

RC227A 

*rcG<  IS  TC  BE  ISEC  BY  LAPEEPT 

♦ no  GUESS  CF  CrlANGM  CF  FLIGHT  PATH  ANGLE  (PEASUREC  FPCP  VERTICAL).  THIS  NHL  BE 
♦IGNORED  IF  GUESSW  IS  SET. 

♦AN  IMFPPRFTER  ShITCH  TC  EE  SET  IF  UN  IS  TC  EE  AN  INPUT  TC  THE  SUBRCUTINF,  CLEAR  IF 

♦ L ALBERT  IS  TC  COMPUTE  ITS  OWN  NCRpal  (UM. 

♦DP  UNIT  NCPWAL  TC  the  CESIREC  CRBIT  PLANE  IN  THE  CIRFCTICN  CF  TH^  FESLLTINC  ANCLLAP 
♦♦OMFNTUP  VECTOR.  THIS  HILL  BE  IGNCREC  IF  NCPPSW  IS  CLEAR. 

♦A  S.P.  TAG  TO  BE  SET  TO  ZERO  IF  LAPBERT  IS  TC  CCPFLTE  THF  VEICCITY  AT  P2VEC  AS  WELL  AS 
♦AT  PIVFC. 

♦A  S.P.  CCLNTER  WHICH  SPECIFIES  THP  MAXIPLP  NUPBER  CF  ITFPATICNS  ALLOWABLE. 

♦(AN  ITERATION  MEANS  A PASS  THRLi  KEPLER  EON  (OELTIPE).  AT  LEAST  CNF  CF  THESE  PUST 
♦always  CCCUR,  even  IE  CCGA  CCP RES PCNC TNG  TC  SOLUTTCN  WERF  INPLT  AS  A GLESS.) 

♦TV.PNTV  ITERATIONS  ARE  SUFFICIENT  TC  SCLVE  ALL  FRCBIEPS  INCLUDING  THOSE  WITHCLT  GUESS. 


R022B  RLBPOLTINES  CALLED  - 

R1220  GECM,  GETX,  CELTIMF,  ITERATCR,  LAPENTER  (PART  CF  NEwSTATE) 

R0230 


R0231 

CALL  ING 

SFOLENCE 

AND  NORMAL 

EXIT  MODES  - 

R023? 

1 

CALL 

MUST  BE 

IN  INTERPRETIVE  MODE  BUT  OVFIND 

ARBITRARY. 

R0234 

R3236 

L+  1 

LAMBERT 

RETURNS 
IN  mpaC 

WITH  FL  AT  0 ANC  WITH  VVFC  IN  PPAC 
IF  VTARG1AG  WAS  ZERO 

IF  VTARGTAG  WAS  NON-ZERO  OR  VTARGET 

R0237 

R0239 

R(T2A0 

Lf2 
1 t? 
L+A 

BON 

SCLNSW 

LAPABOPT 

CONTINUE 

IF  SCLNSW  CLEAR  SINCE  SCLLTION 

IS 

acceptable 

R02A1  IF  A LAMBERT  RESULT  IS  TC  BE  A FIRST  GUFSS  F(7R  THE  NEXT  LAM8ER7  CALCULATION,  CCGA  PUST  BE  PRESEPVEC  ANC 

R02A3  GUESSW  MUST  BE  C I EAR  FOR  EACH  SUCCFEDING  LAMBERT  CALL. 

R02AA 


R024E 
R 1?A6 
R02AF 
R02SO 
R0252 
R0253 
R025A 
R025S 
RC2S6 
R0257 
R025B 
P02S9 
R02N'> 
RC761 
R0262 


ABORT  Fxn  modes  - 

IF  SCLNSW  WAS  SET  UPCN  EXITING,  EITHER  LAMBERT  WAS  ASKEC  TO  CCNPLTE  A 
WAS  Tec  SNAIL  TC  PPCCUCE  A REALISTIC  TRANSFER  EITWEEN  RIVEC  AND  R2VEC.  IN 
ACCORDING  TO  THF  NEEDS  CF  THF  PARTICULAR  USER.  THE  AECPT  EXIT  POCE  PAY  BE 


LAPABOFT  CLCAD  A6S 

l-CSTH 
OSU  BPN 

CNEBIT 
CHANGFP? 
CLOAC  CAC 

TFES  IRED 
SCPETIMF 
STCAI  L TDES  IRFD 
LAPPEFT 


A measure  of 

360  CEGREES. 


PRCXIPITY  1C  0 CR 


CHANGE  R2VEC  CIRECTICN  SLIGHTLY. 


INCREASE  TOESIREO 


TRANSFER  TCC  NEAP  0 CP  360  CEG,  CR  T 
EITHER  CASE  THE  FIX  PL5T  BE  PACE 
COCEC  AS  ... 
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L Cr.MG  SUBRCUTINES  LSEF'S  PAGE  NO.  7 EO  S3 

RC263  CUFU  - 

R026A  * SCALE  FACTCR 

R0265  VARIAELE^IN'  PCWFPS  CF  2*  DESCRIPTICN  AND  RENAPKS 

R0266  * * 

R0267  VVEC  * +7  <=nR  EARTH  *DP  INITIAL  VELCCIIY  VECTCR  IN  N F TE  P S /C  E N T I S E C C N C PECUIRFC  TC  SATISFY  T)-e  EOUNCARY  VALLE 
R0269  * +9  FCP  RCCN  *PR0ELFN. 

R0270  VTARGET  * +7  FGP  EARTH  *DP  RE'LLTANT  VELCCTTY  VECTOR  AT  R2VEC  IN  M E T ER  S / C E NT  I S EC  CNI)  . 

R0272  * +9  FOR  HOON  * 

R0273  SCINSV'  * NONE  *INTEREPETEP  SWITCH  WHICH  IS  SET  IF  THE  SUSRCUTINE  CANNCT  SOLVE  THE  PRCBLEN,  CLEAR  IF  THE 

P0275  * *SCLLTICN  EXISTS. 

R0276  FCF  ETHER  OUTPUT  WHICH  NAY  EE  CF  LSE,  SEE  DEBRIS. 

R0277 


R0278  CEERIS  - 

R0279  FARARFTEPR  WHICH  NAY  EE  CF  USE  - 

R 1280  * SCALE  FACTCR  * 

R0281  VARIAELE*IN  POWERS  OF  2*  DESCRIPTICN  AND  PENARKS 


R028? 

P0283 

snth 

+ 1 

T^DP 

SIN  OF  ANGLE  BETWEEN  RIVEC 

AND  R2VFC 

RC284 

CSTH 

+ 1 

=>CF 

COSINE  OF  angle 

R0285 

1-CSTH 

+ 2 

«DP 

1-CSTH 

R0286 

COCA 

* 

+ 5 

*CP 

CCTAN  OF  INITIAL  RECLIPED 

FLIGHT  PATH 

ANGLE  NEASL’RFC  FRCM  VERTICAL 

RC2E9 

P 

+ 4 

«CF 

RATIO  CF  SENILATUS  RECTUM 

TO  INITIAL 

RACILS 

R0290 

R lA 

+ 6 

>KDF 

RATIC  CF  INITIAL  RACILS  TC 

SEN  IMA JOR 

AX  IS 

R0291 

PI  (32C)» 

+ 29 

FUR 

EARTHYDP 

INITIAL  RACILS  IN  METERS 

R0292 

* 

+ 27 

FCR 

NCCN  * 

R0293 

UR  1 

+ 1 

*0F 

LNIT  VECTOR  OF  RIVEC 

R0294 

U2 

Jr 

+ 1 

UN  IT  V ECTOR  OF  R 2VEC 

R0299  parameters  CE  NO  LSE 

P.0296  CF  PARANETERS  - EPS  ILONL  , CSTH-RHC,  TPREV,  TeRRLANB,  R2,  RTNL.AHB  (SF),  PLLS  FLSHLIST  REGISTER  0 THROUGH  AlC 

R0298  additional  INTERPRETIVE  SWITCHES  USEC  - INFINFLG,  36CSW,  SLOPESW,  ORDERSW 

POSCO 
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L 

PC30  1 
R0  303 
RO305 
R0307 


R030R 

R03C9 
RP31  ! 
R0313 
P0315 
R0317 
RC31  9 
R0320 

R0321 

R0322 

R732A 

R0325 

R0327 

Rn32fl 

RC329 


R033C 

R0331 

R033B 


R033A 

R0339 

R0336 

R0337 

R0338 

R0339 

R036n 

RC391 

RO39? 

R03A4 

R03A5 

R03A7 

R03A8 

R035D 

80391 


R0352 


CCMC  SUPPCHTINFS 


LSEF' S PAGE  NC.  8 EO  S3 


PRCGRflF  OESCPIPYKA  - TIPE-TI-ETA  SLPPCUTIAE 
PCC  NC.  - 0 
YCC  PY  KRAUSE 


CATE  - 1 SEP7EKREP  1967 

ICG  SECTICN  - (CNIC  SUBROUTINES 

ASSER81Y  - CCICSSUS  PFYISICA  88 


ELAPTIONAL  CFSCPIFTICA  - 

THIS  SLBPOUTIAE,  GIYEA  AA  IMTTAL  STATE  VECTOR  ANC  A CESIREO  TRUE- ANCM  AL  Y-C  IF  FER  ENCE  THROUGH  V.H1CH  THE 
state  IS  TO  RE  UPOATEC  ALONG  A OCMC  TRAJECTORY,  CALCLIATES  TEE  CO P FF SPCN 0 TNG  T IPE-CF-FL  IGHT  ARC,  IN  AOCITICN, 
PBOVIFfS  THF  CPTICN  of  rrvpiiT INC  TEE  NEW  UPCATEC  STATE  VECTOR.  THF  RESLLTIN&  TRAJECTORY  KAY  EE  A SECTICN  CF  A 
CIRCIE,  FLLIPSE',  PARAROl ^ , OR  HyFEFPCIA  WITH  RESPECT  Tf  TEF  EABTE  CF  TEE  MCQM . TEE  USE  CF  THE  SLPROLTINE  CAN  PE 
EXTENCPO  USING  OTEER  PRIMARY  BODIES  BY  SIPPLE  ACDITIONS  TC  TEE  MUTABLE  WITECUT  INTPCCUCING  ANY  CCCING  CEANGES, 
ACCEPTING  TEF  INEERENT  SCALP  FACTOR  CEANGES  IN  PCS  IT  ION  ANC  VELOCITY. 


TEF  R FSTP  ICT  IONS  ARE  - 

1.  THE  ANGLE  BETWOON  ANY  PCS'TICN  VECTOR  ANC  ITS  VELOOITY  VFCTCR  MUST  BE  GREATER  THAN  1 DEGREE  A7.5  MINUTES 
ANC  LFSS  THAN  178  DEGRFFS  12. S MINUTES. 

2.  TEE  PAPAMFTEPS  IN  TEF  RRCBLEM  MUST  NOT  EXCEEC  TEEIR  SCALING  LIMITS  SPECIFIED  IN  THE  GSCF.  IF  TEE  LIMITS 
ARE  FxCEEOEn,  THE  RESULTING  SCLUTICN  WILL  BE  MEANINGLESS. 

tee  AGC  COMPLTATION  TIMF  IS  A P PRC  X 1 M ATF L V .292  SECCNCS. 


PEPORENCFS  - 

R-479,  MISSION  PROGRAMMING  OEFINITION  MEMO  NC.  10,  LLNAR  LANDING  MSSICN  GSCP-SFCTICN  5.5,  SCA  MEMO  67-8. 


INPUT  - PpASABLF  INITIALIZATION  ROCLIREC 


* SCALE  factor  « 


VAPIABLE*IN  powers  CF  2* 
« * 


CESCRIPTIDN  ANC  REMARKS 


RVEC  ♦ +29  FCF  EARTEtOF  INITIAL  FCSITICN  VECTOR  IN  MFTERS 

♦ +27  FfR  mccn  ♦ 

VVFC  ♦ +7  FOP  EARTE  *08  INITIAL  VELOCITY  VECTOR  IN  METERS ACEN T I SECCNO 

* M5  FCP  NCCN  * 


SNTE  * <1 

CSTH  * +1 

RVSW  * N'CNF 

♦ 

XI  (38ri*NCNF 
* 


*0P  SINS  OF  TRUE-ANOMA LY-C IFFFPENC E TERCUGE  WEICE  TEE  STATE  IS  TO  EE  UPCATED 
TCP  COS  INE  OF  THE  ANGLE 

«AN  interpretive  SWITCE  TC  BE  SET  IF  ONLY  TIME  IS  TC  BE  AN  CLTPLT,  CLEAR  IF  TEE  NEW  STATE 
*IS  TO  be  COMPETED  ALSC. 

♦INCFX  REGISTER  TO  EE  SET  TO  -2C  OR  -ICO  ACCORDING  TC  WHETHER  THE  EARTE  CP  MCCN, 

X'OESPErTI  VcLY  , IS  TEE  CENTRAL  BCCY. 


SLBPOl T INFS  CAL  I EC  - 
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R0353  PARAM,  cenP,  GETX,  CELTIPE,  NE'nSTATE 

P035A 


Rn355  CALLING  SPQUENCF  AND  NOFyaI  EXI7  POGES  - 


R0356 

IF 

cnly  time 

IS  CESIREC  AS 

OUTPUT  - 

R0357 

L 

SET 

CALL 

PLST  BE  IN  INTERPRETIVE  MCCE  EUT  OVFINC  ARBITRARY. 

R0  359 

1 + 1 

P VSw 

R036'' 

L ^ 2 

T IPETHET 

RETURN  WITH  PL  AT  C ANC  T IN  MPAC 

P036  1 

1 

... 

CCNTI NUE 

P0362 

R0363 

I F 

THF  UPDATF 

STATF  VEETCR 

IS  CESIREC  AS  WELL  - 

R036A 

1 

CLEAR 

CALL 

MUST  BE  IN  INTERPRETIVE  MCCE  BUT  CVFINC  ARBITRARY. 

R0366 

L*  1 

PVSW 

R0367 

L + 2 

TIMETHET 

RETURNS  WITH  PL  AT  6.  THE  INITIAL  POSITION  VECTOR  IS  IN 

00 

OF 

the  RLSHL I ST  ANC 

R0369 

THE  INITIAL  VELOCITY  VECTOR  IN  PPAC. 

R03  ?E 

Lf3 

STEVL 

NfWVVEC 

PC371 

L fa 

STAOP. 

R0372 

LF5 

STOPF 

N EWPV  EC 

NEWVVEC  AND  NEWRVtC  ARE  SYPBCLIC  REPRESENTATIONS 

CF 

TFE 

USERS  LOCAT  IONS. 

R037A 

L F6 

. . . 

CCNT  INUE 

P03  75 

R0376 

A8CRT 

EXIT  PCCES 

_ 

'77377  IF  COGAFIAG  ANL /CR  INFINFLG  IS  SET  AT  THE  EXIT  TO  TIME-THFTA,  TIME-thETA  KILL  TRANSFER  Tt  FCCOCC  WITH 

R'BTP  an  alarm  roCE  (ORIGINALLY  006071.  AND  NCT  RETLRN  TO  THE  CALLING  FREGRAN.  (PGR  692  ANC  721). 

R0386 


RO’B? 

R03R8 

R03PS 

R0396 

R0391 

R0392 

R039A 

R03P6 

P039R 


OUTPUT  - 


* SCALE  FACTOR  ♦ 
YARIABIE*IN  PONTRS  CF  2* 


CESCRIPTION  AND  PEPARKS 


*. 


* 


T non  A ♦2fl 

infinflg*  nene 

♦ 

CCGAFLAG*  ncne 

« 


*CF  TRANSFER  TIPE  IN  CENTISECCNOS 

*AN  INTERPRETIVE  SWITCP  WHICH  IS  SET  IF  THE  TRANSFER  ANGLE  REOLIRES  CLGSLRE 
♦infinity  (NO  SOLUTION),  CLEAR  IF  A PHYSICAL  SCLUTICN  IS  PCSSIBLE. 

♦AN  interpretive  switch  which  is  set  if  HESTRICTICN  1 HAS  BEEN  VICIATEC  (NC 
♦CLFAO  IF  NOT. 


THRCLGH 
SCILT  ICN  I, 


R0399  IN  ArCTTICN,  TF  F VSW  TS  CLEAR,  THE  FOLLOWING  ARE  CLTPLT- 


ROAOO  PPAC  - ♦ +7  FOP  earth  *EP  TERMINAL  VPLCCITY  VECTOR  IN  ♦£ T E R S /C E N T I 'F C . 

P'JA'Il  MPAC  +5T  +5  FOP  PCON  * 

ROAT?  nr  - 5C  * +29  FC^  EAPTH*CP  TERMINAL  RCSITICN  VFCTCR  IN  METERS  (PL  AT  60) 
R0AC3  « *27  fcR  PCCN  * 


ROAOA  FER  CTHFR  OLTPLT  WHICH  HAY  BE  CF  USE,  SEE  OEERI'. 
RCAC5 
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RO-iOe  CEERIS  - 


R0907 


PARAMETERS  fcHCF  "AY  EE  CF  USE  - 


R0409 
ROAIO 
PO^l  1 
RO^tlT 


R0922 


♦ SCAI  E FAC  TCR  * 
VAPTAELF^IN  POWERS  OF  2# 


R I 


( 32C  M 


♦ 29  FTP  FAPTHt-DP  MAGNITLOE  TF 
♦27  FTP  MCCN  * 


DESCRIFTICN  ANC  REMARKS 
IMTIAl  FCSniCN  \,FCTCR,  PVEC,  IF  METFFS 


RTA  lA 

P lA 

♦ 6 

a C P 

RAT  II-  CF  R1  TC 

SE«IMAJCP  AXIS  (NEC. 

R0A16 

P 

♦ A 

ADP 

PATIO  OF  SEMILATUS  RECTLM  TC  R1 

ROAl  7 

f rCA 

♦ 5 

*CP 

CCTAN  CF  angle 

EETWFEN  PVEC  ANC  VVEC 

R0A19 

LR  ) 

♦ 1 

*DF 

LMT  VECTCP  CF 

RVFC 

R0A2O 

L2 

* 

♦ 1 

*0P 

UNIT  VECTOR  OF 

VVEC 

R0A21 

LN 

* 

♦ 1 

*C  F 

UMT  VFCTCfl  CF 

LRMU2 

FOF  FYPERECLIC  TRA JECTCR I ES ) 


ROA23  FARAMETEPS  CF  NT  IJSE  - 

R0A2A  SP  parameters  - RTATT,  GFOMSGN.  PTNFFM,  MAGVEC2=R2  (CF),  PLUS  PUSFLIST  LOfATlONF  C-lIO,  1AD-21D,  2AC-3SC,  AlC 

R0A26  ACCITTCNAL  INTERPRETIVE  SWITCFES  LSEO  - NCPMSu,  360SW 

R0A27 


G4P: 

L 

P04?8 
RO^’O 
P (43? 
RC43A 


R )435 

P0436 
P 0 4 ^ 8 
P3440 
R044? 

R 14A4 
PiJ44iS 
R0447 
R 14A9 
R.1951 

R0A52 

ROAS3 

R0455 

ROA86 

R095  8 

R085f 1 

R09583 

R34585 

P045e'i 

R145° 

RC46r 


R08ft  1 
ROA62 
R04t4 


R0  965 

R1468 
R0967 
ROA88 
PCA6<; 
R0470 
Ru47l 
R 0472 
R 347^ 
R9478 
R0478 
R04  7 8 
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CrMC  SUFPnUTINFS 

rPCGFiV  CFSCRIFTTCF  - TIPE-PACIUS  SUePCUTINE 
MOC  N'’.  -1 
woe  FY  KRA'ISt 


LS^F'S  F/GE  KC.  11  EO  S3 

DATE  - 11  CCTC8EP  1967 

ICC  SFCTICN  - CCMIC  SLEROLTINES 
ASSEPeiY  - CCLCSSCS  REVISICA  88 


FlINCT  mWAL  DFSCRIPTION  - 

THIS  SUBROIJTTFE,  GIVEN  AN  INITIAL  STATE  VECTOR  AND  A DESIRED  RAOILS  TC  WHICH  THE 
STATE  TS  Tn  BE  UPIATEri  7irMG  A CrMC  TPAJFCTCPY,  CALCULATES  THE  CO  R R E S POND  ING  T IME-OF-PL  IGHT  ANDt  IN  AODITICN, 
PPCVIFFS  the  nPTTPN  CF  CCWPUTING  THE  NEW  UPDATpC  STATE  VECTOR.  THE  RESULTING  TRAJECTCFY  PAY  EE  A SECTICN  CF  A 
CIRCLE.  ELLIPSE,  FARAPOIA,  CF  HYFEFFCLA  WITH  RESPFCT  TC  THf  EARTH  CF  THE  PCCN.  THE  LSE  CF  THE  SLEPCLTINE  CAN  EE 
EXTENDED  USING  OTHER  PRl PARY  RCOIES  RY  SIPFLE  ACCITICNS  TC  THE  PUTAELE  WITHOUT  INTRCCUCING  ANY  CODING  CHANGES, 
ACCEFTING  the  INHERENT  SCALE  FACTOR  CHANGES  IN  POSITICN  AND  VELCCIT3. 

IH  THE  DESIRED  RADIUS  IS  PEYCNC  THE  RADIUS  CF  APCCENTEP  CF  thE  CONIC  CR  BELCW  THE  RADIUS  CF  FERICENTEP, 
APSESW  WILL  RE  SFT  ANC  THE  SUPRCLTINE  WILL  RETURN  THE  AFCCENTER  CF  FERICENTEP  SCLUTICN,  RESPECTIVELY. 


THE  RESTRICTIONS  ARE  - 

1.  THE  ANGLE  PETWE.EN  ANY  POSITION  VECTOR  AND  ITS  VELCCITV  VECTCP  PLST  PE  GPEATEP  THAN  1 CEGRFE  47. S PINLTES 
ANC  IE'S  than  178  LEGPEFS  12.5  PiINUTES. 

2.  THC  PARAPETEPS  IL  THF  FRCPLEP  PUST  NCT  EXCEEC  THEIR  SCALING  LIPITS  SPECIFIEC  IN  THE  G'CP.  IF  THE  LIPITS 
APE  EXCEEDED,  THE  RESULTING  SCLUTION  WILL  PE  PEAMNGLESS. 

3.  AN  ACCURACY  CFGPADATICN  CCCUFS  AS  THE  SENSITIVITIES  CF  TIME  ANC  UPDATED  STATE  VECTOR  TC  CHANGES  IN 
RDESIRFD  INCREASE.  THIS  WILL  CCCUR  N=AR  EITHER  APSIS  CF  THE  CONIC  ANC  WHEN  THE  CONIC  IS  NEARLY  CIRCULAR.  IN 
PARTICULAR,  IF  THF  CCNTC  IS  AN  EXACT  CIRCLE,  THE  PRCBLEP  IS  UNOEFINEC  ANC  THE  SUPRCLTINE  WILL  APCFT. 


THF  AGC  fOMPLTATION  TIME  IS  A P PR C X I P ATE L Y . 363  SECCNCS 


REFERENCES  - 

R-479,  MISSION  PROGRAMMING  DEFINITION  MEMO  NO.  10,  LUNAR  LANDING  PISSICN  GS C F -S E CT  ICN  5.5,  SGA  WEPC  67-8. 


INPUT  - ERASABLF'  IN  1 T lAL  I ZA  T I CN  RCCUREC 

* scale  FACTCP  *> 

VARIA0LFWIN  FCWFPS  CF  2*  CESCPIFTICN  ANC  REPARKS 

« t 

PVEC  ♦ h29  FCR  FAPTHwCF  INITIAL  POSITICN  VECTOR  IN  METERS 

* h27  FCR  PCCN  * 

wee  * +7  FOR  EARTH  *0P  INITIAL  VELOCITY  VECTOR  IN  PE TER S /CE N 1 1 S ECC NO 

* «-5  FCR  ‘■CCN  ♦ 

PCFSIRFC*  t29  FCR  EARlH+CP  TERMINAL  RACIAL  DISTANCE  CN  CONIC  TPAJECTCRY  FCP  WHICH  TRANSFER  TIPIE  IS  TO  BE 

* H27  ECR  PCCN  *CCMFUTrC. 

SGNROCY  * ncNE  *SP  tag  set  TC  ^.5  CP  -.5  ACCCPCING  TC  WHETHER  THF  PAClAl  VELCCITY  AT  RCESIRED  IS  TC  BE 

* YPDSITIVE  OR  NEGATIVE,  RESPECTIVELY.  THIS  TAG  PECUCES  THF  D CU E L E-V ALU F C PPCELEM  TO  A 
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L 

R0A80 
R09B1 
R0A93 
RfAEi 
P04R6 
P 0 A e 7 


R IA8R 
R0AB9 
RCA9P 


R0A9  I 

RCAf:? 

P0A9’ 

R0A96 

R0A'‘6 

P0A97 

R0A98 

P0A99 
R05UO 
RC5r? 
R0503 
ROBOA 
RC9C6 
P09'17 
R05 1R 
R0510 
R051  1 


R0512 
R05I3 
R 1519 
RC522 


R1523 
R052A 
R 0 5 ? 5 
R0526 
R0527 
RC52P 
RT53  1 
R05  3? 
R053A 
R0535 


CTMC  SUPROUT  INFS 


LSER'  S PAGE  AC.  12  fo  S3 


* 

XI  (38ri*NONE 

RVSh  ♦ NPNE 

* 


*S  INGLE-YALUEO  FRCELE*'. 

♦ INDEX  REGISTER  TC  BE  SET  TE  -2D  OR  -ICD  ACCCRCING  TC  YI-FThEP  the  EARTF  CR  MCCN, 

♦ RESPECT  IVFI.Y,  IS  TFE  CENTRAL  EODV . 

♦ AF  IMERPPFTIYE  SUITCF  TC  PE  SET  IF  CMY  TIRE  IS  TC  PE  AN  CUTPLT,  CLEAR  IP  TFE  NEF  STATE 
*IS  TO  OF  COMPUTED  ALSO. 


SUPPOLT infs  CALLED  - 

FARAF,  GECF,  GETx,  CFLTIFE,  NEF.STATF 


CALLING  SEQUENCE  ANC  NORFAL  EXIT  fCDES  - 


IF 

CNLY  T[WE 

IS  CFSIREC  AS 

CUT  RUT  - 

L 

SET 

CALL 

♦LST  PE  IN  INTERPRETIVE  PCDE  PUT  CVFINC  APEITPARY. 

1 *1 

RVSW 

Lf  2 

T 1 FERAO 

RPTLRN  WITH  PL  AT  0 ANC  T IN  VPAC 

1 

... 

CCNTINLE 

1 F 

th'"  update 

STATE  VFCTCP 

IS  CESIREC  AS  WELL  - 

L 

CLEAR 

CALL 

MLST  BE  IN  INTERPRETIVE  MCCE  PLT  GVFINC  ARBITRARY. 

1 +1 

PVSW 

L + 2 

TIPFRAD 

RETLPNS  WITH  FL  AT  6.  TFE  INITIAL  PCSITICN  VECTCR  IS  IN 

THE  INITIAL  VELOCITY  VECTCR  IN  PPAC. 

1.  ^ 3 

STCVI 

NEWVVEC 

L *9 

STADP 

( +5 

STFRE 

NEWRVFC 

NEWVVEC  AND  NEWPVEC  ARE  SYMEOLIC  R EPP.  E SE  NT  AT  I C N S 

LF6 

• • • 

CCNT  INUE 

APCRT  EXIT  RCOES  - r. 

IF  SOLNSF  ANCi/riP  CCC-AFIAG  ANC/CR  INFINFLG  IS  SET  AT  TfE  FXIT  TC  TIFE-PACIUS,  TIME-RAOILS  NHL  TRANSFER 
TO  pccncc  with  an  alarm  code  (originally  0C6C7),  and  NCT  return  TC  TFE  calling  PPCGRAf.  (PCR  692  e 721) 


OUTPUT  _ 


■X  SCALE  FACTCR  ♦ 

VAPIAPLE*IN  PCViEPS  CF  2*  CFSCPIFTICN  ANC  REFARKS 

♦ ♦ 


T (30CI  * *?H 
INF  TNPLG*  NONE 
* 

COGAFIAG*  NCNC 
♦ 

AFSESF  * NCNE 


♦CP  TOANSPER  TINE  IN  CENTISECONCS 

*TN  INTERPRETIVE  SViITCF  FFlCFi  IS  SET  1^  RCESIREC  AND  SGNRCOT  REQUIRE  CLCSLRE  THROUGH 
♦infinity  (NO  SOLLTION),  CLEAR  IF  A PHYSICAL  SCLLTICN  IS  PCSSIELE. 

♦AN  INTEPPRETIVE  SkITCF  NFICF  IS  SET  IF  PFSTPICTICN  1 HAS  BEEN  VIOLATED  (NC  SCLLTICN), 
♦CLEAR  IE  not. 

♦AN  INTERPRETIVE  SWITCH  WHICH  IS  SET  IE  RCESIREC  WAS  GREATER  THAN  RACILS  Ce  AFCCENTEF  CR 
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L 

R0537 
R0539 
R.OSAl 
R09AI 1 
R 0‘=A1  3 
ROSA  I E 
R05A? 

R05AT 

R05AA 
R05A5 
R05A6 
P 3547 

R0E4P 

R05A9 


R059O 

R0591 

P0952 

R0533 

R0594 

R095S 

R05F7 

R059e 

00960 

ROStl 

R0563 

R0964 

R0569 

R0566 

R096F 

00969 

R0570 

R0571 

R0573 

00974 


CCNK  'L8PCGTINE9 


LSEP'S  PAGE  NP.  13  EC  S3 


A 

* 

* 

SCLASR  * NONE 


♦LESS  THAN  RAOUS  CP  OERICENTEP.  THE  AFCCEATER  CP  FERICENTER  SCLUTICN,  RESPECTIVELY, 
*WILL  then  PE  RETURNED.  THE  SRITCH  IS  CLEAR  IF  RDESIPED  RAS  PETREEN  PEPICFATFP  ANC 

•apoceatep. 

♦ AN  INTERPRETIVE  SRITCH  RHICH  IS  SET  IF  TFE  CCMC  IS  SC  CLCSE  tc  A CIRCLE  THAT  THE  TPRRIA 

PFCIAT  IS  ampiguous,  violating  rfstriction  3.  IF  eccentpicity  is  greater  than  2-TC-THE- 

ARTNlS-19,  the  SRITCH  IS  CLFAF. 


IN  ADOITICN,  IF  PVSW  IS  CLEAR,  THE  FCLLCRtlNG  ARE  OUTPUT- 

VPAC  - « +7  FOP  EARTH  oCP  TFRRINAL  VFLCCITY  VECTCR  IN  R E TE RS/ C ENT  I S F C . 

PFAC  t5*  +9  FCR  NCCN  => 

OD  - SO  ♦ +?9  FOR  FAPTHPOP  TFFVINAL  FCSITICN  VECTCF  in  RETEPS  (FL  at  6C) 
♦ *21  FCR  moon  ♦ 

FTP  nnFR  OLTPUT  RHICH  RAY  EF  CF  USE,  SEF  CEERIS. 


CFER  IS  - 

parameters  RHICH  RAY  EF  CF  USE  - 
♦ SCALE  FACTOP  * 

VAR  I AELF* IN  PCWERS  CF  2*  DESCRIPTION  AND  RERARKS 

« # 


R1  (32CI*  *29  FOR  FARTH*CP  MAGNITUDE  CF  INITIAL  PCSITICN  VECTCR,  RVEC,  IN  METERS 
* +27  FTP  RCCN  * 


R lA 

+ e 

*0  r 

PATIC  CF  R1  TC  SERIRAJCF  AXIS  (NEC.  FOP  FYPEPECLIC  T R A J ECT CR I E S 1 

P 

* 

♦ 4 

«CP 

RATin  OF  semilatus  rectum  tc  P.1 

COGA 

♦ 9 

♦ CF 

CCTAN  CF  angle  EETREEN  RVFC  anc  vvec 

UR  1 

4 

♦ 1 

♦ OP 

LNIT  VECTCP  CF  RVEC 

L2 

♦ 

+ 1 

♦ OP 

UNIT  VECTOR  OF  VVEC 

UN 

♦ 

* 1 

♦ DP 

LMT  VECTCR  CF  LP1*U2 

CSth 

« 

♦ 1 

♦ OP 

COSINE  CF  TRUE  ANC«ALY  DIFFERENCE  FETREFN  RVEC  ANO  RCESIREC. 

SNTH 

♦ 

+ I 

♦ r F 

SINE  OF  TRUE  anomaly  CIFFERENCE. 

PAPAMETFRS  CF  NO  USE  - 

SP  PAPAMETERS  - PTNTT  , GECRSGN,  PTNFRR,  MAGVfC2=R2  (CP),  PIUS  PUSHLIST  LOCATICNS  C-llO,  140-21C,  240-390  , 41D 
additional  INTFRppfTivF  cv,iTf^HES  LSFO  - N’CRRSR,  360SR 
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L 

CONIC  StBROLTINP':  USER'S  PAGE  NO.  lA  EC  S3 

P0576 
R 0 5 7 7 
R0579 
R0581 

FPCGPaN  CESCRIPTICN  - APSIDES  SUBROUTINE  CATE  - 1 SEPTEREEP  1967 

PCD  NC.  - ) LOG  SECTION  - CCMC  SLEPOLTINES 

MOC  BY  KRAUSE  ASSEMBLY  - COLCSSLS  REYISICN  EE 

R 758? 

FLNCTICNAL  DESCPIFTICN  - 

R0583 

R0585 

R0587 

R'7589 

R0591 

P0592 

THI S . SUBROUTINE , GIVEN  AN  INr^IAL  STATE  VECTCR  CALCULATES  THE  PACIUS  CF  FfRICENTER  AND  OF  APCCENTER  ANC  THE 
ECCENTRICITY  OF  THE  RESULTING  CONIC  TRAJECTORY,  WHICH  MAY  BE  A STRAIGHT  LINE, 

CIRCLE,  ELLIPSE,  PARABOLA,  CB  HYPERgCLA  WITH  RESFECT  TE  THE  EARTH  CP  THf  MCON  . THE  USF  CF  THE  SLBRCLTINE  CAN  EE 
EXTENDEC  USING  OTHER  PRIMARY  BOniES  BY  SIMPLE  ADOITICNS  TC  THF  MUTABLE  WIThCUT  INTPCCUCING  ANY  CCCING  CFANGFS, 
accepting  THF  INFERENT  SCALE  fACTCP  CHANGFS  IN  POSITION  ANC  VELOCITY. 

R0593 
RC594 
R 0596 
R0598 
R0600 

THE  RFSTRIfTTONS  ARE  - 

1.  IP  APCCENTER  IS  BEYCNO  TH'P  SCALING  CF  POSITION,  THE  SCALE  FACTOR  LIMIT  ( 5 36,670,910  METEFS  WITH  RESPECT 
TO  The  earth  or  139,217,727.5  meters  with  respect  TC  THE  MOON)  WILL  EE  PETUPNEC. 

2,  the  PAPAMETEPS  in  THE  PROBLEM  MUST  NOT  EXCEEC  THEIR  SCALING  LIMITS  SPECIFIED  IN  THE  GSCF.  IF  THE  LIMITS 
ARE  =XCEEDED,  THE  PPSLLTING  SCLUTICN  Wl  I L L BF  MEANINGLESS. 

R9601 

R06C2 

THE  AGC  COMPUTATION  TIME  IS  AP PRC  X I M ATEL Y .1L3  SECCMCS. 

R06C3 

R067A 

R0606 

references  - 

MISSION  programming  OEFIMTIOM  memo  no.  id,  lunar  LANDING  MISSICN  GSCF-SECTTCN  5.5 

P0607 

INPUT  - ERASABLE  IN  I T lAL 1 ZAT I CN  RECLIREC 

R0608 
R0609 
R0610 
R061  1 
R06  12 
R0613 
R061A 
R0615 
R0617 
R0618 

* SCALE  FACTCR 

VARIA0LE*IN  FCWFPS  CF  2*  CESCRIPTICN  ANC  REMARKS 

PVEC  4=  +29  FCR  EAPTH*CP  INITIAL  F CS  I T 1 CN  V E CTG  R IN  METERS 

* +27  FCR  MGCN  * 

VVEC  * +7  FOP  FARTH  *CP  INITIAL  VELOCITY  VECTCR  IN  ME T ER S /CE N T I S EC C NO 

* +5  FCR  MCCN  * 

XI  (38C)4NnNE  =f=INOFX  REGISTER  TO  BE  SET  TC  -2C  CP  -100  ACCCPCING  TC  WHETHER  THE  EARTH  CR  MGCN, 

^RESPECTIVELY,  IS  THE  CENTRAL  PCDY. 

R0619 
R762n 
R062  1 

SUEROUT  INFS  CALLFC  - 
FARAM,  GFCM 

P062? 

CALI  ING  SEQUENCE  ANC  NORMAL  pXIT  MOCES  - 

GAP 
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L 

C C N T C 

'L8PCLTINES 

USFR*  S PAGE  NO. 

15  FO  S3 

R0623 

IF 

only  TIME 

!<  OESIPCO  AS 

CUTFUT  - 

R0624 

L 

CALL 

MUST  BE  IN  INTERPRETIVE  MCDE 

RUT 

CVFINC  APBITPAFY. 

P0626 

L*  1 

APSIDES 

RETURNS  WITH  PL  AT  0,  RADIUS 

CF 

APCCENTER  IN'  mpaC  AND  RADIUS 

OF  PEPICENTEP  IN  CD 

P762R 

t +2 

STQCL 

APOAPPC 

R0629 

1*3 

9t 

R063O 

1 *A 

STOPF 

PERT  APSE 

AFCAFSE  ANE  FEFTAPSE 

ARE 

SYMPCLTC  REPRESENTATIONS  OF 

THE  LSERS  LOCATIONS 

P0632 

1.  *5 

... 

CONTINUE 

R0632 


R063A 
R'T63  5 
R0636 
R0637 
R063B 
R063C 

R06A'/ 

R06A1 

R06A2 


OUTPUT  - 

* SCALE  FACTCP  * 

VARIAPLE^IN  PORFRS  CF  2*  CfSCRlPTlON  ANO  REMARKS 

if » 

RFAC  ♦ «?9  FCP  E6PTF*rP  PACIt.S  OF  APQCENTER  IK  PETfPS 

* f?7  FTP  YfCN  * 

QC-IC  * +29  FOR  EAPTh“»FP  RACK'  CF  PERICFNTER  IK  »<£TEPS 
« +27  FCR  MOON  * 

ECC  « +3  *DP  ECCEKTRICITY  CF  CCMC  TPAJECTCFY. 


R06A3  FCP  CTFEP  OUTPUT  WMCF  PAY  B.E  CF  USE,  SEE  DEBRIS. 
R C6^A 


R06A5  CFERIS  - 


R0646  PARAMETERS  HFICF  MAY  PE  OF  USE  - 


R06A7 
R06AR 
R06A9 
R0650 
R065? 
RC6S3 
POBSS 
R0656, 
R 0658 
R0659 
RC66C 
R0661 
P066? 
R06F3 


♦ SCALE  FACTCP  ♦ 
VAPIAFLE*TN  POWERS  OF  2+ 

if A 

PI  (32CI*  +2S  FCR  EARTHfCP 

♦ *27  FCP  MCCN  * 

RIA  <■  *6  ♦CF 

P ♦ +4  +0? 

CCCA  ♦ +5  *CF 

UR  r * * 1 ♦ C F 

U2  * +1  ♦OP 

UN  ♦ *1  • ♦CF 

MAGVFC?  ♦ *7  for  earth  ♦OP 

♦ +9  FTP  PCCN  ♦ 


DESCRIPTICN  ANO  pPFARKS 


MAGMTUCE  CF  INITIAL  PCSITICN  VFCTCR,  FVEC,  IN  METERS 

FNTIC  CF  R1  TC  SEMIPAJCR  AXIS  (NEC.  FOR  FYPERBOLIC.  TR  A JEC  TCR I F 5 ) 

RATIO  OF  SEMILATUS  RECTUM  TC  R1 

CCTAN  OF  ANGLE  BETWEEN  RVEC  ANC  VVEC 

LMT  VECTCR  CF  FVEC 

UNIT  VECTOR  CF  VVEC 

UN  II  VECTCF  CF  UR  1^U2 

♦AGNITUOF  CF  VVFC 


R066A  PARAPETEPS  CF  NC  USE  - 

R0665  SP  parameters  - RTNAPSE,  CECMSGN,  RTNPRM,  PUUS  PUSHLIST  UCCATIONS  C-£,1CC-110,  IA0-21C,  31C-38C. 

R066  7 AOniTirNAI  INTERPRETIVE  SwnCFES  LSEC  - NCPMSW 

R0668 


PEF 


C66  9 


1 


12 ,2  700 


SETLCC  CONICS 
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CnNir  SUBROtTiNES 


0ft70 

12,2023 

EANK 

0671 

REF 

1 

COUNTY 

tl/CONIC 

067? 

PEP 

2 

LAST 

126 

88,  1721 

E8ANK= 

UFl 

0678 

12, ?o?3 

900(  1 

1 

KEPLFRN 

SETPC 

BCV 

0679 

12,2  )29 

'50051 

0 

0 

0680 

12,2028 

29C26 

C 

+ 1 

0681 

12,2326 

77773 

1 

VLCAO* 

06  8 3 

P9F 

9 

LAST 

693 

12,2027 

10005 

0 

HUTAPLP, 1 

068'* 

12,2030 

290  1 7 

1 

STCVL 

1 90 

06FS 

REF 

9 

LAST 

7 lf» 

1 2 ,2  '31 

01  803 

0 

RPECT 

C686 

12 , 2032 

6 6286 

c 

LMT 

SSF 

0687 

REF 

2 

( AST 

688 

12, 2033 

OC027 

1 

I TFRCTR 

0688 

12,2139 

OO029 

1 

20D 

0689 

REF 

2 

LAST 

126 

1 2, 2C38 

16697 

c 

STCOL 

UPPECT 

0690 

12, 2036 

OC095 

0 

360 

069  1 

PEF 

* 

LAST 

6 9L 

12,2037 

29091 

1 

STOVl 

P 1 

0692 

RPP 

8 

LAST 

1 166 

12, 2590 

C1803 

c 

RRFCT 

0693 

12  ,2  191 

7699  1 

1 

COT 

SLIR 

0699 

PFF 

3 

LAST 

997 

12,2092 

01811 

c 

VRECT 

0698 

13,2993 

76908 

1 

DMP 

SLIR 

0696 

REF 

1 

12 ,2  399 

0002  3 

fl 

1 /P.OCTmu 

069/ 

PFF 

1 

12,2095 

29093 

r 

STCVL 

KEPCl 

0698 

REF 

9 

LAST 

1 166 

12,2096 

01511 

n 

VRECT 

0699 

12,2097 

57236 

1 

VSC 

CHPR 

0700 

OFF 

1 

12, 2C5C 

C0C17 

1 

1 /HU 

C7C1 

12,2  iSl 

52905 

1 

CMP 

SL3 

07C2 

RPP 

6 

LAST 

1166 

12, 2C82 

00091 

1 

R1 

0703 

12, 2583 

6 19  2 8 

0 

DSL 

RCLNO 

C7C9 

PFF 

I 

12,2059 

110  17 

1 

0 1/69 

0708 

REF 

1 

12.2C88 

C0C9S 

0 

STCPE 

KEPC2 

0706 

12, 2086 

79921 

0 

BDSL 

SR  IR 

0707 

REF 

2 

LAST 

1166 

12,2C57 

11017 

1 

01/69 

0708 

12, 2560 

7 767  1 

1 

COV 

07C9 

PEF 

7 

LAST 

1166 

12,2061 

0009  1 

1 

R 1 

0710 

REF 

1 

12 ,2062 

000  1 1 

1 

STCRE 

ALPHA 

0711 

12, 2 '63 

M299 

0 

BPL 

DLCAO 

0712 

REF 

1 

12 ,20'69 

29073 

0 

IPEV 

0713 

REF 

1 

12, 2068 

1 1038 

1 

-50SC 

0719 

12,2  166 

9007  1 

0 

DOV 

BCV 

07  18 

REF 

2 

LAST 

1 166 

12,2067 

OOOll 

i 

ALPHA 

0716 

REF 

1 

12, 2079 

2907? 

1 

STPPEHAX 

07)  7 

1 3 , 2.1  7 1 

52  166 

1 

SORT 

GOTO 

0718 

PEP 

2 

LAST 

1166 

1 2 , 2C72 

29077 

1 

STCREMAX 

071  9 

12,2173 

■'8  366 

1 

IPEV 

SQR  T 

BODV 

USER  *S  PAGE  NO.  le  EC  S3 


1/RnclTPL'  (-17  CR  -1<Y) 

Cl  = P.V/PGOTMU  ( + 17  OR  -He  I 


l/PU  CF  -28) 


C2=PV.V/PU  -1  (+6) 


ALPHA  = (1-C2  )/R 1 (-22  OR  -2G) 

HAKIHLH  X CEPENCS  ON  TYPE  CF  CCMC 
-50SC  (y12) 
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CCMC 

c 

LBPOLTINES 

_ 

C7?C 

REF 

1 

12.2C76 

11C37 

r 

2 FISC 

0721 

12,2-75 

77600 

1 

BOV 

0722 

REP 

3 

lAST 

1166 

12 ,2  )76 

26  177 

1 

STOREMAX 

7773 

PCF 

1 

12,2177 

CGC13 

0 

STCREPA> 

STORE 

X FAX 

)724 

12,  2l;)0 

65205 

0 

OPP 

PDDL 

072S 

P?F 

2 

1 AST 

1166 

12 ,21?ll 

00023 

0 

1 /PCCTML 

0726 

PPF 

3 

1 AST 

1166 

12,2 102 

000  1 1 

1 

ALPHA 

0727 

12,2103 

653  )1 

0 

NORP 

PDDL 

3728 

REF 

37 

1 AST 

1 1 5C 

12 ,2106 

700  6 1 

1 

XI 

0729 

12,  21 

56  2 5 7 

1 

SL* 

OOV 

C73C 

12,21  16 

20173 

0 

0 -6,  1 

0731 

12,2107 

5CC0C 

1 

erv 

PFN 

0732 

REF 

1 

12,2110 

26  126 

0 

PCDDCNF 

0773 

REF 

2 

LAST 

116? 

19,2111 

26126 

0 

MCCCCNE 

073A 

12,21  12 

51525 

1 

PERICCCP 

PCDL 

AES 

073b 

PFF 

2 

1 AST 

1 1 5 

12,2113 

02076 

0 

tal. 

0736 

12,2116 

5JJ25 

c 

rsL 

8PN 

0737 

12, 2115 

''000  1 

'O' 

on 

C738 

REF 

3 

LAST 

1167 

12 ,2116 

26126 

0 

MOOOONE 

1)739 

12,2117 

77765 

0 

SICK 

07<»0 

REF 

3 

LAST 

1167 

12, 2120 

02076 

0 

TAU. 

07A1 

REF 

6 

1 ART 

1167 

12,2121 

16076 

'1 

STCCL 

TAIJ. 

)7S0 

12,2122 

7 7 6 5C 

1 

GCTC 

0751 

Rf  F 

1 

12,2123 

26  112 

0 

per  ioccp 

075? 

12,2126 

7 12'7  1 

1 

PCCDCNE 

SETFC 

CLCAC 

0753 

12,2125 

COC"  1 

0 

0 

0756 

REF 

2 

LAST 

115 

12,2126 

02130 

1 

XKEPNEW 

0755 

P>^F 

1 

12,2127 

00025 

c 

STCRE 

X 

07555 

12,2130 

53  165 

0 

SIGN 

B ZE 

0756 

' REF 

5 

1 ART 

1167 

12,2131 

Q2C  76 

0 

TAU. 

0 756  5 

REF 

1 
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2 
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A 

SRI 
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2 
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1 

PAXCCCA 

14425 
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1 
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2 
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2 

LA  ST 
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1 
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F 
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c 

CSTF 
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c 
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1 
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? 
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1 
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12,3314 
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C 
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12 
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12,3315 
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1 
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1 
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c 
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1466 

RFF 

13 

LAST 

1186 
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1 
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4 
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1 
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r 
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1 
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4 
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0 
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1 
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0 
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12, 334  1 
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c 
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1 
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25427 

1 
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7 
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12,3344 
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0 
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P 
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1 
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1 
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1 
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0 
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8 
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P 
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CALY  USED  IF  GUESSW  IS  0 , 


AVAILABLE  ONLY  IF  VTARGTAG  IS  ZEPC. 


COGAFAX 

equals 

140 

CLCPBEPS  1/PU 

COGAMIN 

EQUALS 

80 

CCCGA 

E CU  A L S 

120 

^4 


« 


RVFC  EQUALS  RIVEC 

VVEC  FPASE 

cccaflag 

RVSK 

INFIAFLC 

APSESF 
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L 

CON’C  'LBPQLYTNFS 

Rial  I 

360SV. 

R1E12 

RTNTT 

EQLAIS 

RTMANB 

Piai3 

Ecr 

ERASF 

♦ 1 

PIRIA 

FTNTR 

FCUAIS 

PTMARR 

R IRl  5 

R TNAPSF 

FQLALS 

rtnlanr 

PIR16 

P2 

EOUAl  S 

MAGVEC2 

1817 

U )30 

COSF 

EQUALS 

2AC 

RIRIR 

RTNPRM 

FRASF 

♦ C 

P181P 

SGNPCCT 

ERASE 

<0 

R1820 

PCFSIREO 

ERASE 

+ I 

R1821 

I TFP  ATTB 

SUBROUTINE 

R182? 

CRCEPSW 

IP23 

C016 

FAX 

ECUAIS 

lAC 

182A 

001'' 

PIN 

ECUAL  S 

8C 

PIR25 

TNC3F 

FRASF 

4l 

1826 

COIA 

CELINCEF 

FCUALS 

12C 

1827 

00  26 

I TFRCTR 

FOLAL  5 

22D 

IE28 

003  6 

CEP 

EQUALS 

3QD 

R 1829 

CFLOEP 

ERASF 

+ 1 

Rl  830 

CEFREV 

FR  AS  F 

<1 

, 

1831 

C35C 

TNEFK  IT 

ECUAIS 

4or 

R1832  MCRE  KEFLfR 
RIE33  EF5UCM  FRASF  +1 


R183A  MOPE  LAMBERT 

R183B  TEFPLAMF  EQUALS  CfLCFP 

R1R36  TPPEV  FQLALS  CEFRFV 


R1837  FPSILCNL  EQUALS  EPSIIONT  <-2  nCLBLE  PRECISION  RCPC 
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P0006 
ROn  17 
POOOR 

Rcrrs 

p )01 1 

Rooia 
pool  5 
pool  7 
Rori  p 

P 00  1 9 
R0021 
P0O23 
R0025 
P0026 
R002  7 
POO  20 
P CO?  1 
R003? 
RO  03A 
P003P 
R 1036 
R 0 C 3 B 
P 0040 
R0OA2 
R 0C43 
R0ri44 
ROTAS 
POCAf 
R )0A7 
ROOAO 
P0C5O 
R0051 
R 1T‘=2 
P 10S3 
R loss 
POO*!? 
R'in59 
P0161 
RiH  63 
Rif  6S 
P0('67 
R0060 
RO(J70 
P007  1 
R 10  73 
POO  75 
ROf  7f 
PI'17  7 
RQC79 
ROOai 


l.o  INIPPCLCTiai. 


perm  A lSFRS  PCIKT  CF  V I F V, , CEPITAI  IMEGPATICA  is  FSSEMI/LLY  TFE  same  AS  TFE  ?■(£  IMEGRATICN 
FRCGOAP.  THF  SAME  FNIPANTES  TC  THE  PRCGRAP  WILL  BE  PAIMAIAEC,  THE  EA«E  STALLING  RCUTINF  WILL  EF  UStC  AND 
CLTPUT  will  still  BE  VIA  the  FUSFLIST.  tpf  PRIMARY  CIFFERENCF'  TO  A LSER  INVOLVE  THE  ACCEC  CAFA0UTTY  CF 
TFPMINATTNG  IFTFGRATICF;  at  a specific  final  PACIUS  ANC  TFE  EIFFFPENCF  in  state  VFCTCF  scaling  INSlDF  AND  CLT- 
SIEF  TFE  lUNAP  SPHERE  OF  INFLUENCE. 

IN  OROER  TO  MAKE  THE  CSPII  V)FPFC  ANC  C S « ( LE  P I C CN 1 C ENTRANCES  SIMLAR  TC  FLICFT  276,  THE  INTEGRATION  PRCGRAP 
WILL  ITEEIF  SET  T(-t  FINAL  KACIIJS  (RFIMAL)  TO  T SO  THAT  pf/icHING  THE  OESIREC  TIPE  CNLY  will  TERPIAATE 
INTEGRATirN.  THF  CF  PFGTSTEF  FFINAL  pLST  PC  SFT  EY  USCPS  CF  INTEGRVS  ANC  INTCGRV,  AND  PLST  BE  CCNE  AFTER  THE 
call  TC  IN'TSTALl  . 

WHEN  THE  I P|  IS  CN  THE  LUNAR  SI,“FACF  (INCICATEC  PY  LUNAP  SLRFACE  FLAC  SET)  CALLS  TO  LEPCONIC,  LEPPREC,  AND 
INTEGRV  WITH  VINFLAG  = WILL  RESU.T  IN  Tho  LSE  OF  THE  PLANETARY  INFRTIAl  CPIENTATICN  SUBPCUTINES  TC  PRCVICF 
RCTH  THE  IPS  PCSITICA  ANC  VELFCITY  IN  THE  PEFfPENfF  fCCPDINATE  SYSTEM. 

the  program  Will  PRCVtof  CLTPLT  as  if  INTFGRATICN  was  USED.  THAT  js,  THE  PUSHLIST  WILL  BE  SET  AS  NCTFO  BELCW  AND 
THF  PEPPANENT  STATE  VECTOR  UPCATEC  WHEN  SPECIFIED  BY  AN  INTEGRV  CALL. 

LSFRS  CF  INTEGPVS  CESIHING  IMEGRATICN  (INTYPFLG  = U ) SHCLLD  ACTE  THAT  THE  CELATENESS  FERTUPBATICN  CCMFLTATION 
IN  LLN»P  CR°IT  IS  Tlpf  CFF-NDCNT.  THFREFOPE,  THE  USER  SHfULO  SUPPLY  AN  INITIAL  STATE  VECTCR  VALID  AT  SCPE  REAL 
TIPF  ANC  the  PF'IPFn  TIPI  (TDECll  ALSC  AT  SCPE  FE/L  TINE.  FCP  CONIC  , , I N 7 f C R A T 1 C N , , THE  USER  PAY  STILL  LSE  7ERC 
AS  the  INITIAL  TIPE  AN')  DELTA  TIME  AS  THF  DESIRED  TIPE. 

2.r  GENERAL  DFSCRIPTTCN 


THF  integration  program  OPERATES  AS  A CLOSED  INTERPRETIVE  SUBRCLTINF  ANC  PEPFCPPS  THESE  FUNC7ICNS 

1)  INf-GRATES  (FRCmON  OR  CCNIC)  EITHER  CSP  OR.  LM  STATE  VECTOR 

2)  INTEGRATES  THF  W-PATRIY 

31  PERPANFNT  OP  TEMPORARY  UPDATE  OF  THF  STATE  VECTCR 

there  ARF  SI.X  FNTPANCFS.  TG  THF  INTEGRATION  PRCGFAP.  FCLP  CF  THESE  (CSPFPEC,  IFPPPEC,  CSpCCNIC,  LEPCONICI  SET 

ALE  the  FLAGS  RFClMRCr  I'  FHF  INTEGRATION  PPCGRAm  ITSELF  TO  CAUSE  THF  PRCCISICN  CP  CCMC  INTEGRATION  (KFFLEF)  CF 

THE-  LP  CP  eSM  STATF  VCctoF,  as  ThE  NAPFS  SUGGEST.  CNF  ENTRANCE  (INTFGRVS)  PFPPITS  THE  CALLING  FPCGF'P  TC 
PRCVICE  A STATE  VFCTCP,  TO  BE  INTEGRATED.  THE  CALLING  FRCGPAP  PLST  SET  THE  FLAGS  INCICATiNG  (1)  FFECISICN  CR 
CCMC  INTEGRATION,  (2)  IN  OP  CUT  CF  LUNAR  SPHERE,  (31  PinCOURSE  OR  NOT,  AND  THE  IMEGRATICN  PPCGPAP  CCPFLETES 
THF  flag  setting  TC  BYPASS  W-PATRIX  IMEGRATICN.  THE  LAST  ENTRANCE  (INTFCRV,  USED  IN  GENERAL  EY  THE 
N'VirATION  PROGRAPS)  PFEMUS  THR  CALLER  TO  Sd  FIVE  pLAGS  (NOT  WCCNFLAG  CF  PICFIACI  BLT  NCT  TC  INPUT  A STATE 
VPCTCR.  any  FFCGPAP  WHKH  calls  IMFGRVS  or  INTFGPV  PUST  CALL  INTSTALL  BEFOPF  IT  SETS  THE  IMEGRATICN  FLAGS 
ANC/nR  STATF  VFCTCR. 

THREE  SETS  CC  42  REGISTERS  ANC  ? FLAGS  ARF  USED  FCR  THE  STATE  VECTCFS.  TWO  SETS,  WHICH  PAY  NOT  BE  CVFRIAYEO,  AFE 
USED  FOR  THF  PERMANENT  STATE  VECTORS  FOR  THF  CSP  AND  LP.  THE  thIRC  SET,  WHICH  PAY  BE  CVERLAYEC  WHEN  INTEGRATION 
IS  NCT  PFINC  rCNE,  IS  MSEC  IN  THE  C C p PUT  AT  IONS . 

THF  PPCPANCNT  STATE  VECTORS  WILL  PE  PERIOCICALLY  LPDATED  SO  THAT  THF  VECTCFS  WILL  NCT  BE  CLCEF  THAN  4 TIMESTEPS. 

ThF  PFRPANENT  STATE  VECTCRS  will  ALSC  EE  UPDATEC  WHENEVER  THE  W-MATRIX  IS  INTEGRATED  CR  WHEN  A CALLER  CF  INTEGFV 

SETS  STATEFIG  (THF  NAVIGATICN  PROGRAPS  P2C,  P22.) 


GAP; 
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RCCP2 
RO083 
R008^ 
P0C8S 
RnOP6 
ponps 
R0090 
POOP? 
P009<t 
P00P6 
P0C97 
POCPP 
P009P 
R 1101' 

poll 

R3  M3 
R0IC5 
P0107 
ROlOP 
ROl  in 
ROI  1 I 
R M 1 2 
RO  1 1 3 
PnilA 
ROl  1 
ROl  1 7 
ROUP 
R 0 1 2 1 
R112? 
R01?3 
R0  12A 
ROl  25 
R0126 
R0127 
R )12P 
P017S 
P 1 130 
R0131 
R J 132 
RO  1 33 
P >1  3A 

R0135 
ROl  36 
R0137 
Rons 

R013P 
PGIA'’ 
P3I  A1 
ROIA? 
RO  1 A3 


APFENCI>  B TF  THF  LSERS  GUICE  LISTS  TFE  STATE  VECTCfi  QUANTITIES. 

2.1  RESTARTS 

PHASE  CHANGES  hllL  BE  MAOF  IN  THE  INTEGRATICN  PRCGRAV  CMY  FCR  THE  INTEGEV  ENTRANCE  (I.E.,  WHFN  THE  W-PATRI>  IS 
INTEGRATEC  OP  PrONANFN'T  STATE  VECTOR  IS  UFOATEC.)  THE  GPCILP  NLH8ER  LSED  V,  I L L BE  THAT  FCR  THE  P2C-25  PRCGRAPS 
(I.E. , GPnuP2)  SINCE  THE  INTEGRV  ENTRANCE  HILL  CNLY  EE  USEC  BY  THESE  FROGRAMS.  IF  A RESTART  OCCLPS  CURING  AN 
integration  of  off  STATE  VECTOR  ONLY,  THE  RECOVERY  HILL  BE  TC  THE  LAST  PHASE  IN  THE  CALLING  PPCGRAM.  (ALLINC 
programs  hhICh  use  the  INTEGPV  CR  INTEGRVS  ENTRANCE  OF  INTEGRATION  SHOULO  ENSLRH  THAT  IF  PHASE  CHANGING  IS  CCNE 
THAT  IT  IS  PRIOR  TC  SETTING  THE  INTCGRATICN  INFLT5  IN  THE  PUSHLIST. 

THIS  IS  BECAUSE  THE  FUSHL  1ST  IS  LOST  CLP ING  A RESTART. 

2.2  SCALING 

THF  integration  RCLTINE  HiLl  NAINTAIN  THE  PERNANENT  HENCRY  STATE  VECTORS  IN  THE  SCALING  AND  UNITS  OEFINED  IN 
APPPNriX  e OF  THF  USERS  GUIDE.  THE  SCALING  OF  THE  OLTPLT  POSITICN  VECTCRCf  FEN.'CS  CN  THE  CRIC-IN  CF  THE  CCORCINATE 
SYSTER  AT  THF  OFSIRFC  INTEGRATION  TIME.  THE  CCCRCINATE  SYSTEM  Tp AN SFORMAT ICN  HILL  PE  DONE  A L T C M A T IC A L L Y CN 
«IJITIPLE  TIMESTFP  ENCKE  TNTFGPATirN  ONLY.  THLS  IT  IS  FCSSTEtE  TC  HAVE  CUTPUT  FRCM  SUCCESSIVE  INTFGRATTCNS  IN 
riFFEPENT  SCALING. 

HCVEVEP,  RATT,  VATT  HILI  ALHAYS  EE  SCALEC  TFF  SAME. 

’.r  infut/cltplt 


program  INFLIS  ARE  the  F I AGS  CFSCFIBEC  IN  APFENtlX  A ANC  THE  PERMANENT  STATE  VECTOR  QUANTITIES  DESCRIBEC  IN  AF 
PFNOIX  B OF  THE  USERS  GUIOF,  PLUS  THE  CESIREO  TIME  TC  INTEGRATE  TC  IN  TCECl  (A  PUSH  LIST  LOCATIONl. 

FTP  INTEGRVS,  THE  PCV,VCV,  TFT  CF  THF  TEMPORARY  STATE  VECTOR  MUST  PE  SET,  PLUS  MCCNFLAG  ANC  MICFLAG 

FOF  SIMULATION  THF  FCLLOHING  CLANTITIES  MLST  BF  PRESET  

EARTH  MCON 


RREC  ICSMI  LEM  1 

- FECTIFIEC  fcsiticn  vector 

METERS 

29 

2 

27 

2 

VRECTC'milfm) 

- PECTIFIEC  V'^LCCITY  vector 

M/CSEC 

7 

? 

c 

2 

TETC'MILEMI 

- time  state  vector  is  VAI IC 
customarily  0,  BUT  NOTE  LUNAR 
QRDIT  FEPENCFNCE  CN  PEAL  TIME. 

CSEC 

2E 

2 

26 

2 

OFLTAvrSM(lEM) 

- FCSITICN  CFVIATICN 
t IF  TCCSM(L£M|  = 0 

METERS 

22 

2 

18 

2 

NUVCFM (l  EM) 

- VELOOTTY  DEVTAttcn 
0 IF  TCCSMLEM)  = 0 

3 

- 1 

M /C  SFC 

2 

2 

P«GF  use 
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RO  ISA 

2S 

27 

P0IS5 

RCVCSP(LEM) 

- CCNIC  PCSITICK 

PETERS 

2 

2 

R01S6 

EQUALS  RRECTCSMILEMI  IF 

B01S7 

Trr.SMLFM  = 0 

ROISB 

R01S9 

7 

RO  I 50 

VCVrSMLEP) 

- CCNIC  VELCCITY 

P/CSFC 

2 

2 

POISI 

EQUALS  VRECTCSPILEPI  IF 

R0152 

TCCSPILEM  = 3 

POI  53 

R015S 

2E 

28 

R0155 

TPCSMI  EP) 

- TIPr  SINCE  RECTIFICAT  ICN 

CSECS 

2 

2 

R0156 

CLSTCPARILY  0 

p.ns7 

ROl  5P 

1/2 

17 

16 

P0159 

xkffcsp(l=m ) 

- ROOT  OF  KEPLERS 

ECLATICN 

M 

2 

2 

Ril  160 

1 IF  TCCS^d  EP) 

= 0 

ROU  1 

R0  162 

CPCrNFLG 

- PERMANENT  FLAGS 

COPRESPONCI NG 

0 

C 

POI  63 

cpioflag 

TC  MCCNFLAG  AKC 

MICFLAG 

0,  1 

C,  1 

R0164 

1 MOONFLG 

C = CSM,  L = LM 

0 

0 

R016S 

LPICFLG 

0, 1 

C ,1 

R 1166 

R0  16  7 

SUfi  FFL6G 

- LUNAR  SURFACE  FLAG 

0,1 

C ,l 

ROl  6B 

R0169 

IN  ACOninN,  IF 

( 1 ICMIOFLAG  IF  SET , 

THE  INITIAL  INPUT  VALLES  FOR 

LUNAR 

RO  1 70 

SOLAR  EPHFMERIOFS  SUBROUTINF  ANO  PLANETARY  INERTIAL 

ORIENTATION 

SLB- 

P0171 

ROLllAE  PLST  RR 

PFESET. 

R017.7 

R0173 

CUTPUT 

RC  17S 

AFTER  EVERY  CALI 

. TC  INTFGRATICN 

R3175 

earth 

PCCN 

R0176 

2S 

2S 

POI  77 

Cr  RATT 

POSITION' 

PETEFS 

2 

2 

R0178 

7 

7 

RC17S  ■ 

6C  VATT 

VFLCCITY 

M/CSEC 

2 

2 

R0180 

28 

28 

ROI  31 

12C  tat 

T IRE 

2 

2 

RO  182 

29 

27 

P n 83 

isr  PATTI 

POSIT (ON 

PETEPS 

2 

2 

R 11  8S 

7 

c 

RCies 

2(30  VATTl 

VEI CCITY 

P/CSEC 

2 

2 

R1186 

3 2 

36 

30 

RQ1P7 

26C  NU(0| 

ML 

M /CS 

2 

2 

P01P8 

R01R9 

XI 

putable  entry 

-2 

- ion 

Rcisr 

R0191 

<2 

rCCRDINT 

P0192 

X? 

CCCRCINATE  SYSTEM  ORIGEN 

0 

2 

R0193 

(THIS,  NCT  PCCNFLAG, 

SFCULC  EE 

I 
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ROIRA  USFC  TC  CETERMNE  ORIGIN.  I 

RCISS 

R0196  IN  AnCITlHN  TO  THE  ABOVl , THE  PER^ANEM  STATE  VECTOR  IS  UFCATEO  hHEFFVEP 
P01«7  STATEFIG  was  SET  AND  WHENEVER  A W-kATFIK  IS  TC  EF  INTECPATEO.  THE  PLSH 
POISP  roLMTEP  IS  SET  to  ( AM)  CVEPFICW  IS  ClEAREC  FEFCPF  RETLPNING  TO  THE 
ROIRO  CALL  INC  PROGRAM. 

po?no 

ROZOl  A.C  CALLING  SEOLFNCES  AND  SAFFLE  CCCE 

Ro2o?  

RC2CA 

P07'H  A)  PRETISION  ORBITAL  INTEGF»TICN.  C S H PR EC  , LE F PREC  ENTRANCES 


Rn?ns 

L-Y 

STORE  TIME  TC  SSTS7S1T5  T 95  PIS  LSST 

( TA531) 

R020E 

L 

CAI  L 

R02D7 

L + 1 

CS>APREC  (CP  LEHFREC) 

R'J2"  E 

L+2 

FETURN 

RD2C<3 

INPUT 

R021(T 

TCFCl 

(PC  32CI  TIMF  TO  INTEGRATE  TO. .. CENT  I SECOND S 

SCALED  2 

R021  I 

CLTPUT 

R021? 

the  data  listed  in  SECTICN  3.0  PLLS 

R0213 

PCVV 

PCSITTOM  VECTCP  OF  VEHICLE  WITH  RESPECT 

TC 

SECONDARY 

RT21A 

BUOY. . 

. PETERS  P-29  CNLY  IF  FICFIAG  = CIFCFLAG 

= 1 

R021S 

ei 

ECNIC  INTEGRATION.  CSMCCMC,  LEFCCMC  ENTFANCES 

R0  216 

L-X 

STORE  TIME  IN  FUSE  LIST  (TOEC!) 

R0217 

L 

CALL 

P021  8 

L + 1 

CSMCONIC  (OR  LEMCCNiri 

R021  R 

INPL  l/OUTPUT 

R022n 

SAME  AS  PPECISICN  INTEGRATICN.  EXCEFI  PCVV  NCT 

SET 

R0221 

C) 

INTEGRATE 

GIVEN  STATE  VFCTCR.  INTEGPVS  ENTRANCE 

R T22? 

CALL 

R0223 

intetall 

P022A 

VICAC 

R0225 

FCSniCN  VECTCP 

R0226 

STUVL  RCV 

R0227 

VELOCITY  VECTCP 

RO?2e 

STCDL  VCV 

R072R 

TIME  STATE  VECTOR  VALID 

R0230 

STCDL  TFT 

P02TI 

FINAL  OACILS 

R0232 

STORE  PFINAL 

R023T 

SFT(CLEAA)  SET(CIEAR) 

R023A 

intypflag 

R'>235 

FCCNELAG 

R023E 

SET(CLEAR)  DLCAD 

PT237 

DESIRED  TIME 

R023R 

STCALl  TCECl 

R02TR 

I NTFGRVS 

ROPAu 

INPUT 

ROPAl 

RCV 

PCSITTCN  VCTCE  FFTEFS 

R0  242 

vrv 

velocity  vector  f/csec 

R02A3 

TET 

TIRE  OF  STATE  VECTCPIFAY  = 01  CSEC  B- 

26 

PAGE 
EC  S3 
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R72A9 
R02A5 
R0296 
R12'4  7 
R02AB 


TCECl  time  10  INTEGRATE  TQ 

(PAY  BE  INCREPFNT  IF  TET=0) 

nUTPLT 

SAMF  AS  FCR  PPflSICN  OR  CONIC  I NTEGR  AT  I CA  , 
OEPFNCING  CA  IITYPFLC. 


CSFC  E-2E  (PC  32CI 


R02A9 

Dl  INTFGRATf 

STATE  VFrTrP.INTGfiV  ENTRANCE 

R025n 

L-X 

9TCRF  TIRE  IN  PUSH  LIST  (TCECIKMAY  BE  DCNE  AFTER 

CALL  TC 

R7252 

L-e 

call 

R0253 

L-7 

P.j2'a 

1-6 

SCT  (CLEAR ) SET (Cl  FAR  1 

R02S>; 

1-  5 

VI  ntflag 

1=CSP,  0=lR 

P0296 

L-A 

intypflag 

l=CONir,  r=PRECISION 

R02F7 

L-3 

SET(CIEAP)  SET(CLEAR) 

P025R 

L-2 

ni ROFL  AG 

1 = K-»'ATRIX,  0 = NC  N-RATRIX 

R0259 

l-I 

C6CR9FLG 

1=9>9,  C=6X6 

RC26'” 

( 

SET  CLCAC 

R9261 

L *1 

FTATEFLG 

OESIPE  PERRANENT  LPCATE 

R0262 

1+2 

FINAL  RAC. 

CF  STATE  VECTOR 

R0263 

L + 3 

STfALL  RFINAL 

PT26A 

L +A 

INTEGR V 

R0265 

1 

CAl  L 

NCPRAL  USE--  WILL  UPDATE  STATE 

P0266 

L ♦ 1 

I NTFGR  V 

VECTOR  IF  CIRCFIAG=1. (STATEFLC  IS 

R0267 

L+2 

RETURN 

ALWAYS  RESET  IN  INTEGRATION 

AFTER 

R026P 

IT  IS  USEC.) 

P0269 

INPUT 

R )270 

TOECl  (PC  32CI  TIRE  TC  INTEGRATE  TO  CSEC  B-28 

R027I 

OUTPUT 

PT272 

SAME  AS 

FOR  PRECISION  OR  CONIC  INTEGRATION 

R027’ 

THE  nROGRAR  Will  SFT  VCCNFUAC, 

“ICELAC  CEPENCINC  ON 

INTSTAIL ) 


RT27A 


TFF  oFPMANFNT  state  VECTOR  RF PR 0 SENTAT I CN . 


02791 

11,2909 

BANK 

1 1 

02792 

REF 

■3 

LAST 

236 

13,2000 

SFTLCC 

INTINIT 

02793 

13,2609 

BANK 

02799 

PEF 

7 

LAST 

975 

E3 ,1959 

ERANK= 

RRECTCSM 

02795 

REF 

.3 

1 AST 

2’6  ro 

239  : 

39 

36* 

rCLNT* 

Fl/INTIN 

0275 

REF 

109 

LAST 

1195 

13, 26  09 

0 5 3 5 3 

1 

STATE INT 

TC 

PHASCHNG 

0276 

1 3,26)5 

00152 

0 

CCT 

00052 

7277 

RFF 

n 

LAST 

779 

13, 2606 

3 5'’17 

1 

CAF 

PFIF5 

02  78 

PEF 

91 

LAST 

959 

13,7617 

0 5105 

0 

TC 

F I NO  VAC 

'17  79 

OFF 

8 

LAST 

l?nn 

63 ,1559 

EEANK= 

PRECTCSR 

1287'' 

REF 

2 

L AST 

290 

13.26K 

026  13 

1 

2CA0R 

statinti 

P2EC 

13,2611 

26063 

0 

0281 

PEF 

72 

1 AFT 

1129 

13,2612 

0 5261 

1 

TC 

TASKCVER 

0282 

REF 

226 

L AST 

1182 

13,2613 

0 6092 

I 

STAT  INT  1 

TC 

I ntpret 

0283 

13 ,2619 

9 7019 

i 

EON 

P.Te 

0 2331 

REF 

2 

LAST 

299 

n,  26  15 

C9712 

1 

CLI TF( AC 

KILL  INTFGRATICN  UNTIL  NEXT  PHC 

0293  2 

RFF 

1 

13,2616 

26659 

1 

NCINT 

0289 

RFF 

3 1 

LAST 

971 

13,2617 

21579 

1 

L CAC7  IRiF 

0286 
4 - 

OFF 

50 

LAST 

968 

13, 262C 

00091 

1 

STORE 

TCECl 
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L INTFGPATICN  IMTiaiZATfOw 


0323 

13,2621 

7762A 

1 

CALL 

T32A 

BEF 

28 

1 AST 

1 1A5 

13, 2622 

27A  12 

C 

lATSTALL 

0325 

13 ,2623 

A531A 

U 

SET 

CALL 

0325  1 

R = F 

A 

1 A'T 

23T 

13 ,262A 

01076 

1 

NCCCFL  AG 

3326 

REF 

7 

1 AST 

587 

13,2625 

266A5 

1 

SETIFLGS 

0327 

13,2526 

520TA 

0 

SET 

GCTO 

032fl 

REF 

2 

LAST 

23C 

13,2627 

C1A60 

1 

PCCHFLAG 

032B2 

RRF 

1 

13,  263C 

26026 

1 

STATELP 

0356 

13,2631 

00003 

1 

6U0SECS 

2CEC 

60(IOU 

0356 

13,2612 

25  lAO 

0 

OA'A 

13,7633 

77A1A 

0 

EKTINT 

Cl  EAR 

EXIT 

REF 

A 

LAST 

587 

13 , 263A 

0 1672 

0 

STATCFLG 

0AO8 

REF 

106 

LAST 

1200 

13,2635 

0 5353 

1 

TC 

PHASCHNG 

CAC9 

13 , 2536 

20032 

1 

OCT 

20032 

OAl  1 

13,2637 

C CC06 

1 

EXTEAO 

0A12 

RFF 

2 

1 AST 

239 

13, 26A0 

3 2632 

1 

OCA 

6CCSECS 

0A13 

REF 

A 

LAST 

72< 

1 3,25A1 

0 5277 

0 

TC 

LCIGCAIL 

OAl  A 

ptF 

A 

LAST 

296 

E3, 1626 

EPAM<  = 

RPECTFI  S 

OAl  5 

REF 

3 

LAFT 

2A0 

13  ,25A2 

0260A 

1 

2CACR 

STATEINT 

3A15 

13,26A3 

26  363 

0 

0A16 

REF 

1 A3 

1 AST 

967 

13, 26AA 

0 5 155 

c 

TC 

ENOCF JCB 

0A26 

1 3 ,26A5 

A331A 

0 

SETIFLGS 

SET 

CLEAR 

0A2  7 

RFF 

R 

LAST 

12C1 

13,26A6 

01A72 

1 

STATEFLG 

0A2  8 

PFF 

15 

LAST 

780 

13,76A7 

01673 

1 

I NTYPFLG 

0A29 

13,2650 

A301A 

0 

CLEAR 

CLEAR 

0A3O 

RFF 

lA 

LAST 

656 

13,2651 

0 1676 

1 

DIROFLAG 

0A301 

REF 

8 

LAST 

587 

13,2652 

016  75 

1 

U60R9FLG 

0A3O2 

13,265’ 

7 76  1 6 

r 

RV/C 

0A30T 

13,265a 

77  7 76 

1 

NDINT 

EXIT 

oatCa 

RFF 

107 

t AST 

1201 

13 .2655 

0 5353 

1 

TC 

PFASCFNG 

0A305 

13,3656 

CC0C2 

0 

CCT 

00002 

0A306 

RFF 

97 

LAST 

972 

13,2657 

0 5516 

0 

TC 

DQWNFLAG 

0A307 

PCF 

■a 

LAST 

120C 

13,26bC 

00221 

0 

ACRES 

CUITFLAG 

3A30P 

REF 

I AA 

LAST 

120  1 

l’,2661 

0 5155 

c 

TC 

EACCF JC0 

R0A31  ATCPCSP  TRANSFERS  RRECT  TC  RRFCT  1 TC  PRECTCSP  TO  RRECTCSM  +A  1 


R0A32  CALLING  SFOLENCF 

R0A33  L CALL 

RCA3A  L*1  ATCPCS« 


P0A3‘S  NCfHfL  EXIT  AT  L <2 


0A36 

0A37 

REF 

27 

LAST 

1181 

1 3 .2662 

13.2663 

0A38 

RFF 

2 

LAST 

1 IA9 

1 3, 266A 

0A39 

OAAO 

RFF 

7 

LAST 

71  1 

13.2665 

13.2666 

OAAl 

RRF 

3 

LAST 

11A9 

13, 2667 

A 7 320 

0 

ATOPCSM  STQ 

RTB 

00051 

C 

S2 

26675 

1 

mcvEACSR 

ASOl  A 

0 

SFT 

CALL 

0AQ63 

c 

CRCCNFLG 

26UA 

1 

SVDWN 1 
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0642 

13, 267C 

43C1  4 

C 

ecN 

CLRGC 

0463 

PEP 

14 

LAST 

780 

13,2671 

CC303 

1 

MCCNFLAG 

)444 

REF 

?P 

LAST 

1201 

13,2672 

00051 

0 

S2 

0446 

R9F 

8 

1 3ST 

12''  1 

13,2673 

04  22  2 

0 

C FCCNFLG 

0446 

R9F 

29 

L AST 

1?02 

13 ,?674 

0079  1 

0 

S2 

7447 

R?F 

1 

1 i ,2679 

0 2037 

0 

vrVEACSF  TC 

SETBANK 

044  R 

PFF 

? 

I AST 

1 1 1 

13, 2676 

55 • 5CC 

1 

TS 

OIFECCNT 

0449 

R9F 

3 

LAST 

1202 

13 , 2677 

51  • 50'j 

0 

INDEX 

0 IFEOCNT 

0490 

PEF 

6 

LAST 

1166 

13,27Cf 

3 15F2 

1 

CA 

RPFCT 

0491 

RpF 

4 

LAST 

1 20  2 

13,2701 

51 '500 

0 

INDEX 

OIFECCNT 

049? 

PFF 

c 

1 A ST 

1 2CC 

13,2702 

55 ' 55<» 

(7 

TS 

RPECTCSM 

(7493 

CEP 

5 

1 AST 

1202 

13,2702 

11*500 

1 

CCS 

OIFECCNT 

0454 

PFF 

3 

LAST 

1201 

13,2704 

1 26/6 

0 

TCF 

MOVEACSP 

0499 

RFF 

56 

1 AST 

1175 

13,2705 

0 6C64 

c 

TC 

DANZ  IG 

R0496 

FTCACSF 

TPANSFFFS 

RPECTIS"  TO 

RRECTC5M 

♦ 4 1 TO  PRECT  TC 

PRECT  +41 

R0497 

CALLING 

SEOUENCf 

R045R 

L 

C Al  L 

R0459 

FTCAC'P 

R0460 

NORMAL 

FXIT  AT  It? 

0461 

13,2706 

43^34 

1 

PTOACSM 

RTB 

BCN 

0462 

RFF 

2 

LAST 

1149 

13 ,2707 

26724 

1 

MCVEPCSP 

0463 

RFF 

9 

LAST 

1202 

13,2710 

04302 

C 

CPCCNFLG 

0464 

PEF 

1 

13,2711 

26  7 17 

1 

SETPCCN 

7469 

13.2712 

66214 

0 

CLRPCCN 

CLEAR 

SSP 

0466 

PFF 

15 

LAST 

1202 

13,2713 

CC262 

r 

RCCNFLAG 

7467 

" RFF 

5 

1 AST 

1 1 4R 

13,2714 

02031 

1 

PBODY 

0468 

13,2715 

0000  ) 

1 

0 

7469 

13,2716 

7 7 6 1 6 

C 

RVO 

C47C 

13,2717 

66214 

u 

SETMGCN 

SET 

SSP 

0471 

OFF 

16 

last 

1202 

13, 272C 

CC062 

1 

RCCNFLAG 

04  72 

REF 

6 

1 AST 

12(7? 

13, 2721 

0202  1 

1 

PBCDY 

0473 

13  ,2722 

00002 

0 

? 

0474 

13,2722 

776  16 

c 

PVC 

0475 

REF 

2 

LAST 

120? 

13,2724 

0 3037 

0 

PCVERCSP 

TC 

SETBANK 

0476 

REF 

6 

LAST 

1202 

13,2725 

55*500 

1 

TS 

OIFECCNT 

0477 

RFF 

7 

LAST 

120  2 

13,2726 

5 1 * 500 

c 

INDEX 

OIFECCNT 

0478 

REF 

1C 

LAST 

12('2 

13,2727 

3 1554 

1 

CA 

RRECTCSM 

0479 

PEF 

8 

LAST 

1202 

13, 272C 

51*500 

c 

INCEX 

OIFECCNT 

0480 

RFF 

7 

LAST 

120  2 

13, 2731 

55*502 

C 

TS 

RREC  T 

0481 

PEF 

c 

1 AST 

1202 

13,2732 

11*500 

1 

CCS 

riFECCNT 

0482 

RFF 

3 

1 AST 

1202 

13,2733 

1 2725 

1 

ICF 

PC VEFCSP 

0483 

REF 

57 

1 AST 

1202 

13,2734 

0 6064 

c 

TC 

DANZ  IG 

’0484 

ATCPLEP 

TRANSFERS 

RPECT  TC  RPFCT  +41 

TC  PRECTLEP 

TC  PPECTLEP  +4 
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0965 

13,2735 

97020 

0 

ATOPL  EM 

STO 

R TB 

09E6 

REF 

30 

LAST 

1202 

13,2736 

000  51 

C 

S2 

0987 

REF 

3 

LAST 

1 19P 

13, 2737 

26750 

1 

MCVEALEP 

C96P 

13,^797 

95.719 

0 

SET 

CALL 

L)98'l 

Rcp 

■a 

LAST 

5PC 

13,2791 

C9C69 

1 

LACCAFLG 

0990' 

PFF 

2 

1 AST 

1 19P 

13,2792 

26070 

1 

SVDWK2 

0991 

13,2793 

93019 

0 

PEA 

CLRGC 

0992 

RFF 

17 

LAST 

1202 

13, 2799 

00303 

1 

MCCAFLAG 

C993 

PFF 

31 

LAST 

1203 

13 ,2  795 

0905  1 

0 

S2 

0999 

REF 

9 

LAST 

1203 

13,2796 

09229 

1 

LPrONFLC 

0995 

REF 

32 

1 AST 

120  3 

13,2797 

0005  1 

0 

S2 

0996 

Rrr 

3 

last 

1202 

13,2750 

0 3037 

0 

MHVEAL  EM 

TC 

SET8ANK 

099  7 

RFF 

10 

LAST 

1202 

13,275  1 

55*  5CC 

1 

TS 

niFECCAT 

0998 

REF 

1 1 

LAST 

120  3 

13,2752 

5 1 • 530 

0 

INDE  > 

DIFECCNT 

0999 

REF 

e 

1 AST 

1202 

13,2753 

3 1502 

1 

CA 

PRECT 

0500 

REE 

1? 

LAST 

1203 

13,2759 

51*500 

0 

INDEX 

OlFECCAT 

OS'"! 

RFF 

2 

L AST 

1 12 

13  ,2755 

55*626 

n 

TS 

RRFCTLEM 

0 50  2 

REF 

13 

LAST 

1203 

13 ,2756 

1 1 * 5 0 •) 

1 

CCS 

DIFECCNT 

0503 

FFF 

9 

L AST 

120  3 

13,27=7 

1 275  1 

1 

TCF 

MCVEALEN  * 1 

C5C9 

REF 

58 

LAST 

1202 

13 ,2  760 

0 6069 

0 

TC 

DANZIG 

R0505 

FTCAI 

EM 

TRANSFERS 

RRECTLFu 

TC  RRFCTLEA' 

+41  TC  RPECT  TE 

RPECT  +91 

0 50  6 

13,2761 

97019 

1 

PTCALEM 

EON 

RTB 

0507 

RFF 

16 

1 A ST 

836 

13,2762 

093  )7 

1 

SLFFFLAG 

0508 

REF 

1 

13, 2763 

27002 

0 

tSEPI  CS 

0509 

REF 

2 

1 AST 

1 19P 

13,2769 

26771 

1 

mcveplfm 

0510 

13,2765 

52C19 

C 

ecA 

GCTC 

051  1 

RFF 

5 

1 AST 

1203 

13,2766 

0A309 

1 

lmconflg 

0512 

RFF 

2 

LAST 

1202 

13,2  767 

2671  7 

1 

SETMCCN 

0513 

RFF 

1 

13,2770 

267  1 2 

1 

C IRMCCA 

0519 

REF 

9 

LAST 

120  3 

13,2771 

0 3037 

0 

MCVEFLEM 

TC 

SETBANK 

351*= 

RFF 

19 

L A ST 

1203 

13,277? 

55*500 

1 

TS 

DIFECCNT 

0516 

REF 

15 

LAST 

120  3 

13, 2773 

51*500 

c 

INDEX 

0 IFFCCNT 

0517 

REF 

3 

LAST 

1203 

13  ,2779 

3 1626 

1 

CA 

rrectlfm 

0518 

REF 

16 

LAST 

12C3 

13,2775 

51*  SCO 

c 

lACEx 

DIFECCAT 

051  9 

REF 

9 

LAST 

120  3 

13,2776 

55*5C2 

C 

TS 

RRFCT 

0520 

REF 

1 7 

LAST 

1203 

13,2777 

11*500 

1 

CCS 

DIFECCNT 

0521 

RFF 

3 

LAST 

1203 

13,3COC 

1 2772 

c 

TCF 

MCV6F1FA  +1 

9522 

RFF 

5<i 

LA«T 

1203 

13,3011 

0 6069 

0 

TC 

OANZ IG 

0523 

13,300? 

7 72C1 

1 

LSFPICS  SFTPC 

VICAC 

0529 

13,3003 

COOO  1 

0 

0 

C525 

REF 

15 

LAST 

1131 

1 3 ,3  099 

02023 

1 

RLS 

0526 

REF 

1 3, 3C05 

91525 

C 

FOOL 

PLSH 

0527 

51 

LAST 

120" 

13,3006 

00091 

1 

TDFC  1 

0528 

RFF 

1 3 

LAST 

78r 

13 ,3C07 

15517 

0 

STCCl 

TET 

0529 

RFF 

1 

13,301C 

2 7 735 

c 
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0530 

13,3C11 

77624 

1 

CALL 

0531 

REF 

7 

1 AST 

1127 

13,3012 

55  716 

1 

PF-TC-R 

0532 

REF 

16 

1 ART 

1170 

13,3013 

25535 

0 

STOVL 

RCV 

0573 

REF 

2 

1 AST 

37 

13,3C14 

2400  1 

r 

ZLN  IT 

053A 

■ 

13,3015 

14001 

r 

STCOL 

OD 

0535 

REE' 

14 

LAST 

1203 

13,3016 

01517 

o' 

TET 

0536 

13,3017 

14CC7 

c 

STCDl 

6C 

0537 

PFF 

2 

LAST 

120  3 

13, 3020 

27735 

0 

5 /ft 

053P 

13,3021 

45014 

0 

SET 

CALL 

NEECFC  FOR  SETTING  XI  CN  EXIT 

053B1 

PFF 

1ft 

1 AST 

1203 

13,3C22 

ccn6i 

1 

RCCNFLAG 

''539 

RTF 

P 

LAST 

1204 

13,3023 

557  16 

1 

RP-TO-R 

05A0 

1 3,3024 

74235 

0 

vxv 

VXSC 

Q5A1 

REF 

17 

L AST 

1 204 

13, 3025 

C1535 

C 

RCV 

05A2 

RFF 

1 

13 ,3026 

26001 

1 

OREGMOON 

05A3 

REF 

14 

LAST 

117  1 

13,3027 

25543 

1 

STCVl 

VCV 

05AK, 

RFF 

ft 

LAST 

1127 

13,3030 

24007 

0 

ZEROVEC 

05A5 

RPF 

H 

LAST 

1 14E 

13,3031 

01521 

0 

STORE 

TCELTAV 

T5A6 

13,303? 

67174 

1 

AXT  ,2 

SXA  ,2 

05A7 

13,3033 

0000  2 

0 

2 

05AF 

REF 

7 

LAST 

1202 

13  ,3C34 

020  30 

0 

PECOY 

0549 

REF 

6 

LAST 

1 148 

13, 3035 

35527 

1 

STCALL 

TNL  V 

055C 

REF 

1 

13,3036 

27160 

0 

A-PCHK 

0552 

PFF 

1 

13, ’037 

3 3C43 

c 

setsank 

CAE 

I NTBANK 

0553 

REF 

39 

L AST 

1121 

13, 3^4C 

54  0116 

0 

TS 

BBANK 

0554 

PFF 

1 

1 3,3041 

3 3450 

0 

CAF 

FCPTYCNE 

0555 

REF 

327 

LAST 

1123 

13, 3C42 

C CC02 

0 

TC 

C 

0556 

REF 

11 

LAST 

1202 

E3 ,1554 

FPANK= 

RRECTCSR 

0557 

REF 

10 

LAST 

655 

13  ,3PI4  3 

26363 

C 

I NT  BANK 

BPCCN 

INTEGPV 

R055B  SPECIAL  PURPOSE  pNTRIES  TC  CREITAL  INTEGRATION.  THESE  ROUTINES  PRCVlDE  ENTRANCES  TC  INTEGRATION  WITH 
R056C  APPROPRIATE  SWITCHES  SET  CR  CLEAREC  ECR  THE  CESIREC  INTEGRATION. 

P056I  rSMpPfC  ANC  LFNPREC  PERFCOP  ORBIT  INTEGRATION  BY  THE  ENCKE  PETHCO  TC  THE  TIRE  INtICATEC  IN  TCECI 

R0563  ACCELEpATICNS  CUP  TO  CRIATENESS  ARE  INCLIICEO.  NO  W-MATRIX  TNT.  IS  DONE. 

R0E6A  the  permanent  STATE  VECTOR  I'  NCt  LFCATEC. 

R0565  CSRCCNIC  ANC  LEPCCMC  PFRFORM  ORBIT  INTEG.  BY  KEPLERS  RETHCD  TO  THE  TIRE  INCICATEC  IN  TCECI 
R0S67  NO  OISTLPBING  ACC E L FP AT  I C NS  ARE  INCLUCEC.  IN  THE  PROGRAM  FLOW  THE  GIVEN 
R06fiP  state  vector  is  RECTIFIFO  BEFORE  SCLLTICN  CF  KEPLERS  EOLATION 

R096Q  THE  ROUTINES  ASSURE  THAT  THE  CSH  (LEM)  STATE  VECTOR  IN  P-REM  IS  VALID. 

ROSTd  SWITCHES'  SET  PRICP  TC  ENTRY  TC  THE  «AIN  INTEG.  FRCG  ARE  AS  FOLLOWS 


P0571 

CSMPR  EC 

CSNCONIC 

LEMPRFC 

LEMCCN IC 

R0572 

VI NTFLAG 

SET 

SET 

CLEAP 

CLEAR 

R0573 

INTYPELG 

CLEAR 

SET 

CLEAR 

SET 

R0  574 

Cl  MO  flag 

CLEAR 

CLEAP 

CLEAR 

CLEAR 

RCF7S  CALLING  SEQUENCE 
R0576  L-X  STORE  TDECI 
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R05R0  SUPRCLTINFS  CALLEC 
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FAIL 
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0 
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0590 

13 ,3iiA7 
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1 
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I FI  AGP 
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LAST 
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13,3053 
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c 
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0598 

RFF 

15 

LAST 
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13, 305A 
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1 
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13,3055 

7761A 
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REF 

16 

LAST 
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13, 3C56 
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1 M YFFLG 
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PEF 
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1 3,3057 
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1 
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1 
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PEF 

61 
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120  5 

13,3061 
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0 

XI 
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RFF 
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0 
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1 
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3 
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0 
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20 
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12C' 
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1 
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1 
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c 
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1 
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62 
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0 
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21 
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16 
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1 
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1 
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1 
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c 
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4 
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0 
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e 
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1 
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13,3113 
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0 
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13,3114 
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0 
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RFF 

19 
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CC345 

c 
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0627 
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1 
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06281 

13,3l2f 
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2 
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1 
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VLOAO 

0630 

PEF 

6 

LAST 

1206 

13,3122 

02102 

0 

I FETURM 

0631 

RFF 

9 

L AST 
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13, 3123 

24CC7 

0 
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RFF 

7 
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13 ,3124 
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0 
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0633' 

RFF 

7 

1 AST 
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13,3125 
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1 

STCAU 

TNUV 

0634 

RFF 

2 

L AST 

1146 

13,3126 

27673 

0 

rectify 

0635 

13,3127 

43014 

0 

CLEAR 

SET 

0636 

REF 

17 

1 AST 

1205 

13, ’13C 
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1 
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RFF 

1 

13,3131 
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1 

MEWIFLG 
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13,3132 

7 76  14 

1 

SFTGC 
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RFF 

I 

13,3133 
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1 

RPQFLAG 
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1 

13,3134 
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1 
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VINTFLAG  (IGNOREC  WHEN  ENTEREO  FRCy  INTEGRVSI 

INTYFFLG 

ni YOFL  AG 

C6nR9FLG 

CALLING  SFCLENCE 
L-X  CAIL 

I -Y  INTSTALL 
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USER* 
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NO.  12 

E3  S3 

R0663 

VATT 

CEF  INFC 

ROfte'. 

TAT 

BEFr  RE 

0665 

1 3135 

77A7C 

0 

INTEGRV 

STC 

0666 

RCF 

7 

LAST 

1206 

13,3136 

02102 

or 

I PETLRN 

0667 

13,3137 

43014 

0 

1 ATEGRVl 

SET 

SET 

0668 

REF 

2 

1 AST 

12C6 

13,3140 

04060 

0 

RPCFLAG 

0669 

KEF 

2 

LAST 

1206 

13,3141 

0406  2 

1 

NEWIFLG 

0670 

13,3142 

7773  1 

1 

1 ATEGFV2 

SSF 

3671 

REF 

13 

LAST 

1 149 

13,3143 

000  5 3 

1 

CFRET 

0672 

ftpP 

2 

LAST 

1206 

13,3144 

27151 

i 

ALOADEn 

0673 

13, ’145 

52C14 

c 

BGN 

GCTC 

0674 

REF 

23 

LAST 

120  6 

13,3146 

01714 

1 

VI NTFLAG 

0675 

RFF 

1 

13,3147 

26706 

1 

PTCACSM 

0676 

REF 

2 

LAST 

29E 

13, 315C 

26  76  1 

0 

FTCALEM 

C677 

13,3191 

77745 

1 

Al  OACEC 

CLOAC 

0678 

■^FF 

52 

LAST 

1203 

13,3152 

00041 

1 

TCECl 

0679 

PFF 

7 

1 AST 

104 

13,3153 

01115 

0 

STORE 

TOEC 

068C 

13 ,3194 

5 2014 

0 

eOFF 

GOTO 

0681 

REF 

18 

LAST 

1 205 

13,3155 

C1753 

1 

I KTYFFLG 

3682 

REF 

1 

13,3156 

27260 

0 

testlcof 

0683 

REF 

1 

13,3157 

27^44 

0 

RVCCN 

0684 

13,3160 

774  14 

0 

A-PCHK 

BCE 

EXIT 

C685 

REF 

6 

LAST 

1201 

13,3161 

01752 

0 

STATEFLG 

0686 

REF 

1 

13,3162 

2720  1 

1 

RECTCLT 

0687 

REF 

1U8 

LAST 

120  1 

13,3163 

0 5353 

1 

TC 

PHASCHNG 

06F  8 

13,3164 

0402? 

0 

OCT 

04022 

068<8 

REF 

69 

LAST 

1 146 

13,3165 

C 5504 

c 

TC 

t'FFLAG 

FFASE  CFANGE 

FAS  OCCURRED  BETWEEN 

0690 

REF 

3 

1 AST 

1146 

13,3166 

00236 

0 

ADRES 

REINTFLG 

TNTSTAU  AKO 

INTWAKF 

0692 

REF 

227 

LAST 

120C 

13,3167 

0 bC42 

1 

TC 

lATPRET 

0693 

13,317C 

7773  1 

1 

SSP 

0694 

REF 

14 

LAST 

1207 

13,3171 

00053 

1 

OPRET 

0699 

REF 

1 

13,3  172 

2717? 

0 

PFEX  IT 

0696 

13,3173 

52C14 

0 

BON 

GCTC 

C697 

■ OFF 

24 

LAST 

1207 

13,3174 

11714 

1 

VTMTELAG 

0668 

REF 

3 

LAST 

497 

13,3175 

26662 

1 

ATCPCSV 

0699 

REF 

2 

1 AST 

37 

13, 3176 

26735 

1 

ATOPLFM 

0700 

13,3177 

77624 

1 

PFEX  IT 

CALL 

3701 

REF 

20 

1 AST 

1 149 

13,3200 

11226 

1 

GFP2FC 

07G2 

13.3211 

4500  1 

1 

RECTnUT 

SETPC 

CALL 

0703 

13,3202 

OOOfll 

0 

0 

0704 

REF 

3 

LAST 

1206 

13, 3203 

2 76  7 3 

0 

RECTIFY 

Q7C9 

13 , 3204 

53775 

1 

VLOAC 

VSL  * 

■1706 

REF 

10 

LAST 

1203 

13, 3205 

01  503 

c 

PPECT 

3707 

n,  3206 

57576 

1 

0,2 

0708 

13,3207 

53715 

1 

FCVL 

VSL* 

PATT  TO  PDO 

0709 

RRF 

7 

L AST 

1171 

13,3210 

01511 

0 

VEFCT 

C71C 

13,3211 

57576 

1 

0,2 

0711 

13,3212 

63325 

0 

FCCL 

PCVL 

VATT  TC  PC6 

TAT  TO  PC12 

1207 
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0712 

PER 

I 5 

L A 'T 

1204 

13.3213 

01517 

0 

TET 

0713 

REF 

1 1 

LAST 

12C7 

13.3214 

C 1 503 

C 

RPECT 

0714 

13, 3215 

6*715 

0 

PDVL 

POOL* 

C71  9 

REF 

8 

1 AST 

1207 

13 ,3216 

01511 

0 

VRECT 

0716 

RRF 

2 

1 AST 

687 

13,3217 

5177C 

c 

8LEAFTH,2 

1717 

13, 1220 

76006 

0 

PUSH 

A XT  , 1 

0718 

13,3221 

77765 

0 

EEC 

-10 

0719 

13,3222 

760  14 

0 

ecN 

AxT  ,1 

072C 

PEE 

20 

LAST 

1206 

13 ,3223 

00303 

1 

MCONFLAG 

0 721 

13,3224 

27226 

1 

+ 2 

1722 

13,3225 

7777  5 

1 

CEC 

-2 

0723 

13,3225 

401)1 

1 

INT  EX  IT 

SETPD 

BCV 

1724 

13,3227 

OOCCl 

c 

0 

0725 

13, 323C 

2723  1 

1 

+ 1 

0 7251 

13,3231 

43C14 

0 

CLEAR 

CIFAP 

07252 

REF 

7 

1 AST 

321 

13,3232 

C4676 

1 

AVEPICSN  ALLCW  UFCATE  CF  DCHNLINK  STATE  VECTOR 

07253 

PEF 

5 

L AST 

1205 

13  ,3233 

01667 

1 

PREC  IFLG 

07254 

13,3234 

7 76  1 4 

1 

CLEAR 

07255 

REF 

7 

LAST 

120  7 

13,3235 

01672 

0 

STATFFLG 

0726 

13 ,3236 

77535 

1 

SLOAC 

EXIT 

0727 

REF 

R 

LAST 

1 207 

13,3237 

C2103 

1 

ifetlpn 

0728 

PEF 

7 38 

LAST 

1187 

13,3240 

3 0154 

1 

CA 

MFAC 

0729 

REF 

58 

LAST 

1175 

13,3241 

50  120 

1 

INCEX 

F IXLCC 

07  30 

fiFF 

1 5 

LAST 

1207 

13,3242 

54  052 

1 

TS 

CFPET 

0731 

REF 

4 

LAST 

1149 

13,3243 

0 3423 

1 

TC 

INTWAKE 

R0732 

RVCON  SETS  LP 

nPR  IT 

INTEGRATICN  TC  DC 

: A 

CCNIC  SCILTICN 

FOR  PCSITION  ANC 

R0733 

VELCC ITY 

FOR  THE  INTERVAL  (TFT 

-T3EC  1 

0 734 

1’ , 3244 

45345 

i 

RVCON 

Cl  CAC 

CSU 

1735 

PFF 

3 

LAST 

1207 

13. 3245 

01U5 

r 

TCEC 

0736 

PEF 

16 

LAST 

1208 

13,3246 

01517 

0 

TET 

07?7 

PEF 

IC 

LAST 

1169 

13 , ’247 

36074 

1 

STCALL 

TAU. 

0738 

PEF 

4 

LAST 

1207 

13,3250 

27673 

0 

RECTIFY 

0739 

13,3251 

77624 

1 

CALL 

0740 

RTF 

1 

13,3252 

2 2 4 .•  4 

1 

KEPPREP 

0741 

13,  ’2  5 3 

42345 

1 

DLOAD 

DAD 

C742 

REF 

6 

LAST 

11  71 

13,3254 

01551 

1 

TC 

0743 

PEF 

17 

1 AST 

1208 

13,3255 

C1517 

c 

TET 

0744 

REF 

IB 

1 AST 

1206 

13,3256 

35517 

1 

STCALL 

TET 

0745 

RFF 

2 

LAST 

12C7  . 

13,3257 

2 7 201 

1 

RECTCL'T 
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07A6 

13,3260 

43C14 

0 

TESTICCP 

ecF 

CLPGC 

07462 

PPF 

4 

LAST 

120  1 

13, 3261 

04752 

C 

QLI TFIAG 

07462 

13,3262 

27265 

0 

♦ 3 

0746  4 

REP 

8 

LA  ST 

I 208 

13,3263 

01632 

1 

STATEFLG 

0 746  5 

RPF 

1 

13, 3264 

27226 

1 

I NTEXIT 

07466 

1 3 , 3265 

73001 

1 

+ 3 

SFTFC 

LXA,  2 

0 74  7 

13, 3266 

0C013 

0 

ICO 

0 74  6 

REF 

10 

LAST 

1206 

13,3267 

02  030 

0 

PBOOY 

0740 

13,3770 

51575 

1 

VICAC 

A8VAL 

0750 

REF 

18 

LAST 

120  4 

13, 3271 

01535 

0 

RCV 

0751 

13 ,3272 

43006 

0 

PUSH 

CLEAR 

0752 

REF 

1 

13,3273 

00262 

1 

PICFLAG 

0753 

13,3’74 

5C023 

u 

DSU* 

8 PN 

0754 

RPF 

1 

13,3275 

53755 

0 

RPE,  2 

0755 

13,3276 

2730  1 

0 

+ 3 

07P^ 

13,3277 

77614 

1 

SET 

0757 

REF 

2 

LAST 

1209 

13,3300 

00062 

c 

PICFLAG 

0758 

13, 3301 

41345 

0 

NORFINAL 

CLGAO 

DPP 

0759 

13 ,33U2 

00013 

0 

lOD 

0760 

13, 3303 

CCC43 

c 

340 

0761 

13, 3304 

55762 

1 

SR  IR 

DDV* 

0762 

REE 

3 

LAST 

12CE 

I3,33ff5 

51770 

0 

PUEARTH, 2 

0763 

13,3306 

4 1366 

1 

'CRT 

DPP 

0764 

REF 

1 

13,3307 

25762 

0 

.30 

0765 

13,3310 

4C442 

1 

SP3 

SR4 

0766 

13, 3311 

'4345 

I 

OLOAD 

SL 

0767 

R = F 

739 

LAST 

1208 

13,331 2 

0C155 

0 

MPAC 

0 768 

13,3313 

PC220 

r 

15P 

0769 

13,3314 

40006 

0 

PUSH 

BfV 

0770 

REF 

1 

13,3315 

27342 

1 

PAXCT 

0771 

13,3316 

5C021 

1 

bOSL 

BPN 

0772 

REF 

1 

13,3317 

2741  1 

0 

0T/2PAX 

0773 

ref 

2 

LA  ST 

1209 

1 3 ,3320 

27342 

1 

MAXOT 

0774 

13, 3321 

45345 

1 

CT/2CCMP 

DLOAD 

DSL 

0775 

REF 

4 

LAST 

1208, 

13,3322 

01115 

0 

TDEC 

0776 

REF 

19 

LAST 

1206 

13,2323 

C1517 

c 

TET 

0777 

13, 3324 

54234 

0 

RTB 

SL 

0775 

REF 

6 

LAST 

939 

13,3325 

21613 

0 

SGNAGPEE 

0779 

13.2326 

2C2  1 1 

1 

8D 

078  C' 

REF 

2 

1 AST 

115 

13,3327 

02076 

1 

STORE 

DT/2 

0781 

13.3330 

51470 

1 

ecY 

ABS 

078? 

RFF 

1 

13,3331 

27346 

0 

GETMAXOT 

0783 

13 , 3332 

50025 

0 

CSU 

BMN 

0784 

13.2333 

OCOl  5 

c 

12D 

0785 

REF 

1 

13,3334 

27352 

0 

ptohchk 

0786 

13,3335 

75345 

1 

USEPAXCT 

CICAC 

9 TGN 

0787 

13,3336 

000  15 

p 

120 

0788 

RFF 

3 

LAST 

1209 

13,3337 

07076 

1 

DT/2 
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0789 

PFE 

4 

LAST 

1209 

13, 3340 

36076 

C 

STC ALL 

CT/2 

079C 

REF 

2 

1 AST 

1209 

13,3341 

27352 

0 

PCCHCEK 

0791 

13,3342 

65345 

c 

PAXOT 

CLCAC 

PCCL 

079? 

PEF 

2 

LAST 

1209 

13,334? 

274  1 1 

c 

DT  /2  PAX 

C793 

13,3364 

77650 

1 

GOTO 

0794 

RPF 

I 

13,3345 

27321 

1 

DT/2CCPF 

0795 

13, 3346 

77634 

0 

GETMA  XDT 

RT8 

0796 

PFF 

13 

1 AST 

3f  3 

13,3347 

2171  3 

1 

S IGNPFAC 

0797 

REF 

5 

L AST 

12  10 

13, ??50 

36C76 

C 

STCALL 

OT/2 

0798 

PFF 

1 

13,3351 

27335 

1 

UStMAXDT 

0799 

13,3352 

51545 

1 

PGCHCEK 

CLCAC 

APS 

0800 

PEF 

6 

1 AST 

121<5 

13,3353 

02076 

1 

OT/2 

oeci 

13 ,3354 

50025 

0 

CSU 

BPN 

0802 

REF 

1 

13,3?5E 

27407 

1 

CT/2MN 

0803 

REF 

2 

LAST 

120  4 

1 3, 3356 

27160 

0 

A-PCHK 

0804 

13,3357 

43014 

0 

eCFF 

BCN 

0805 

RFF 

3 

LAST 

1201 

n,  336C 

0 1 740 

r 

fcchflag 

C8C6 

FFF 

1 

13,3361 

23  31  1 

0 

T IPESTEP 

0807 

RFF 

6 

LAST 

1208 

1 3,3362 

0 no  7 

C 

PPEC  IFLG 

0808 

RFF 

2 

LAST 

1210 

13, 3363 

233  1 1 

0 

TI «E  STE  F 

C8C9 

13,3364 

45345 

1 

CLOAC 

OSU 

0810 

RFF 

7 

LAST 

12  !C 

13,3365 

C2C76 

1 

OT/2 

081  ! 

13,3366 

00015 

0 

120 

0P12 

13  ,3367 

4 304  3 

1 

ENN 

BCFCL  P 

0813 

PEF 

3 

LAST 

121C 

13, 337C 

27  160 

0 

A-PCHK 

0814 

RFF 

3 

LAST 

1207 

13,3371 

04242 

1 

NEW  IFLG 

0615 

RFF 

LA  ST 

12K 

13,3372 

2331  1 

0 

T IPESTEP 

0816 

13, 3373 

45345 

1 

CL  CAD 

DSL 

CE17 

REF 

5 

LAST 

1209 

13,3374 

01115 

0 

TOFC 

0818 

RFF 

20" 

LAST 

1209 

13,3575 

(11517 

r 

TFT 

08181 

13,3376 

77640 

0 

BPN 

08  182 

PFF 

2 

LAST 

12C9 

13,3377 

27226 

1 

INTEX  IT 

0819 

13,34Ct 

4C525 

1 

POCL 

SR4 

C82G 

RTF 

8 

LAST 

1210 

13 ,34  )1 

02076 

1 

DT/2 

08?1 

13 ,3402 

4432? 

1 

SP2R 

BCSU 

082? 

13,3403 

52C40 

1 

BPN 

GCTC 

0823 

RFF 

3 

LAST 

1210 

13 .34-14 

27226 

1 

INTEX IT 

0824 

PFF 

4 

1 AST 

12  1C 

13,3405 

2331  1 

c 

TIPESTFF 

0825 

13.34D6 

OQOOn 

1 

DT/2H1N 

2DEC 

3 P-2C 

0825 

I 1 ,84C7 

C14O0 

1 

08?6 

13,  ’410 

14  152 

1 

OT  /2PAX 

2CEC 

4CC0  E2  e 

C6?F 

13  ,3411 

nnooo 

1 

0828 

13,3612 

77  7 76 

1 

1 NTSTAl L 

EXIT 

0831 

REF 

1 

13,3413 

2 01C6 

0 

CA 

RASFLAG 

0833 

REF 

1 

13,3414 

7 3466 

0 

PASK 

INTB  ITAB 

0836 

13,341' 

C cor.6 

1 

EXTENT 

0835 

RFF 

1 

13,3416 

1 3456 

1 

BZF 

OKTCGRAB 

08->7 

Rff 

1 

13,3417 

3 3463 

er 

CAF 

WAKFSTAL 

0838 

REF 

4 

LAST 

466 

13, 3420 

C 5 133 

0 

TC 

JCBSLEEF 

0839 

13,3421 

77776 

1 

INTWAK  FC 

EX  IT 

19:C9  AUG.  11,1969  SKIPPEP  .097  PAGE  1210 


USER'S  PAGE  NO.  15  F3  S3 


EXCHANGE  CT/2MAX  HITH  COPPUTEO  «AX. 


' 


NC  BACKWARDS  INTEGRATICA 
WEEN  IN  FCC 


NO  BACKWARD  INTEGRATICN 

IS  A(CT)  LSITCEC  - TED 
NC 


20 


IS  this  stall  AREA  FREE 


YES 


G«P:  ASSEMBLE  BEVISinN  U6  CP  AGC  PRCG«Am  LUMINARY  BY  NASA  iOzlll2-C71 


L TNTEfiRAnnN  T Ml  T T />  L 1 7 AT  T C N 


0839P 

REF 

2 

LAST 

711 

13,3922 

1 3493 

C 

TCF 

INTWAKEI 

OEAO 

RFF 

2 

LAST 

1210 

13,3923 

9 0106 

1 

INTwAKF 

cs 

rasflag 

0891 

Rcp 

1 

13,3429 

7 9 795 

1 

RASK 

RE  INTPIT 

0892 

pep 

377 

1 AST 

1173 

13,3925 

1C  000 

C 

CCS 

A 

0893 

prp 

3 

LAST 

1211 

13,3976 

0 3993 

1 

TC 

INTWAKEI 

0899 

BFP 

59 

LAST 

1208 

13,3977 

50  120 

1 

INDEX 

FIXLCC 

0895 

REF 

16 

1 AST 

1208 

13, 3930 

3 0052 

0 

CA 

OPPET 

0898 

RFF 

5 

LAST 

89  1 

13,3931 

55 • 059 

0 

TS 

TBASE2 

0899 

PPP 

IBs 

1 AST 

1207 

13, 393? 

C 5353 

1 

TC 

PFASCFNG 

CF5C 

13,3933 

09077 

n 

OCT 

09022 

0851 

REE 

6 

1 AST 

1211 

13, 3939 

3 1059 

1 

CA 

T8ASE2 

085? 

REP 

60 

LAST 

121  1 

13,3935 

50  120 

1 

INOF  X 

F I XLCC 

0853 

RFF 

1 7 

LAST 

121  1 

13,3936 

59  052 

1 

TS 

CFPET 

0859 

REF 

2 

LAST 

1211 

13, 3937 

3 9 795 

0 

CAF 

R E 1 N T 8 1 T 

0855 

REF 

3 

LAST 

121  1 

13 , 3990 

7 0106 

1 

RASK 

RASFLAG 

0856 

13 , 399  1 

0 0006 

1 

EXTEND 

1857 

PEP 

1 

13, 3992 

1 39f  1 

0 

BZF 

GCBAC. 

0861 

RFF 

2 

LAST 

1210 

13,3993 

3 3963 

0 

INTWAKEI 

CAF 

WAKESTAL 

0862 

13, ’999 

C C009 

G 

INHINT 

0863 

RFF 

5 

LAST 

967 

13, 3995 

0 5137 

1 

TC 

JCBWAKE 

0869 

REF 

22 

LAST 

1103 

13 , 3996 

10  069 

1 

CCS 

LCCCTP 

0865 

REE 

9 

1 AST 

1211 

13,3997 

1 3993 

c 

TCF 

INTWAKEI 

CE66 

ft^F 

13,3950 

00051 

0 

FPPTYON  E 

CEC 

9 1 

CE6P 

7 

LAST 

12ir 

13,395  1 

9 3969 

0 

CS 

INTPITAE 

0869 

PEP 

9 

L AST 

12  11 

13,3952 

7 0106 

1 

RASK 

RASFLAG 

0870 

RFF 

5 

LAST 

121  1 

13 ,3953 

59  10  6 

1 

TS 

RASFL  AG 

0871 

13, 3959 

C CC03 

1 

RELINT 

0872  ■ 

REF 

? 

LAST 

1?  1 1 

13, 3955 

1 3961 

0 

TCF 

GCBAC 

0879 

RFF 

2 

LAST 

2 I f 

1 3 , 3956 

3 9736 

1 

CKTCGPA P 

CAF 

INTFLBIT 

0879  5 

13,3957 

C 0009 

0 

INHINT 

0875 

REF  ■ 

6 

LAST 

1211 

13 , 3960 

26  106 

1 

ACS 

RASFLAG 

0876 

REF 

228 

1 AST 

12P7 

! 3,396  1 

0 6092 

1 

GCBAC 

TC 

INTPRET 

0877 

13,3962 

7 7 6 1 6 

0 

BVO 

0888 

RFF 

33 

LAST 

1205 

13 , 3963 

2791  3 

1 

WtKESTAL 

CACR 

INTSTALL 

J89  2 

13,3969 

2C1C0 

1 

1 NTRI TAP 

CCT 

201  JO 

is:0<;  AUG.  Il.l9ts  SKIPPER  .097  PAGE  1211 
USER'S  PAGE  NCI.  It  E3  S3 

IS  THIS  INTSTALLFO  ROUTINE  TC  EE 
PESTARTEC 

NO 

YES,  CCNT  RESTART  KITH  SCRECNE  FUSES  C 


CGNT  INThAKE  IP  WE  CARE  HERE  VIA  RESTART 


PFLEASE  STALL  ARFA 


LD 

DC 


GAP:  ASSPP0L?  RFVISinN  116  C"  A '?C  PPCGPA'*  LL»«INAB\  BY  AA5A  Z021112-C71  19:09  AUG.  11,1969  SKIPPEP  .097  PAGE  1212 

L INTEGBATICN  TA ft  I A1  I ?At rON  L'EB'S  P«GP  NO.  17  F3  S3 

P0B95  AVETC*'IC 

R1896  this  BA-utinE  PPBFCPMS  THE  TOANSTTTCN  PPCP  A THBLSTING  PHA'F  7r  ihE  CC«ST 
RCP97  PHA'E  BY  TMITI  Al  F 2 INC-  THIS  VEHICLES  oEP«ANFNT  STATE  VECTOR  WFTH  THE 
R0P98  VALLES  LEPT  BY  THE  AVEPAG^G  BELTINE  IN  P N , VN , P I F T I R F . 

P0899  PFEGBP  THIS  IS  ECNF  THE  W-«ATPIX,  IP  ITS  VALID  (CFViFLAG  CP  RENCWFIG  IS 
R09CO  SET)  IS  INTEGPATPE  PCPWAPC  TC  FIPTIRE  ViITH  THE  FPE-THPUST  STATE  VECTOR. 

P09>I  IN  ArriTFON,  the  CTHFR  VFHKLE  is  integrated  (PERHANENT)  TC  piptine. 

R09C?  finally  TRKVKCNT  IS  EEPCFC 


090’ 

REF 

6 

1 A ST 

12CC 

13,20"C 

SETlCr 

INTIMT 

• 

09' lA 

13,  3-,65 

BANK 

3 909 

OFF 

6 

LAST 

1200  TC 

1212: 

633  669* 

COUNT  A 

tF/INTIN 

• 

090  6 

13, ’665 

63020 

1 

ALETCMC 

STC 

ecN 

0 90  7 

rff 

6 

LAST 

1169 

13,3666 

02772 

1 

EGRF  SS 

0908 

PFF 

11 

LAST 

836 

13, ’667 

02  716 

0 

RENCWFLC 

• 

09  >9 

RFF 

1 

13,3679 

27S36 

0 

I NT/K 

W-HATPIX  VALIC  ,GC  INTEGRATE  IT 

391  n 

13,3671 

776  16 

1 

BON 

091  1 

RFF 

1 

13  ,3672 

oni  1 

1 

CFBKFL  AG 

• 

0912 

PFF 

2 

L AST 

1212 

13, 3673 

27S36 

0 

INT7V, 

K-RATRIX  VALFC  ,GC  INTEGRATE  IT 

0913 

13, 3676 

65165 

0 

OTHERS 

CLOAC 

CALI 

GET  SET  FOR  OTHER  VEHICLE  INTEGRATItN 

• 

0916 

RFF 

26 

LAST 

96S 

13,3675 

C1236 

0 

PIFTIRF 

CES  IP  EC  TIRE 

09)9 

PFF 

36 

1 AST 

121  1 

13,3676 

276  1? 

0 

INTSTALL 

0916 

13,3677 

65  )16 

0 

SET 

CALL 

• 

0917 

PFF 

2 5 

LAST 

12C? 

13, 350C 

C 1676 

1 

VINTFLAG 

CR 

091  P 

RFP 

8 

LAST 

1 201 

13 ,3501 

26665 

1 

setiflgs 

SETS  LF  NCNF  K-RAT.  PEPRANFNT  INTEG. 

0923 

REF 

S3 

LAST 

12C7 

13 , 3502 

36061 

c 

STCAU 

TCECl 

• 

0926 

REF 

1 1 

LAST 

1206 

13, 35  13 

2 7 13S 

c 

I NTEGRV 

092  5 

13,3506 

65176 

1 

AXT  ,2 

CALI 

NOU  HOVE  PROPERLY  SCALE  RN,LN  A$  V.ELL 

• 

'J926 

13,3505 

0CC02 

0 

2 

PIFTIRE  TO  INTEGRATION  ERASABLES. 

0927 

REF 

35 

LAST 

1212 

13, 3506 

276  12 

0 

INTSTALL 

3 ■■ 

0928 

13,3507 

77016 

1 

BCN 

AXT, 2 

• 

0929 

REF 

6 

LAST 

1 16E 

13, 3510 

06  32  6 

1 

RCCN'THI  S 

093C 

13,3511 

2751  3 

0 

*2 

•C931 

13,3512 

OOOOT 

1 

0 

P 

0932 

13, 3S13 

53775 

1 

VLOAO 

VSRF 

0933 

REF 

16 

LAST 

965 

13  ,3516 

01220 

0 

RN 

2" 

0936 

13, 3S15 

571  76 

c 

0 ,2 

• 

0935 

PEF 

12 

1 AST 

1208 

13, 3516 

01503 

0 

STORE 

RRFCT 

0936 

REF 

19 

1 AST 

12CS 

13,3517 

1 5535 

0 

STCCl 

PCV 

0937 

PFF 

25 

L AST 

1212 

13, ?52C 

C1236 

r 

PTPTIRE 

P 

0938 

RFF 

21 

LAST 

1210 

13,3521 

255  1 7 

0 

STOVL 

TET 

0939 

REF 

1C 

LAST 

876 

1 3 ,3522 

0 1226 

c 

VN 

r 

P 


P 


GftP:  ASSePBLE  PEVISION  116  CF  AC-f  FPrCfiAW  LUPIAAFY  BY  NASA  «:02U12-07l  1S:09  AUG.  11,1S69  SKIPPER  .097  FACE 


L lATFGFATiriN  IN  IT  I 71  I77T  TON 


C9A0 

13,3523 

45057 

1 

09A1 

13 ,3524 

57176 

C 

094  2 

PFF 

3 

LAST 

7 10 

13, 3525 

27707 

1 

CS43 

1 3,3526 

66234 

1 

0944 

REF 

1 

13,3527 

26750 

1 

0945 

P5F 

11 

LAST 

871 

13,3530 

03463 

0 

0946 

13,3531 

00000 

1 

0947 

13,3532 

77650 

1 

0 94  E 

REF 

? 

1 AST 

1 149 

1 3,3533 

4 723'J 

0 

0949 

1 3, 3534 

45145 

C INT/V, 

0950 

REF 

26 

L AST 

1212 

13, 3535 

01234 

c 

0961 

PFF 

36 

LAST 

1212 

13,3536 

2 7412 

0 

0952 

LAST 

120  6 

13,3537 

43C  14 

c 

0953 

REF 

18 

13, 3540 

01476 

0 

0954 

RFF 

1 

1 AS"^ 

120E 

13,3541 

04476 

0 

1955 

'pFF 

13,2542 

430  14 

c 

0956 

9 

LAST 

1201 

13,3543 

01475 

0 

0957 

PEF 

26 

LAST 

1212 

13  ,354  4 

01674 

0 

0964 

PEf 

54 

LAST 

1212 

13, 3545 

34041 

0 

0965 

REF 

12 

LAST 

1212 

13 , 3546 

27135 

0 

0966 

13,354? 

7 7 6 50 

1 

0967 

PEF 

1 

13,3550 

27474 

0 

LSFF’S  F«CE  NC.  IB  E3  S3 


VSR  ♦ 

CALL 
0 ,2 

PI M RECT 

FIMSF  SETTING  UP  STATE  VECTOR 

PTR 

SSP 

GCTC 

PCVATHIS 

TRKMKCNT 

0 

FAZAB5 

PUT  TERP  STATE  VFCTOR  INTO  PERMANENT 

CLCAC 

CALL 

PI PTI RE 
IMTSTALL 

INTEGRATE  w TFPU  EUPN 

SET 

SET 

DIROFLAG 

DC  h-RATRlx 

AVFPICSW 

SC  WONT  CLC8BER  R N , VN  , F I PT 1 RE 

SET 

CLEAR 

060R9FLG 

9X9  FCR  IX 

V INTFL AG 

LR 

STCALL 

GC7C 

TDECl 

INTEGRV 

C the  PS 

NOW  GC  Cr  thF  OTHER  VEHICLE 

1213 


gap;  ASSEP'^LE  BEVISICN  116  CF  AGC  FRCGPAW  L'JPINAFY  EV  NASA  20211  1P-071  1S:CS  AUG.  ll.lGfS  SKIPPER  ,0S7  RAGE  121A 

I INTEGRATION  INITIALIZATION  USER'S  PAGE  NO.  IS  E3  S3 

P0S68  PICTCAVl 

P0969  THIS  RCLTINE  INTEGRATES  (PRECISIFM  TC  TRE  TIRE  SRECIFIEC  IN  TCECl. 

PT570  IF.  AT  TRf  END  TR  AN  INTEGRATION  TI^c  STEP,  CURRENT  TIME  PLUS  A DELTA 

PCS7I  TIrF  (SEE  IIPFFFIT EASFC  CN  TPt  FCRRUTATUCN  TIME  FCP  CNF  TIMF  STEP) 

R0S72  IS  GO.  FATE®  THAN  THE  DFSIOED  TIME,  4LARR  1703  IS  SET  ANT  T|-E  INTEGRATICN 
RCS73  IS  CONE  TC  THF  CURRENT  TIME. 

RCS7A  OCTURN  IS  IN  BASIC  TC  THF  RETURN  iCCRFSS  PLUS  CNE. 

P097S  IF  THF  INTEGRATION  IS  FINISHED  TO  THE  DESIRED  time,  PETLRN  IS  IN  BASIC 

P0976  TC  TFE  return  ACCRESE 

P0S77  IN  either  CASF  , PFFCRE  PFTLRMNC,  THE  EXTRARCLATEC  STATE  VECTOR  IS  TRAN 
P0978  FEPRFC  FROM  R.VATT  TO  R , VN  1- P I PT I Mf 1 IS  SET  1C  THE  FINISHING  INTEGRA- 

POS7S  TfvF  MRAC  IS  SET  TC  THE  CELTA  T IMF 

R0S80  TAT  MNLS  CLRRFNT  TImf. 


P0981  HIFTCAV2 


RCS82  THIS  RCLTINE  INTEGRATES  THIS  VEHICLES  STATE  VECTCR  TC  THE  CURRENT  TIME. 
R0983  NC  INPUTS  ARF  REQUIRFO  OF  THE  CALLER.  PETLRN  IS  IN  BASIC  TC  THE  PFTLRN 

R0984  ACCRESS  HITH  THE  ABCVE  TRANSFERS  TO  R , VM- P I PT  I ME  1- AND  MPAC  CONE 


OSES 

REF 

2 

LAST 

1 S3 

F7, 1 799 

EBANK= 

I RETLPNl 

0986 

13,3551 

93020 

1 

MI0T0AV2 

STQ 

C LRGC 

INTEGRATE  TC  PRESENT  TIME  PLUS 

TIMECELT 

0S87 

REF 

3 

LAST 

121A 

13,3552 

03799 

0 

IRETURNl 

0988 

REF 

1 

13, 355? 

09  <39 

1 

MlCl F LAG 

C989 

PER 

1 

1 3, 3559 

27570 

0 

E NTMI02 

0990 

1 3,3555 

93020 

1 

MICTCAVl 

STC 

SET 

INTEGRATE  TO  TDEC 1 

1991 

PEF 

A 

LAST 

12  19 

13, 3556 

03799 

0 

I RFTLRNl 

C'S2 

PEF 

2 

LAST 

1219 

13 ,3557 

09979 

1 

M lOlFLAG 

0993 

13,3560 

93239 

0 

PTB 

DAC 

INITIAL  CHECK,  IS  TCECl  IN  THE 

FUTLRF 

099<, 

■REE 

32 

LAST 

1200 

13,3561 

21579 

1 

LCAOTIME 

C999 

PEE 

1 

13,3562 

27672 

1 

T IMFOEl T 

0996 

13,3563 

51C21 

0 

BDSL 

BFI 

0997 

REF 

95 

LAST 

1213 

13, 3569 

0009  1 

I 

TDFCl 

0998 

RFF 

1 

13,3565 

27579 

1 

ENTMICI 

Y5S 

0999 

13, 7566 

77629 

1 

CALL 

ICOO 

PEE 

1 

13 ,3567 

27660 

1 

NOT  IMF 

NO,  SET  ALARM,  SUITCH  TC  MCTCAV2 

1001 

1 3,3'7C 

93239 

c 

ENTMIC2 

PTB 

DAC 

1 002 

REF 

33 

LAST 

1219 

13,3571 

2 1579 

1 

1 CADTIME 

ICC3 

Rt^F 

2 

1 AST 

1219 

13,3572 

27672 

1 

T IMfcOELT 

lOOA 

PEF 

56 

LAST 

1219 

13,3577 

C0091 

1 

STCRF 

TDFCl 

1005 

13,3579 

77629 

1 

ENTM  ICl 

CALL 

1006 

RFF 

37 

LAST 

1213 

13,3575 

27912 

0 

INTSTALL 

1007 

13, 3576 

95019 

c 

CLEAR 

CALL 

I'i 


/SSFKBLf  RFVISIC1F  116  CF  / GC  PROG»AW  LUMINARY  BY  AAJA  20211  12-071 


19:09  AUG.  11,1969  SKIPPER 


,097  PAGE  121 


gap: 

L TMEGRATICK  IVTT  I7L  T 7AT  TGN 


100  8 

RFF 

19 

LAST 

1213 

13,3577 

1009 

RFF 

1 

13, 360C 

ICl  0 

13,3501 

1011 

RFF 

19 

LAST 

120? 

13,365? 

1'12 

PFF 

1 

13.2653 

1013 

1 3 ,3  608 

101  A 

RFF 

1 3 

LAST 

1213 

12,3695 

101  5 

13, 3606 

IClt 

RFF 

? 

LAST 

1 ?1  5 

13 ,36C7 

mi7 

RFF 

1 AST 

968 

13,  ’6  10 

1018 

PEF 

7 

LAST 

87A 

13,3611 

1019 

FFF 

23 

LAST 

9A7 

13,3612 

1020 

PEF 

7 

1 AST 

87A 

13,3613 

1021 

RFF 

16 

1 AST 

779 

13,3618 

102? 

PFF 

I 1 

LAST 

F86 

13,3615 

1072  1 

13,3616 

102?; 

P'^F 

I 7 

1 AST 

873 

13,3617 

10222 

PFF 

13 

1 AST 

759 

13, 362C 

1 >23 

13 ,36?  1 

102A 

13,3622 

in?  9 

13. 2623 

1C?  6 

RFF 

30 

1 AST 

9RA 

13  ,3628 

1077 

RFF 

7aOT 

LAST 

1 209 

13,3625 

1078 

RFF 

lA 

LAST 

1069 

13, 3626 

1029 

REF 

K 

LAST 

1216 

13 ,3627 

1030 

ref 

15 

L AST 

889 

13, 363C 

1031 

13,3631 

103? 

RFF 

5 

1 AST 

121A 

13 , 3632 

1033 

PEF 

1 

13,3633 

1C3A 

REF 

3A 

1 AST 

1719 

13  ,3638 

1035 

13,3635 

1036 

R(^F 

3 

LAST 

121A 

13,3636 

1037 

REF 

t 

FAST 

121C 

13,3637 

1038 

n,P68C 

1C3S 

REF 

2 

1 AST 

1207 

13,3681 

lOAO 

RFF 

2 

LAST 

1218 

1 3 . 3 68  2 

lOAl 

13,3683 

10a2 

REF 

35 

1 AST 

1215 

13,3588 

10A3 

PFF 

A 

LAST 

1215 

13,3685 

lOAA 

PEF 

7 

1 AST 

1215 

13,3686 

10A5 

REF 

0 

LAST 

1215 

1 3 ,368  7 

10A6 

13,3650 

1CA7 

RRF 

8 

LAST 

1215 

13 ,3651 

lOAR 

RTF 

e e 

1 AST 

1212 

13,3652 

1 0A9 

13,3653 

1 CSC 

RFF 

1 

13 ,3658 

01676 

1 

r IMOFLAG 

26066 

C 

TFI  SUNT 

83018 

0 

CL  EAR 

SET 

0167? 

1 

INTYPFL  G 

C88  75 

c 

MIDAVFLG 

77628 

1 

CALL 

27135 

0 

I NTEGPV 

77218 

0 

CLEAR 

VLOAD 

08675 

1 

MIDAVFLG 

0900  1 

c 

RATT 

77585 

0 

STOVL 

RNl 

00007 

0 

VATT 

1 7 5 5 3 

1 

STOOL 

VM 

00015 

0 

TAT 

03561 

c 

STCRE 

PIPTIWFI 

66  138 

1 

SXA  ,2 

SXA  , 1 

02  777 

1 

RTX? 

C2  776 

c 

RTXl 

77776 

1 

EXIT 

0 0008 

0 

INF  INT 

0 roc6 

1 

TXTFND 

8 002  5 

1 

CCS 

T IME2 

20  155 

1 

CAS 

MFAC 

0 7262 

0 

TC 

TPAGPEE 

3 1 788 

1 

CA 

I FFTUPNl 

C 8680 

1 

TC 

RANK JLMF 

87MI8 

1 

CKMir? 

POF 

RTB 

08758 

0 

wiCl FLAG 

27650 

1 

MIP2 

21578 

1 

LCAOT  IME 

8821  5 

1 

CAC 

BCSU 

27672 

1 

T1 MEOEL  T 

C 1 1 1 5 

0 

T EEC 

85088 

0 

PPL 

CALL 

27260 

0 

TESTLCOP 

27  6 60 

1 

NCTIME 

83228 

c 

T IMFINC 

R TB 

DAO 

21578 

1 

LOADTIME 

27672 

1 

TIMFOELT 

35115 

1 

STCALL 

TOEC 

27260 

u 

TESTLCOP 

8 5 385 

1 

RI02 

CLC  'C 

r,  SL 

0 1115 

0 

TCFC 

01517 

0 

TET 

85286 

c 

ABS 

DSL 

27670 

0 

3CSECS 

LEER'S  FACE  NC.  20 
NO  W-RATRIX 

LET  IMEG.  KNEW  ThE  CALL  IS 
GC  I NT  FOR  AT F 


YES 


F7  S3 


FOR  MICTCIAV 


aSSr^BLE  BEVIEirN  11A  CF  icr  PPCGR4"  LUf'INAPY  BY  ^ASA  20?U12-C71 


GAP; 

I INTFGWATION  IMJTIM  IZATtr.A 


1051 

13,  ’65*= 

52040 

1 

BRN 

GCTC 

IC52 

B'^F 

4 

1 AST 

1210 

13,3656 

27160 

0 

A-PCHK 

1053 

POF 

1 

13,3657 

2 7643 

0 

T I ME  I AC 

1054 

1 3.366C 

77414 

0 

NOT  IRE 

CLEAR 

EXIT 

I0C5 

pep 

4 

1 A ST 

1215 

1 3,3661 

04674 

0 

MiriFLAG 

1056 

RFF 

6 

LAST 

1215 

13, 3662 

2^  • 744 

1 

lACP 

1 RETLFNl 

1C57 

REF 

41 

LAST 

975 

13 ,3663 

0 5567 

0 

TC 

ALARM 

1058 

13,3664 

Cl  703 

1 

CCT 

1 703 

1050 

PEP 

229 

last 

1211 

13,3665 

3 6942 

1 

TC 

I ATPRET 

1C60 

13,3666 

7 761  6 

0 

PVQ 

1061 

13,3661 

CC001 

1 

3CSECS 

2DEC 

3 

1061 

13,3670 

00003 

1 

1C62 

13 ,3671 

OOOOO 

1 

TIRECELT 

20FC 

2000 

106? 

13, ’672 

03  720 

1 

1C63 

27,3360 

BANK 

27 

1064 

PPF 

1 

04,?OOC 

SETLCC 

UFCATE2 

1065 

04,3147 

BANK 

1C66 

REF 

1 

1166 

EBANK= 

1 ATWAKUG 

1067 

RFF 

1 

CCLATA 

t$/ lATTA 

1 068 

REF 

1 

1 166 

INTWAKUC 

= 

I NTWAKIO 

1069 

04,3147 

0 0003 

1 

I ATWAK  EU 

RFL  lAT 

1070 

54, ’15C 

C 0006 

1 

EXTEAD 

1C71 

RFF 

2 

1 AST 

1216 

04,3151 

2’'  166 

1 

CXCH 

INIWAKLO 

1072 

OEF 

2 20 

LAST 

1216 

C4, 3 152 

C 6042 

1 

1C 

lATPRET 

1073 

04,3153 

5 ’ 1 3 5 

0 

SICAD 

BZE 

1074 

RFF 

T 

1 AST 

2 13 

04,3154 

01  5 J2 

1 

UPSVFLAC 

1 >75 

REF 

1 

C4 , 3155 

11214 

0 

1 atwakuf 

1076 

04,3156 

777  75 

1 

VLOAC 

1077 

RFF 

13 

LAST 

12  12 

04,3157 

0 15  ) 3 

0 

RPFCT 

1078 

REF 

20 

1 AST 

1212 

04, 3160 

2 5 535 

0 

STOVL 

RCV 

1C7<- 

REF 

9 

LAST 

1208 

04,3161 

01511 

0 

VPFCT 

1080 

04,3162 

77624 

1 

CALI 

lOBl 

P«^F 

5 

1 AST 

1208 

'4, 3163 

277  10 

1 

RECTIFY 

10R2 

"4,3164 

51535 

0 

SICAC 

APS 

1033 

RFF 

4 

1 AST 

1216 

C4 , 3 165 

C1502 

1 

UFSVFLAG 

1C84 

04,3166 

53025 

0 

CSU 

BZE 

1085 

RFF 

1 

04  , ’ 167 

11225 

1 

UPHNSVCC 

1 086 

REF 

1 

■14,  3170 

11175 

1 

I ATWAKER 

1 CE7 

04,3171 

431  74 

1 

AXT,  2 

CLRGO 

108R 

04,3172 

CCCCC 

1 

EEC 

0 

1 C89 

REF 

21 

LAST 

1208 

04,31 73 

0C223 

1 

RCCA'FLAG 

is:nc  iuG.  ll.lstq  SKIPFEP  .OS7  FACE  1216 


USER'S  PAGE  NO.  21  F7S3 


TCC  I ATF 

SFT  EPRCF  EXIT  (CAILCC  +21 
INSLFFICIEM  TIRE  FCR  INTEGPATICN  -- 
TIG  WILL  EE  SL  IPPEC... 


TERPORART  LATIL  AARE  TF  lATWAKlC  IS  CFAG 


SAVE  C FCR  RETLRA 


IS  THIS  A CSR/LER  STATE  VFCTCR  UPCATE 
PECLEST.  IF  NCT  GC  TO  lATFAKLF. 


RCVE  RRECTI6I  AAC  VRECT(6)  lATC 

RCVI6I  ANO  VCV(t)  RESPECTIVELY. 

ATh  GC  TO  'RECTIFY  4-13C'  1C 
STCPE  VRECT  INTO  VCV  AND  ZERO  OUT 
TCELTA VI 6 ) ,TALV(6  ) ,TC (2 ) AAC  XKEFI2) 
COMPARE  ABSOLUTE  VALUE  CF  'LPSVFLAG' 

TC  'UFCATE  RCCA  STATE  VECTOR  COCE' 

TO  DEIEPRIAE  WHETHER  TFE  STATE  VECTCP  1C 

0E  upcatec  is  in  the  earth  or  lunar 

SPHERE  CF  IAFLUENCE 

EARTH  SPHERE  CE  lAFLUFACF. 


GAP:  ASSE^PLE  REVISION  116  CP  AGC  PRPGRA”  LUMINARY  8Y  NASA  2C21112-C71 

L IMPGRAlirN  INIT  lAL  I7AT  ICN 


1090 

PFF 

1 

^'A,  3 17A 

112C0 

C 

1 NThAKEC 

1091 

0 A , ’ 1 7 9 

63  1 76 

1 

INTWAKEM 

AXT  ,2 

SET 

1092 

06,31 76 

00002 

0 

CEC 

2 

1093 

RPF 

2? 

L AST 

i;if 

CA,31?7 

00063 

1 

MCCNFLAG 

irSA 

06  , ’2U0 

50139 

1 

I NTWAKEC 

SLOAC 

BHN 

A109P 

1096 

REF 

9 

L AST 

1216 

OA,  ’20  1 

0 1502 

1 

UPSVFIAG 

1C97 

REF 

1 

OA  , 3?  )2 

11210 

1 

INTWAKLM 

109B 

UA, 3203 

77626 

1 

CALL 

1099 

REF 

A 

1 AST 

1 20  7 

06, ’?0A 

26662 

1 

ATOPCSM 

llOiS 

06,3205 

52316 

0 

CLEAR 

GCTO 

1 1 M 

REF 

2 

1 AST 

1212 

C6 , 3?'I6 

0 167  1 

0 

C P e W F 1 A G 

1 10? 

PFF 

1 

<J6 ,3207 

11212 

0 

IN7HAKEX 

1 103 

C6 , 3210 

7 7626 

1 

I NTViAKLN 

CALI 

1 1 16 

PFF 

3 

LAST 

120  7 

06, 3211 

26735 

1 

ATCPLEM 

lies 

06,3212 

77616 

1 

IN'TWAKEX 

CLEAR 

1 lt6 

REF 

12 

LAST 

1212 

06,3213 

02676 

1 

RENDNFLG 

1107 

>6,3216 

69  13  1 

0 

1>'1TWAKUP 

SSP 

C Al  L 

1 1 )8 

REF 

6 

LAST 

1217 

06,3215 

C150? 

1 

UFSVELAG 

1109 

06,3216 

orooo 

1 

0 

1110 

REF 

2 

LAST 

A97 

06,??17 

2762  1 

0 

INTWAKEC 

1111 

06, 322C 

77776 

1 

EXIT 

1112 

R>^F 

1 10 

1 AST 

1211 

06, 32?  1 

0 5353 

1 

7C 

PHA  SCHNG 

1113 

06 , ?2?2 

06  02  6 

1 

OCT 

06026 

lllA 

P.EF 

3 

LAST 

1216 

06,3223 

C 1166 

1 

TC 

1 NTWAKUC 

1119 

06,3226 

O0C02 

n 

UPMNSVCO 

OCT 

2 

1116 

06 , 3229 

UOOU  1 

1 

CCT 

0 

HIT 

06,3226 

776  20 

1 GPP2FC 

ETC 

EXIT 

1118 

REF 

2 

LAST 

12  7 

06,3227 

0271  1 

1 

GRP2SV0 

1119 

REF 

1 1 1 

LA  ST 

1217 

C6, 323C 

C 5353 

1 

TC 

PFASCFNG 

112.) 

06, 3231 

06C22 

0 

CC  1 

06022 

1121 

PEP 

231 

LAST 

1216 

06 ,3232 

0 6363 

1 

TC 

INTPPET 

112? 

06, ’233 

77650 

1 

GCIC 

1123 

PFF 

3 

LAST 

1217 

06,  ■>236 

0271  1 

1 

GPF2SVC 

1S;0‘1  AUG.  11  ,1969  SKIPPER  .097  PAGE  1217 
LSEP' S page  NC.  22  F2  S3 

LUNAR  SPPFRP  CP  INFLUENCE. 


COMMON  CCDING  AFTER  X2  IMTIALIZPC  (NT 
MCCNFLAG  SETIOR  CLEAP.ECI. 

IS  "^HIS  t FECUEST  FCP  t L FM  CP  CSM 

STATE  VECTOR  UPDATE 

UFCATE  CSM  STATE  VECTOR 


UPCATE  LM  STATE  VECTOR 


REMOVE  :LPDATE  STATE  VECTCP  INCICATCP: 


RELEASE 


GRAB:  CF  CRBM  INTEG 


G«P: 

<S$5>'PLE 

REVISION  116 

CF  *rc  FPCGRA"  luminary  8Y 

NA  5A  2C  2 

11  12-0  71 

19:C9  AUG.  11,1969  SKIPPER  .097 

PAGE  121S 

L 

n«fU  761 

1MEGP6T1C6 

USER'S  PAGE  NO.  1 

EC  S3 

poon  1 

cfletf 

000? 

13 ,3673 

BANK 

13 

000  3 

RFF 

1 

11 ,2000 

SFTLCC 

CPPITAL 

noop 

1 1, 26  16 

sank 

0C05 

PFF 

1 

enuNT  < 

» 1/0R5IT 

R0C06 

OELETF 

0007 

11,2616 

60356 

1 KEPPREP 

LXA  ,2 

SETPO 

coon 

RFF 

11 

LAST  1209 

11  ,26.)5 

02  130 

0 

PEODY 

0009 

U.26C6 

CCOOl 

0 

0 

onr 

11,26’17 

75563 

1 

DLCAO* 

SCRT 

SCPT( PL  1 ( *18  CR  *15  1 00 

FL  2C 

on  1 1 

P'=F 

6 

L6'T  12C9 

1 1 ,2610 

51  770 

0 

pufafth, 2 

0012 

11,2611 

5 2 F 1 5 

C 

FDVL 

UM  T 

PL  ec 

OCl  3 

RFF 

21 

LAST  1216 

11  ,2612 

01535 

0 

RCV 

OOl  ^ 

1 1 , 261 2 

60325 

c 

PCCL 

NCRM 

NCFM  P (429  OR  427  - Nil  20 

PL  60 

0015 

ll, 2616 

0CC65 

0 

3 60 

ecu 

P = F 

66 

1 AST  1 205 

11  , >615 

O')06  7 

1 

X 1 

0(117 

11,2616 

7 77U 

1 

FDVL 

0018 

11,2617 

6526  1 

0 

OCT 

POOL 

F*SCPT(PU  (47  CP451  60 

FL  6C 

00  19 

RFF 

1 5 

LAST  1206 

1 1 ,2620 

01563 

1 

VCV 

0020 

PEF 

1 1 

LAST  12CE 

11,2621 

02Q76 

0 

TAL. 

( 4281 

0C21 

11  ,2622 

60225 

1 

esu 

NORM 

0022 

RFF 

7 

lAST  12CE 

1 1 ,2623 

01551 

1 

TC 

0023 

RFF 

19 

MST  1167 

11,2624 

OC'  51 

G 

SI 

002^ 

11 ,2625 

7 7762 

0 

SR  1 

0025 

1 1 , 2626 

6527  1 

C 

COV 

POOL 

0026 

11,2627 

00003 

1 

20 

0027 

1 1 ,263C 

616  35 

0 

CPF 

PUSH 

PS(  46  4M-N2I  60 

PL  EC 

1028 

11,26M 

00005 

1 

60 

002P 

11  ,2632 

65316 

0 

CSO 

POOL 

(Fsisc(  + i2  42  (M-K2ii  er 

FL  IOC 

0030 

11,2633 

orccs 

1 

6C 

0031 

11,2636 

6 6 7 16 

0 

nso 

POOL* 

SSC/PL(-20F  42(M-N2I1  IOC 

FL  12C 

0C3? 

REF 

5 

LAST  1218 

1 1 ,2635 

51770 

0 

MUEARTH, 2 

0033 

11, 2636 

6C662 

1 

SR3 

SR6 

0036 

1 1 , 2637 

6 7515 

0 

PDVL 

vse 

PPEALICN  PU  (463  CR  +371  12C 

FL  160 

0035 

RFF 

U 

LA'T  1218 

11 ,7660 

01  563 

1 

VCV 

0036 

11,2661 

6 6 205 

0 

CPF 

BCSU 

PL  120 

CC37 

11 ,2662 

00065 

0 

360 

0038 

11 , 2663 

61271 

0 

COV 

OPP 

PL  ICO 

0039 

1 1 , 2666 

00003 

1 

20 

- ( 1/F- Al  FF  A )(  412  43M-2N2I 

0060 

• 11  , 2665 

53605 

1 

CMP 

SL* 

0061 

PFF 

1 

11,2666 

1 3 7 72 

1 

0F2/3 

006? 

11,7667 

2'!176 

0 

0-3,1 

1CL(1 /P-ALPHA)  ( + 13  +2(M-A2I1 

0')6  3 

1 1 ,2650 

63260 

1 

XSU  , 1 

DAD 

2( FS  1 SQ  - ETCETRA  PL  SO 

0066 

P = F 

20 

LAST  1216 

11,2651 

00050 

1 

SI 

XI  = A2-M 

•0065 

11 , 2652 

65257 

0 

SL  ♦ 

OSU 

-FS  + 2(FS)SC  ETC  (+6  +M-N2I 

FL  6C 

0^66 

■ - , 

1 1 ,2653 

2)2  11 

1 

8C  ,1 

106  7 

- 

1 1 , 2656 

AIf'iS 

c 

OMP 

OPP 

CC6P 

11,7655 

ono!  1 

0 

on 

0069 

11,2656 

CC005 

1 

60 

0050 

11,2657 

53657 

0 

SL* 

SL* 

G4F 


FSSEI'etF  REVISION  116  CF  Af.C  PRCGRA'1  LUMINARY  BY  NASA  2C21112-071 


L ropiTAL  INTFORATITN 


00  91 

1 1 ,2660 

2C21 1 

1 

80,1 

0092 

11 ,2661 

20201 

0 

0,1 

0093 

11 ,2662 

65215 

1 

CAC 

POOL 

009A 

PFF 

2 

LAST 

1 26 

11,2663 

0 1993 

C 

XKEP 

C095 

11 ,2666 

53615 

1 

EMP 

SL* 

0C96 

n ,2669 

oooOl 

c 

OC 

0C97 

11, 26EE 

2C202 

c 

1 ,1 

ocse 

11 ,2667 

63  206 

0 

eovB 

DAD 

0099 

REF 

3 

LAST 

MAE 

11,267C 

5 7 793 

1 

TC0AA71G 

0061^ 

11,2671 

77626 

0 

STAOR 

006  I 

PEF 

3 

LAST 

11E7 

11 ,2672 

75667 

0 

STCPE 

XKEPNEh 

0062 

11 , 2673 

7602C 

c 

STO 

AXC  ,1 

0C63 

REF 

3 

1 AST 

1171 

11 ,2676 

021  12 

1 

KEPRTN 

006A 

11 , 2675 

00  J12 

1 

EEC 

10 

0069 

11,2676 

76016 

1 

BON 

AXC  , 1 

0C66 

REF 

23 

LAST 

1217 

11,2677 

003  13 

1 

MOONFLAG 

0067 

RTF 

I 

1 1 , 250(3 

26023 

r 

KEPLEPN 

0C68 

11,2501 

CC002 

0 

EEC 

2 

0CE9 

11  ,2502 

77650 

1 

CCTC 

0070 

REF 

2 

LAST 

1219 

11 ,2503 

26023 

0 

KFFLEEN 

1S:09  AUG.  11,1969  SKIPFEF  .097  PAC-F 
LSEP*  S PAGE  NC.  2 EO  S3 

S(-FS(l-2FS)-l/6...  M+17  CR  ♦16) 

PL 


1219 


ED 


S( ♦ 17  CR  ♦IE) 


GAP: 


/SSE^PL^  BEVISIP^  116  pp  AGP  PPCGBA'1  LtMINABY  BY  NA  £A  2021112-071 


L 

OPPI TAt 

TMFGRAT  ICF 

0071 

1 1, 2f09 

66350 

1 FBR3 

LXA  ,1 

SSF 

0072 

PFF 

18 

LAST 

1203 

1 1 , 2505 

01500 

0 

OIFEQCNT 

0073 

PFF 

21 

LAST 

121  e 

11 ,2506 

00051 

0 

SI 

0079 

11,2507 

77762 

1 

EEC 

-13 

0C79 

11  ,2510 

59395 

1 

CLOAC 

SP 

0076 

ITEF 

9 

LA'T 

121C 

11,2511 

02076 

1 

TT/2 

0077 

11,2512 

20612 

0 

9D 

CC78 

11  ,251 3 

61500 

0 

T TX  , 1 

RCUNO 

0079 

11,2519 

22  5 1 5 

C 

+ 1 

0080 

11,2515 

93206 

1 

PUSH 

DAO 

0081 

PFF 

e 

IASI 

121E 

11,2516 

C1551 

1 

TC 

008? 

REF 

12 

L AST 

1218 

11,2517 

16079 

c 

STCOL 

tal. 

0C83 

11,2520 

77615 

0 

CAC 

0C89 

REF 

23 

LAST 

121  £ 

1 1 , 2521 

01517 

C 

TFT 

0089 

REF 

29 

LAST 

1220 

11,2522 

3551  7 

1 

STCALL 

7E7 

CC86 

OfC 

2 

LAST 

1208 

1 1 , 2523 

229.09 

1 

K EPPRFP 

1SS09  AUG.  11,1969  SKIPFEfi  .097  FACE  1220 
LSER' $ PAGF  NO.  ^ EO  S3 


.CS7  PAGE  1221 
FO  S3 


PCf87 

AGC 

RCniAF  TF  CCFFUTF  ACCELFFATICK 

CCRFCAFNTS. 

OOBR 

1 1 , 2526 

72150 

1 ACCCPF 

L >A  , 1 

L XA  ,2 

ores 

PCF 

12 

LAST 

1218 

1 1 ,2525 

02030 

0 

PBOOY 

Crcr 

RFF 

1 3 

1 AST 

1221 

1 1 ,3526 

02C30 

r 

PEcrv 

onoi 

11,2527 

77779 

1 

Vl.OAD 

CC97 

PEF 

10 

1 AST 

120(, 

11  , 25  30 

2600  7 

0 

1 EPOVEC 

0093 
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1 
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1 
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R 
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1 
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c 
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2C 
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1221 
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1 
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R>^F 
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1 
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PFF 

3A 

1 AST 

1221 
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1 
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0 
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57175 
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1 
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0149 
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3 
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1 
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1 
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1 
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1 

GANCCRP 

0168 

11,2644 

62174 

1 

AXT  ,2 

I NC  R , 1 

0165 

1 1 ,2645 
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1 
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1 
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1 1 , 2665 
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1 

32P 

SAVINC  ACRM  scale  FACTCR  IN  XI 

01  R6 

1 1 , 2666 

63362 

1 

SR  1 

PDVL 

J 1 R 7 
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R 
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1222 
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1 
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1 
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9 
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1223 
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16  J6  ) 

1 

STnCL 

PETAV 
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r 

36P 

0191 
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3 
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11,2673 

C2372 

0 

STORE 

BETAR 

0192 

11 ,2676 

55301 

0 
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Bcrv 

FORM  normalized  OLOTIENT  ALPHAM/BETAP 

019  3 

11,2675 

CCC62 

1 

33P 

GISA 

11,2676 

61562 

r 

SP,  IR 

PLSH 

C(FPl*2l  = almost  NCPMALIZFP  RPC. 

01  9S 

11 ,2677 
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1 

CLEACR 
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PPF 

1 
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r 
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C 197 

REF 

22 
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0 
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0I9P 
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57126 

1 
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0199 
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23 

LAST 
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CC050 

1 

SI 
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11 ,2706 

00  )6  J 

n 

3 2P 

020  1 

11,2705 

71266 

1 

*SL  ,2 

DLPAP 

0?  1? 

11,2706 
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1 

3 3D 

0203 

1 1 ,27J7 

00003 

1 

2P 

020A 

11 ,2710 

65057 

0 

SR* 

XCHX  ,2 

02'^ 

11 ,2711 

5 7177 

1 

0 -1,2 

02r6 

REF 

E6 
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1273 

11,2712 

000  50 

1 

SI 

0207 

11,2713 

76606 

0 

PLSH 

SRI  P 

RHC/6  Tf  4C 

02'‘R 

11 ,2716 

50  315 

0 

PCVL 

DOT 

0209 

REF 

25 

LAST 

1222 

11,2715 

02032 

1 

ALFHAV 

0210 

REF 

10 

LAST 
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1 1 , 27  16 

02060 

1 

6ETAV 

0211 

1 1 ,2717 

66  372 

1 

SLIR 

BCSU 

(PPO/6)  - 2(ALPHAV/2.BETA\(/2) 

0212 

11,2720 

5 7206 

1 

FLSH 

PRPR 

TC  FCL+6 

021R 

11,2721 
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1 

6 

0216 

11 ,272? 

77752 

1 

SI  1 

0219 

11,2723 

63206 

1 

PLSH 

PAD 

0216 

PEF 

1 

1 1 ,2726 

25766 

1 

OQUARTER 

0217. 

11,2725 

75606 

1 > 

PLSH 

SORT 

071  R 

11,2726 

61675 

1 

DMPR 

PLSH 

0219 

1 1 ,2727 

00013 

0 

lOD 

0270 

1 1 , 2730 

63752 

1 

SI  1 

DAP 

0221 

REF 

7 
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1223 

1 1 ,2731 

25766 

1 

OCUARTER 

0272 

11,2732 

6332  5 

1 

POOL 

DAP 

1 1/6  H2  ( (0+  n /6l  TO  PP«  160 

0223 

11,2733 

0CL13 

u 

lOD 

0226 

rff 

3 

1 AST 

93  1 

11 ,2736 
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1 

HAL  FOP 

027S 

1 1 ,2735 

72675 

1 
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Sll 

0226 

1 1 , 2736 

0001  1 

1 

8D 

0227 

11,2737 

56215 

1 

CAP 

DPV 

027B 

REF 

1 

11,2760 

25760 

1 

THPEE/8 

0229 

1 1 ,2761 

00  )17 

1 
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11,2762 
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1 
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VXSC 

0231 

11.2767 
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0 

6 
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REP 

11 

LAST 
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1 1 ,2766 
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1 
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- 
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1 
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26 
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0235 
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0 
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OMP 
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11 ,2751 
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0 

0 
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0 
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0239 

1 1 ,2753 
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1 

NORM 

ROUND 
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r 
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0291 

11,2755 
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c 
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DPP* 

0292 

1 1 ,2756 
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1 

2 

0293 

RFF 

6 

LA  ST 

12  1 E 
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51770 

c 

nLEAFTH.2 

0299 

11,2760 

79276 

1 

DCOMP 

VXSC 

0295 

11,2761 

57129 

1 

XCF3  , 2 

XAC,2 

1296 

Pf  F 

25 

1 AST 
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11,2762 

0CC50 

! 

SI 

0297 

PEF 

35 

LAST 

1221 

t 1 ,2763 
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0 

S2 

0298 

11,2769 

55069 

f 

XSL,2 

XSL,2 

0299 

11,2765 

00036 

1 

300 

C2Ff 

1 1 ,2766 

00337 

0 
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029?  . 

11,2767 

5 3 6C9 

0 

BCSB 

VSR* 

0253 

p'f'f 

9 

LAST 

1219 

11,277? 

57  753 

1 
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0259 

11,2771 

57177 

1 

0 -1,2 
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11,2772 
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1 
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VAD 
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26 

LAST 
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11,2773 
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1 

SI 

0257 

REF 

■3 
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11,2779 

02062 

1 

FV 
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PFF 

9 

LAST 
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1 

STCRE 

FV 
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1 
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0260 
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0 

*1 

0261 
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51575 

1 
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0262 

PPP 

8 
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11 ,3001 

01521 

0 
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1263 

1 1 , 300? 
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0 

P7E 
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REF 

1 
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1 

INT-A8RT 
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1 1 , 3flff9 
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1 
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SP 
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PEF 

2 
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1 

H 
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11 ,3006 
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0 

90 
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c 

FLSH 
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REF 

9 
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1 
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REF 
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1 6079 

0 

STCCL 
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PEF 
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0 
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0 
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PEF 
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LAST 
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0 

STCALL 
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02  79 

PEF 
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11, 3015 
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1 

KEPPREP 

0275 
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1 

CALL 
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RFF 

6 

LAST 
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11,3017 
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0 

rectify 

0277 

11,3020’ 
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1 

SETGC 
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REF 

9 

LAST 
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1 1 ,3C2I 

0902O 

1 
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REF 

9 

LAST 
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11,3022 
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0 
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REF 
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REF 
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0 
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1 
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1 
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0 
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REF 

26 
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c 
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1 
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REF 

27 
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1 

ALPHAV 

0301 

FEF 

28 

LAST  1229 

11 ,3092 

115  17 
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0 
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REF 
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1 
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REF 

3 
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0 
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0 
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1 
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1 
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REF 
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1 
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REF 
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1 
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0695 

11,3647 

776  50 

1 

GCTC 

0696 

P'=F 

2 

LAST 

1234 

1 1 ,3650 

23571 

0 

NEXTCCL 

0697 

0698 
C699 

0700 

0701 

REF 

REF 

REF 

9 

57 

1 

L6ST_ 

LAST 

121“= 

121.4 

11.3651 

11.3652 

11.3653 

11.3654 
1 1 , 3655. 

77745 

C1115 

34041 

27142 

43345 

1 

0 

0 

1 

RFLCACSV 
n IFEQCOM 

CLCAC 

STCALL 

DLOAC 

TDEC 
TCEC  1 
T NTEGRV2 
• DAD 

0702 

REF 

I 1 

LAST 

1221 

11 ,3656 

02  T76 

1 

DT/2 

0 703 

PEF 

6 

LAST 

1232 

11  , 365  7 

C2  !'■  o 

1 

H 

0 704 

11  ,3660 

66  111 

1 

INCR, 1 

SXA,  1 

0705 

11  , 366  1 

77763 

c 

EEC 

-12 

J706 

REF 

25 

LAST 

1229 

11, 3662 

11500 

0 

DIFECCNT 

07C7 

R9F 

7 

LAST 

1234 

11 ,3663 

0210  1 

1 

STORE 

H 

0 708 

11, 3664 

7456  1 

c 

VXSC 

VSRl 

0709 

REF 

12 

LAST 

1232 

11, 3665 

02062 

1 

F V 

0710 

11 ,3666 

74255 

0 

VAC 

VXSC 

071  1 

REF 

8 

LAST 

1223 

11,3667 

C 1 134 

0 

Z V 

0712 

RFF 

3 

LAS-'- 

1234 

1 1 ,3670 

02  lOO 

1 

H 

0713 

11 ,3671 

7 76  55 

1 

VAF 

0714 

RFF 

1 1 

L AST 

1233 

11, 3672 

0 1126 

0 

YV 

0715 

REF 

33 

LAST 

\2Z'= 

11 ,3673 

■T2032 

1 

STORE 

ALPHAV 

0716 

11 , 3-574 

52C14 

FCN 

GCTC 

0717 

REF- 

5 

LAST 

1234 

11,3675 

00301 

0 

JSWI TCH 

0718 

REF 

2 

LAST 

1229 

11 ,3676 

2 3714 

1 

OCW.  . 

0719 

REF 

1 

■1 1 ,3677 

22  504 

0 

F8R3 

G72G 

0721 

0722 

0723 

RFF 

REF 

23 

3 

LAST 

LAST 

1233 

1217 

1 1 ,37  10 
1 1 ,3  7 3 1 

11 . 3702 

11 .3703 

4?  )14 
01676 
0 167  1 
77614 

0 

1 

0 

1 

WR/TENC  CLEAR 
CLEAR 

CLEAR 
D IMOFLAG 
QRBNFLAG 

0724 

REF 

13 

LA  ST 

1217 

11,?7'14 

02676 

1 

RENCNFLG 

0725 

11 , 3 705 

77414 

0 

SET 

EXIT 

0726 

REF 

c 

LAST 

1209 

1 1 ,3  7U6 

01472 

1 

STATFFLG 

0727 

RFF 

42 

LAST 

1216 

11,3707 

0 5567 

0 

TC 

ALARM 

072  R 

11,3710 

00421 

0 

CCT 

421 

0729 

RFF 

233 

LAST 

1233 

11,1711 

0 60  4 2 

1 

1C 

1 NTPPET 

19:09  AUG.  11,1969  SKIPPER 
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USER'S  PAGE  NO.  17 


EO  S3 


RELCAC  TEMPCPAPY  STATE  VECTOR 
FRCP  PEPNANENT  in  CASE  OF 

EY  STARTING  AT  INTEGRV2. 
TNCREPEM  H ANC  DIFEGCNT. 


DIFECCAT  set  FCR  next  ENTRY. 


CCNT  INTEGRATE  W THIS  TIME 
INVALICATE  N 


PICK  UP  STATE  VECTOR  UPDATE 


GAP 
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097 


PAGE  1235 


CREITAL 

INTEGR  AT  ICN 

LSEF'S  FAG-E  NO.  18 

EC  S3 

073f 

11,3712 

77650  1 

GOTH 

0731 

RCF  6 

LAST  1233 

11 ,3713 

2726J  0 

TESTLCOP 

FIMSF  INTEGRATING  STATE 

VECTOR 

I 
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IS 


EC  S3 


P0732 

OReiTAL 

R^UTI^'F  FPP 

FXTRA°OLAT ICN  CF 

THE 

PATPIX.  IT  CCPFLTFS  THE  5 

R073A 

VECTOR 

OF  THE 

vATP  IX 

ANT  CAI  IS 

THE  NYSTRGP 

IN'TFC-RAT  ION 

ROUTINFS  TO  Si 

R0  7 36 

USES 

A 

TABLE 

OF  VEHICLE  PCSITICN  VECTORS 

CLypLIhL  LUHIM-  THE  IMFGR^ 

073R 

11, 3716 

7C756 

0 

cnv. 

..  LXA,2 

OLCAO=» 

073S 

REF 

18 

LAST 

123  1 

11 ,3715 

02  330 

0 

PBOnv 

0740 

REF 

7 

LAST 

1226 

11,3716 

51770 

c 

PUFAFTH ,2 

0741 

RTF 

4 

LAST 

1223 

11, 3717 

36  372 

1 

STCALL 

BETAM 

0 74  2 

PEF 

1 

1 1 , 372'J 

23762 

1 

CCW.  .1 

0743 

REF 

13 

LAST 

1234 

11,3721 

02062 

1 

STORE 

F V 

0 744 

1 1 ,3722 

62016 

0 

80  F 

INCR, 1 

C74S 

RFF 

c 

LAST 

122E 

11,3723 

0C362 

1 

PICFIAG 

0746 

PEF 

3 

LAST 

1227 

11, 3726 

23266 

0 

NBPANCH 

0747 

11,3725 

7 A771 

0 

CFO 

-6 

0748 

1 1,  3726 

7C766 

1 

LXC  ,2 

DLCAD* 

0749 

PEF 

19 

LAST 

1236 

11, 3727 

02030 

0 

PBCOY 

0789 

REF 

8 

LAST 

1236 

11,3730 

51772 

1 

PUFAFTH  -2, 2 

0751 

PEF 

c 

LAST 

1236 

11,3731 

36072 

1 

STCALL 

BETAP 

0752 

REF 

2 

LAST 

1236 

11 ,3732 

23762 

1 

00W..1 

0757 

11,3733 

50616 

c 

EON 

VSR6 

0754 

REF 

31 

1 AST 

1230 

1 1 , 3736 

00  3'  3 

1 

MCCNFt  AG 

0755 

11 ,3735 

23736 

1 

+ I 

0756 

11,3736 

77655 

1 

VAC 

07F7 

RTF 

14 

LAST 

1236 

11 , 3737 

02062 

1 

F V 

0758 

REF 

15 

LAST 

1236 

11 ,3740 

36062 

0 

STCALL 

FV 

0759 

PEF 

4 

LAST 

1236 

1 1,3741 

23  266 

c 

P8PAACH 

0 760 

11,374? 

60575 

0 

cow 

..1  VLOAC 

VSP4 

0 761 

REF 

? 4 

LAST 

1234 

11 ,3743 

02  332 

1 

A LFHA V 

0762 

11, 3744 

53  5 1 3 

c 

PDVL>! 

LM  T 

0763 

PFF 

10 

1 AST 

1222 

1 1 , 3745 

M213? 

0 

VeCTAB, 1 

0764 

11,3746 

663  15 

1 

PDVL 

V FPC  J 

0765 

RFF 

35 

LAST 

1236 

11, 3747 

0203? 

1 

ALPHAV 

0766 

11,3750 

52361 

1 

VXSC 

VSU 

0767 

RFF 

c 

LAST 

1229 

11,3751 

13  76  2 

c 

3 /4 

0 76  8 

11  ,3752 

60325 

0 

PCCL 

MOPM 

0769 

11,3753 

0C065 

0 

36D 

0 770 

REF 

37 

1 AST 

1233 

11 , 3754 

00052 

n 

S2 

0771 

11,3755 

63406 

0 

PUS  F 

OSQ 

0772 

11,3756 

77  605 

1 

CPF 

0773 

11,3757 

6530  1 

0 

MOP.  P 

POOL 

0774 

11 ,3760 

CC043 

(' 

340 

0775 

Rt^F 

6 

LAST 

1236 

11,3761 

C2C72 

0 

BETAP 

0776 

11 ,3762 

56342 

1 

SR  1 

PCV 

0777 

11,3763 

7776  1 

1 

VXSC 

0 77  8 

11,3764 

57154 

0 

LXA  ,2 

XAD  ,2 

C779 

pnp 

38 

1 AST 

1236 

11 ,3765 

00051 

0 

S2 

0780 

PFF 

39 

LAST 

123  6 

11,3766 

0CC51 

0 

S2 

0781 

11,3767 

57  74 

0 

XA0,2 

XAD, 2 

0782 

REF 

4 1 

lAST 

123  6 

11,3770 

0905  1 

0 

S2 

0783 

11,3771 

CCC62 

1 

340 

0784 

11,3772 

43457 

0 

VSL'I 

RVO 

gap: 
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L 

ORBI  TAI 

INTEGRATION 

0785 

11,3773 

57606 

C 

0 -8C,2 

0787 

REF 

1 

12 ,2:7  >0 

SFTLCC 

orbital  1 

0788 

12,3755 

EANK 

0789 

12, 3755 

0463  1 

1 

3/5 

2DEC 

.6  e-2 

C7R9 

12,3756 

23146 

n 

0790 

12,3757 

14000 

1 

THRE8/8 

2DEC 

.375 

0790 

12,3760 

OOT  K) 

1 

0791 

12,3761 

02314 

0 

.30 

2CEC 

.3  E-2 

0791 

12,3762 

31463 

1 

0792 

12 ,3763 

0 1 400 

1 

3/64 

2DEC 

3 B-6 

0792 

12  I 3 76  4 

000  10 

1 

0793 

12,3765 

lOOOO 

c 

CP  1/4 

2DEC 

.25 

0793 

12 ,3766 

0000  0 

1 

079A 

REF 

2 

LAST 

119  1 

12,3765 

CCLARTEP 

EGLALS 

OFi  /4 

0795 

PEF 

3 

1 AST 

1237 

12,3765 

POS  1 /4 

EQUALS 

DPl/4 

C7C6 

12 ,376  7 

03000 

1 

3/32 

2CEC 

3 P-5 

0796 

12, 3770 

CC003 

1 

0797 

12,3771 

36100 

1 

15/16 

20EC 

15.  B -4 

0797 

12 ,3772 

0000  0 

1 

07982 

05, 3761 

BANK 

05 

G79P3 

REF 

1 

•75 ,2  700 

SETLCC 

0RBITAL3 

G79RA 

05,3761 

rank 

07986 

j5, 3761 

30000 

1 

3/4 

20EC 

3.G  R -2 

07986 

05,3762 

00000 

1 

0799 

C5, 3763 

22525 

c 

7/12 

20EC 

. 5833333333 

0799 

05,3764 

12525 

0 

0800 

05,3765 

2 2000 

1 

9/16 

20EC 

9 R -4 

0 800 

05, 3766 

00000 

1 

0801 

05,3767 

01210 

1 

5/128 

2DEC 

5 B-7 

0801 

05,3770 

00000 

1 

0802 

REF 

13 

LAST 

1231 

12,2006 

DP7ERG 

EQUALS 

7ER0VEC 

0803 

05,3771 

25252 

0 

0F2/3 

2CEC 

. 6666666667 

0803 

05, 3772 

2 5 2 5 3 

1 

0804 

PEE 

3 

LAST 

1232  ■ 

05,3771 

2/3 

EQUALS 

0P2/3 

0805 

05,3773 

00027 

1 

0CT27 

rCT 

27 

0806 

13, 3720 

BANK 

13 

C 60  7 

REF 

3 

LAST 

1231 

13,2000 

SETLCC 

nRbITAL2 

0808 

13,3720 

BANK 

R0809 
0 8 10 

IT  IS 

VITAL  THAT  THE 

FCLLCW ING 

CONSTANT 

S NOT  BE 

SHCEFLEO 

13,3720 

I 1 

1 

CtL 

-11 

oan 

13,  '’721 

77775 

1 

CEC 

-2 

7812 

13,3722 

nibb 

0 

CEC 

— c 

0813 

13,3723 

77771 

0 

CEC 

-6 

7814 

13,3724 

1 

CEC 

-2 

0815 

13 ,3725 

77775 

1 

CEC 

-2 

0816 

13,3726 

00-100 

1 

CEC  - 

0 

0817 

13,3727 

77  763 

0 

CEC 

-12 

0818 

13,3730 

77766 

0 

CEC 

-9 

USER'S  PAGE  NO.  2C  EC  S3 
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1 orbital  INTEGRATICN  USER’S  PAGE  NO.  21  EC  S3 


0819 

13,3731 

77773 

1 

DEC 

-9 

CE2C 

13 ,3732 

77771) 

1 

ASCAL  E 

EEC 

-7 

0821 

I 3 , T 7 3 3 

77771 

0 

TEC 

— 6 

C822 

13,3739 

29000 

1 

5/8 

2PEC 

5 B-3 

0822 

13,3735 

OOOOO 

1 

0823 

13,3736 

79631 

0 

-1/12 

2DEr 

-.1 

CE23 

13,3737 

63195 

1 

0829 

13,3790 

00293 

1 

REGRATIC 

2CEC 

.01 

0829 

13,3791 

32703 

1 

0E25 

13,3792 

03  659 

0 

RSPHERE 

2DEC 

69373.76 

E 3 

B-29 

0829 

13,3793 

21000 

1 

0826 

13, 3799 

03659 

0 

R CM 

2DEC. 

16093.99 

F3 

B-27 

0826 

13 ,3  795 

21  )00 

1 

0827 

13,3796 

09627 

0 

rde 

20EC 

80967, 2C 

F3 

8-29 

C827 

13  ,3  797 

2 5 200 

1 

0828 

CO'JO 

RATT 

ECUALS 

OC 

0829 

QU76 

VATT 

ECLALS 

60 

C83G 

0 114 

TAT 

EQUALS 

12D 

0831 

rni6 

RATTl 

equals 

1 9C 

0832 

0)29 

VATT  1 

EQUALS 

200 

0833 

003  2 

NL  ( P 1 

ECUALS 

26C 

0839 

GC9C 

TCECl 

ECLALS 

320 

■oe?e 

0016 

UPPV 

EQUALS 

190 

0836 

RPP 

8 LAST  1227 

C022 

CCSPhI/2 

ECLALS 

URPV  +9 

0837 

0029 

LZ 

EQUALS 

2 0D 

0838 

003? 

TVEC 

ECUALS 

260 
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L inflight  alignment  POUTTNFS  LSEP'S  page  NC.  1 EO  S3 

CCOI  22,3773  HANK  22 

0002  REF  2 LAST  325  23,20CC  SETLCC  INFLIGHT 

0003  23,3251  BANK 

CrCA  RTF  2'5  LAST  966  F5,1542  E8ANK=  XSM 

P00O5  CALCCTA  COMPUTES  THE  GYRO  TORCUE  ANGLES  REGUTREC  TC  BRING  THE  STABLE  NENBEP  INTO  THE  CESIREC  CRIENTATICN. 


Rn0)7 

THE 

INPUT  IS 

THF  DESIRED  STA 

R0',)09 

HALF 

-LNIT  VECTORS  ARE  STCREO 

ROOl' 

THE 

OUTPUTS  ARE  THE 

THREE  GY 

R0C12 

MGC  , 

AND 

CGC 

RESPECTIVELY. 

00  13 

RRF 

1 

0014 

23,3251 

0015 

Rt^F 

41 

LAST 

1236 

23,3252 

0016 

PEF 

6 

LA9T 

966 

23, 3253 

0017 

23,3254 

0018 

REF 

16 

LAST 

113E 

23,3255 

0019 

PEF 

7 

L AST 

1239 

23, 3256 

CC20 

23,3257 

0021 

23, 326C 

002  2 

PPF 

1 

23, 3261 

0023 

PEF 

2 

LAST 

1239 

23 ,3262 

00  24 

23,3263 

0025 

REF 

12 

LAST 

11  29 

23  ,3264 

0026 

REF 

LA  ST 

1239 

23,3265 

0027 

23,3266 

0C28 

PEF 

11 

LAST 

1129 

23  ,3267 

0029 

REF 

4 

LAST 

323 

23,3270 

0030 

REF 

2 

LAST 

124 

23,3271 

0031 

REF 

E 

LAST 

1239 

23,3272 

003  2 ■ 

23,  ?>273 

0033 

REF 

13 

L AST 

1239 

23  ,3274 

0034 

REF. 

4 

LAST 

1239 

23,3275 

0035 

23,3276 

CC36 

PEE 

9 

1 AST 

1239 

23  ,3277 

0037 

PFF 

5 

LAST 

1239 

23, 330C 

0038 

23, 33  1 1 

0039 

REF 

10 

LAST 

1239 

23,3302 

V.)40 

23, 3313 

0041 

PEF 

12 

LAST 

1239 

23 ,3304 

0042 

REF 

C 

LAST 

1239 

23 ,33^'5 

; MEMBER  COCROTNATES  REFERREC  TO  PRESENT 
xCf,  YCC,  ANC  ZEC. 

T3RGIJTNG  ANGLES  TO  BE  APPLIED  TO  THE  Y, 


CriNT# 

T $/INFLT 

71220 

1 

CALCGTA  ITA 

DLCAD 

0CC51 

0 

S 2 

0266  5 

C: 

XDC 

65325 

0 

POOL 

POOL 

06  524 

1 

HI6  zeros 

0267  1 

0 

XDC  +4 

554  Z6 

1 

CCOMP 

VDEF 

776  56 

1 

LNTT 

14027 

1 

STOOL 

Z PRIME 

00927 

1 

Z PRIME 

7 7 7 4 2 

n 

SRI 

14023 

0 

STODL 

S INTH 

000  3 3 

1 

Z P R I M E +4 

7 7 74  2 

c 

SR  1 

34021 

D 

STCALL 

CGSTh 

47322 

1 

APCTPIG 

16742 

1 

STOOL 

IGC 

02667 

1 

XCC  +2 

7 7 7 4 2 

0 

SRI 

14023 

0 

STOOL 

S INTH 

OCU27 

1 

ZPPIME 

65205 

(i 

OMR 

POOL 

02671 

0 

XDC  +4 

0CC33 

1 

ZPPIME  +4 

452J5 

1 

DMP 

DSU 

02665 

9 

XCC 

77626 

G 

STACR 

43756 

1 

STCALL 

CGSTH 

47  322 

1 

APCTPIG 

STABLE  MEMBER  CCCRCINATES.  yhe  THREE 
Z,  AND  X CYRCS  ANC  ARE  STOPEC  CP  AT  IGC, 

PLShCChN  00-C3 ,16C-27C  ,34C-37C 
XCC  = (XCl  X02  X03) 

YCC  = (YCl  YC2  YC3) 

ZOC  = (ZCl  ZD2  Z03) 

ZP  = LMT(-XD3  0 XOl)  = (ZPl  ZF2  ZF3) 

SIM  IGC)  = ZF! 

COS(IGC)  = ZP3 

V GYRC  TCRCUING  ANGLE  FPACTICN  CF  REV. 
SIN(MGC)  = XC2 

PDOO  = ( ZP  1 )(  >D3) 

MPAC  = ( Z03  )(  XOl) 

COS(MGC)  = MRAC  - PDOC 
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L TNFLIGFT  At  IGNMENT  RflUTIVES 


0C43 

OOAA 

FEF 

REF 

2 

f 

LAST 
1 AST 

125 

1239 

23 ,339  6 
23, ’307 

26744 

rCC27 

1 

1 

STOVL 

MGC 

ZFRIRF 

0045 

23,  3’n 

7754  1 

1 

DOT 

CC46 

REF 

4 

1 AST 

924 

23,3311 

M2  7 11 

0 

zee 

'1047 

R = F 

13 

LAST 

1239 

23,3312 

24021 

1 ■ 

STCVL 

CCSTH 

0048 

PE  = 

7 

LAST 

1240 

23,3313 

00027 

1 

Z PPI PE 

0049 

23,3314 

77641 

1 

CCT 

0050 

REF 

4 

LAST 

92^ 

23,3315 

C2673 

1 

YDC 

0051 

REF 

14 

LAST 

1239 

23 ,3316 

34  J23 

1 

STCALL 

S IRITH 

0052 

PEF 

6 

LAST 

1239 

23,33  17 

47  32  2 

1 

ARCTRIG 

0053 

RFF 

14 

LAST 

963 

23,3320 

36  740 

1 

STCALL 

CGC 

0054 

REF 

42 

LAST 

1239 

23, 3321 

00051 

0 

S2 
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LSEP'S  PAGE  RC.  2 ES  S2 

Z GYRC  TCRGUIRG  ARIGLE  FRACTICR  CF 

CCS (CGC  ) = ZP  . zee 

SIMOC-C)  = ZP  . YCC 
X GYFC  7CRCUTRG  ARGUE  FRACTICR  CF 


REY  . 


REV  . 
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L inflight  align'memt  routines 

PCC55  APr.TPTG  CGPPUTES  AN  ANGLE  GIVEN  TFF  SINE  ANT  COSINE  OF  THIS  ANGLE 

R0:i66  the  INFLTS  APF  S’N/A  AND  GOS/A  STOPED  OP  AT  SINTH  AND  CCSTH. 

P0JS7  THE  OLTPUT  IS  THE  CALCULATFC  ANGLT  PETWEEN  +.5  AN’C  -.E  REVOLUTION 
R0C5P  AVAILABL'=  AT  MPAC. 
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ANO  STCPFF)  AT  thETA.  THE  CLTFUT  IS  ALSC, 

FUSHOCWN  16C-21C 

AES(SINAA)  - SIN(A5)/A 
IF  (-A5, P5)  OR  ( 1 35  ,-  1 3 5 ) 

(95,135)  CR  (-135,-45) 

X = ARCCCS(COS)  KITH  SIGN(SIN) 

(-45,45)  CR  (135,-135) 

X = ARCSIN(SIN)  KITH  SIGN(SIN) 

IF  (135,-135) 

X = ARCS  INI  SIN  ) (-45  ,45 ) 

( 1 3 5,-  1 3 5 ) 

X = .5  KITH  SIGN(SIN)  - ARCSIN(SIN) 

(+)  - (+)  OR  (-)  - (-) 
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SRNB,  NRSM,  AAG  AXISPCT,  VvFIGE  USFC  TC  AFFEAP  FERE,  FAV^  BEEN 
COMBINED  IN  A ROUTINE  CAILFO  AX*SR#T,  RHICH  APPEARS  ARCNG  THE  PCREREC 
FLIGHT  SUBROUTINES. 
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RG090 

CALCGA 

CCPPUTFS  TPF 

ecu  OPIVIAG  ANGLES 

RFCUIREC 

TO  BRING  THE  STABL 

9 MEMBER  INITC  THE  DESIRED  CPIEN1ATICN. 

R0092 

THR 

INPUTS  ARF  1 1 

THE  NAVIGATIGN  BASE 

CCCPOINATES  referred  TO  ANY 

CCCPCINATE  SYSTEV.  THE  THREE  HALF-LMT 

R909A 

VRCTORS 

APF  STOPFE 

AT  Xt'H.YNB 

, ANC  ZNP 

. 2)  THE 

DESIRED 

STABLE  NERBFR  CCCRCINATES  RFFERREC  TO  THE  SANE 

pors6 

CrrRolNftin  SYSTEM  APF  STCPEP 

AT  XSAi, 

YSR,  ANC  ZSM. 

R J097 

THE 

OUTPUTS  ARF  THE 

THREE  COL 

DRIVING 

ANGLES  and 

ARE  STCREC  SP  AT 

THETAC,  THETAC  +1,  ANC  THETAC  +2. 

0099 

23 ,3355 

776.11 

0 

C ALCGA 

SETPC 

PLSHDCWN  CO-05,  L6D-21C,  34C-37C 

OICO 

23,3356 

OGOO  1 

0 

0 

01  .1 

23,3357 

4737  5 

0 

VLTAC 

VXV 

0102 

RFF 

8 

UAST 

960 

23,3360 

02665 

0 

XNB 

XNB  = OGA  (CUTER  GIRBAL  AXIS) 

0 1’  3 

REF 

2 

UAST 

12^ 

23,3361 

02651 

1 

Y S R 

YSN  = IGA  (INNER  GIMBAL  AXIS! 

OlOA 

23, 3362 

41456 

c 

UNIT 

PUSH 

PDC  = LMTICGA  X IGA)  = PGA 

010  5 

23,3363 

44041 

1 

CFT 

ITA 

OlOft 

RFF 

6 

LAST 

973 

23, 3364 

0270  1 

0 

ZNB 

0107 

REF 

43 

LAST 

1240 

23 ,3365 

00051 

0 

S2 

0108 

REF 

16 

LAST 

1241 

23,3366 

7402  1 

1 

STCVL 

CCSTH 

CCS(CG  ) = PGA  .•  ZNP 

0119 

2 3 , 33  6'7 

0000  1 

0 

0 

cun 

23,3370 

77641 

1 

COT 

0111 

REF 

6 

LAST 

973 

23.3371 

02673 

1 

YNB 

0112 

REF 

19 

LAST 

1241 

23, 3377 

34.^73 

1 

STCALL 

SI  NTH 

STN(OG)  = PGA  . YNB 

0113 

REF 

7 

LAST 

124C 

23,3373 

4 7322 

1 

ARGTRIG 

OllA 

RFF 

15 

1 AST 

124f 

23,^374 

26740 

0 

STCVL 

CGC 

0115 

23 ,3375 

(1  M .1 1 

u 

0 

0116 

23,337£ 

-5C235 

Q 

VXV 

OCT 

FPCVISICN  FCP  PC-  ANGLE  OF  9C  CFGREE 

0117 

PEF 

o 

LAST 

124R 

23,3377 

02665 

0 

XNB 

Cll  8 

RFF 

3 

LAST 

1243 

23,3400 

U2  651 

1 

YSM 

111° 

23, 34  11 

77  752 

1 

SLL 

012U 

REF 

17 

LAST 

1243 

23,34  12 

24021 

1 

STCVL 

CCSTH 

COS(PG)  = IGA  . (PGA  X CGA) 

0121 

REF 

4 

LAST 

1243 

23 ,3403 

02651 

1 

YSP 

0122 

23 , 34T4 

7764  1 

1 

CCT 

0123 

RFF 

10 

LAST 

1243 

23,3405 

02665 

0 

XNB 

012A 

REF 

20 

LAST 

1243 

23  ,3406 

3 4023 

1 
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S INTH 

S IN(MG  ) = IGA  . PGA 
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RFF 

8 

LAST 

1243 

, 23,3407 

A7  32  2 

1 

ARCTRIG 

0126 
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3 
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23  ,341(1 
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0127 

23,3411 
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0128 
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23,3417 
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1 

. 166... 

0129 

23,3413 

77644 

1 

BFL 
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1 

23, 3414 
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0 
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0 132 
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0 

0 
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1 
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0 139 

RCF 
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23,3425 

26742 
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STCVL 
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RFF 

16 
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23,3426 
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0 
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23,3427 

77634 
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23  ,34  30 

2162  1 

1 

V1STC2S 
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77776 

1 

GIMLFCKl  EXIT 

0146 
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CCT 

00401 
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23,3436 
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R U 53 

A YI SGEN 

COMPUTES  TEE  COORCTNATES  CF 

CNE 

CCORCINATE  SYSTEM  REFERRED  TO  ANCThEP  CCCRDINATE  SYSTEM. 

R0155 

THE 

INPUTS  ARE  11 

THE  STARl 

VECTCR 

REFERPEC  TC 

CCCRDINATE  SYSTEM  A STCRED  AT  STARAC.  2)  TpE  STAR2  VECTOR 

R3157 

PFFEPRE 

C TC  COOPCINATE  SYSTEM 

A STOREC 

AT  STARAO 

+ 6.  3 

1 THE  STARl  VECTCR  REFERRED  TC  CCCRDINATE  SYSTEM  8 STCPEC 

R0159 

AT 

LCCATICN  6 CF  7HE  VAC  AREA 

. 9 ) TFF 

STAP2  VECTCR  REFERRED  TO  CCCRDINATE  SYSTEM  B STORED  AT  LCCATICN  12C  CF 

RH61 

the 

VAC 

AREA. 

R7162 

THE 

OUTPUT  CEFINES 

CCCRDINATE 

SYSTEM 

A 

REFERRED 

TO  COORDINATE  SYSTEM  B.  THE  THREE  HALF-LMT  VECTORS  APE  STCPEC 
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0 
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23,3472 
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c 

SI 
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00006 

1 

6 

Cl  9G 

23,3979 

66376 

1 
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SSP 
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23,3975 
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1 

6 
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RFF 
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LAST  1299 

23, 3976 
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0 

S2 

019? 

23,3977 
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2 

0199 
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AXTSGEN2 

Xf  HX  ,1 

VLCAD* 

0195 

23  ,3501 
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0 

0 ,1 
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C197 

23 ,3903 

62  757 

0 

vxsc» 

pnvi  * 

J=  (UA  ) (ue  1) 

J=(LA) (LE2) 

J=(LA  MLB3  1 

0198 

PCF 

2 8 

LAST 

12AS 

23,3509 

75F62 

1 

STAPAF 

+6  ,2 

0190 

23, 3505 

9C007 

0 

6,1 

020G 

23,3506 

77757 

1 

vxsc« 

9201 

OFF 

39 

LAST 

12A6 

23, 3507 

75C5A 

1 

STAR6C 

+ 12C  ,2 

020? 

23,3510 

39931 

0 

STOVL* 

2AD 

K= ( VA  ) ( VEl  ) 

J = ( L A ) ( V E 2 ) 

J=  tVA  ) (VE3  ) 

0203 

23,3511 

90015 

0 

1 2P,  1 

0 2OA 

23,3512 

5 7 7 5 7 

C 

vxsc* 

LAF 

02  05 

PEF 

AO 

LAST 

12A6 

23,3513 

75  'A6 

1 

STARAC 

+180,2 

L=  ( FA  M VvBl  ) 

J=(FA) (FE2) 

J= (FA  ) ( FF3  ) 

0206 

23, T'lA 

76A55 

1 

LAC 

VSLl 

02  17 

23, 3515 

0C021 

c 

2A0 

0208 

23,3516 

53520 

0 

XCFX,  1 

UNIT 

0 209 

23,7517 

0CC36 

1 

30D 

02 ! 

R'=F 

1 1 

LAST 

1239 

23, 3529 

06  707 

1 

STCRE 

XDC  +189,1 

XCC  = L+J+K 

YDC  = L+J+K 

zee  = L+J+K 

0211 

23,3521 

77790 

0 

TIX,1 

0212 

PFF 

1 

23, T522 

A7  5 23 

0 

A X ! SGEN3 

0213 

23,3523 

7770A 

1 

AX1SGEN2  T’X,2 

021A 

R 9F 

1 

23 , 352A 

A7  500 

1 

AXISGEN2 

02!  5 

23,3525 

7 7 77  5 

1 

VLOAD 

0216 

REP 

12 

LAST 

12A6 

23 ,3526 

92665 

0 

XDC 

0217 

R^F 

A1 

LAST 

1 2A6 

23,7527 

267C7 

c 

STCVl 

STARAC 

0218 

REF 

5 

LAST 

12A0 

23,  353il 

02673 

1 

YOC 

0219 

RTF 

A2 

LAST 

12A6 

23,7531 

2671  5 

0 

STCVL 

STARAC  +6 

02?O 

RPF 

C 

LAST 

12A0 

23, 3532 

027  J 1 

0 

zee 

0221 

REF 

A3 

LAST 

12A6 

23  ,3533 

02723 

0 

STORF 

STARAC  +12C 

0222 

23 , 2 53A 

776  16 

c 

RVC 
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0281 

23,3535 

05520 

0 GTSN45 

2GEC 

• 1768 

0281 

23  , 3 536 

26C75 

1 

0282 

0282 

23, 3537 
23,3590 

05252 

25253 

1 . 166  . . . 
1 

2DEC 

• 166666666  7 
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0001 

1002 

REF 

1 

lA, 377E 
23  ,2000 

BANK 

SETLCC 

14 

POWFL ITE 

SAME  FEANK  as  tfe  FINCfCUC  CUB-FRCGRAM 

0003 

23  ,354  1 

BANK 

OOOA 

REF 

1 

. 142 

EBANK= 

DEXDEX 

ores 

PCR 

1 

COUNT  X 

$ L/PGWFL 

R0006  CrUTPlG,  COUTRIGl,  CDLTRIG2,  AND  CO*TP*GS  ALL  CCNFLTE  THE  SINES  ANC 

R0007  COSINES  CF  THREE  2'S  COMPLEMENT  ANGLES  ANC  PLACE  THE  RESULT,  OOLRLE 
ROOOe  PRECISION,  IN  THE  SANE  CRCEP  AS  THE  INPUTS,  AT  SINCCU  ANC  COSCCU.  AN 

RTOno  ACOITICNAL  OUTPUT  IS  THE  l'$  COMPLEMENT  ANGLES  AT  CCLSFCT.  THESE 

RGOir  RCLTTNES  go  out  of  thEIP.  way  tc  leave  tfe  mpac  area  as  they  find  IT, 

ROOll  EXCEPT  FOR  THE  GENERALLY  LNIMFCRTANT  MPAC  +2.  TFEY  CIFFER  CNLY  IN 

R0012  WFER'"  TFEY  GET  JFE  ANGLES,  ANC  IN'  METFOC  OF  CALI  ING. 

RC013  COLTRIG  (AND  CCUTRIGl,  WHICH  CAN  EE  CALLEC  IN  EASIC)  COMPUTE  TFE 

R0014  SINES  ANC  COSINES  FROM  THE  CLRREM  CCNTENTS  OF  THE  CCL  REGISTERS. 

R0T15  THE  CCNTENTS  OF  CFUTEMP,  ETC.,  ARE  NOT  TOUCHEC  SO  THAT  THEY  MAY 

R0C16  CONTINUE  TO  FORM  A CCNSISTENT  SET  WITH  THE  LATEST  FIFA  RFACINGS. 

R0O17  CCUTRIGl  IS  LIKE  COUTR  IG  EXCEPT  THAT  IT  CAN  BE  CALLED  IN  BASIC. 

R0018  CD*TRX<GS  FINDS  CCU  VAL'JES  IN  CC'JSFCT  PATFER  TFAN  IN  CCUTEMP.  THIS 

ROOIQ  ALLOWS  USERS  TO  MAKE  TRANSF CR NATT CNS  LSING  ARBITRARY  ANGLES,  CR  REAL 
R0020  ANGLES  IN  AN  CRCER  CTFER  THAN  X Y Z.  A CALL  TC  THIS  ROUTINE  IS 

R0D21  NECESSARY  IN  PREPARATION  FOR  A CALL  TO  AX*SR=>T  IN  EITFEP  CF  ITS  TWC 

R0022  MODES  (SMNB  OP.  NESM).  SINCE  AX'I'SR^T  EXPECTS  TC  FIND  THE  SINES  ANC 
R0023  CCSINES  IN  THE  CREEP  Y Z X TFE  ANGLES  MUST  HAVE  BEEN  PLACED  IN  COLSFOT 

R002A  IN  TFIS  order.  CD*TR*GS  NEED  NOT  BE  REPEATEC  WHEN  AX*SR*T  IS  CALLEC 

R0O25  more  TFAN  ONCE,  PRCVirPO  the  ANGLES  HAVE  NOT  CHANGED.  NOTE  THAT  SINCE 

R0026  IT  CLCBPFPS  BUF2  (IN  THE  SINE  ANC  COSINE  ROUTINES)  CC=»TRX<GS  CANNOT  BE 

R0027  'CALLEC  USING  PANKCALL.  SORRY. 

R0D28  CCX'TR*G  IS  LIKE  CC^TR+GS  EXCEPT  TFAT  IT  CAN  BE  CALLED  IN 

R0r39  INTERPRETIVE. 
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NAKE  IT  EVEN  ANO  SMALLER 


..e 

STORING  2'S  CCNP  ANGLE,  LCACING  WPAC 
STORING  PPAC  FOR  LATER  RESTCRATICN 


STCPING  I'S  CCPPLEMENT  ANGLE 
STORING  COSINE 

LOACING  I'S  COMPLEMENT  ANGLE 

SINE  41  EXPECTS  ARGUMENT  IN  A ANC  L 
FRINGING  UF  PRICR  MPAC  TO  EE  RESTORED 
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P0G78  OLICTRTG,  INTENDED  FCR  GUITANCE  ryCLE  LSE  WHERE  TIME  IS  CRITICAL,  IS  A MUCH  FASTF;R  VERSION  CF  CC*TR*GS. 

ROORO  QUICTRIG  nwPUTFS  AND  STORES  THE  SINES  AND  COSINES  OF  THF  2'S  CONFLERFNT  ANGLES  AT  CCUSPOT,  CCUSPCT  +2, 

P0CH2  AND  ODUSFOT  +A . UNLIKF  CD=STF=SGS,  QUICTRIG  COFS  NOT  LEAVE  THE  1«S  CONPLFMFNT  VERSIONS  CF  THE  ANGIFS  IN 

R0C8A  CDLSPCT,  QUIOTRIG'S  EXECUTION  TIME  IS  4.1  MS;  THIS  IS  10  TIMES  AS  FAST  AS  CC=;tr»gS.  QUICTRIG  MAY  0E 

R0C36  CALLEC  FROM  INTERPRETIVE  AS  AN  RTE  OP-CODE,  CP  FRCM  EASIC  VIA  EANKOAIL  CP  IBNKCAU. 
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SCALE  CCWN  TC  MATCH  INTERPRETER  OUTPUTS 


ROYAL  t BUSINESS  FORMS  INCORPORATED 
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R0113  THFSE  IMERF/\fE  RfUTlNFS  N«KP  IT  PCSSIELE  TC  CALL  &X*SR^‘T,  ETC.,  IN 

RillA  INTERPRETIVE.  LATER,  WHERF  POSSIBLE,  THEY  KILl  BE  ELIHNATED. 

R0127  these  INTERFACE  PGUTTNES  ARE  PERMANENT.  ALL  RESTORE  USER'S  EBANK 

R0128  SETTING.  ALI  ARE  STRUT  INTERPRETIVE  SUBROUTINES,  CALLEE  USING  "CALL", 
RT129  RETURNING  VIA  QPRET.  ALL  EXPECT  ANO  RETURN  THE  VECTCR  TO  BE  TRANSFCR- 
R013O  ‘'EG  interpreter-style  IN  MPAT;  CCMFCNENTS  AT  MPAC,  MPAC  +3,  AND  MPAC  +5. 

ROin  TRGUSMNB  AND  TRG*NBSM  BCTH  FXPECT  TO  SEE  THE  2'S  CCNPIFMENT  ANGLES 

RT132  AT  CCLSFET  (CRCER  Y 2 X,  AT  CCUSPET,  GCUSPOT  +2,  AND  CDLSPOT  +A;  CGC 
R0133  LOCATIENS  NEED  NET  PE  ZFRCEC).  TPG*NESM  CEES  THE  NR  TC  SN*  TRANSFCR- 
RT13A  MATICNi  TRG=^SMNP,  VICE  VERSA. 

R0135  CCU*NPSM  CCES  ITS  TP  A NSF E F M AT  I CN  USING  THE  PRESENT  CONTENTS  OF 

RT136  THE  CDL  COUNTERS.  CTHEPNISE  IT  IS  LIKE  TPG*NESM. 


R')1361  rcu*SMNB  IS  TFE  CCMPLEMFNT  OF  CCU^NBSN. 
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P0153  «NBSM*  AND  *SMNB*  EXPECT  TC  SEE  THE  SINES  ANC  CCSINES  (AT  SINCCU 

P'U54  ANE  CESCCU)  rather  than  THE  ANGLES  THEMSELVES.  CTHERUSF  THEY  ARE 
R0155  LIKE  TRG*N8SM  ANC  TRG-TSNNB. 


R0U6  NOTE  THAT  JUST  AS  CDX<TR#GS  NEEC  BE  CAILEC  CNLY  CNCE  FCR  EACH  SERIES 

R0157  CF  TRANSFCRMAT ICNS  USING  THE  SAME  ANGLES,  SO  TOO  ONLY  CNF  CF  TRG^NBSM 
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PJ19R  an:  trc-*srnb  need  bf  called  FCR  face  serifs,  fcr  sleseolent  transfcr- 

R0199  RiTICNS  USE  *NBSR*  AND  *SHNBY. 
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R0165  TRANSFCRRATI  CN , FM'-R  WITH  +3  IN  A.  FCR  SR  TC  NE,  ENTER  WITH  -3. 

R')166  THE  VEGTOP  TO  PF  TRANSFprRED  ARRUES,  AND  IS  RETLPNEC,  IN  VBLF. 

R9167  AX*SR#T  EXPECTS  TC  FIND  THE  SINES  ANC  COSINES  OF  THE  ANGLES  OF  ROTATION 

P016P  AT  SINCOL  AND  COSCDU,  IN  THF  CROER  Y 2 X.  A CALL  TC  CPYTRYGS,  WITH 

P0169  the  2'S  complement  ANGLES  (ORCER  V I X)  AT  CDLSPUT,  WILL  TAKE  CARE  CF 
RC170  THIS.  HFRF  IS  A SANFLF  CALLING  SEGUENCE:- 

R0171  TC  CDLTPIGS 

P017?  rs  TFRFE  ("CA  THREE"  FCR  NBSM 

RG173  TC  AX*SRX>T 

RTITA  the  call  to  CDATRXGS  NFED  not  BE  repeated,  when  ax*sr*t  is  callec  ncre 

P(U79  THAN  CNCE,  UNLESS  THE  ANGLES  HAVE  CHANGED. 

R0176  A>YSR*T  is  GLAPANTFFD  SAFE  CNLY  FCR  VECTCRS  CF  NACMTLCE  LESS  THAN 

PU77  UNITY,  A LOOK  AT  THE  CASE  IN  WHICH  A VECTOR  OF  GREATER  RAGMTLDE 

Rai76  happens  TC  LIE  ALCNG  AN  AXIS  CF  THE'  SYSTEM  TO  WHICH  IT  IS  TO  BE  TPANS- 

RT179  FOPMEC  CONVINCES  CNF  THAT  THIS  IS.  A RESTRICTICN  WHICH  NLST  BE  ACCEFTEC. 
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23,3793 
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1 
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1259 

23,3799 

2) 
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1 
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0218 
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■3 

LA  ST 

1259 

23, 3795 

52 

160 

1 
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23,3  796 

20 
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1 
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0220 

RFF 

163 
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1259 

23  , 3797 

50 

133 

0 
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0221 

RRF 

6 
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1256 

23, 3750 

50 
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TNDE  X 

DEXl 

0222 
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7' 
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1259 

23,3751 

52 

123 

a 
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0223 
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1259 

23 ,3  752 

52 
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0 

CXCH 

BLF 
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1253 

23,3753 

10 
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0 

CCS 

A 

0225 
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1 

23,3759 

1 3717 

1 

TCF 
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0226 

23,3755 
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0227 
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6 
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1259 

23,3756 

26 

192 

1 

DIM 

DEXDF  X 

0228 

REF 

7 
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1259 

23,3757 

10 

192 

1 

TSTPC  INT 

CCS 

CEXDEX 

0229 

RFF 

1 

'23,3760 

1 ? 

'702 

c 

TCF 

rx<tl**P 

023C 
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2 

LAST 

1253 

23,3761 

0 0195 

1 

TC 

RTNSAVRR 

0231 
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2 
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12'^9 

23,3762 

1 3 

1702 

c 

TCF 

R9TL*>i  P 

02  3 2 

REF 

3 
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1259 

23, 3763 

0 0 195 

1 

TC 

RTNSAVER 

0233 

REF 

6 
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125  1 

23,3769 

00735 

0 

SINESLCC 

ACRES 

S I NCCU 
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23,3765 

0C009 

0 I NOE  X I 
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9 
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mo  2 

0 
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2 
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PAGE  NC. 

7 EO  S3 

0237 

2 3 ,3  770 

00009  0 
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9 

GCASTAFTS 

^ :*c  4 

R02  3 8 

0290 

1 1,  203') 

BANK 

10 

C291 
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1 
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0292 

10,2130 

BANK 

0243 
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1 

CCUMS 
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RCUTINE  FLESHPCT 
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THF  BCOY- 

STABLE  REPBER  T PAMS FCPMAT TON 

MATRIX  (CCMMPNLY 

CALLED  XNB)  AND  STORES 

R0246 

IT 

IN  the  locations 

SPEC  IFIEO 
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ECADP  entering  IN 
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1 1 ,2130 

77776 
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0298 

PFF 
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0 4616 

1 
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C 
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ROOni  KNOK  ViHICH  ORIGIN  APPLIES.  IT  IS  THE  USER  ViHC  KNCKS,  AND  WH  C SUPPLIES  RCNF,  VCNF  AND  l/SCRTIML)  AT  THE 
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R0016  ALL  DATA  PROVIDED  TC  AMD  RECEIVED  FRCN  ANY  TFF  SUBPCLTINF  HILL  BE  AT  CNE  CF  THE  LEVELS  ABOVE.  IN  ALL  CASES, 

RT018  the  free  FAIL  TINF  IS  R'"''URNFC  IN  CEMTISECONDS  AT  (-2E).  PROGRAN  TFF/CCMC  MLl  GENERATE  VCNE/RTNU  ANC 

RCC2H  LEAVP  IT  IN  VONF'  AT  (+1D  IF  FARTH  ORIGIN  ANC  (+9)  IF  MCCN  ORIGIN. 
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R0027  PROGRAMS  CALC/TFF  AND  CALC/TPER  ASSUME  THAT  THE  TEFMNAL  RACILS  IS  LESS  THAN  THE  PRESENT 
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* 
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L time  CF  free  fall 


LSf R' S PAGE  NC.  2 EO  S3 


A006n 

A0061 

AOr'62 

A0063 

A0064 

A0C65 


REGISTERS  SI,  S2  ARE  UNTCUCFEC  BY  ANY  TEE  SUBROUTINE 

INDEX  REGISTERS  XI,  X2  ARE  LSEC  BY  ALl  TFF  SUERCUTINES.  TFEY  APE  ESTAB- 
LISHEC  IN  TFF/COMIC  AND  MUSI  BE  PRESERVEC  BETWEEN  CALLS  TC  SLBSECLENT 
SLBRCLTINES. 

-NR  C(X1)  = NT  EM  CCUNT  CF  RRAC 

-NA  C(X2)=  NCRM  CCLNT  OF  S CRT ( AE S ( A LFA ) ) 


i 
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L 

P0066 

R0067 
P,  0 C 6 9 
R3071 
Rfl072 
RO073 
R1075 
R0077 
RO079 
P0G81 
R0CP2 
R0083 
P 3085 
R CC86 
R9088 
R''G89 

R009  1 
P0092 
R0CS3 
R 309A 
RP095 
P0GS6 
R309  8 
ROl  '0 
P3  10  2 
ROl  1 9 
ROl  '5 
R0107 
ROing 
RCll  1 
P0112 

R0113 
ROl  1 A 
ROl  15 
R0116 
ROl  1 7 
P0118 
PO  1 19 
P012O 
•,R0  1 2 1 
R0123 
P012A 
R3125 
R0127 
P0128 
ROl  29 
P0130 


TIRE  GF  FPpF  FAH 


USER'S  PAGE  PC.  3 EC  $3 


SUEPOLTIKE  kame: 


TFFCCNIIC 


Rf.n  NT 
MOC  BY 
RCC  N'C 
ROO  NT 
RCr  NT 


n 

RR 

1 

2 


BA  IRNSFATHEP 

RCD  BY: 
MOn  BY; 
Rnn  BY: 
FUPCTICPAL  DESCPIFTICP: 

SUBROUTINES  AND  TC 
THE  FQUATirPS  ARE 


FATE  : 


01 .29.67 


UOG  SECTION: 


TIME  CF  FREE  FAUU 


RR  EAIRNSFATFER 
RR  EAIRNSFATFER 
RR  BAIRNSFATHER 

This  subrcutinf  is 


DATE:  11  APR  67 

CATE:  21  NOV  67 

DATE:  21  RAP  68 

CAULEC  TO  COMPUTE  THOSE  CONIC  PAPARETEPS  RECUIPEC  EY  THE  TFP 


ACC  MOON  MU. 
ACCEPT  CTFFERENT 


EARTH/RCCN  SCAUES 


FSTABUISH  THEN  IN  THE  PUSH  UIST  AREA.  THE  PARAMETERS  ARE  UISTEC  UNCER  OUTPUT. 


H = RN=HVN 


ANGUUAR  MOMENTUM 


UCP  = h.H  / MU  SFMI  UATUS  RECTUM 

AUFA  = 2/RN  - VN.VN  / MU  RECIPROCAU  SEM  RAJ  AXIS,  SIGNEE 


AND  ALFA  IS  POS  FOR  ELLIPTIC  CREITS 
C FOP  PARABOLIC  ORBITS 
NFC  FCP  HYPFFECLIC  OPEITS. 

SUBROUTINE  ALSO  COMPUTES  ANC  SAVES  RMAG. 

CALLING  SFQLIPMCE: 

TFFCONIC  EXPECTS  CALLER  TQ  ENTER  WITH  CORRECT  GRAVITATIONAL  CONSTANT  IN  MPAC  , IN  THE  FORM 
1/SQPT(MU).  PROGRAM  PILL  SAVE  IN  TFF/PTMU  . THE  SCALE  IS  CETEPMINEC  FY  WHETHER  EARTH  OR  MOON 
ORIGIN  IS  USPO.  THE  CALLER  MUST  LOCK  CUT  THE  EXTENDED  VERES  BERGRE  PRCVIDING  STATE  VECTOR  IN  PCNE, 
VCN'E  AT  PRCPFR  SCALE.  THE  EXTENCEO  VERBS  MUST  BE  RESTOPEC  WHEN  THE  CALLER  IS  FINISHED  USING  THE 
TFF  ROUTINES. 

ENTRY  FEINT  TFPCONMU  EXFFCTS  THAT  TPP/RTML  IS  ALREADY  LOADEC. 

TO  SPECtfy  MU:  CLCAC  CALL  IF  MU  ALREACY  STORED:  CALL 

YOLRMU  1/RTML  E:  (17)  M:  (LA)  TFFCONMU 

TFFCONIC 

PUSHLOC  = PDL  + -,  , ARBI1RARY  IF  LEC  18C 

SLEROLTINES  CALLEC:  nCNF 

NORMAL  EXIT  MODES:  RVC 

ALARMS:  NONE 

OUTPUT:  THE  FOLLOWING  ARE  STCREC  IN  THE  PUSH  LIST  AREA. 


R«AG  1 

E 3 

i(-2S)  M;(-27) 

M PN,  PRESENT  RADIUS  LENGTH. 

NRMAG 

E: 

(-29+NR) 

M RMAG,  NORMALIZED 

r/ 1 

: (-27+NP) 

X 1 

-NR,  NCFM  CCUNT 

TFFNP 

p : 

(-38+2NR) 

M LCP,  SFMI  LATUS  rectum,  WEIGHTED  BY  NR. 

FOP 

VGAMCALC 

M : 

; (-36+2NR) 

TFF/PTMU 

F:(17)  M:(H)  1 /SORT  ( ML  ) 

TFFVSO 

C ; 

(2H)  M:(L8) 

1/M  -(V  SQ/ML):  PRESENT  VE L OC I T Y , NO RM L I Z EC. 

FCR 

VGAMCALC 

TFFALFA  F:  (26-NR)  I/m  ALFA,  WEIC-HTFC  BY  NP 
M:  (2A-NRI 

TFFRTALF  E:  nO+MA)  SCRT(ALFA),  NORMALIZED 
M:  (9+NA) 


G*VP:  ASSePBLE  REVISION  116  CF  AGO  PPCC-RSR  LURINAPY  PY  NASA  2021112-071 


L tii»fCFFREFFAU 


PT131 

P0132 

X2 

TPFl/ALF 

-NA,  NCFR  COUNT 

E:  (-22-2NA)  SIGNED  SERI  RAJ  AXIS,  NEIGHTFC  EY 

P 1133 
RO  134 
RT139 
P0136 

R:  (-20-2NA) 

FUSHLCC  AT  FCL+  ' 

THE  FOLLERING  IS  STCRFD  IN  GENERAL  FRA'ABLE 

VCNE'  F:(10)  y;(9)  v/RT(ML).  NORRALIZEO  VELOCITY 

R0137 
P7138 
R014  1 
RO  142 

E R A S A e 1,  E 

TNITIALIZATICN  RECLTREC: 

RONF  E:(-29)  “:(-Z7)  R STATE  VECTOR 

VCNE  E:(-7)  M:(-5)  R/CS  STATE  VECTOR 

TFF/PTML  F:()T)  R:(14)  1/FT(CS  SG/R  CUEF) 

R 1144 
PG145 

CEER  IS: 

CPRET, 

PDL+0  ...  PCL+3 

0146 

33,3762 

BANK 

33 

C147 

REF 

1 

27,2000 

SETLCC 

TCF-FF 

014P 

27,3360 

BANK 

0149 

RFF 

2 

LAST 

46  TO 

46: 

2 

2X> 

CCUNT# 

$$/TFP 

0150 

REF 

4 

LAST 

717 

27 ,3360 

0003  7 

(J 

TFFCONIC 

STORE 

TFF/PTRIL 

0151 

27, 3361 

53  575 

C 

TFFCCNRL 

VLCAC 

UNIT 

0152 

REF 

15 

LAST 

7 20 

27, 3362 

022':7 

c 

PCNF 

0 15? 

27,3363 

77725 

1 

PDDL 

3154 

27, 3364 

CCC45 

r 

36D 

0155 

REF 

1 

27 , 3365 

00015 

0 

STORE 

RRIAG  1 

0)56 

L AST 

1226 

27,3366 

7 7701 

1 

NCRR 

0 1 57 

RFF 

6 8 

27,3367 

CCC47 

1 

XI 

0158 

RFF 

1 

27,3370 

2404  1 

1 

STOVL 

NRR'AG 

0159 

REF 

9 

LAST 

72C 

27 , 337  1 

02215 

c 

VCNE 

0160 

27,3372 

7776  1 

1 

VXSC 

0161 

RCF 

K 

LAST 

1261 

27,3373 

0003  7 

0 

TFF/RTRIU 

0162 

'ref 

1 

27, 3374 

C217C 

c 

5TCPE 

VCNE' 

0163 

27,3375 

4736  1 

0 

VXSC 

VXV 

0164 

REF 

2 

LAST 

126  1 

27,3376 

OOC41 

1 

NRRAG 

A1165 

01  66 

27,3377 

47572 

1 

VSL  1 

VSQ 

0167 

REF 

1 

27 , 3 4’,n 

14C35 

1 

STCDL 

TFFNP 

AOl  6 8 

0169 

REF 

1 

27,34'''  1 

0 6 514 

1 

TFF  1/4 

117  1 

27, 3402 

63271 

0 

DOV 

POVL 

0171 

REF 

3 

L AST 

1261 

27,3403 

00041 

1 

NRRAG 

0172 

REF 

2 

LAST 

126  1 

27,34C4 

02170 

Cl 

V CN<=  ' 

3173 

27, 3405 

57436 

1 

VSC 

DCCYF 

Cl  74 

P>:F 

1 

27,3406 

00025 

0 

STPRE 

TFFVSC 

A0175 

3176 

27,3407 

4 3 2 5 7 

c 

SPY 

DAD 
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NA 


LEFT  eY  caller 
LEFT  BY  CALLER 
IF  ENTER  VIA  TFFCONMU. 


1/SGRT(FU  6:  (17)  R:  (14) 

CCRE  FERE  WITF  TFFRTMU  LOADED. 

SA VEC  PN  . R E ; (-29  ) R : (-27  ) 

UR/2  TO  PCL+C,  +5 
RAGMTUr  E 

R E:  (-29)  R:  (-27) 


-NR 

RRAG  R E:  (-29-t-NP)  R:  (-27  + NR) 


SAVED  VN. 

RI/CS 

E: 

(-7  I 

M : 

E:  ( 17)  M 

VN/SCRT  (RU  I 

: (14) 
E: 

( 10) 

M : 

( 9 I 

E:  (-294NR)  R:  (-27+NR) 

UR/2  FRCR  RCL 

BEFCPE:  E:(-194NR)  R:(-18+NR) 

LC  F R E:(-38+2MR)  M:(-26+2NR) 

SAVE  ALSr  FCF  VGARCALC 

(2/PMAG)  1/R  E:(26-NR)  M:(24-N!R) 

RRAG  R e:(-29+NR)  R:(-27+NR) 

SA VFD  VN  . E : ( 1C)  R : (9) 

keep  RFAC+2  FCNEST  for  SORT. 

-(V  SC/RL)  E;(2C)  R:(I8) 

SAVE  FCR  VGARCALC 


GAP: 

ASSEP8LE 

REVISTOM  116 

CF  AGC  RRCGRAP  LUMINARY  BY  PASA  2021112-C71 

L 

TIPE 

CF 

FREE  FALL 

0177 

27 , 2A1C 

2C573 

1 

n -6,1 

0178 

27, 3811 

7 7 626 

G 

STADR 

A0179 

3180 

REF 

1 

27,3812 

77  788 

C 

STCPE 

TFFALFA 

HBl 

27,3813 

8185  7 

1 

SLP 

PUSH 

0182 

27,3818 

2C173 

0 

0-6,1 

0183 

27,3815 

75^86 

c 

ABS 

SCRT 

CIP^ 

27,3816 

777  11 

1 

NOR  pi 

01E5 

REF 

29 

LAST  1227 

27,3817 

000  50 

1 

X2 

0186 

REF 

1 

27,3870 

0CC3  1 

c 

STORE 

TFFRT4LF 

C187 

27,3821 

75316 

1 

OSQ 

S IGN 

All  88 

3189 

27,3822 

5 5 2 58 

1 

BZE 

Bonv 

0190 

27,3823 

57825 

0 

+ 2 

0191 

°FF 

2 

LAST  1261 

27, 3828 

06  5 1 8 

1 

TFFl /8 

0192 

REF 

1 

27 ,3825 

3332  7 

1 

+ 2 

STORE 

TFFl/ALF 

0193 

27,3826 

776  16 

c 

CUI^PCMC 

RYC 

tni9^ 
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GET  -VSG/MU  E:(26-NR)  M:(2^-NR) 


2/RMAG  FRCM  PDL+2 

ALFA  1/P  E:(26-NP)  M : ( 2A-NR  ) 

TEPF  SAVE  ALFA  E:(23)  p:(18) 

E: ( 10  ) p:  (9 ) 


X2  = -N'A 

SCRT(  AES(ALFA)  ) E:(lP-tPA)  M:(9iNA) 

NOT  SO  ACCURATE,  BUT  CK 

ALFA  FRCP  PEL  ^2  E: ( 2C  ) P : ( IE  ) 

SET  1/ALFA  =0,  TC  SHCP  SPALL  ALFA 


1/ALFA  E:(-22-2  NA)  P:(-20-2  PA) 


39  W 


G4P: 


/SSSePBLE  PEVISIPN  116  CF  4GC  FRCC-RflM  LUP1K4RY  EY  MAS4  20211  12-i;71 
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L T IME  OF  FREE  FAI  I 


USFp'S  PAGE  NO.  6 EC  S3 


P0iq5 
P Cl  S7 
R 1199 
R02O(' 
R0  2U 
P3293 
RG205 
P0207 
P02')R 
R0210 
P0212 
R7213 
R021A 
R9216 
R02!  7 
R0218 
R)219 
P02.71 
R0222 
R 1223 
R022A 


SLEPCLTINF  NAPF;  TFEPP/Pi 

WQD  NC:  0 

MOC  by:  PR  8ATPNSFATHEP 

NCC  NC:  1 PCD  BY:  PR  EAIRNSFATPPR 

PQD  NC:  2 MOP  BY:  RR  pAIRNSPATHEP 

FUNCTICN'Al  CESCPIPTICN:  USEC  BY  CALCTPER 

APOGEE  RADILS  FCR  4 GENEPAl  CCMC. 
POOGPAM  Gives  PERIGEE  RACIUS  AS 
PC  = p / (l  + E) 


CATE:  Cl.  1 7.67 

LOG  SECTION:  TIME  CF  FREE  FALL 


DATE:  11  APR  67 

CATE:  21  MAR  68  ACCEPT  DIFFERENT  EARTH/MOCN  SCALES 

ALSC  IMPPCVE  ACCURACY  CF  PARC. 

AMC  TFF  DISPLAYS  TC  CALCLLATE  PERIGEE  RACIUS  ANC  ALSC 

APCGEE  RAOILS  is  GIVEN  BY 
PA  = ( l + E ) / ALFA 


NHEPE  2 

c = 1 - P ALFA 

IF  RA.  IS  NEGATIVE  CR  ShCViS  CIVICE  OVFRflGW,  TFEN  PA  = POSMAX  BECALSE 

1.  APOCpf'  RADIUS  IS  NOT  MEANINGFUL  FCP  HYPERBOLA 

2.  APCGFE  RACIUS  IS  NOT  DEFINED  FOR  PARABOLA 

3.  APOC^P  RADILS  EKCEFCS  THF  SCALING  fcP  ELLIPSE. 

THIS  SUBROUTINE  REQUIRES  THE  SIGNED  RECIPRCCAL  SEMI  MAJ  AXIS.  ALFA,  AND  SEMI  LATUS  RECTUM  AS  DATA. 
CAILING  SFQLEN'CE:  CAIL 

TFFPF/RA 


PUSFICC  = PCL+U,  ARRITRARY  IF  LEQ  100 
C(MPAC)  LNSFECiFIFC 


RJ225  SUBROUTINES  CALLED:  NONE 

R0226  NCFNAl  EXIT  wrCP:  RVC 

R0227  IP  ELIIPSF,  WITHIN  NCRMAL  SCALING,  RAFC  IS  CCRPECT. 

RT228  OTFEPWISE,  RAPC  = POSMAX. 

R0229  ALARMS:  RpNE 

R0230  OUTPUT:  STOPFO  IN  PLSH  I I ST  AREA,  SCALE  CF  CLTFUT  AGREES  WITF  DATA  SURPLIPD  TO  TFF/CGNIC, 

R'1232  RPER  F:(-29)  M:(-27)  M PPP.IGEF  RADIUS  OFSTRCYEC  BY  C ALCT  F F/ C ALCT  PER , TFFTRIG. 

R023A  RARE  p:(-29)  M:(-27)  M APOGEE  RACIUS  WILL  BE  CESTRCYED  BY  C A LC T F F /C A LC T RE P 

RT236  PUSHIOC  AT  pOL+0 

P3237  erasable  INITIALTZATICN  FEGUIPEC: 

P9238  TFFALpA  F;(?6-NP)  m 1/SEMI  MAJ  AXIS  LEFT  BY  TFFCOMC 

R3240  M:(2A-NP) 


R 1241 

TFFNP  E: 

(-38  + 2NP.  ) 

M LC  P,  SEMI  LATLS  rectum 

LEFT 

BY 

TFFCCMC 

P3243 

M : 

(-36+ 2 NR) 

R '244 

X 1 

-NR,  NORM  COLNT  OF  RMAG 

LEFT 

EY 

TF  FCCN  IC 

R0246 

X2 

-NA,  NCFM  COUNT  OF  ALFA 

LEFT 

BY 

TFFCONIC 

R0248 

DFBR  IS  : 

■ gPRET, 

PCL+C  ... 

P0L+  1 

G4P:  ASSEMBLE  REVISION  116  CF  A GC  PRCGRAV  LUMINARY  BY  NASA  2021112-071 


L TI PF  TF  FREE  FAl L 


P0299 

0250 

2 

2 

LAST 
1 AST 

1262 
126  1 

1-020 

RAPO 

= 

1 60 

0251 
A0252 
0 2 53 
0259 

0255 

0256 

REF 

REF 

00  16 

27,3927 

27,7430 

27,3931 

27,3^32 

A 1395 
00T33 
CCC35 
57  9 5 7 

r 

1 

1 

0 

PPER 

TFFRP/RA 

DLOAD 
SR  9 

19D 

DPP 

TFFALFA 

TFFNF 

OCOPP 

0257 

27,3933 

20571 

0 

0 -8C,1 

0253 

27, 3939 

5 19  15 

c 

DAD 

ABS 

AT259 

0260 

PEF 

1 

27,3935 

17765 

0 

nP2 (-9  ) 

0261 

27,3936 

A"’  366 

0 

SORT 

DAD 

0262 

P^F 

3 

LAST 

1262 

27,3937 

06  5 19 

1 

TFF  1/9 

0263 

27, 3990 

5 5 206 

c 

PUSH 

BDDV 

02  69 

REF 

3 

LAST 

1269 

27, 3991 

0CQ35 

1 

TFFNP 

0265 

27,3992 

53657 

0 

SR* 

SR* 

0266 

27,3993 

2C6T  1 

1 

0,1 

0267 

27 , 3999 

20572 

0 

0-7,1 

0268 

RFF 

3 

LAST 

72  ! 

27,3995 

190  17 

1 

STCDL 

RFER 

A0269 

C27C 

27,3996 

910)5 

1 

DMP 

BCVB 

0 271 

REF 

2 

LAST 

126  2 

27,3997 

CCC27 

1 

TFFl/ALF 

0272 

RFF 

5 

LAST 

1229 

27,3950 

57753 

1 

TCDANZIG 

0277 

27,3951 

53659 

0 

PZF 

SL* 

0 27  9 

REF 

) 

27,3952 

5796  1 

0 

PAXRA 

C275 

27,3953 

57603 

0 

0 -5,2 

0276 

27,3959 

900  5 7 

1 

SL* 

BCV 

0277 

27,3955 

5 7 5 76 

1 

0 ,2 

0278 

RFF 

2 

LAST 

1269 

27,3956 

57961 

0 

MAXRA 

0279 

27,3957 

77699 

1 

PPL 

0280 

27, 3960 

57963 

1 

+ 3 

0 281 

27,3961 

77795 

1 

MAXRA 

CLCAC 

0282 

REF 

3 

LAST 

851 

27,3962 

1777  1 

0 

NEARCNE 

0263 

REF, 

1 

27 , 3963 

00021 

1 

+ 3 

STORE 

RAPn 

0289 

27,3969 

7 7 6 1 6 

c 

CLPPRPPA 

PVG 

4028? 
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AFCGEE  RADIUS  M E:(-29)  M:(-27) 

perigee  RADIUS  M E:t-29)  N:(-27) 


ALFA  1/M  E:(26-N'R)  M:(2A-NP) 

LC  P M E:(-38+2NR)  M:(-36+2NR) 

ALFA  P (-12+NR) 

ALFA  P (-A) 

(DCCNF  GIVES  VALID  TP  RESULT  FDR  SORT) 
(ABS  PRCTECIS  SCRT  IF  E IS  VERY  NEAR  0) 

ESC=(1-FALFA)  (-9) 

(1+E)  (-2)  TO  PCL+0 

LCF  M E;(-38+2NR)  M:(-36+2NR) 

(DOES  SR  TEEN  SL  TC  AVCID  CVFD 
X1=-NF 

(EFFECTIVE  SLI 

PERIGEE  RADIUS  M E:(-29)  M:(-2T) 

(1+E)  (-21  FRCP  PDL+0 

E:  (-22-2NA  ) M:  (-2T-2NA  ) 

CLEAR  CVFINC,  IF  CN. 

SET  PCSPAX  , IF  ALFA=0 
-5  + NA 


SET  POSMAX  IF  CVFL. 

CONTINUE  WITH  VALID  RAPO. 

RAPO  CALC  IS  NOT  VALID.  SET  RAFC  = 
FCSPAX  AS  A tag. 

APCGEE  RADIUS  P E:(-29)  P:(-27) 


30  W 


GAP: 

L 

P 1286 
Rfl288 
P0  290 
R3291 
P029? 
P0293 
RQ295 
RC297 
RJ299 
R03’'l 
RO393 
R0305 

RC306 

R033R 

RO399 

R031  1 

RJ313 

R031^ 

R031£ 

P3318 
RG31  9 
R9321 

Rrt323 

R9379 

R9326 

R0327 

P0328 

R0329 

R0331 

R.>332 

R0336 

PO339 

PQ336 

R0337 

R0339 

R03An 

Rn3A2 

R034A 

P0365 
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SUEROLTINE  ^A^'C:  CALCTPPp  / CALC7FF  CATF:  01.29.67 

"CC  NC:  0 LCG  SECTIGN:  TIME  CF  PPFE  FALL 


MCD 

BY  : 

RR 

PAIRNSFATHER 

MCE 

NC: 

1 

MOO 

by: 

RR 

BAIRNSFATHER 

CATE  : 

21 

MAP 

67 

MCF 

NC: 

2 

MOI' 

BY  : 

PR 

PAIRNSFATHER 

CATF: 

14 

APR 

67 

MCD 

Nr: 

3 

MCD 

BY: 

RR 

BAI  RNSFATHER 

CATE  : 

8JUL  67 

NEAR  EARTh  «UE  ANC  NFG  TFF 

(C-ON'ERAST  1 

MOC 

NC  : 

4 

MOD 

by: 

RR 

EAIRNSFATHER 

DATE; 

21 

NOV 

6 7 

ACC  VARIABLE  ML. 

MOD 

NC  : 

5 

MCD 

BY  : 

RR 

EAIRNSFATHFP 

CATE: 

21 

MAR 

68 

ACCEPT  CIFffrent  EARTH/MCCN 

SCALES 

functional  OESCRIPTICN:  PROGRAM  CALCULATES  TFE  FREE-FALL  TIME  CF  FLIGHT  FRC^  PRESENT  PCSITICN  PN  ANC 

VPLCCITY  VN  TC  A RACIUS  LENGTH  SPECIFIED  BY  RTERM  , SUPPLIED  BY  THE  USER.  THE  POSITICN  VECTCR 
PN  MAY  BE  CN  EITHER  SIDE  CF  THE  CCNIC,  EUT  FTPRM  IS  CCMSICEREC  ON  THE  INBCLND  SIDE. 

THF  EQUATIONS  ARE 


C2  = -SCFT(PTFRM  (2-RTFRM  ALFA)  - LCP) 

( INBOUNC  S IDE  ) ) 

LEQ 

+-  LCE/SCR T( ALFA ) 

Cl  = RN.VN  / SQRT(MU) 

LEG 

+-  LCE/SCPT ( ALFA ) 

7 = NLI^  / DEN- 

LEO 

+-  17SQRT(ALFA) 

WHERE,  IF  INBOUND 

= HI 

LEE 

+ - 2 LCt/fiit/^ 

DE^  = Q2+QI 

LEC 

+ - 2 LCE/SGRK  ALFA  ) 

ANC,  IF  ruTBCUNC 

NUM  = Q2-C1 

LEQ 

+ - 2 LCE  /'CRT (ALFA) 

PEN  = 2 - ALFA  (RTERM  + PN)  . 

LEG 

+-  2 LCE 

IF  ALFA  77  < 1,0  (FOR  ALL  CONICS  EXC.FPT  ELLIPSES  HAUNG  AfiSICEL  ECC  ANCM)  G 90  CFG) 


THEN  X = ALFA  7 7 

ANC  TFF  = (RTERM  +RN  -2  77  T(X)  ) 7/SCRT(ML) 


EXCEPT  IF  ALFA  PN7,  ANC  IF  TFF  NEC, 

then  TFF  = 2 PI  /(ALFA  SCPT(ALFA))  * TFF 


CP  IF  ALFA  77  C"C  1 .C  (FOR  ELLIPSES  HAVING  AES(CEL  ECC  ANCM)  GEC  90  CEG) 

THEN  X = 1/AlFA  2 7 

ANC  TFF  = ( P I /SCRT ( ALFA  ) -G2  +C I +2(X  T(X)  -i)  /ALFA  2)  /ALFA  SCRT(ML) 


l»HERF 


T(X)  IS  A PCLYNCMIAL 


2 3 

1/3  -X/F  +x  /7  -X  79 


APFRCXIMAT  ION  TO  TFE  SERIES 
2 

• . . (X  <1.0 


CALLING  SEQUENCE:  t i ME  TC  RTERM 

CALL 

OAl.  CTFF 

C(MP.'C)  = TfRMNL  RAC  M 
FOR  FITFER,  E:  (-29)  «:  (-27) 

FCR  EITHER,  PUSFLCC  = PCL+0  , ARBITRARY 


TIME  TO  PERIGEE 
CALI 

CALCTPER 

C (MPAC  ) = PER  IGEF  RAC 


IF  LF(3  8C, 


GAP: 


ASSENRLE  RI^VISICN  1!6  CF  AGC  PRCGRAM  LUMINARY  BY  NASA  20Z1112-C71 
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L 

R03A6 
R03A7 
R 73AB 
Pn350 
R03F2 
R0353 
R 03  S 9 
R03E7 
R0358 
R0360 
R0362 
R0363 
R9365 
R0367 
R-7  36R 
R036? 
R0370 
P 0371 
R0372 
R0373 
R0375 
R0  37  7 
R0379 

R0381 
P038? 
R03EA 
R0386 
R0387 
R0389 
R039! 
R0392 
R039* 
R0395 
R0397 
R0398 
R0400 
RCA02 
R0An3 
R0A34 
R0405 
P )416 


TINE  CF  FREE  FALL 


USFR'S  PAGE  NO. 


EC  S3 


SUFRCLTINES  CALLfF:  T(X),  VIA  RTS 


NCRVAL  EXIT  MODE: 
HOkFVER  , 


OUTPUT  : 


RVC 

PRCGRAR  FXITS  WITH  CNE  CF  THE  FCLLCUNG  VALUES  FCF 
TFF=  FLIGFT  TIME.  NORMAL  CASE  FOR  POSITIVE  FLIGHT 
(THIS  CFT1CN  IS  Nt  LONGER  USEC.) 

TEE  = PPCNAX.  THIS  INCICATES  THAT  THE  CCNIC  FRCN  THE  FFESENT  POSITION  WILL  NCT  RETURN  TO 


TFF  (-28)  CS  IN  MPAC.  USER  MUST  STORE. 
TIME  LESS  than  one  CRPITAL  FERICC. 


FRAS4EL  E 


EEER  IF; 


f ( YPAC) 

THE  SPECIFIED  ALTITUDE.  ALSO  INDICATES  DUT80LNC 
(-28)  CS  TIME  CF  FLIGHT,  CF  TIME  TC  PERIGEE 

PARABCLA 

CR 

HYPERBCLA. 

TFF 

TFFX 

(0  ) 

X , 

LEFT 

FCR 

ENTRY 

CISPLAY 

ROUT  inES 

NRTFRM 

F:  (-29+NR) 

M:  (-27+NR) 

M RTERM,  WF  IGHTFC  BY  NP 

LEFT 

RCR 

entry 

Cl SPLA  Y 

TFF 

routines 

TFFTEM 

E:  (-5P+2NR) 

LCP  Z Z SGN(SCELF) 

LEFT 

FCR 

ENTRY 

C I S F L A Y 

TFF 

POUT  INES 

M:  (-95F2NR) 

LCP  /ALFA  SGN(SCELF) 

LEFT 

FOR 

FNTR  Y 

DISPLAY 

TFF 

RCLTINES 

NOTE: 

RMAGl 

TFFQl 


TFFTEM  = POL  360  AND  WILL  BE  CESTPCVEC  6Y  .:LMT:. 


E:(-29I  M:(-27) 

F:(-16)  n:(-15) 

TFFCFLO  E:(-16)  H:(-15) 
PLFHLCC  AT  FCL+i 
INITIALIZATION  REGUIPED; 


PCL  12  NOT  TOUCHFC. 
POL  14C 
POL  lOD, 


RCNE  E : (-29  ) Mr ( 

-27  ) 

M STATE  VECTOR 

LEFT 

EY 

LSFR 

VONE'  F:(+1C)  M:(+9) 

VN/SGRT (MU  ) 

LFFT 

BY 

TFF/CCNIC 

RM'Gl  E:(-29)  M:( 

-27  ) 

PRESENT  RACIUS,  M 

LEFT 

EY 

TFFCCMC 

r (►'PAC  ) F : (-20  ) m:  ( 

-27) 

RTERM,  TEPNINAL  RACIUS  LENGTH,  M 

LEFT 

BY 

USER 

THE  FOLLCWTNG  ARE  STCREO  IN  THE  PUSH  LIST  AREA. 

TFF/RTMU  E:(17)  » 

: ( 14 ) 1/SGRT (MU) 

LEFT 

EY 

TFFCCMC. 

NRMAG  E:  (-29+NR) 

M 

FMAG,  NCRMALIZFr 

LEFT 

BY 

TFFCOMC 

M:  (-27+NR) 

XI 

-NR,  NORM  COUNT 

LPFT 

BY 

TFFCCMC 

TFFNp  F:  (-38+2  NR) 

M 

LCF,  SEMI  LATUS  RECTUM,  WEIGHT  NF 

LFFT 

BY 

TFFCON  IC 

M;  (-36-I2NP) 

TFFALFA  E:  (26-NR) 

1/M  ALFA,  WEIGHT  NR 

LEFT 

EY 

TFFCCMC 

M;  (24-NR) 

TRERTALP  E:  ( ij  -iNA  ) 

SGRT(ALFA),  NORMALIZEC 

1 eft 

BY 

TF  PCCMC 

N : (9  + NA) 

X2 

-NA,  NORM  COUNT 

LEFT 

EY 

TFFCCMC 

TFFl/ALF  F:  (-22-2NA) 

SIGNEC  SEMIMAJ  AXIS,  WEIGHTED  BY  NA 

LEFT 

BY 

TFFCCMC 

M:  (-20-2NA) 

CPRET,  PCL+0  ...  PCL+3 

RTERM  F:(-2P)  m:(-27)  RTERM,  TERMINAL  RACIUS  LENGTH 

RAPO  E:(-29)  M:(-27)  POL  160  (=NRTEFM) 

RPFP  r:(-29)  M:l-27)  PCL  1 AO  (=TFFC1) 


G/SP: 
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L TIRE  CF  Fprr  FALL 


P0A07 

OAOB 

27,3465 

7 76  14 

1 

CALCTPER 

SETGC 

0ACi9 

REF 

1 

27,3466 

03  43  6 

0 

T FFSW 

')A10 

27,3467 

574  7 2 

1 

+ 3 

npii 

27,3470 

77614 

1 

C A|  CT  f F 

CLFAR 

TAl  2 

REF 

2 

LAST 

1267 

27,3471 

03676 

0 

TFFSW 

041  3 

PFF 

1 

27,3472 

OCC23 

t 

+ 3 

S7CRE 

RTFRR 

0414 

27,3473 

77657 

0 

SL* 

0415 

27, 3474 

2C2C1 

c 

0 ,1 

0416 

rff 

1 

27,3475 

■TOO  21 

1 

STORE 

NRTERR 

0417 

27,3476 

44205 

n 

CRP 

BCSU 

041R 

REF 

Q 

LAST 

1264 

27,3477 

00033 

1 

TFFALFA 

0419 

R'^F 

4 

LAST 

1264 

27,3500 

06514 

1 

TFFl/4 

042C 

27,35C1 

412J6 

1 

FLSF 

DRF 

0421 

REF 

2 

LAST 

1267 

27, 3502 

000  2 1 

1 

NRTERR 

042? 

27,3503 

53725 

1 

PCDL 

SR4 

A 1423 

0424 

rff 

4 

LAST 

1264 

27,3504 

00035 

1 

TFFNP 

0425 

27,3505 

20573 

1 

0 -6,1 

0426 

27,3506 

43276 

c 

CCCRF 

DAD 

A0427 

A04  2P 

042  9 

27, 3507 

77657 

0 

SR  * 

C43C 

27 ,3510 

21671 

1 

0,1 

0431 

27,3511 

71214 

0 

fiCFF 

Dir  AC 

0432 

RFF 

3 

LAST 

1267 

27,3512 

03756 

0 

TFF  SW 

0433 

27,9513 

57515 

1 

+ 2 

0434 

PPF 

1 

27,3514 

36  524 

1 

TFFZERGS 

0435 

27,3515 

75440 

0 

+ 2 

BMN 

SORT 

0436 

9 EF 

I 

27,3516 

576  5C 

0 

RAXTF  FI 

A0437 

0438 

27,3517 

41  '’76 

0 

CCCRF 

BCVB 

0439 

PEE 

6 

LAST 

1264 

27,3520 

57753 

1 

TCDAN  ZIG 

0440 

PFF 

1 

27, 3521 

2 4 3 4 5 

0 

STOVL 

TFFTER 

0441 

REF 

•3 

LAST 

126  1 

27,3522 

02170 

0 

VCNE' 

0 44  2 

27, 3523 

5244  1 

1 

COT 

SL3 

0 443 

RFF 

16 

1 AST 

1261  . 

27,3524 

02207 

0 

RCNE 

0444 

RFF 

1 

27,3525 

0CG17 

1 

STORE 

TFFGl 

A044  5 

C446 

27,3526 

44240 

1 

BRN 

RDSU 

1447 

P EF 

1 

27,3527 

57550 

0 

1 NBCUND 

044fl 

R^F 

2 

LAST 

1267 

27, 3530 

03045 

0 

TFFTEM 

A0449 

CLTBCUNC 

Z CALC  CCNTINU 

T450 

REF 

1 

27,  359  1 

14  04  3 

0 

STOOL 

tffx 

0451 

REF 

4 

LAST 

1267 

27  ,3532 

03033 

1 

TFFALFA 

0452 

27,9593 

44205 

c 

CRP 

BCSU 

19:C9  AUG.  11,1969  SKIPPER  .097  PAGE  1267 
LSER' S PAGE  NG.  1C  EC  S3 


ENTER  klTF  RPER  IN  RFAC 


ENTER  k,JTH  RTERN  IN  NFAC 
E:  (-29)  R:  (-27) 

Xl  = -N  P 

RTERR  E:  (-29+NR)  R:  (-?7*NR) 

ALFA  E:  (26-NP)  M:  (2A-NR) 

(2-ALFA  FTERM)  (-3)  TO  PDL-*0 
E:  (-29+NR)  N:  (-27+NP) 

RTERM(2-ALFA  RTERR)  TC  PDL+2 
F:  (-32-*NR)  M:  (-30  + NR) 

LG  P E:(-38+2NP)  R:(-36+?NR) 

XI  = -NR 

CUE  TC  SEIFTS,  KEEP  PRECISION  FOR  SCRT 
RTERR(2-ALFA  PTFRN)  FPCR  PCL+2 
F:  (-32+NP)  R:  (-30+NR) 

LEAVE  E:  (-32)  R:  (-3'J) 

XI  = -NR 

CHECK  TFF  / TOER  SWITCH 

IF  TFF,  continue 
IF  treP,  set  G2  = 0 
E:  (-16)  R:  (-15) 

NC  FREE  FALL  CCNIC  TO  RTERR  FRCR  HERE 
RESET  FCL,  SET  TFF=POSRAX,  ANC  EXIT. 

RT  IS  ON  IN0OLND  SIDE.  ASSLRE  CVFINC=C 
ANY  PCPT  IN  A STCRM. 

C2  E;  (-16)  R:  (-15) 

VN/SORT( RU  ) E:  (1C)  M:  (9) 

SAVED  RN.  E:  (-29)  R:  (-27) 

Cl,  SAVE  FCR  GONEPAST  TEST. 

E:  (-16)  R;  (-15) 

USF  ALTEFNATE  Z 
C2  E:  (-16)  R:  (-15) 


ERE 


NUR=C2-C1  E:  (-16)  R:  (-15) 

ALFA  E:  (26-NR)  M:  (2A-NR) 


r.AP:  ASSPPBLP  RFV!SION  116  CF  A GC  FRCGPAP  LUMAAFY  RY  AASA  2021112-071 
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L 

0A53 

A0A5A 

TIYF 

REF 

OF 

4 

FREE 

LAST 

FAL  L 
1261 

27,3534 

•,1'’04l 

1 

N'PPAG 

USER' S PAGE  NO.  11  EO  S 3 

RMAG  F:  (-29+NR)  R:  (-27+RR) 

(2-RTEPM  ALFA)  (-3)  FROM  PDL+0 

27, 3535 

5 1 4 1'  6 

1 

SAVEPEN 

PLSH 

A6S 

OEM  TC  PCL+O  E:  (-3)  CR  (-16) 

A0A56 

M:  (-3)  CR  (-15) 

J457 

27,3536 

4C5  15 

1 

OAP 

BCV 

INCET FPN  INANCY  TEST 

1458 

R9F 

1 

27,3537 

1 7757 

1 

L INi(-22  ) 

= 1 .0-E(-22) 

0459 

REF 

1 

27,3540 

5756  1 

1 

TFFXTEST 

GO  IF  DEN  >/=  B(-22) 

0460 

27,  ^“=4  1 

6 5 24  5 

C 

DLCAD 

PDDL 

SET  CFN=n  CTFERWISE 

04  61 

PEF 

2 

LAST 

1267 

27  ,3542 

06524 

1 

TFFZERflS 

A 04  62 

XCF  ZERC  WITH  PCL-*0 

0463 

27,354? 

57  54  5 

1 

OLOAO 

DCCMP 

0464 

REF 

5 

LAST 

1267 

27,3544 

00133 

1 

T FFALFA 

ALFA  E:  (26-NR)  R : (24-NR) 

046  5 

27, 3545 

71240 

1 

e^N 

DLCAD 

FCR  TPER:  2 INERT  AT  CELE/2=0  AND  9C. 

0466 

REF 

1 

27,3546 

57655 

0 

TFFFLI 

ASSURE  9C,  AND  LEAVE  0 IN  PCL:  1/Z=C/N 

A0667 

Z IN’DET.  AT  PERIGEE  FOR  PARAB  CR  FYPERB. 

1468 

27, 3547 

776  16 

0 

. OUMPTFFl 

R\/Q 

FFTURN  TFF  =0 

A0469 

IN'ROUNP 

1 CALC  CCA'TINUES  FERE 

0470 

27,3550 

77745 

1 

I NBCLRD 

CLCAC 

PFSFT  FOL+0 

0471 

27,3551 

45345 

1 

DLCAD 

D SL 

ALTERNATE  Z FALC 

0472 

OFF 

2 

LAST 

1267 

27 ,3552 

0002  3 

0 

RTERP 

E;  (-29)  M:  (-27) 

0473 

RFF 

2 

LAST 

1261 

27, 355’ 

oroi5 

0 

RPAGl 

E:  (-29)  R:  (-27) 

0474 

PPF 

2 

LAST 

1267 

27 ,3554 

14043 

0 

STOOL 

TFFX 

NLR=RTERR-RN  E:  (-29)  R:  (-27) 

0475 

REF 

:3 

LAST 

1267 

27,3555 

'10045 

0 

TFFTEM 

C2  E:  (-16)  Rl:  (-15) 

0476 

27, 3556 

520  1 5 

1 

DAD 

GCTC 

0477 

RFF 

2 

LAST 

1267 

27,3557 

00117 

1 

TFFQl 

Q1  E:  (-16)  R:  (-15) 

0478 

PFF 

1 

27,  3560  . 

57  535 

c 

SAVECEN 

EEN  = G2+G1  F:  (-16  ) M : (-  15  ) 

0479 

27, 3561 

65215 

1 

TFFXTEST 

HAD 

PDDL 

(ABS(CFN)  TO  PDL+2))  E:  (-3)  CR  (-16) 

A0480 

Rl:  (-3)  OR  (-15) 

048  1 

REF 

1 

27, 3562 

1 7 76  1 

1 

DP(-22) 

RESTCRE  AES(CEN)  TC  RFAC 

0482 

REF 

3 

LA  ST 

12  6 8 

27 ,3  563 

10043 

0 

TFFX 

NUR  E:(-16)  CR  (-29)  R:(-15)  CR  (-27) 

048? 

27,3564 

5 3 605 

1 

CPF 

SR* 

0484 

.REF 

2 

LAST 

1262 

27, 3565 

0003  1 

0 

TFFRTAl F 

SCPT(ALFA)  F:  (lO+NA)  R:  (9+NA) 

0485 

27,3566 

57201 

fl 

0 -3,2 

X2=-MA 

0486 

27,3567 

7767  1 

1 

CPV 

C(RFAC)  =NUW  SQRT(ALFA)  E:(-3)  OP  (-16) 

A0487 

R:(-3)  CR  (-15) 

A0488 

APS(CEN)  FROM  PDL+2  E:(-2)  OR  (-16) 

A0489 

Y:  (-3  ) OR  (-15  ) 

0490 

27 ,3570 

40145 

0 

CLOAC 

BOV 

(THE  DLCAD  IS  SHARED  RITF  TFFELL) 

0491 

REF 

4 

LAST 

1268 

27, 3571 

0CC43 

0 

TFFX 

NUR  E:  (-16)  OR  (-29)  M:(-15)  OR  (-27) 

0492 

RFF 

1 

27,3572 

5 76  53 

0 

TFFELL 

LSE  FGN  FCR  DELE  C-EC  90,  LEG  -90 

A0493 

CTFERR  ISF 

, CCRTINUE  FCR  GFNERAL 

CQMC  FOR  TFF  EQN 

0494 

27, 3573 

45471 

1 

PDV 

STADR 

A0496 

DFN  FRCR  PDL+0  E:  (-3)  CP  (-16) 

A0496 

R:  (-3)  CR  (-15) 

0497 

RFF 

4 

LAST 

126  8 

27, 3574 

77  732 

1 

StCRE 

TFFTER 

1 SAVE  FCR  SIGN  CF  SDELF. 
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19:09  AUG.  11,1969  SKIPPER  .097  PAGE  1269 


L 

TI  RF 

f F 

FREE 

FAt  L 

L SER*  S PAGE  NO.  12  £0  S3 

A0A98 

m 

1 

1A99 

27,  ?'575 

63406 

C 

PLSH 

DSC 

1 TO  FCLfO 

C500 

27,3576 

41206 

0 

PUSF 

OMP 

Z SC  TC  FDL  + 2 E:  (-261  M : (-241 

057  1 

REF 

C 

LAST 

1267 

27, 2'77 

0CC35 

1 

TFFNF 

LC  P E:  (-38F2NP)  M:  (-26+2NR1 

0502 

27, 3600 

75261 

c 

SL 

SIGN 

C5C3 

2 7,36.0  1 

20206 

I 

5 

1504 

REF 

5 

LAST 

1266 

27,3602 

0C045 

0 

TFFTEM 

AFFIX  SIGN  FOR  SCELF  (ENTRY  DISPLAY) 

0505 

REF 

6 

LAST 

1269 

27,3603 

14045 

0 

STOOL 

TFFTFR 

P ZSO  E:  (-59+2NP)  M:  (-55+2NR) 

A 0 50  6 

(ARG  IS  LSEC  IN  TFF/TRIG) 

A0507 

ZSC  FRCM  PCL+2  E:  (-26)  M:  (-24) 

C5CE 

27 ,3604 

41206 

0 

PUSF 

OMP 

RFSTPPE  PUSH  LOG. 

057  9 

REF 

6 

LA9T 

1266 

27,3605 

000  3 3 

1 

TFFALFA 

ALFA  E:  (26-NR)  M:  (24-NR) 

0 510 

27,3606 

776  5 7 

0 

SL* 

05]  1 

27,3607 

20  20  1 

0 

0, 1 

X 1 = -NR 

0512 

REF 

5 

LAST 

1266 

27, 361C 

CGC43 

c 

STORE 

TFFX 

X 

0513 

27,3611 

41234 

1 

RTB 

OMP 

0514 

REF 

1 

27,3612 

57735 

1 

T (X  ) 

PCLY 

A0515 

ZSC  FRCM  PFL+2  E:  (-26)  M:  (-24) 

0516 

27,3613 

443'I2 

3 

SR2 

BDSU 

2 ZSQ  T( >)  E : (-29)  N : (-27) 

0517 

RFF 

LAST 

1266 

27, 36  14 

OOC2  3 

0 

RTERM 

RTERM  F:  (-29)  N:  (-27) 

0518 

27, 3615 

41215 

1 

DAO 

OMP 

0519 

REF 

3 

LAST 

1268 

27,3616 

•30015 

0 

RMAGl 

F:  (-29)  M:  (-27) 

A052O 

Z FRCM  FCL+0  E:  (-131  M:  (-12) 

0521 

27,3617 

5104  2 

0 

SR3 

B FL 

TFF  SCRT(MU)  F:  (-45)  M:  (-42) 

0522 

REF 

1 

27,3620 

57641 

0 

E N CT  F F 

(NC  PLSh  UP  1 

0523 

27,3621 

75206 

1 

FLSH 

SIGN 

TF  F S CRT  (MU ) TC  PDL+0 

0 5 2 A 

RFF 

3 

LAST 

1268 

27,3622 

30017 

1 

TFFOl 

Cl  FCfi  GCNEFAST  TEST 

0575 

77,3623 

7 1244 

c 

8FL 

OLCAC 

GONE  PAST  ? 

0526 

PEF 

1 

27,3624 

5 7 64  5 

1 

NFGTFF 

YFS.  TFF  < 0 . 

0527 

PEF 

3 

LAST 

1264 

27,3675 

0'.3  32  7 

1 

tffi/alf 

1/ALPA  E:  (-22-2NA)  M:  (-20-2NA) 

0528 

27,3626 

5K76 

1 

CCCM 

BFL 

ALFA  > 9 ? 

0529 

RFF 

2 

LAST 

1269 

27,3627 

57645 

1 

MEGTFF 

NO.  TFF  IS  NEGATIVE. 

A0530 

CORRECT  FCF 

ORBITAL  PEF  ICC. 

0 531 

27,^630 

77676 

c 

CCCMF 

YES.  CCRPECT  FOR  CRB  PERICC. 

C532 

27,3631 

56  20  5 

0 

CMP 

DCV 

0533 

RFF 

r 

27,3632 

1 7 755 

c 

P 1/1  6 

2 FI  (-5  ) 

0 534 

REF 

3 

LAST 

1268 

27, 3633 

0003  1 

0 

TFFRTALF 

SCRT(ALFA)  E:  (10  + NA)  M:  (9-tN'A) 

0535 

27,3634 

53657 

0 

SL* 

SL* 

0536 

27, 3635 

5 7602 

1 

0 -4,2 

X2=-NA 

■ 0537 

27, 3636 

57602 

1 

0-4,2 

0 53  8 

27,3637 

43257 

0 

SL* 

CAC 

0539 

27, 3640 

57  5 76 

1 

0,2 

AC54'' 

TFF  SCRT(MU)  FRCM  POL+0  E:(-45)  M:( 

0541 

27.3641 

40005 

r 

enctff 

CNF 

PCV 

TFF  SCRT(MU)  IN  MFAC  F:(-45)  M:(- 

0542 

pep 

6 

LAST 

126  1 

27, 3642 

0^037 

0 

TFF /RTML 

E:  (17)  M:  (14) 

0543 

R = F 

1 

27 , 3643 

57651 

1 

MAXTFF 

SET  PCSMAX  IF  OVFL. 

0544 

27,3644 

776  16 

c 

DLMPTFF2 

RVe' 

RETURN  TFF  (-28)  CS  IN  MPAC. 
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L 

TIFF 

FF 

f REf 

FALL 

L SEP'  S PAGE  AC.  13 

EO  S3 

C5A9 

27,3645 

77745 

1 

NFGTFF 

CLCAC 

A 15A6 

TFR  SCR'^IPU)  FPF*'  PCL+O, 

AEGAT  IVE  . 

0 5A7 

27 ,3646 

77650 

1 

GOTO 

DEAE 

RFF 

2 

LAST 

126  9 

27,3647 

57641 

) 

EACTFF 

0549 

27, 3650 

77745 

1 

-MAYTFFI 

DLOAD 

RESET  PCI 

C550 

27,3651 

43  545 

1 

MAXT  E F 

CLOAC 

KVC 

0551 

REF 

4 

LAST 

1264 

27,3652 

1 7 7 7 1 

C 

NEAPCAF 

R0552 

TIFF 

CF 

FLIGHT  ELLlPSt  WMRN 

PEL  ( ECCENTRIC  ANCM ) 

C-FQ  90 

AND  LEQ  -9C. 

A0555 

NUN  FPCP  TFFX.  E : {-161 

OP  (-29) 

A 1554 

P:  (-151 

CP  (-27) 

0555 

27,3653 

7 77  1 2 

0 

TFFELL 

SL7 

NUP  E:(-14)  CP  (-27)  P: 

(-13)  CP  (-25) 

0 556 

27,3654 

41465 

c 

eccv 

PUSH 

TEAR  SAVE  C/K  IN  PCI  +C 

A0557 

DEN  FRCA  PCL+O  E:(-3)/(  16)  y:(-3)/(-15) 

AC55F 

N/C  TO  PFL  + C E:  ( 11  ) A : 

( 10) 

0559 

27, 3655 

45345 

1 

TFFELl 

DLCAC 

DSL! 

(EATER  WITH  C/N=0  IN  PCL+O) 

0560 

OFF 

7 

1 AST 

1269 

27,3656 

00045 

0 

TFFTEK 

C2  E:  (-16)  A:  (-15) 

0561 

REF 

4 

LA  FT 

126F 

27,3657 

00017 

1 

T FFCl 

Q 1 E : ( - 16  ) M;.  ( - 15  ) 

0562 

REF 

! 

27,3660 

14  ' 1 3 

0 

STCDL 

TFFDELQ 

C2-C1  F:  (-16)  A:  (-15) 

AG563 

D/A  FRCA  PCL+C 

0564 

27,366  1 

77626 

c 

STAFF 

0565 

RFF 

8 

LAST 

1270 

27,3662 

7 7 732 

1 

STORE 

TFFTFP 

C/A  E:  (11)  A:  (10) 

0566 

27,3663 

536'0  5 

1 

DMP 

SL# 

0567 

RFF 

4 

LAST 

1269 

27, 3664 

CCC27 

1 

TEFI /ALE 

1/ALFA  F:  (-22-2NA)  A:  ( 

-20-2NA  ) 

0568 

27, 3665 

57576 

1 

0 ,2 

1/ALFA  Z E:  (-11-NA)  A: 

(-10-AA ) 

0569 

27,3666 

41206 

0 

FUSE 

DPP 

TO  PDL+C 

0570 

PFF 

9 

L AST 

127C 

27,3667 

0C045 

0 

TFFTEV 

1/  Z F : (11 ) a;  (10) 

C57] 

27,3670 

41057 

u 

SL4 

BOVB 

0572 

27,3671 

57576 

1 

0 ,2 

X2=  -AA 

0573 

REF 

14 

LAST 

1210 

27,3672 

21713 

1 

SIGNMPAC 

IN  faSE  X=  1.0,  CCNTINLE 

0574 

REF 

6 

LAST 

1269 

27 , 3673 

00043 

0 

STORE 

TFFX 

X=1/ALFA  ISQ 

0575 

27,3674 

4 1234 

1 

RTR 

ONE 

0576 

REE 

2 

LAST 

1269 

27,3675 

57735 

1 

T(  X) 

POLY 

0577 

REF 

7 

1 AST 

127C 

27,3676 

00043 

n 

T FFX 

0578 

27,3677 

4 5 2 4 2 

1 

SR3 

DSL 

0579 

RFF 

1 

27  ,3700 

1 7763 

0 

DP2(-3 ) 

0580 

27,3701 

414..I5 

c 

C^F 

PUSH 

2(XT(X)-1)/ZALFA  E:( 

- 15-NA  ) 

A05R! 

w;  ( 

-14-NA  ) 

A05e2 

1/ALFA  Z RRI?A!  PDL  + 0 F : ( 

-11-AA ) 

A.J583 

M : ( 

- 10-NA  ) 

0584 

27, 3702 

41345 

0 

OLFAD 

DPP 

GET  SIGN  FCR  SCELF 

0585 

REF 

10 

LAST 

127C 

27,3703 

00045 

0 

TFFTEM 

1/Z  E:  ( 1 1 ) A:  ( 1C) 

0586 

R r ^ 

4 

L AST 

1269 

27  , 3 7 '4 

ocr.  15 

0 

P ^AG1 

E:  (-29)  a:  (-27) 

0587 

27,3705 

43312 

0 

SL2 

DAD 

0588 

PFF 

C 

LAST 

127C 

27,3706 

00017 

1 

TFFCl 

Cl  E:  (-16)  M:  (-15) 

0589 

RFF 

1 1 

LAST 

12  7'' 

27, 3707 

14045 

0 

STOOL 

TPFTEIV 

(Cl+P  1/2)  =SGA  CF  SCELF 

E : (-  16  ) M : (-  15 

059F 

RFF 

6 

I.AST 

1269 

27,3710 

00035 

1 

TFFNP 

LC  P E:  (-3e+2NR)  M:  (-36+2AR) 

059  1 

27,3711 

53  6C5 

1 

FRF  ■ 

SL* 

CALC  FCP  ARC-  FOR  TFF/TRTG 

• 
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0592 

PFF 

5 

LAST 

127C 

27,3712 

0593 

0594 

0595 

PEF 

12 

LAST 

1 27C 

27.3713 

27.3714 

27.3715 

0596 

0597 

REF 

13 

LA9T 

1271 

27. 3716 

27.3717 

A0598 

0599 

REF 

6 

LAST 

127  1 

2 7,  ">7  20 

060(] 
060  1 

RFF 

2 

LAST 

1 269 

27.3721 

27. 3722 

0602 

A0607 

A0604 

C6C5 

0606 

0617 

PEF 

2 

LAST 

1270 

27. 3723 

27.3724 

27.3725 

27. 3726 

06fe 

0609 

REF 

7 

LAST 

1271 

27, ->727 
27, 373C 

0610 
061  1 
0612 
061  3 

R9F 

3 

1 A$T 

12  70. 

27. 3731 

27 .3732 

27.3733 

27.3734 

0002  7 

1 

tffi/alf 

5 7 5 7 5 

1 

1 ,2 

53765 

0 

SIGN 

SI.4 

0G045 

.0 

TFFTEP 

57576 

1 

0 ,2 

14045 

0 

STOCL 

TFFTEP 

.OOC27 

1 

TFF 1 /ALF 

41  366 

1 

SORT 

DPR 

1 7755 

c 

FI  /16 

77615 

0 

CAD 

45257 

0 

SLA 

DSU 

57577 

C 

0-1,2 

009  13 

0 

TFFDELQ 

53605 

OC027 

1 

OMP 

SLA 

1 

TFFI/ALF 

5760  1 

1 

0-3,2 

52C57 

1 

SL* 

GCTC 

5 7 6C2 

1 

0 -4,2 

57641 

0 

ENDTFF 

1/ALFA  E:(-22-2NA)  N:(-2C-2NA) 

X2=-NA 

AFFIX  SIGN  FOR  SDFLF 

P/ALFA  E:(-E9<-2NP)  N:(-55  + 2NP) 

(ARG  FCP  USE  IN  TFF/TR  IG  ) 

1/ALFA  F:(-22-2NA)  M:(-20-2NA) 

FT  (-4) 

2(XT!X)-1)/Z  ALFA  FRCY  PDL  F:(-1E-NA) 

P:  (-14-NA ) 

C2-G1  E:  (-16)  p:  (-19) 

1/ALFA  E:  (-22-2NA)  P:(-20-2NA) 

TFF  SGRT(PU)  IN  PFAC  E;(-45)  P:(-42) 
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P061A 

FRCGFAP 

KAMF  : 

T ( X ) 

DATE  : 

01.17. 

67 

R0616 

MOP  NCI: 

0 

LCG  S ECT  ION: 

TIME  OF  FREE  FALL 

P161P 

MfC  6Y: 

RR  BA  IRNS FATFFR 

RQ61  9 

FLNC7ICNAL  CFSCPIFTICN: 

THE  PCI  YNCMAL  T (X  ) 

IS  USEE 

: BY  TIME  CF 

FLIGHT  SUBRCLTINES 

CALCTFF  AND 

R1621 

CALCTP'^R 

TC  APPROXIMATE  THE 

SERIPS 

R062? 

? 

3 

R0623 

] /3  -x/«s  +x 

n -X  /9 

• • 

• 

R062A 

WHFPE  X 

= ALFA  1 Z 

IF 

• ALFA  Z Z 

LEC  1 

R7625 

X 

= l/IALFA 

Z Z ) IF 

: ALFA  Z 2 

G 1 

R J626 

ALSO  X 

IP  NEG  FCR 

HYPERBOLIC 

CEBITS 

R0627 

X 

= 0 FOP  PARA30LIC  ORBITS 

R0628 

X 

IS  POSITIVE  FCR  ELLIPTIC  ORBITS 

R0629 

FOR  flight  278,  THE 

PCLYNOM! AL 

T ( X ) IS 

FITTED 

TVER  THE  RANGE  (0,+l 

) ANC  HAS 

A 

MAX  IMUM 

R0631 

CEV  lAT  KK 

FRCM  THE 

SERIES  OF 

2 E-5 

( T(  X) 

I S A CHEfiVCHEV  TYPE 

FIT  AND  PiAS 

CETAINEC  USING 

P,  16  3 3 

NAC  FRCGFAP  A UT C UP F I T 294 R RP 

AND  IS  VALID  TC  THF  SAME  TCLEFANCE  OVER 

TFF  RANGE 

1 

l-.08,+l).  ) 

R0635 

CALI  IKG 

SFQUPNCE: 

RTP 

R0636 

T (X  ) 

R0637 

CIMPACI  = 

X 

R3638 

SLEROLTINFS  FALLFC 

: NCN’E 

P C635 

NCRPAL  EXIT  pCHF: 

TC  CAMTG 

R06AQ 

AL  ARMS  : 

NOME 

R0641 

CLTPUT  : 

CIYPACI  = 

T (X  ) 

R0642 

ERASABLE 

TM TI  AL  1 ZAT  ICN  FEGLIFEC: 

R3643 

CCMPAC  ) 

= X 

R0644 

DEEP  IS  : 

NCNE 

0(45 

REF  7 

LAST  1181 

27,3735 

^ 72T5 

0 

T ( X) 

TC 

PCL  Y 

0646 

27,3736 

00004 

0 ^ 

DEC 

4 

N-1 

0647 

27,3737 

12525 

0 

2DEC 

3.333333333 

F-  1 

0647 

27, 3740 

12  52  5 

c 

0648 

27, 3741 

71463 

0 

2DEC^ 

-1.999819135 

F-  1 4 

0646 

27,3742 

57703 

1 

0649 

27,3743 

04423 

0 

2DEC4 

1 .418148467 

E-1  * 

0649 

27,3744 

17645 

0 

0650 

2 7,3745 

74604 

0 

2CEC» 

-1  .01310997 

E-1  « 

0656 

27, 3746 

4366  7 

1 

0651 

27,3747 

01626 

1 

2DEC» 

5.609004986 

E-2  4 

0651 

27,375C 

3 7 2'=6 

1 

0652 

27,3751 

77434 

1 

20EC^ 

-1. 536156925 

F-2  * 

065? 

27,3752 

52  77  1 

0 

0653 

RFF  60 

LAST  1203 

27,3753 

C 6C64 

0 

ENOT ( X) 

TC 

DANZIG 

0654 

REF  1 

27,3753 

TCCANZ  K 

= 

ENDTI  X) 

GAP:  ASSe^8LE  PtVISICA  lift  CF  AGC  FRCC-RAP  LUMINARY  BY  NASA  2CZUJ2-C71 

L TIME  OF  FFEF  fall 


1S:CF  ALG.  11,1969  SKIPFEF  .097  PAGE 
USER'S  PAGE  NO.  16  EC  S3 


P')655 

TFF  CrNSTAN'TS 

C656 

32 ,3764 

BANK 

32 

0657 

REF  2 

LAST 

46 

27,20CC 

SETLCC 

TCF-FFl 

0658 

27, 3754 

BANK 

A0659 

NOTE  _ NOTE  _ 6CJLSTED 

RUE 

FOR 

NEAR  FARTh 

A0660 

MLE 

3.990  815  471  ElO  M CL8E/CS 

SC 

A0661 

RTMUE 

= 

1.997702549  E5  B-IE*  MCCIFIED 

EARTH  RU 

A0663 

NOTE  _ note  _ ACJUSTEC 

FOR 

NEAR  earth 

A3664 

MUM 

= 

4.902  778  E8  F CLBE  /CS 

SC 

A0665 

RTMIIM 

2CEC* 

2.21422176  E4  B-  184 

0666 

27,3754 

06220 

1 

PI  /16 

2DFC 

3.141592653  B-4 

0666 

27, 3755 

37553 

0 

0667 

27,3756 

37777 

1 

LIM  (-22  ) 

2CCT 

37777  37700  l.C  -P(-22) 

0667 

27,3757 

37700 

1 

0668 

27,3760 

00000 

1 

CP (-22  ) 

20CT 

OCCOC  CCICC  B(-22) 

0668 

27, 3761 

CCICG 

C 

0669 

27,3762 

G40C0 

0 

DP2(-3  ) 

2DEC 

1 B-3 

C669 

27,3763 

ooono 

1 

0670 

27,  3 764 

C2CC0 

0 

0P2(-4) 

20EC 

1 B-4  1/16 

0670 

27, 3765 

00000 

1 

R0671 

RPAD  1 

20EC 

6373338  8-29 

M (■ 

-29  I 

=20  909 

' 901.5 

7 FT 

0672 

RFF  4 

LAST 

7 17 

23, 2337 

R PAn  1 

= 

R FAD 

0673 

27 ,3766 

00305 

1 

P 300K 

2CEC 

6464778  B-29  (-29)  N 

0673 

27,3767 

1 12C5 

r 

06  74 

27  , 3 770 

37777 

1 

NEARONE 

2DEC 

. 9<=9999999 

0674 

27,3771 

37777 

1 

0679 

REF  17 

LAST 

1239 

23,2523 

TFFZERCS 

fclals 

HiftZEPrs 

0676 

RFf  1 

23, 2513 

tffI/4 

EQUALS 

H lOPl  /4 

1273 
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L 

R0091 

R0003 

ROOOB 

R0C07 


R0008 

R0009 
ROOll 
ROC  13 
R0014 
R0016 
ROO20 
R0022 
R0024 
R1  )26 
RCC2E 
R0032 
R0033 
R0C3^ 
R0036 
R0037 


R0C38 

R3039 

R0041 


R0042 

R0043 

R0C44 

R0047 

R004B 

R0049 


R0C30 

R0051 
P0053 
RQ0B4 
R 0057 
R0059 


AGG  BLOCK  TIaO  SFLF-CHECK  USER'S  PAGE  NO.  1 EC  S3 

FPCGRAP  CESCPIDTICN  CATE  20  CFCEPBER  1967 

FRCGRAM  NAME  - SFLF-CHECK  LCG  SECTICN  AGC  BLCCK  TVC  SELF-CHECK 

MOO  NO  - 1 ASSEMBLY  SUBROUTINE  UTILITYM  REV  25 

MCE  EY  - CAUNTT 


FUNCTICNAL  GESCRIFTICN 

PROGRAM  HAS  TV.0  MAIN  PARTS.  TH=  FIRST  IS  SELF-CHECK  WHICH  RUNS  AS  A ZFRO  PRIORITY  JOE  WITH  NC  CORE  SET,  AS 
part  of  the  RAOK-UF  idle  LOCF.  the  SECCNC  IS  SHOW-EANKSUM  WHICH  RUNS  AS  A REGULAR  EKFCLTIVE  JOE  WITH  IIS  C V>  N 
STAi^TING  VERB. 

THF  PURPOSE  CF  SELF-CHECK  IS  TO  CHECK  OUT  VARTCLS  PARTS  CF  THi"  CCMFUTEP  AS  CUTLINEC  EELCW  IN  TFE  CPTICNS. 
THE  PURPOSE  OF  SHOW-BANKSU*'  IS  TO  DISPLAY  TFE  SUM  OF  EACH  BANK  , ONE  AT  A TIME. 

IN  ALL  THERE  ARE  7 POSSIBLE  CPTICNS  IN  THIS  BLCCK  II  VEFSICN  OF  SELF-CHFCK.  MICRE  CETAIL  CESCRIFTICN  MAY  EE 
FCUND  IN'  E-2065  BLCCK  II  AGC  SELF-CHECK  AND  SHOW  8ANKSUM  BY  EDWIN  D.  SMiALLY  DECEMBER  1966  , AND  ACCFNCA  2 ANC  3. 

THP  DIFFERENT  CFTIHNS  ARE  CCNTRCLLED  BY  PUTTING  CIFFEPENT  NUMBERS  IN  THF  SMCCF  RFGISTEP  (NCUN  27).  BELCH  IS 
A CESCRIPTION  OF  WFAT  PARTS  CF  THE  CCMPLTFP  THAT  ARE  CHECKED  EY  THE  CPTICNS,  ANC  THE  C C F R ES PC N C I N G NUMEER,  IN 
ClAL,  TC  LCAO  INTO  S"CCF. 

+ -■:  FRASABLF  MFMCRY 

+ -5  F IX  FC  MEMORY 

T- 1 ,2  ,3  ,6  ,7 ,1P  EVERYTHING  IN  CFTICNS  4 ANC  5. 

-■')  SAMF  AS  +-1C  UNTIL  AM  EFR9R  IS  CETECTEC. 

+0  NC  CHECK,  PUTS  CCMPU'^FR  INTO  THE  BACKUP  IDLE  LCCF. 


WARNINGS 

USE  0<^  E MEMORY  RES'^RVED  fqR  SELF-CHECK  (EVFN  IN  IDi  F LCCP)  AS  TEMP  STCPAGE  BY  CTHER  PROGRAMS  IS  CANCEROUS. 
SMCOE  SET  GREATER  THAN  CCT  10  PUTS  CCM°UTEP  INTO  BACKUP  IDLE  LOOP. 


CALLING  SFOUEMCF 

TC  CALL  SELF-CHECK  KEY  IN 

V 21  N 27  F CFIl CN  NCMECo  E 
TO  CALL  RHOW-EANKSUM  KEY  IN 

V 91  E ''TSPIAYS  FIRST  BANK 

V 33  E PRCCEED,  DISPLAYS  NEXT  BANK 


EXIT  MCCES,  NORMAL  AND  ALARM 

SELF-CHECK  NCFMALLY  CCNTINUES  INCEFIMTELY  UNLESS  THERE  IS  AN  ERROR  CETECTEC.  IF  SO  + CPIICN  NLMBERS  FLT 
CCMFUTEP  INTO  EACKUP  IDLF  LOOP,  - OPTICN  NUMBERS  RESTART  THE  CPIICN. 

THF  -0  CPIICN  PFCCFECS  FFCM  THE  LINE  FOLLCWTNG  THP  LINE  WHERE  THF  EPRCR  WAS  DETECTED. 

SH0W-3ANKSLM  PRCCEEOS  LNTIL  A TprmINATE  IS  KEYED  IN  (V  34  p).  TFF  CCMPUTER  IS  PUT  INTO  THE  BACKUP  IDLE  ICCP 


RCC6C 


CL1FLT 


GAP: 


ASSe^3LE  FPVISIOK  lit  CP  A GC  FRCGPAvi  LLMINARY  BY  NASA  20^1112-C7l 


1<;:CS  AUG.  11  ,1969  SKIPPER  .097  RAGE  1275 


AGC  8LCCK  SE1.F-CHFCK 


USER'S  PAGE  NO. 


EC  S3 


R0061  S'^L'^-CRErK  UPON  OFTFCTING  AN  ERROR  LCACS  TRE  SELF-CHFrK  ALARY  CONSTANT  (01102)  INTC  THE  FAILREG  SET  ANC 
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LAST 

1282 

43,3705 

3 

4 753 

1 

0426 

RFF 

1 

43,37C6 

C 

3 56  4 

c 

0427 

REF 

1 

43,3707 

3 

4745 

0 

0428 

REF 

2 

LAST 

128? 

43,37  10 

0 

3 546 

c 

042  9 

REF 

13 

LAST 

1282 

43,3711 

3 

13  74 

r 

0430 

9FF 

10 

1 AST 

128  2 

43,3712 

1 

4 3 50 

1 

0431 

REF 

5 

LAST 

4 3 9 

43,3713 

c 

433  1 

1 

0432 

RFF 

228 

L AST 

128  1 

43,3714 

54 

001 

! 

CGNT  INU 


AORS+1 


NKTBNK 


17T02C 


CFKSUFR 


27T030 


NKTSLPR 

GOKXTENK 


SOP T ION 


ASA  20  2 

1112-071 
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TC 

CCNTINL  +1 

AC  IN  TFE  eUGGER  WCRC 

CA 

S +1 

MAKE  SLPE  TWC  CCNSECLTIV/E  TC  SELF  WCRCS 

TS 

SKEEP5 

CCS 

SKFEF6 

« 

CCS 

NEWJCB 

X-  +1,  SFCWSLM 

IC 

ChAN'C-l 

X- 

TC 

+ 2 

x= 

TC 

CFFCKNJ 

-C  IN  SKEEP6  FOR  RnpFCt-K 

INCR 

SKEEF3 

CCS 

SKEEP7 

TC 

CCRACRS 

TC 

C C'^ADRS 

TC 

FXADRS 

TC 

FXAORS 

CS 

SKFFP4 

AC 

E XTENC 

LSTRNKCF 

LAST  BANK  TC  BE  CHECKEC 

B7F 

ENDSLMS 

ENC  CF  SLMMNG  CF  BANKS. 

CA 

SKEEF4 

AD 

SB! 911 

TS 

SKEFF4 

37  TP  4C  INCRMTS  SKEEP4  BY  END  ENC  CAPFY 

TC 

CHKSMPR 

CA 

SBI T15 

ACS 

SKFEP4 

SET  FOR  BANK  20 

TC 

GCNXTBNK 

RASK 

EXTEND 

MS 

BZF 

N XTSL  PR 

INCREMENT  SUPER  BANK 

AD 

EXTEND 

S 13BITS 

BZF 

+ 2 

BANK  SET  FCP  30 

TC 

GCNXTBNK 

CA 

SIXTY 

FIRST  SUPER  BANK 

ADS 

SKFFP4 

TC 

GCNXTRNK 

AD 

SLPRCCN 

SET  BNK  30  4 INCR  SUPR  ENK  ANE  CANCEL 

ACS 

SKEEP4 

ERC  BIT  OF  THE  37  TO  4C  ADVANCE. 

CCS 

SKFEF7 

TC 

C CMMF  X 

CA 

S M 

TC 

FXFX 

CA 

S6IT7 

HAS  TC  EE  lAFCER  THAN  NC  CF  FXSW  EANKS. 

TC 

CCMMFX 

CA 

SKFEF4 

MASK 

HIS 

= BANK  BITS 

TC 

LEFTS 

TS 

L 

BANK  NLMEEP  BEFCPE  SUPER  EANK  ' 

GAP: 


^SS£^eLP  RFVISION  116  CF  AGO  PROGRAM  LUMINARV  B>  NASA  2021112-01 


L 4GC  BLCCK  TWO  SELF-CHFCK 


0A33 

REF 

14 

LAST 

1282 

43,3715 

•3 

1374 

C 

CA 

SKFEF4 

T43A 

REF 

1 

43,3716 

7 

435  7 

0 

MASK 

SEBITS 

PA35 

43,3717 

0 

0006 

1 

EXTENC 

0A36 

R = F 

1 

43, ’72C 

1 

3 726 

c 

EZF 

SEPT 

0A37 

REF 

23 

LAST 

1280 

43 ,3721 

54 

321 

0 

TS 

SR 

n^->e 

REF 

229 

LAST 

1282 

43  , 3722 

3 

0001 

c 

CA 

L 

0A3  9 

RFF 

18 

LAST 

1276 

43,3723 

7 

4 7 5 7 

1 

MASK 

SEVEN 

OAAC 

REF 

24 

LAST 

1283 

43,3724 

6 

0021 

1 

AD 

SR 

0 44  1 

R'=F 

230 

LAST 

1283 

4? ,3725 

54 

001 

1 

TS 

L 

0442 

REF 

6 

LAST 

1282 

43, 3726 

3 

1376 

1 

SORT 

CA 

SKEEP6 

0443 

43,3727 

C 

C006 

1 

EXTENC 

0444 

43,3730 

1 

3732 

c 

BZF 

+ 2 

0446 

REF 

1 

43,3731 

0 

313J 

0 

TC 

SDISPLAY 

0446 

RFF 

18 

LAST 

1281 

43,3732 

1 1 

”7  1 

1 

CCS 

SKEEPl 

04461 

43, 3733 

0 

3 735 

c 

TC 

+ ? 

C4462 

43 ,3734 

0 

3736 

0 

TC 

+ 2 

04463 

REF 

9 

LAST 

1282 

43,3735 

6 

4753 

1 

AO 

S+1 

04464 

REF 

19 

LAST 

1283 

43,3736 

55 

'371 

1 

TS 

SKFFPl 

044  7 

REF 

23  1 

LAST 

1263 

43,3737 

4 

0001 

1 

BNKCHK 

CS 

L 

0448 

REF 

20 

LAST 

1283 

43,  3 740 

6 

1371 

0 

AD 

SKEEFl 

044S 

RFF 

2 

LAST 

1281 

4 >,3  741 

6 

7752 

0 

AC 

S-1 

0450 

REF 

5 

LAST 

128F 

43,3  74  2 

0 

3314 

1 

TC 

-ICHK 

0451 

RFF 

2 

LAST 

20  1 

43,3743 

0 

36  54 

c 

TC 

NXTBNK 

0454 

REF 

22 

LAST 

128  2 

■106  7 

EBANK= 

NEWJCB 

0455 

43, 3744 

66100 

0 

LSTBNKCH 

BBCCN* 
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LSFP' S PAGE  AC.  10  E2  SA 


= SLPER  EAKK  FITS 

EFFCRE  SOPER  EAAK 
SUPER  BANK  NECESSARY 


BANK  NUREER  WITP  SUPER  BANK 
* 

* 

* CN  -0  CONTINUE  WITH  RCPE  CHFCK. 

* CN  +I  GC  TG  CISFLAY  CF  SUN. 
FCFCF  SUP  TO  ABSOLUTE  VALUE. 


= - BANK  NUMBER 


CHECK  SUP 


* constant,  last  bank 


GAP:  ^SSE*^BLE  REVISION  116  CP  AGO  PRCGRAf^  LUMINARY  BY  NASA  2021I12-L71 


L PHASE  TABLE  MAINTENANCE 


PTOOl  SUBRCUTTfvjE  JH  UPDATE  THE  PRCGRAM  NUNBEP  DISPLAY  CN  THE 


0002 

RFF 

1 

COUNT* 

$$/PHASE 

nno^ 

5311 

PLCCK 

0 2 

000* 

RFF 

1 

4000 

SFTLCC. 

FFTiGi 

CC»'5 

531  1 

BANK 

0006 

REF 

3 3 1 

LAST 

12PL 

5311 

50  0C2 

o 

AEkRCCEX 

INCEX 

0 

0CO7 

5312 

3 0000 

1 

CAF 

0 

CCCR 

ref 

3 3 2 

LAST 

1284 

5313 

24  007 

0 

INCP 

Q 

)')09 

REF 

20 

1 AST 

1222 

5314 

55'Cl'’ 

0 

NRkNOCEA 

TS 

8CCREG 

001 A 

5315 

3 5320 

0 

NMDSPLAY 

CAF 

+ 3 

00  15 

REF 

4C 

LAST 

1204 

5316 

22  006 

1 

FREBJUNF 

IXCF 

BEANK 

0016 

RFF 

16 

LAST 

1215 

53  17 

1 4640 

0 

TCF 

BANK  JLN  F 

C017 

RFF 

1 

5320 

7'12  13 

0 

CACR 

SETUPOSP 

Rooia 

RETURN  TO 

caller  +3 

IF  8C0E 

= 

THAT  AT  CALLER  -tl.  CTFERUSE 

0020 

REF 

333 

LAST 

1284 

5321 

50  002 

0 

Ct-ECKNN 

INDEX 

Q 

CC21 

5322 

4 oono 

0 

CS 

0 

0022 

REF 

21 

LAST 

1 284- 

5 3 2 3 

6 1010 

1 

AD 

PCDREG 

0023 

5324 

0 0006 

1 

EXTEND 

002'i 

REF 

Q 

LAST 

1C97 

5325 

1 6744 

1 

EZF 

Qi2 

00  25 

REF 

5 

LAST 

889 

5326 

1 6 7 4 2 

1 

TCF 

C + L 

nc26 

REF 

4 

L «ST 

1284 

6745 

TCC 

= 

Q+2  +1 

0077 

1 4 , 7 7 7 5 

BANK 

14 

002R 

RFF 

1 

1 1, 2000 

SETLCC 

PHASFTAB 

CC2  9 

10,2213 

BANK 

0030 

REF 

1 

COLNT* 

$S/PHASE 

0031 

1.),  2213 

0 0004 

0 

■ SETUPDSP 

INHINT 

0932 

REF 

4 6 

LAST 

985 

1 1,2214 

52  071 

:1 

CXCH 

RUPTPEGl 

0033 

REF 

1 1 

LAST 

1C91 

10, 2215 

3 4 3 5 5 

0 

CAF 

PRTC30 

0C34 

REF 

26 

LAST 

1113 

10,2216 

0 5172 

1 

TC 

NOVAC 

0035 

RFF 

2 2 

LAST 

1284 

1010 

EBANK= 

MCCREG 

0036 

REF 

1 

10, 2217 

03577 

1 

2CA0R 

D SPNR JOB 

0036 

R‘=F 

■ 1 

10,2220 

6110  7 

1 

0037 

RFF 

47 

LAST 

1284 

10,2221 

52  C71 

c 

CXCH 

PLPTPFGl 

0038 

lo; 2222 

0 0003 

1 

RELINT 

1039 

RFF 

23 

LAST 

1257 

10,2223 

52  C06 

0 

CXCH 

Z 

0040 

REF 

2 

LAST 

459 

4 1,  3577 

DSPM8 JCB 

ECLAL  S 

OSPNN JB 

QC41 

532  7 

BLOCK 

12 

0042 

0043 

RFF 

2 LAST  1284 

4000 

5327 

SETLCC 

BANK 

FFTAGI 
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USER*  S PAGE  NC.  1 EO  S4 


UPCATE  MCDREG.  ENTRY  PCR  MflOE  IN  FI>ED. 

..e 


ENTRY  FCP  MCCE  IN  A. 
DISPLAV  NAJCR  MCDE. 
PUTS  BBANK  IN  L 
PUTS  Q INTC  A 


RETURN  TO  CALLER  -»2. 


NC  MATCH 


SAVE  CALLER-S  RETURN  2CADR 

EITHER  A TASK  CP  JCE  CAN  COME  TO 
NEWNCDEX 


RETURN 


\ 

1 

i 

1 

1 

1 

i 

\ 

1 

\ 

< 

( 


I 
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L dhASE  table  YAIMENANCE  LSFR'S  page  NC.  2 EG  SA 

POOAA  PFASCFKG  IS  THE  PAIR  RAY  CE  RAKING  PHASE  CHANGES  FCR  RFSTAPTS.  THFRE  ARE  THREE  FCRYS  OF  PHASCFNG,  KNDRN  AS  TYPE 

R0O46  A,  TYPE  B,  ANn  TYPE  C.  THEY  APR  ALL  CALLFr  AS  FOLLOWS,  WHERE  CCT  XRRKX  CONTAINS  THE  F|-asE  INFCPNATICN, 

ACCAE  TC  PHASCFNG 

A0049  CCT  XXXXX 


R0050  type  a is  CCNCERN'EC  WI^H  pixel  PHASE  CHANGES,  THAT  IS,  PHASE  INFORM  A T I ONTH  A T IS  STCREC  PERMANENTLY.  THESE 
RG052  npTIONF  ARE,  WHEP.F  G STANDS  FCR  A GROUP  ANC  .x  FTP  ''HF  PHASE, 


PQ053 

R0C55 

RT057 

P0059 

R006G 


G .D 
G.l 

G.EVEN 


C.rCC  NFT 


INACTIVE,  WILLNCT  PCRMT  A GRCLF  G RESTART 

WILL  CAUSF  THE  LAST  CISPLAY  TO  BE  REACTIVATED,  USED  MAINLY  IN  MANNED  FLIGHTS 
A DCLPLE  TABLE  RESTART,  CAN  CAUSE  ANY  CCMEINATICN  CF  TWO  JOBS,  TASKS,  AND/CR 
LONGCALL  TO  BE  RESTARTED. 

A SINGLE  TABLE  RESTART,  CAN  CAUSF  EITHER  A JOE,  TASK,  CR  LCNGCALL  RESTART 


RD06  2 

THIS 

INFORMATION  IS  PUT  INTO  THE  CC.TAL 

WORD  AFTfr  TC. 

PHASCHNG  AS  i 

R0063 

TLO  OOF  PPP  PRP  GGG 

R0065 

WHERE 

EACH  LETTER  OR  NUMBER  STANDS  FCR 

A EIT,  THE  C-: 

S STAND  FCR 

ROH67 

CCTAL 

■ - L27.  n:S  MUS"^  Bt  0. 

IF  ONE  WISHES  TO  HAVE 

RCC6S 

T I ' 

S^l  TC  1,  OTHERWISE  IT  IS  SET  TC  0 

. simiaply  if 

ONE  WISHES 

ROD?  1 

IT  IS 

RET  TO  C.  SOME  EXAMPLES, 

A0072 

TC 

PHASCHNG 

A0073 

CCT 

00003 

ADD74 

TC. 

PHASCHNG 

ACC75 

OCT 

000 12 

ADD  76 

TC 

PHASCHNG 

A0C77 

CCT 

4CC64 

ADC78 

A 1079 

AOCBC 

TC 

PHASCHNG 

AOOBl 

CCT 

20135 

AD082 

A0083 

A0084 

TC 

PHASCHNG 

A3085 

OCT 

6C  124 

A00B6 


- 7,  THE  P:S  FOR  THE  PHASE, 
G TO  BE  SET  AT  THIS  TIME, 
-N  L IS  SET  TC  1,  CTHERUSE 


THIS  WILL  CAUSE  GRCUP  3 TCEE  S TC  0, 
MAKING  GROUP  2 INACTIVE 

IF  A RESTART  OCCURS  THIS  WOULD  CAUSE 
GROUP  2 TO  RESTART  TH‘=  LAST  DISPLAY 

THIS  SETS  THE  TBASE  OF  GROUP  A AND  IN 
CASE  CF  A RESTART  WOULD  START  UP  THE  TWC 
THINGS  LOCATED  IN  THE  DCUBLE  A. 6 RESTART 
LCCAT  ICN 

THIS  SETS  LCNGSASE  ANC  LFCN  A RESTART 
CAUSES  5.13  TC  BE  RESTARTED  (SINCE 
LCNGPASE  WAS  SET  THIS  SINGLE  ENTRY 
SHOULD  BE  A LCNGCALL) 

SINCE  ECTH  TPASEA  AND  LONGBASE  ARE  SET, 
A. 12  SHCLLC  contain  BOTH  A TASK  ANC  A 
LONGCALL  TC  BE  RESTARTEC 


RD087  TYPE  C PHASCFNG  CFN7AINS  THE  VARIABLE  TYPE  CF  PHASCHNC-  INFORMATION.  INSTEAC  CE  TEE  IN'^CPMATICN  BEING  IN  A 

P0C89  permanent  FORM,  rNf  STORES  the  CESIREC  RESTART  INFORMATION  IN  A VARIABKE  LOCATION.  THE  BITS  ARE  AS  FCLLCWS, 


P 1C9  I 


TLO  lAO  XXX  CvW  GGG 


RD092  WEEPE  EACH  L'^TTOR  cR  NO'.'PER  STANDS  FOR  A PIT.  THE  G:S  STAND  FOR  THF  GRCUP,  OCTAL  L - 7.  IF  THE  RESTART  IS  TC 

R0C9A  BE  BY  WAITLIST,  W IS  SET  TC  I,  IF  IT  IS  A JOB,  J IS  SET  TC  1,  IF  IT  IS  A LONGCALL,  C IS  SET  TD  1.  ONLY  CNE  CF 

R0096  THESE  THREE  ETT  S MAY  BE  X:S  ARE  IGNCRED  1 MUST  EE  1,  ANC  C NLST  BE  0.  AGAIN  T STANDS  FCR  THF  TBASE, 
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L PHASE  TABLE  PAINTENANCF  LSFF'S  PAGE  NC.  3 EO  SA 

R0098  AND  L FCR  LCNGBASE.  ThF  BITS  A AND  C ARE  CCNCEPNED  WITH  THE  VARIABLE  INFORMAIICN.  IF  D IS  SET  TC  1,  A FRICPITY 
ROIOO  CR  DELTA  TIME  WILL  BE  READ  FRCM  THE  NEXT  LCCATICN  AFTER  THF  CCTAL  INFGRHATICN,  IF  THIS  IS  TC  EE  INDIRECT,  THAT 
ROin?  IS,  THE  NAME  GF  A LCGATICN  CCNT+ININ'G  THE  INFCRMATION  (DELTA  TIME  ONLY),  THEN  THIS  IS  GIVEN  AS  THE  -GENADR  CF 

POl'JA  that  LCCATICN  WHICH  CCNTAINS  THE  DELTA  TINE.  If  THE  CLC  PRICRITY  CP  DELTA  TINE  IS  TC  BE  USED,  THAT  WHICH  IS 

R0106  already  in  THF  VARIABLE  STORAGE,  THFN  C IS  SET  TO  G.  NEXT  THE  A BIT  IS  USED.  IF  IT  IS  SET  TC  0,  THE  ADDRESS 

RDlCfi  THAT  WCLLO  BE  RESTARTED  DURING  A RESTART  IS  THE  NEXT  LOCATION  AFTER  THE  PHASE  I NFOR M " T I C N , THAT  IS,  FTTHER 

R)110  (TC  PHASCHNG)  +2  OP  <-3,  DEPENDING  ON  WHETHER  D HAD  BEEN  SET  CR  NOT.  IF  A IS  SET  TC  1,  THEN  THE  ADDRESS  THAT 

P)112  WCULD  BE  RESTARTPC  IS  THE  2CACR  THAT  IS  READ  FRCM  THE  NEXT  TWO  LOCATIONS.  EXAMPLES, 


A 1 1 1 4 

AD 

TC 

PHASCHNG 

THIS  WCULD  CAUSE  LOCATION  AD  +3  TC  BE 

AU15 

AC+1 

OCT 

05. >2  3 

RFSTARTFC  BY  GPCUP  THREE  WITHA  PRIORITY 

A0116 

AC  + 2 

OCT 

23000 

CF  23.  NOTE  LPCN  RETURNING  IT  WCLLC 

A0117 

AC  + 3 

ALSC  GC  TO  AC+3 

ATI  1 8 

AC 

TC 

PHASCHNG 

GROUP  1 WCULC  CAUSE  CAUSE  CALLCALL  TC 

A01  19 

AC  + 1 

CCT 

27441 

BE  STARTED  AS  A LONCCALL  FRCM  THE  TIME 

A012D 

AF  + 2 

-GENADR 

DELTIME 

STCPEC  IN  LCNGBASE  (LCNGBASE  WAS  SET)  EY 

AD121 

AD  + 3 

2CACR 

CALLCALL 

A OELIATIME  STCREC  IN  CELTIME.  THE 

AO  12  2 

AC+4 

BBCCN  CF  THE  2CACR  SHOULD  CONTAIN  THE  E 

AO  123 

AC+5 

BANK  CF  DELTIME.  FHASCHNG  RETURNS  TC 

A0124 

LOCATION  AO+5 

R0125 

NOTE  THAT  IP  A VARIABI'’  PRTCPITY  IE  GIVEN  FOR 

A JCB,  THE 

■ JCB  WILL 

EE  RESTARTED  AS  A ncVAC  IF  the  PRIORITY  IS 

R'1127  NEGATIVE,  AS  A FINDVAC  IF  THE  RRIORITY  IS  POSITIVE. 


R0128  "Pype  R PHASCHNG  IS  A CCM3INATICN  CF  VARIABLE  ANC  FIXEC  PHASE  CHANGES.  IT  WILL  START  UP  A JOB  AS  INDICATED 
R013I'  BELCW  AND  Al  SO  START  UP  ONE  FIXED  RESTART,  THAT  IS  FTTHER  AN  G. 1 CP  A G.CCC  CP  THE  FIRST  ENTRY  CF  G.EVEN 
R0132  D0L3LF  ENTRY.  THF  BIT  INFCRMATICN  IS  AS  FCLLCWS, 

P0133  Til  OAP  FPP  PRO  GGG 


R'H34  WHERE  EACH  LETTER  CP  NUMBER  STANDS  FOR  A BIT.  THE  G:S  STAND  FOR  Thf  GROUP,  OCTAL  1 - 7.  THE  F:S  FCR  TFE  FIXED 
RD136  PHASE  INFORWatidn,  OCTAL  O - 127.  I ^LST  BE  1.  AND  AGAIN  T STANDS  FOR  THF  TBASE  AND  L FCR  LCNGBASE.  C THIS 

R0138  TIME  stands  ONLY  FOR  PRIORITY  SINCE  THIS  WILL  BE  CCNSICEREC  A JCB , ANC  IT  MUST  EE  GIVEN  CIRECTLY  IF  GIVEN. 

R0140  AGAIN  A S'pANCS  FCR  THE  ADDRESS  CF  THE  LCCATICN  TO  PE  RESTARTED,  1 IF  THE  2CADR  IS  GIVEN  , CR  0 IF  IT  IS  TC  EF 
R'T142  THE  NFXT  L OC A T I CN . ( T HE  RETURN  LCCATICN  CF  FHASCHNG)  EXAMPLES, 


A 1143 

AC 

TC 

PHASCHNG 

AQ144 

AC  + 1 

CCT 

56043 

AT145 

,Ar+2 

CCT 

31000 

A0146 

AD  + 3 

2C.  ADR 

AJOBAJOB 

A0147 

AC  + 4 

AT148 

AC+5 

A0149 

AD 

TC 

PHASCHNG 

AD15U 

AD  + 1 

CCT 

10015 

AD151 

AF  +2 

AO  152 

TBASE  IS  SET  ANC  ARESTART  CAUSE  GRCLP  3 
TO  start  THE  JOB  AJC8AJCB  WITH  RPICRITY 
31  AMC  THE  FIRST  ENTRY  CF  3.ASFCT(WF  CAN 
ASSUME  IT  IS  A TASK  SINCE  WE  SET  TFASE3) 
UPON  PFTURN  FROM  PHASCHNG  CCNTRGL  WCLLC 
GC  TC  AC+5 

UPON  A RFSTART  THE  LASl  DISPLAY  WCLLC  BE 
RESTARTED  ANC  A JOB  WITH  THE  PREVICLSLY 
STORED  PRICRITY  WCULD  EE  EEGIIN  AT  AC+2 
BY  MEANS  OF  GROUP  5 
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I.  PHASF  table  pAINTFKJaNCE 

RJ153  THE  NCVAC-FINDVAC  CECICE  FCR  JCES  ECLCS  FERE  ALSC 


R0155  SUMMARY  OF  BITS 


R01S6 

TYPE  A 

TLO 

OOP 

PPP 

PPP 

GGG 

R0157 

TYPE  e 

TLl 

CAP 

ccF 

F F F 

GGG 

R0158 

TYPE  C 

TLO 

lAD 

XXX 

C Jk 

GGG 

USER ' S P AGE  NO 

NEGATIVE  ORIORIIY  CALSFS  A NCVAC  CALL, 


. A 

FCSITIVE 


EG  SA 
FINCVAC. 
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L PHASE  TABLE  MAINTENANCE  USER'S  PAGE  NO.  5 EC  SA 


P0159 

2PPSCPAG  IS  USEC  NPEN  ON’R  WISHES  TO 

START  UP  A group  CR 

CHANGE  A 

GPCLF 

WHILE  LNCER  THE  CCNTRCL  CF  A CIFFERENT 

R016I 

GROUP. 

FOR  EXAMPLE, 

CHANGE  THE  PHASE 

CF 

group  3 

WHILE  THE  PORTION 

OF  THE  PROGRAM  IS  UNDER  GROUP  5.  ALL  2FHSCHNG 

R0I63 

C6LLS  ARE  MAOF  IN  THE  F^LL^VlI^G  HiNNEPf 

A 1164 

TC 

2PHSCHNG 

AG  165 

CCT 

XXXXX 

AO  166 

CCT 

YYYYY 

R 1167 

WHERE  rCT  XXXXX  "LST 

BE  CF  TYPE  A ANC  CCT  YYYYY 

MAY  BE 

OF  EITHER 

TYPE  A 

CP  TYPE  B CP  TYFEC.  THERE  IS  CNE 

R0169 

GIFFERENCF  NOTE- 

IF  LONGBASE  IS 

TC 

8F  SET  THIS  INFCPMATICN  IS 

GIVEN 

IN  the  GC’  YYYYY  INFORMATION,  IT  WILL 

RJ171 

86  GISREGARCFC  IF  GIVEN  WIFH 

the  OCT 

XXXXX  INFDRMATICN. 

A COUPLE 

CF  EXAMPLES  NAY  HELP, 

AOl  73 

AC 

TC 

2PHSCHNG 

SET  TBASE3  AND  IF  A RESTART  CCCLRS  START 

A0174 

AC+1 

CCT 

400  83 

THE  TWC  entries  IN  3.8  TABLE  ICCATICN 

AOl  75 

AC  + 2 

OCT 

05025 

THIS  IS  CF  TYPE  C,  SET  THE  JCB  TC  BE 

A0176 

AC+3 

CCT 

1 aouo 

TO  BE  LCCATION  A0<-4,  WITH  A PRIORITY  16, 

A0177 

AD  + 4 

FCF  GFCUP  5 PHASE  INFCPMATICN 

017  6 

REP  1 

COUNT'S 

1 f /PHASE 

0179 

5327 

0 0004 

0 

2PHSCHNC 

INH  1 NT 

THE  ENTFY  FOR  A DOUBLE  PHASE  CHANGE 

0180 

REF  334 

LAST  1284 

5 3 3i' 

50  ‘‘2 

r 

Nnx 

0 

ciei 

53  31 

3 0000 

1 

CA 

0 

0182 

REF  335 

LAST  1286 

53  32 

24  CC2 

c 

INCR 

C 

0183 

REF  I 

5333 

54  072 

0 

TS 

T9MPP2 

0184 

REF  1 

5334 

7 4757 

1 

MASK 

CCT7 

0185 

5335 

6 0000 

I 

OCUBLE 

0186 

REF  1 

5336 

54  .07  1 

0 

TS 

TFMPC-2 

0187 

REF  2 

LAST  12PF 

5337 

3 CC72 

1 

CA 

TEMFF2 

0188 

REF  1 

534  ) 

7 50  3U 

0 

MA  SK 

0CT17770 

NEED  CNLY  177G,  BUT  WHY  GET  A NEW  CCNST. 

C189 

5341 

0 0006 

1 

EXTEND 

019.1 

REF  32 

LAST  1275 

5342 

7 4740 

1 

MF 

BIT12 

0191 

REF  3 

LAST  1288 

5343 

56  072 

1 

XCH 

TEMPP2 

0192 

R9F  43 

LA'T  1275 

5344 

7 4735 

0 

MASK 

0193 

REF  1 

534  5 

5 4 0 66 

c 

TS 

TEMPSW2 

INCICATES  WHETHER  TO  SET  TBASE  CR  NCT 

01932 

ref  336 

LAST  1288 

5346 

50  002 

0 

INDEX 

Q 

01934 

5 34  7 

3 CCCC 

1 

CA 

0 

01936 

REF  337 

LAST  1288 

5351. 

24  0C2 

c 

INCR 

e 

C1936 

REF  1 

5351 

54  065 

0 

TS 

T FMPSW 

0194 

R9F  1 

5 3 52 

1 5 36  3 

c 

TCP 

PHAS  JLM  F 

0195 

5353 

0 0004 

0 

PHASCHNC- 

INH  INT 

NCPMAL  FHASCHNG  ENTRY  FCINT. 

0196 

ref  338 

LAST  1286 

5354 

50  CC2 

0 

INDEX 

C 

0197 

5355 

3 CCQO 

1 

CA 

0 

0198 

REF  339 

LAST  1288 

5356 

24  ) 12 

0 

INCR 

0 

0199 

5357 

C CC04 

0 

PHSCHNGA 

INHINT 

FIRST  CCTAL  parameter  IN  A. 

G4P; 
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PHASF  TiPlF  PAIMENAFCE 


02DD 

REF 

2 

LAST 

1288 

5360 

54  065 

0 

TS 

TENPSW 

02  U 

RFF 

127 

1 AST 

1257 

536  1 

3 4753 

1 

CA 

CAE 

02015 

PEF 

2 

LAST 

1288 

5362 

54  066 

0 

T S 

TENPSW2 

0202 

5363 

0 0006 

1 

PHAS  JUPP 

EXTEND 

020  3 

REF 

1 

5364 

3 5 3 6 7 

0 

CCA 

ADRPCHA2 

Q20A 

5355 

5 2 006 

n 

CTCB 

0205 

RFF 

A7 

LAST 

1276 

E 3 , 140C 

EEAAH= 

LSTl 

0206 

REF 

1 

5366 

0 2 2 2 4 

1 

ADRPCHN2 

2CADR 

PHSCHNG2 

02D6 

REF 

1 

5367 

2 )1)3 

1 

0 20  7 

REF 

1 

5370 

22  073 

0 

CNECRTWr 

IXCH 

TEPPPECA 

0208 

PEF 

41 

LAST 

1284 

5371 

22  006 

1 

LXCH 

BBANK 

0209 

REF 

2 

LAST 

1289 

5372 

22  '’73 

c 

LXCH 

T ERPeeCA 

0210 

PEF 

1 

- 5373 

7 5-24 

0 

NA.  SK 

OCT14000 

021  1 

PEF 

388 

1 AST 

1281 

5374 

10  000 

0 

CCS 

A 

02  12 

REF 

1 

5 3 7 5 

1 7 7 53 

c 

TCP 

CHECKE 

0213 

RFF 

1 

5376 

3 0C62 

0 

CA 

TERPP 

021A 

PFF 

41 

1 AST 

1275 

5377 

7 4745 

1 

RASK 

B ITT 

0215 

REF 

389 

LAST 

1289 

540C 

1C  OOC 

r 

CCS 

A 

0216 

REF 

1 

54T1 

1 5423 

0 

TCF 

GETPPIO 

0217 

REF 

1 

5402 

50  061 

0 

CLCPPIC 

ACX 

T ENPG 

02  IP 

REF 

1 

54)3 

3 105  1 

1 

CA 

PH5PRCTL 

0219 

PEF 

1 

5404 

54  070 

1 

TS 

TEMPPR 

0220 

R = F 

2 

LAST 

1289 

5405 

3 CC62 

c 

CCAl 

CA 

TERPF 

0221 

REF 

39 

LAST 

1275 

5406 

7 4744 

0 

VA.SK 

B I 18 

0222 

RFF 

390 

LAST 

1289 

540  7 

10  OOO 

0 

CCS 

A 

0223- 

REF 

1 

54  10 

1 542  7 

1 

TCF 

GETNEWNN 

0224 

RFF 

3 40 

LAST 

12  8 8 

5411 

3 '00 0 2 

0 

CA 

Q 

0225 

REF' 

1 

5412 

54  063 

c 

TS 

TENPAR 

0226 

RFF 

1 

54  13 

3 0006 

1 

CA 

BE 

0227 

5414 

0 0 306 

1 

EXTEND 

022  6 

REF 

24 

LAST 

1121 

54  15 

0 4 )’!7 

1 

RCR 

SUPEPENK 

0229 

RpF 

1 

5416 

5 4 0 64 

1 

0 

TS 

TFRP8B 

0230 

REF 

1 

5417 

3 5422 

TCCCN'2 

CA 

CCN2ACR 

0231 

REF 

3 

LAST 

1289 

542C 

22  0 73 

f 

LXCH 

TEAPPECA 

0232 

5421 

52  006 

0 

CTCB 

0233 

REF 

1 

5422 

02  312 

0 

CCN2ACR 

GFNACR 

CCN2 

0234 

RFF 

341 

LAST 

1289 

5423 

50  00  2 

r 

GFTPPTO 

NDX 

0 

0235 

5424 

3 on  to 

1 

CA 

0 

0236 

RFF 

342 

LAST 

1289 

5425 

24  C02 

c 

INCR 

c 
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CFF  TC  SUTCFEG  BANK 


SEE  WFAT  kIAC  CF  PHASE  CHANGE  IT  IS 
IT  IS  C F TYPE  : P: 

SHALL  WE  USE  THE  OLD  PRIDRITY 
N'C  GET  A NEW  PRICRITY  (CR  DELTA  T) 

USE  the  old  PRICRITY  (CR  DELTA  T) 
SEE  IF  A 2CACR  IS  GIVEN 


PICK  UP  USERS  SUPERBAAK 


BACK  TO  SWITCHED  BANK 


CCA:T  care  if  direct  CP  INDIRECT 
LFAVE  THAT  DECISICN  TC  RESTARTS 
DETAIN  RETURN  ADDRESS 


G4P:  ASSEMf?LP  REVISION  116  CF  AGC  PRCGRAP  LUMNAPY  BY  PASA  20211  12-071 


I PHASE  TAPLE  MAINTENANCE 


0237 

RFF 

1 

5426 

1 

5404 

0 

TCP 

CCNl  -1 

0238 

5427 

C 

GGC6 

1 

GETNE  FKP 

EXTppc 

0239 

REF 

343 

LAS’" 

1289 

5430 

5 

0002 

0 

INDEX 

Q 

02A0 

5431 

3 

non 

0 

CCA 

0 

02A1 

REF 

2 

LAST 

1289 

54  32 

52 

C64 

1 

CXCH 

TEPPNP 

02A2 

REF 

79 

LAST 

1123 

5433 

3 

4752 

0 

CA 

TKO 

92A3 

REF 

344 

LAST 

129C 

5434 

26 

)0  2 

1 

ACS 

C 

0244 

RFF 

1 

5435 

1 

5417 

1 

TCF 

TCC0N2 

0245 

RFF 

2 

LAST 

50  5 

5024 

OCT  14000 

ECUALS 

PPIC14 

0246 

RFF 

40 

LAST 

1251 

006  1 

TFNPG 

ECLALS 

ITEMFl 

0247 

REF 

20 

LAST 

1251 

2C62 

TEMPP 

EQUALS 

I TEMP2 

0248 

REF 

2 5 

LAST 

P96 

0063 

TEP  FRH 

ECUALS 

ITFMF3 

0249 

REF 

1 1 

LAST 

896 

0 164 

TFPPBB 

ECL'ALS 

I TEMP4 

0250 

RFF 

50 

LAST 

900 

006  5 

TFHPSVv 

EQUALS 

1TEMP5 

0251 

REF 

7 

last 

896 

006  6 

TFPPSF2 

ECLALS 

ITEMF6 

0252 

REF 

48 

LAST 

1284 

0070 

TEMPER 

EQUALS 

RLPTREG  1 

0253 

REF 

9 

LAST 

8 1 1 

00  71 

TFPPG2 

EQUALS 

RUPTRFG2 

0254 

RFF 

12 

LAST 

992 

0072 

TEMPP2 

ECUALS 

RLPTREG3 

.025  5 

RFF 

5 

LAST 

992 

0073 

TEMP3BCN 

EQUALS 

RUPTREG4 

0256 

REF 

42 

LAST 

1289 

C0O6 

EE 

equals 

B8ANK 

0 2 57 

14,3775 

e«MK 

1 4 

C258 

P c F 

2 

LAST 

1284 

1 1,2000 

SFTLCC 

PHASFTA8 

0259 

10,2224 

BANK 

0260 

P'^F 

1 

F3,  1436 

EBANK= 

PHSNAPE 1 

0261 

RFF 

2 

LAST 

1284  TC 

1288; 

9 

9X. 

CCURTX 

$ 3/PHASE 

0262 

RFF 

4 

LAST 

1289 

10,2224 

22  C73 

C 

PHSCHNG2  LXCH 

TEPP8BCN 

0263 

RFF 

3 

LAST 

1289 

l'.,2225 

3 3065 

1 

CA 

TEPIPSK 

0264 

RFF 

2 

LAST 

1238 

10,2226 

7 4757 

1 

PASK 

0CT7 

0265 

10,2227 

6 OCOO 

1 

nOLRLE 

0266 

RFF 

2 

1 AST 

1289 

1 1,2230 

54  061 

1 

TS 

TEMPG 

0267 

RFF 

4 

LAST 

1291 

10, 2231 

3 CC65 

1 

CA 

TEPPSn 

0268 

r'ff 

2 

LAST 

1288 

1.  ,2232 

7 5C30 

0 

PASK 

DCT1777C 

0269 

10,2233 

0 0006 

1 

FXTENC 

02  70 

REF 

33 

LAST 

12PP 

10, 2234 

7 4740 

1 

PF 

B1  T12 

0271 

REF 

3 

LAST 

1289 

1 ' ,2235 

54  062 

1 

TS 

TEPtPP 

0272 

REF 

5 

LAST 

129C 

1', 2236 

3 CC65 

1 

CA 

TEPPSN 

0273 

RFF 

1 

1 1,2237 

7 4101 

1 

MASK 

OCT 6 €000 

C274 

RFF 

6 

LAST 

129C 

1 1 ,2  240 

56  065 

1 

XCH 

TEMPSW 

0275 

REF 

2 

LAST 

128F 

10,2241 

7 5C24 

c 

PASK 

GCT14000 

0276 

REF 

391 

LAST 

1289 

1' , 2242 

10  OCO 

0 

CCS 

A 

19:0P  AUG.  11,1969  SKIPPER  .097  PAGE 
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CPTAU  PFTURN  ACCRESS 


GAP:  iSSEPBLF  REVISION  116  CF  AGC  PRCGRAM  LUMINARY  8V  NASA  2C2U12-G71 


L PHASE  TABLE  PAIMENANfE 


T277 

REF 

1 

10,2243 

1 5 3 7C 

1 

7CF 

CNECPTWC 

0278 

REF 

4 

LAST 

1290 

1 , 2244 

3 0C62 

0 

CA 

TENPP 

027C 

REF 

3 

LAST 

129G 

1 .,224  5 

50  C6L 

0 

NDX 

TEPPG 

0 280 

REF 

2 

LAST 

2 18 

10, 224C 

5 4 7 5 0 

1 

IS 

PHASEl  -2 

0281 

REF 

3 

LAST 

1289 

10,2247 

10  066 

0 

8EL0W1 

CCS 

TEMPSW2 

0282 

REF 

1 

10,2250 

1 2264 

1 

TCP 

BE  LCW2 

0288 

10,2251 

1 2 2 5 2 

1 

7CP 

T 1 

02  84 

PEF 

4 

1 AST 

128E 

10,2252 

4 0072 

0 

GS 

TEYPP2 

0285 

REF 

c 

LAST 

1291 

10,2253 

22  072 

1 

LXCH 

TEPPF2 

02  86 

REF 

2 

LAST 

1288 

10,2254 

50  071 

1 

NDX 

TEMPC2 

0287 

REF 

c 

LAST 

86G 

Vi, 2255 

52  750 

1 

CXCF 

-PHASEl  -2 

0288 

REF 

4 

LAST 

129  1 

10, 2256 

K’  C6  6 

c 

CC  S 

TEPPSW2 

0289 

10,2257 

12  260 

0 

NOOP 

0290 

RRF 

2 

LAST 

1291 

1 ",  2 260 

1 22  64 

1 

TCP 

BEL0W2 

0291 

REF 

17 

LAST 

989 

10,2261 

4 0025 

1 

CS 

TIME  1 

0292 

REF 

3 

LAST 

1291 

10,2262 

50  C71 

1 

NCX 

T EMPC-2 

0293 

REF 

2 

LAST 

728 

10, 2263 

55'CPC 

1 

IS 

TBASEl  -2 

0294 

REF 

7 

LAST 

1290 

10,2264 

10  065 

0 

EELnW2 

CCS 

J FMP  SW 

0295 

REF 

1 

10,2265 

1 2300 

1 

TCP 

BELCW3 

0296 

PEF 

1 

1 >,  2266 

1 2303 

1 

IGF 

BEL0W4 

C297 

REF 

IF 

LAST 

1291 

1 .1,2267 

4 0C25 

1 

CS 

T IMEl 

0298 

REF 

4 

LAST 

129  1 

10,2270 

50  C6l 

0 

NDX 

TFPPG 

0299 

OFF 

3 

LAST 

1291 

1 1,2271 

55*050 

1 

T S 

TBASEl  -2 

0300 

REF 

8 

LAST 

129  1 

10,2272 

3 0065 

1 

CA 

TEMPSW 

0 3 n 

RFF 

1 

I'l,  2273 

6 2276 

0 

AD 

BI114CCN 

0302 

REF 

392 

LAST 

129C 

10  ,2274 

10  O.l'l 

0 

CCS 

A 

0 30? 

10,2275 

12  276 

L 

NCCP 

0304 

1 2276 

17777 

0 

B IT14CDR 

OCT 

17777 

0305 

REP 

2 

LAST 

'129  1 

IQ,22T7 

1 3 303 

1 

TCP 

BEL CW4 

0 3' 16 

U),  2 300 

0 C0C6 

1 

8EL0W3 

EXTEND 

030? 

PEF 

31 

LA9T 

1215 

1 ),3  3;)T 

3 0025 

0 

CCA 

TIME2 

0308 

PEF 

1 

!•'  ,23  12 

53  ' 15  1 

1 

LXCH 

LCNGElASF 

0309 

REF 

5 

LAST 

129  1 

1 1,  2303 

4 CQ62 

1 

6EL0W4 

CS 

TEYPF 

0310 

REF 

5 

LAST 

1291 

I’  l ,23'14 

50  061 

0 

NCX 

TEMPO 

0311 

RFF 

6 

LAST 

1291 

I U,  2 20  5 

5 4 7 4 7 

1 

IS 

-PHASEl  -2 

0312 

REF 

345 

LAST 

1 290 

10,2306 

3 00  0 2 

0 

CA 

0 

0313 

REF 

c 

L AST 

129C 

10,2307 

22  073 

0 

LXCH 

TEKPPECN 

1314 

10,2310 

0 0003 

1 

RFL  INI 

031  5 

n ,3311 

52  006 

0 

CTCB 

19:09  ALG.  11,1969  SKIPPER  .097  PAGE  1291 
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START  STCRING  THE  PHASE  UFGRRATICN 


IS  IT  A PHASCHNG  OR  A 2PHSCHNG 
IT:S  A PHASCHNG 

IT.S  A 2FHSCHNG 


CAN:T  GET  HERE 


SEE  1'=  ViE  SHGULC  SET  TEASE  GR  LCNGBASE 
SET  LCNGEASE  ONLY 
SET  NEITHER 

SET  TBASE  TO  BEGIN  HITH 


SHALL  WE  NOW  SET  LONGEASE 


GANT  get  here 
CAM  GET  HERE 
NO  WE  NEED  CNLY  SET  TBASE 

SET  LCNGEASE 


ANG  STCPE  THE  FINAL  PART  CF  THE  PHASE 


G/lP: 

L 

1316 

^SSE^fUF  REVISION  116  CF  AGO  FRCGRAM  LUMINARY  BY 
PHAS'=  TABLF  MAINTENANCE 

REF  6 LAST  1251  10,2312  22  073  0 CCN2 

NASA  20  2 
LXCF 

1112-C71 
TEPPE  ECN 

19-.C9  AUG.  11,1969  SKIPPER  .097  FACE  1292 
USER'S  PAGE  NO.  9 E3  S4 

031  7 

RTF 

6 

LAST 

1291 

n ,2313 

3 0062 

0 

CA 

TEMPP 

0318 

REF 

6 

LAST 

12S  1 

1 ' , 2 3 1 4 

50  061 

0 

NCX 

TEPPG 

031  9 

RFF 

3 

LAST 

129  1 

1 ',  2315 

54  7 50 

1 

IS 

PHASEl  -2 

0320 

R = F 

2 

LAST 

128S 

10,2316 

3 0070 

0 

CA 

T EPPPR 

0321 

REF 

7 

LAST 

1292 

10,2317 

50  C61 

0 

NDX 

TFNFG 

0322 

PEF 

2 

1 AST 

1239 

1 0 , 2 3 ?0 

55 '051 

0 

TS 

PHSPRDTl  -2 

3 3?  3 

10,2321 

0 00.16 

1 

EXTEND 

0324 

ref 

3 

L AST 

1290 

10,2372 

3 00  64 

0 

CCA 

TEPPNP 

0325 

RFF 

8 

LAST 

1292 

10,2323 

50  061 

0 

N'DX 

TEMPG 

03?6 

RFF 

2 

1 AST 

1290 

10,2324 

53 ' 435 

c 

CXCF 

PFSN'AMEl  -2 

332  7 

R'’F 

1 

r> , 2 3 2 5 

1 2247 

0 

TCP 

RELGV>1 

03?  f 

7753 

PLCCK 

0 3 

03?Q 

REF 

4 

LAST 

74? 

6000' 

SFTLCC 

FFTAG6 

0330 

7753 

BANK 

33  3 1 

P,>=F 

1 

COUNT* 

T f/PFASE 

0332 

REF 

34 

LAST 

1 290 

7 75  3 

7 4740 

1 

CHECK e 

NASK 

BIT12 

SINCE  TFIS  IS  CF  TYPE  E,  THIS  BIT  SFOULC 

0333 

REF 

333 

LAST 

1291 

7754 

10  000 

0 

CCS 

A 

BE  here  IF  WE  ARE  TC  GET  A NFY  FRICRITY 

0334 

R RF 

2 

LAST 

1289 

7755 

1 5423 

c 

TC  F 

GETPPIO 

IT  IS,  SC  GET  NEW  PRIORITY 

0335 

REF 

1 

7756 

1 5402 

0 

TCP 

OLDPRIG 

IT  ISN:T,  use  the  cue  FRICRITY 

GAP: 


ASSEN3LE  REVISION  1)6  CE  ACC  FPCGRAO*  LUMINARY  8Y  NASA  2021112-C71 


L RE  STARTS  RObfl NF 


0001 

11,3527 

BANK 

01 

TOO? 

PEE 

2 

LAST 

239 

01  ,R.)(n 

SFTLCC 

RESTART 

00Gi3 

01,3527 

BANK 

•TOO  A 

RFF 

3 

L AST 

1292 

E3,  1436 

E8ANK= 

PHSNAMF 1 

0005 

REF 

1 

rcuNT* 

$}/RSROU 

000  6 

RFF 

778 

L AST 

1250 

r 1 , 3527 

3 0 161 

1 

PFSTARTS 

CA 

MPAC  +5 

CCC7 

:'l  ,353(1 

6 1)  ) ) ' 

1 

DOUBLE 

TOCO 

Rpp 

1 

G 1 , 3 5 3 1 

54  155 

1 

TS 

TEMP2C 

000  9 

PEE 

1 

01, 3532 

3 3 7 7 1 

r 

CA 

PHS2CADR 

OCIM 

REF 

1 

01,3533 

54  157 

0 

TS 

TEMPSWCH 

00  1 1 

RPF 

1 

01,3534 

3 3 5 66 

1 

CA 

RTPNCACR 

0012 

RFF 

1 

01,3535 

54  707 

n 

TS 

GOLOC  +2 

0013 

RFP 

1 

91,3536 

3 0154 

1 

CA 

T EVPPPS 

001  A 

REF 

10 

LAST 
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0119 

PEF 

1 

C7,3042 

> 3 111 

c 

TC 

rCMNEG 

012'"' 

REF 

2 

LAST 

1303 

■I  7,  3043 

0 3053 

1 

TC 

NEXTCOU  +1 

0121 

REF 

1 

07  ,3044 

6 3737 

1 

COPPCS 

AT 

-CCMMAX 

CCMMAX  = MAX  MLMBER  GF  PLLSES  ALLCNEC 

0 122 

07 ,3045 

0 0006 

1 

FXTEAD 

MINUS  ONE 

0123 

REF 

1 

07,3046 

6 3121 

0 

BZMF 

COMZERO 

0129 

REF 

12 

LAST 

1 3C3 

07,3047 

51*474 

1 

INDEX 

CCUINF 

0129 

REF 

4 

LAST 

1303 

E 7, 3050 

55*471 

0 

TS 

COMMAND 

PECUCE  CCMMANC  by  MAX  NUMEFP  OF  PULSES 

0126 

REF 

1 

07  ,3191 

4 3740 

0 

CS 

-COMMAX- 

ALLCWEC 

0127 

REF 

43 

LAST 

13C3 

17,3052 

24  C61 

G 

NFXTCCL 

INC  R 

ITEMPl 

0128 

REF 

25 

LAST 

1276 

07, 3 J53 

6 4 7 54 

0 

AD 

NEGO 

0129 

REF 

13 

LAST 

1303 

07 , 3054 

51*474 

1 

INDEX 

CCUIND 

0130 

REF 

3 

LAST 

283 

07, 3C65 

54  C50 

c 

TS 

CDUXCMC 

SET  UF  CCMMANC  REGISTER. 

0131 

REF 

14 

LAST 

1303 

07 , 3 >56 

1!  *474 

0 

CCS 

CCUIND 

0132 

REF 

1 

07,3057 

Q 3035 

1 

TC 

CCARS2  +3 

0 133 

REF 

44 

L AST 

1303 

07, TQ6’ 

10  06  1 

1 

rr  s 

I TEMPI 

SEE  IF  any  pulses  TC  GC  CUT. 

0134 

REF 

1 

07 ,3061 

1 3125 

0 

TCF 

SENPPLLS 

0135 

REF 

16 

LAST 

11  13 

07 , 3062 

0 522  1 

c 

TC 

F TXCFLAY 

WAIT  FCR  GIMBALS  TO  SETTLE. 

0136 

07, 3063 

00226 

1 

DEC 

150 

C137 

REF 

83 

LAST 

1303 

C7  , 3:164 

3 4752 

0 

CAF 

TWC 

AT  ENC  9p  CCMMAND, 

CHECK  1C  SEE 

TEAT 

0138 

REF 

45 

L AST 

1303 

07,3065 

54  061 

1 

CHKCCPS  TS 

I TEMPI 

GIMBALS  AR  E wni-IN 

2 DEGREES  CF 

TFETAC. 

0139 

REF 

4 10  . 

LAST 

1309 

07 ,3066 

5J  OOO 

1 

INDEX 

A 

0 140 

REF 

2( 

LA  ST 

1302 

07,3967 

3 003  2 

0 

CA 

CCLX 

0141 

07 , 3 7 70 

C 0006 

1 

EXTEND 

0142 

REF 

46 

LAST 

I3t>3 

07,3071 

5 0061 

0 

INDEX 

ITEMPl 

,0143 

REF 

22 

LA  ST 

I3r? 

G7, 3972 

20  321 

0 

MSL 

TFETAC 

0144 

PEF 

411 

LAST 

130? 

97,3:"73 

10  COO 

c 

CCS 

A 

0145 

REF 

1 

07,3'74 

1 3102 

0 

TCF 

CCARSERR 

0146 

PEF 

1 

07,3075 

1 3C77 

0 

TCF 

CCFSCHK2 

0147 

REF 

2 

LAST 

1303 

07,3"76 

1 31"  2 

0 

TCF 

COARSERR 
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9148 

0149 

PEF 

PEF 

47 

1 

1 AST 

1303 

07, 3C77 
07,3 lOO 

1C  C61 
1 3065 

1 

0 

CCRSCHK2 

CCS 

TCF 

ITEMFl 

CHKCCRS 

0150 

REF 

2 

\ 

LAST 

1301 

07,3101 

1 3623 

1 

TC  F 

ENCIMU 

0151 

PEF 

1 

07,3  1''2 

6 3110 

1 

COAR  SERP 

AD 

CCARSTCL 

0152 

07,31T3 

0 0006 

1 

EXTEND 

0153 

PFF 

2 

LAST 

1303 

07,3104 

6 3C77 

1 

eZNF 

CCRSCHK2 

01  54 

REF 

46 

LAST 

1301 

07,3 105 

')  5567 

0 

TC. 

ALARM 

0155 

07,3106 

00211 

CCT 

211 

0156 

PFF 

2 

LAST 

166 

07, 3107 

1 36  3 1 

1 

TCF 

I MLBAC 

0157 

07,3110 

7751  1 

1 

CCARSTOL 

CEC 

-.01111 

0158 

0159 

0160 
016  1 

REF 

REF 

2 

2 

LAST 
LA  «:T 

1303 

13C3 

C 7 , 3 1 1 1 

07.3112 

07.3113 

07.3114 

6 3737 
0 HOC 6 
6 3121 
4 COCC 

1 

1 

0 

0 

CCMNEG 

AD 

EXTEND 

eZMF 

CCM 

-CCMMAX 

CCMZERO 

0162 

OPF 

1 5 

LAST 

1 303 

07,3115 

51  '474 

1 

INDEX 

CCL  INC 

0163 

RFF 

5 

LAST 

1303 

07,3116 

55'471 

0 

TS 

CCMMAND 

0164 

REF 

2 

1 AST 

130  3 

07,3117 

3 3740 

1 

CA 

-Cr  MMAX- 

0165 

PEF 

3 

LAST 

1303 

07,3120 

0 305  2 

0 

TC 

NEXTCDU 

0166 

PEF 

230 

LAST 

1299 

C7,3  121 

3 47  55 

1 

CCMZERC 

CAF 

ZERO 

0167 

REF 

16 

LAST 

1 3"4 

T7, 3122 

51  '474 

1 

INPE  X 

CDLIND 

0168 

REF 

6 

LAST 

1304 

07,3123 

57' 4 71 

1 

XCF 

CCMMAND 

0169 

RFF 

4 

LAST 

13C4 

C7, 3124 

0 3052 

0 

TC 

NFXTCDU 

0170 

RFF 

3 

LAST 

534 

07,3125 

3 

7743 

0 

SENCPULS  CAF 

13,14,  15 

0171 

F7,  1>126 

C 

CCC6 

1 

EXTEND 

0172 

REF 

16 

LAST 

900 

07, 3127 

0 

5 C 14 

1 

ROP 

CHAM4 

C170 

PEF 

1 

07,3130 

3 

3741 

0 

CAF 

600MS 

0174 

REF 

2 

LAST 

1303 

07,3131 

1 

3031 

1 

TCF 

CCARS2  - 

0175 

REF 

51 

LAST 

130? 

07,3132 

3 

0 CA+ECF 

CAF 

B IT6 

0176 

C7,3133 

0 

1 

EXTEND 

0177 

PEF 

58 

1 AST 

13112 

07,3134 

0 

5 ri2 

1 

FOP 

CHAM2 

0176 

REF 

73 

LAST 

120C 

07 ,3  135 

0 

5261 

1 

TC 

TASKOVER 
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ENC  OF  CCARSE  ALIGNMENT. 

2 CEGREES. 

COARSE  ALIGN  ERROR. 

2 CEGREES  SCALED  AT  H A LF-RE VC L LT I CN S 


TEEN  TC  VAPCEI ay 


ENABLE  ALL  THREE  ISS  CCL  ERROR  CCLNTERS 
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IMU 

mode 

SW  ITCHING 

RCUTINES 

USFR'S  PAGE  NO.  7 E3  S6 

0179 

REF 

63 

L6ST 

1275 

07, 3136 

3 615C 

1 

SFTCOAR  5 

CAF 

BI  T6 

EYPASS  IF  ALREADY  IN  CCARSE  ALIGN 

0186 

0 7, ?1 37 

0 0006 

1 

EXTFAD 

•J181 

PEF 

59 

LAST 

1 306 

07, 3 160 

02  012 

0 

RAMI 

CHAM2 

0182 

RFF 

612 

LAST 

1303 

07,3161 

10  ooo 

c 

CCS 

A 

0183 

REF 

367 

LAST 

1299 

07,3162 

0 0002 

0 

TC 

C 

0186 

REF 

52 

1 AST 

1306 

0 7,316'’ 

6 6 766 

1 

CS 

8 1 T6 

CLEAR  ISS  ERRCR  CCURTERS 

0185 

07,3166 

0 0006 

1 

extend 

0166 

REF 

6C 

LAST 

13C5 

C7  ,3  165 

03  012 

1 

kiANC 

CFAM2 

0187 

REF 

39 

LAST 

1296 

07,3166 

A 6762 

0 

CS 

BITIO 

KNCCK  CrVN  GYRO  ACTIVITY 

0168 

07,3167 

0 0006 

1 

extend 

0189 

RFF 

17 

LAST 

13C6 

L7, " 15" 

03  0 1-!, 

1 

RAAD 

CFAM6 

0190 

REF 

231 

LAST 

1306 

07, 3151 

6 6755 

0 

CS 

ZERO 

0191 

REP 

2 

LAST 

176 

07, '■152 

56  067 

0 

TS 

GYPCCYC 

0192 

RFF 

66 

LAST 

1305 

07,3153 

3 675C 

1 

CAF 

BIT6 

PUT  ISS  IN  CCARSE  ALIGN 

01  93 

07,3156 

0 0006 

1 

EXTEND 

0196 

REF 

6 1 

LAST 

1305 

C7,3  155 

05  012 

1 

VCR 

CFAN12 

0195 

REF 

63 

LAST 

1300 

07,3156 

6 1035 

1 

CS 

0SPTA8  -HID 

TURN  CN  NC  ATT  LAYP 

C196 

RFF 

1 

07,3157 

7 3201 

0 

NASK 

OCT 600  10 

0197 

REF 

66 

LAST 

1305 

07, 316G 

27'C35 

1 

AOS 

DSPTAP  ■UlC 

0198 

REF 

62 

LAST 

130  1 

07,3161 

6 1300 

1 

CS 

TYIOOES33 

DISABLE  CAP  ALTO  AND  HELD  YCCES 

0199 

REF 

C -5 

LAST 

1 305 

C7,3162 

7 6766 

1 

NASK 

e IT6 

0 200 

REF 

63 

LAST 

130  5 

■07,3  163 

27'3CC 

1 

ACS 

I YODES33 

0201 

REF 

52 

LAST 

1 301 

07,3166 

6 1277 

0 

CS 

IM0DES30 

DISABLE  IylFAIL 

020? 

RFF 

65 

1 A 5T 

1305 

07,3165 

7 6 7 5C 

c 

NASK 

SIT6 

0203 

RFF 

53 

LAST 

130  5 

07,3166 

2 7 ' 2 7 7 

0 

APS 

I Y0DES3C 

0206 

REF 

16 

LAST 

52C 

07,3167 

6 6767 

0 

RACPEFCR 

CS 

TRACK  PIT 

CLEAR  TRACK  FLAG 

0 20  5 

RFF 

32 

LAST 

90C 

07, 3 170 

7 00  7 5 

1 

YASK 

FLAGVRCl 

0 20  6 

REF 

33 

LAST 

1305 

07,3171 

56  075 

1 

TS 

FLAGVRD  1 

0207 

RFF 

3 

LAST 

852 

07,3172 

6 6 735 

c 

CS 

DRFTP  IT 

CLEAR  DRIFT  FLAG 

0208 

REF 

29 

LAST 

1113' 

07,3173 

7 0076 

1 

YA  SK 

FLAGVRD2 

0209 

REF 

30 

LAST 

130  5 

07,3176 

56  076 

1 

TS 

FLAGWR02 

0 210 

RFF 

6 

LAST 

968 

07, ’175 

6 6737 

1 

CS 

REFSY8IT 

CLEAR  PFFSMMAT  FLAG 

0211 

RFF 

18 

LAST 

968 

07,3176 

7 0077 

0 

YASK 

FLAGVR03 

0212 

RFF 

19 

LAST 

13C5 

<■7,3177 

56  C77 

0 

TS 

FLAGWPC3 

■0213 

REF 

368 

LAST 

130  5 

07, 3200 

0 CC02 

0 

TC 

0 

0216 

07 ,320  1 

60010 

1 

□CT6C01C 

OCT 

60010 
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PT21  N 

I«U 

F INF 

ALIGN  MODE 

SWITCH. 

0216 

07 ,32C2 

C OOOA 

0 

I MU  FINE 

INH  INT 

T217 

REF 

A 

LAST 

1302 

C7, 3203 

0 36A5 

0 

TC 

CAGETST  J 

0218 

REF 

1 

07, 320A 

A 3736 

1 

CS 

BI TSA-5 

0219 

07,3205 

0 0006 

1 

EXT  fn  c 

0220 

REF 

62 

1 AST 

1305 

f 7,3256 

C3  012 

1 

WAND 

CHAN12 

0221 

REF 

5A 

1 AST 

1305 

07  ,32T7 

A A7A6 

1 

CS 

B 1T6 

0222 

REF 

AA 

LAST 

13C5 

07, "2  1 1 

7 13C0 

1 

MASK 

IMCCFS33 

0223 

REF 

A9 

LAST 

1306 

07,3211 

55  '300 

1 

TS 

I MCDES33 

022A 

REF 

A 

LAST 

130( 

07 , 3212 

0 3260 

0 

TC 

NCATTCFF 

0229 

REF 

AO 

LAST 

1 305 

C7, 32  13 

3 A7A2 

1 

GAF 

BITIO 

0226 

R = F 

A2 

1 AS'' 

1302 

:>7  ,321 A 

0 5203 

0 

TC 

WAITLIST 

0227 

REF 

17 

LA  ST 

130A 

F3  , 1 A7A 

CBANK= 

CrUINC 

0228 

REF 

1 

07, 32  15 

C2226 

1 

2CADR 

IFAI LCK 

0228 

REF 

1 

07,3216 

16103 

1 

022° 

R£F 

6 

LAST 

9 5 9 

C7, 3217 

3 5CCC 

1 

CAF 

2 SECS 

0230 

R'^F 

A3 

LAST 

1306 

07,3220 

0 5203 

r, 

TC 

WA! TLI ST 

0231 

RFF 

18 

1 AST 

1306 

E3  , 1A7A 

EBANK= 

ecu  INC 

0232 

REF 

1 

07,3221 

0322A 

c 

2CACP 

I MLFINEC 

0232 

REF 

1 

07,3222 

16103 

1 

0233 

RFF 

0 

LAST 

no2 

C'7 , 3223 

1 27A7 

e 

TCF 

MCCFEX  IT 

023A 

PFF 

5 

LAST 

1303 

07, 322A 

0 36  33 

1 

IMLFINED 

TC 

CAGFTEST 

0235 

RFF 

3 

LAST 

130A 

07,3225 

1 3623 

1 

TCF 

ENDIMU 
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SEE  IF  IMU  BEING  CAGEC. 

RESET  ZERC  ANC  CCARSE 

INSURE  DAP  AUTC  AND  HCLC  NCCES  ENAELEC 


IMU  FAIL  NAS  INFieiTEC  CURING  THE 
presumably  PRECEDING  CCARSE  ALIGN.  LEAVE 

IT  CN  FCF  the  FIRST  5 SECS  CF  FINE  ALIGN 


SEE  that  NC  CNE  HAS  CAGEC  THE  IMU 
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L 

I RU 

MCOE 

SWITF  hIMC 

RCUTT  NFS 

LSER' S page  no.  9 E3  S4 

0236 

PEE 

1 

07,3226 

1 3 640 

0 

IFAILOK 

TO 

CAGFTSTQ 

FN'ABLE  IPL  FIAL  LNLESS  IM  BEING  CACEC. 

3237 

REF 

74 

FAST 

1 304 

C7 ,3227 

1 5261 

0 

TCF 

T ASKGVER 

IT  IS  . 

0238 

REF 

46 

LAST 

1 30  5 

07, 7230 

3 4 75C 

I 

CAF 

P.IT4 

DCNT  RESET  IMU  FAR  INHIBIT  U SQMECNE 

C239 

07,3231 

!■>  8 -O') 6 

1 

EXTEND 

HAS  GCNE  into  COARSE  ALIGN. 

02  AO 

PFF 

63 

LAST 

1306 

07, 3232 

02  C12 

0 

RAND 

CHAM2 

02A1 

REF 

413 

1 AST 

1305 

07,3233 

10  COO 

0 

res 

A 

02A? 

RFF 

75 

LAST 

13R  7 

C7,3234 

1 5261 

1 

TCF 

TASKCVER 

0 243 

REF 

54 

L AST 

1305 

67, 3235 

4 1277 

c 

CS 

I P0DES30 

RESET  IMUFAIL. 

0244 

REF 

44 

LAST 

1302 

■07 ,3236 

7 4737 

1 

RASK 

B ITU 

0245 

REF 

55 

LAST 

13C  1 

07,3237 

27 '277 

c 

ACS 

IM0DES30 

0246 

REF 

47 

LAST 

1307 

07, 3240 

4 4 7 50 

c 

cs 

81  t4 

0247 

RFF 

56 

LAST 

1307 

07 ,8241 

7 1277 

n 

PFAILCK2 

MASK 

IMOOES30 

0248 

REF 

57 

LAST 

1 3 ( . 7 

C7, 3242 

5 5 ' 2 7 7 

0 

TS 

I MCDES30 

024P 

P = F 

49 

L AST 

130  1 

•'7, 3243 

0 4674 

0 

TC 

I BNKCALL 

THE  ISS  EARNING  LIGHT  NAY  CCME  CN  NCW 

0250 

RFF 

6 

LAFT 

1301 

07,3244 

147J3 

0 

EACP 

SET  ISSW 

THAT  THE  INHIBIT  HAS  BEEN  RFMCVED. 

0251 

RFF 

76 

LAST 

13F  7 

C7, 3 24.5 

1 5 2 6 1 

0 

TCF 

tafkcver 

0252 

REF 

2 

LAST 

1307 

07,3246 

0 3640 

0 

PFAILOK 

TC 

CAGETSTC 

ENABLE  PIP  FAIL  FPCG  ALARM. 

0253 

REF 

77 

LAST 

1307 

■■'7,3247 

1 5 2 6 1 

c 

TCF 

TASKCVER 

0254 

REF 

58 

LAST 

1307 

07,  3 25'! 

4 1277 

G 

CS 

I MODFSBO 

RESET  INL  ANC  FIPA  FAR  BITS. 

0255 

REF 

4 1 

LAST 

1306 

07,3251 

7 4742 

C 

"ASK 

BIT  10 

0256 

REF 

59 

LAST 

130  7 

07,3252 

27  ' 277 

0 

ADS 

I NCDES30 

0257 

PEF 

46 

LAST 

1306 

07,3253 

4 1300 

1 

CS 

1 MODES  32 

0258 

REF 

45 

LAST 

13C7 

07,3254 

7 4737 

1 

MASK 

8TT13 

•3259 

PEF 

47 

LAST 

1307 

07,3255 

2 7 '30a 

1 

ADS 

I MCDES3  3 

026C 

REF 

42 

LAST 

1301 

07 ,3256 

4 4747 

0 

CF 

BIT5 

0261 

ref 

1 

07,8257 

1 324  1 

1 

TCF 

PFAI LCK2 

0262 

RE'F 

2 

LAST 

130  5 

07, 32.6 J 

4 3 2-8  1 

0 

NCATTCFF 

CS 

nCT4001C 

SLBRCLTINE  TC  TLRN  CFF  NC  ATT  LAMP. 

0263 

REF 

45 

LAST 

136  5 

07,3261 

7 1 135 

1 

MASK 

DSPTAP  +11C 

0264 

PFF 

44 

L AST 

1286 

■ 07,3262 

6 A78C 

1 

AD 

EIT15 

0265 

REF 

46 

LAST 

1307 

07 ,3263 

55  ' 135 

1 

TS 

DSPTAB  MIC 

0266 

REF 

349 

LAST 

1305 

07,3264 

C CC02 

0 

TC 

C 
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>1272 

REF 

232 

1 AST 

1 305 

07,^265 

9 9 7 5 5 

C 

PIPUSE 

cs 

ZERO 

0273 

PFF 

1 5 

LAST 

995 

07,3266 

59  037 

1 

TS 

P IPAY 

027A 

PEF 

6 

l.AST 

995 

C7,3267 

59  '9  1 

1 

TS 

PIPAY 

02  75 

RFF 

9 

LAST 

99  5 

07, 3270 

59  C91 

0 

TS 

PI  PAZ 

G275? 

REF 

3 

LAST 

1307 

07,3271 

0 3690 

0 

F IPUSEl 

TC 

CAGETSTC 

0275A 

REF 

8 

LAST 

1301 

07, R?72 

1 9631 

0 

TC  F 

SWRETURN 

02756 

■j7  , 3 2 73 

0 00:19 

0 

INF  INT 

0276 

REF 

52 

LAST 

1275 

07,3279 

9 9753 

0 

CS 

B ITl 

0277 

RFF 

60 

LAST 

1 30  7 

07,3275 

7 1277 

0 

NASK 

I N0DES30 

C27F 

REF 

61 

LAST 

1308 

07,3276 

55 '277 

0 

TS 

INODES30 

0279 

RFF 

5>l 

LAST 

130  7 

07,3277 

C 9674 

c 

PIPFREE2 

TC 

I ENKCALL 

02BG> 

RFF 

7 

1 AST 

130  7 

07,  330!) 

19  703 

0 

CAOR 

SETI  SSWI 

T2P1 

REF 

A 

LAST 

12C6 

C7,’301 

1 2 79  7 

r 

TC  F 

NCDEEX  IT 

0282 

07, 3302 

0 CC09 

0 

PIPFREE 

INHINT 

02P3 

REF 

62 

LAST 

130  8 

■,'7,33.13 

9 1277 

0 

CS 

IM0DES3C 

028A 

RFF 

c 3 

LAST 

13CE 

07 , 33  19 

7 9 7 '=3 

c 

NASH 

BITl 

0285 

REF 

63 

LAST 

1308 

'7,3305 

27 '277 

0 

ADS 

I Nn0ES30 

02E6 

PFF 

9 2 

LAST 

1 31,  7 

C7, 3306 

7 9792 

0 

NASK 

B IT  10 

0 287 

RFF 

9 19 

LAST 

1307 

C7, 3317 

1C  000 

0 

CCS 

A 

0288 

REF 

5 

LAST 

1308 

07,3310 

1 2797 

c 

TCF 

HOCFExi T 

0289 

RFF 

97 

LAST 

1309 

07,3311 

0 5567 

0 

TC 

ALARN 

0290 

07,3312 

002  12 

0 

CCT 

2 12 

C2  91 

07,3313 

0 0009 

0 

INF  INT 

0292 

RFF 

1 

'-7,33  19 

1 3277 

1 

TCF 

PIPFREE2 
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LSER' 

S PAGE  NC. 

10 

E3 

NP  INLSTALL 

RECLIRED  IN 

EITHER 

CASE 

DC  NOT  ENABLE  PIPA  FAIL  IF  lYL  IS  CAGEC 


IF  PIPA  FAILS  FRCP  NOW  ON  (LNTIL 
FIFFPEE),  LIGHT  ISS  WARNING. 


ISS  WARNING  NIGHT  CCMF  CN  NOW. 
(CP  GC  GFF  CN  PIPFREE  ) . 


FRCGRAN  CCNE  WITH  PIPAS.  CONT  LIGHT 
ISS  WARNING. 


IF  PIP  fail  on,  DC  PRCG  AISRN  AND  PESET 
ISS  WARNING. 
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L I PU  VCCE  SWITCFING  RCUtinFR  LSER'S  PAGE  NC.  11  E3  SA 


PT2P3 

THE 

FCLLFWING  RGLTTNE  TCRCL'FS 

TFF  TRIGS 

ACCCFOING  TC  COUeLF  PRECISION  1NPL1S  IN  THE  SIX  REGISTERS 

R0293 

BEGINNING  AT 

THF  FCACR  ARRIVING  IN  A 

THE  '^IMNLR  SIZF 

CF  ANV  PLLSE  TRAIN  IS  16  PULSES  (.25  CCL  CCUNTS),  THE 

RC297 

UNSEN  T 

FCPTTCN  FF 

THE  rCPRANC 

IS  LEFT 

INTACT  IN 

TFE  INPUT  COMMAND  REGISTERS. 

9?C9 

F3.150C 

F8AN  K = 

1500  VAPIAELE,  ACTUALLY. 

)3’l(' 

PEE 

783 

LAST 

1298 

07,3315 

55  16  1 

0 

INUPUSE 

TS 

MPAC  +5  SAVE  ARRIVING  ECACR. 

03 ':i 

P = F 

5 

LAST 

1306 

''7,3316 

0 3655 

0 

TC 

cagetstj  dcnt  proceed  if  inu  being  CAGEC. 

0302 

RPF 

2 

L AST 

223 

1.  T , ? ■>  1 7 

11  '311 

1 

CCS 

LGYRC  SEE  IF  GYPCS  BUSY. 

0 3 0 3 

P'F 

1 

07,3320 

0 3361 

0 

Tf 

GYROBUSY  SLEEP. 

030A 

PEF 

76A 

LAST 

1309 

07,3321 

55  156 

1 

TS 

MFAC  +2 

>305 

REF 

55 

L AST 

1306 

07,  f>322 

3 5756 

C 

CAF 

BIT6  ENABLE  TFE  FEWER  S'UPPLY, 

Q3r6 

07 , 332  3 

:■  o;)06 

1 

EXTEND 

03  >7 

PEF 

18 

LAST 

1305 

r.l,  3326 

05  C15 

1 

VCR 

CHAM5 

0315 

RFF 

27 

LAST 

127F 

07,3325 

3 5751 

0 

CAF 

FOUR 

0310 

RFF 

AA 

LAST 

1306 

O'?  ,3326 

C 5 20  3 

0 

GV.AKE2 

TC 

WAITLIST  (IF  A JOE  WAS  PUT  TO  SLEEP,  THE  PCWER 

■1311 

REF 

19 

LAST 

1306 

F3,  1575 

EBANK= 

CCUINC  SUPPLY  IS  LEFT  CN  BY  TFF  WAKING  JOB). 

0312 

RFF 

1 

07  ,332-7 

03377 

1 

2CACR 

STRTGYRQ 

0312 

PPF 

1 

C7,333C 

16  1 >3 

1 

1313 

RFF 

785 

LAST 

1309 

07,3331 

3 0161 

1 

CA 

MPAC  +5  SET  UP  EEANK,  SAVING  CALLER'S  EEANK  FCR 

031  A 

RFF 

73 

LAST 

1279 

07,3332 

56  CC3 

1 

XCF 

EBANK  RFSTORATION  ON  RETURN. 

0315 

PEF 

786 

LAST 

1309 

07,3333 

56  161 

1 

XCH 

MFAC  +5 

0 3 1 6 

RFF 

3 

LAST 

1309 

07,3335 

55  ' 31 1 

1 

TS 

LGYRO  RESERVES  GYRC'. 

0317 

RFF 

17 

LAST 

1276 

07,3335 

7 5357 

0 

NAS  K 

LCW8 

0318 

PFF 

A8 

L AST 

1305 

07, 3336 

55  C6  I 

1 

TS 

' TEMPI 

0319 

RFF 

8A 

LA  FT 

1303 

07,3337 

3 5752 

0 

CAF 

TWO  FORCE  SIGN  AGREEMENT  ON  INPUTS. 

1320 

RFF 

787 

LAST 

1309 

07,3350 

5 5 1 = 7 

0 

GVRCAGPE 

TS 

MFAC  +3 

032  1 

1 ? , 335  1 

6 coon 

1 

0CL9LE 

0322 

RFF 

A9 

LAST 

1309 

07,3352 

6 0061 

0 

AC 

ITEMPl 

0323 

REF 

788 

LAST 

1309 

07,3353 

55  16C 

1 

TS 

MFAC  +5 

032A 

07,3355 

0 CS06 

1 

extend 

0325 

P.EF 

A 1 5 

LAST 

13CF 

..7,3355 

5 0000 

1 

INCEX 

A 

0326 

.‘7,3356 

3 150  1 

0 

DCA 

1 500 

0327 

RFF 

789 

IASI 

1309 

' 07,3357 

52  155 

1 

CXCF 

MPAC 

1329 

RFF 

15 

LAST 

1215 

C7,3350 

0 7262 

c 

1C 

TFAGREE 

C329 

RFF 

790 

LAST 

1309 

07,3351 

52  155 

1 

CXOH 

MPAC 

0330 

RTF 

791 

LAST 

1309 

07 ,3352 

50  160 

0 

INDEX 

MPAC  +5 

1331 

07, 3353 

53 ' 5C  1 

1 

CXCH 

1500 

0332 

RFF 

792 

L AST 

13.19 

07,3355 

10  157 

.1 

CCS 

■MPAC  +3 

03  33 

RFF 

1 

L'7,3355 

1 335  1 

1 

TCF 

GYPGAGPE 

033A 

RFF 

793 

LAST 

1309 

07,3356 

3 0161 

I 

CA 

MFAC  t5  RFSTCFE  CALLER'S  EEANK. 

0335 

RFF 

7A 

LAST 

1309 

■ 7,3357 

55  1'3 

1 

TS 

EBANK 

0336 

RFF 

6 

LAST 

13C  8 

C7,3360 

1 2757 

c 

TCF 

MCCEEXII 

gap:  assemble  REVISION  H6  CF  AGC  FRCGRAM  LURINAFY  BY  ^ASA  2021U?-C71 


L I«U  “FEE  SWITCFING  ROUTINES  . 


P03T7  ROLTINFS  TC  ALLCK  TCFCUIAG  EY  CMY  CAE  JCE  AT  A TIME. 


0338 

07,3361 

C CCC6 

1 

GYROBLSY 

EXTEAC 

03  3 9 

REF 

22 

LAST 

1077 

07, 3362 

3 0134 

1 

DC  A 

BUF2 

03A0 

REF 

794 

LAST 

1309 

C7  ,^363 

52  155 

1 

CXCF 

P FAC 

0341 

REF 

1 

07, 3364 

3 3 376 

C 

REGSLREF 

CAF 

LGWAKE 

0342 

REF 

5 

LAST 

1210 

07,3365 

1 5133 

1 

TCF 

JCBSLEEP 

3343 

REF 

4 

LAST 

130  9 

07,3366 

11'311 

1 

G wake 

CCS 

LC-YRC 

0344 

PEF 

1 

17, 3367 

1 3364 

1 

TCF 

REGSLEEP 

C345 

RFF 

79  5 

LAST 

131C 

07,3370 

54  156 

1 

TS 

PPAC  +2 

T346 

07,3371 

C 0006 

1 

EXTEND 

0347 

RFF 

796 

LAST 

1310 

07,3372 

3 0155 

0 

OCA 

PPAC 

0348 

PEF 

23 

LAST 

131C 

'7,3373 

52  134 

0 

CXCF 

PUF2 

0349 

REF 

130 

L AST 

1295 

07,3374 

3 4 7 5 3 

1 

CAF 

CAE 

C35C 

REF 

1 

07,3375 

1 3326 

1 

TCF 

GWAKE2 

0351 

REF 

1 

C7 , 3376 

1 7 36  6 

1 

LGWAK  E 

CACR 

G A A K E 
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SAVE  RETURN  2FCACR. 


WEEN  AWAKENEC,  SEE  IF  GYROS  STILL  BLSY. 
IF  SC , SLEEP  SCPE  MORE  . 


RESTORE  SWRETLRN  INFO 


GAP: 


ASSEPBLE  RFVISID''I  lie  CF  AGC  PRCGR4W  LLMINARY  BY  NASA  20211  12-C71 


L TYL  «CDF  SNITTHING  RrUTTNrS 


P0352  GYRC-TORCLI NG  NAITLIST  TASKS. 


03  53 

RP  F 

1 

•■'7,33  7 7 

4 3 6 20 

1 

SORTC-YRC  CS 

GOESELCT 

0354 

07,3400 

0-0006 

1 

EXTENT 

0355 

PEE 

19 

LAST 

130  9 

C7,34C1 

C3  C14 

1 

NANO 

rhAM4 

0356 

R5F 

6 

LAST 

13116 

07,3402 

0 3633 

1 

TC 

CAGETEST 

0357 

REF 

c; 

LAST 

131C 

07,3403 

3 1311 

0 

STPTGYP2  CA 

LGYRC 

C35B 

07, 34:  4 

0 C006 

1 

EXTEND 

0359 

RPP 

48 

LAST 

1307 

07,3405 

7 4750 

C 

PR 

B IT4 

0360 

RFF 

4 16 

LAST 

1309 

07,34C6 

50  000 

1 

INDEX 

A 

0361 

07,  34  17 

1 3410 

0 

TCP 

•^  1 

0362 

REF 

1 

07,3410 

0 3425 

1 

TC 

GSELECT 

036  3 

07,3411 

00202 

1 

CCT 

OC2  02 

0364 

REF 

2 

LAST 

1311 

07,3412 

0 3425 

1 

TC 

GSELECT 

0365 

■ ff7 , 3 4 1 3 

CC3C? 

r 

CCT 

00302 

0366 

REF 

3 

LAST 

131  1 

)7,  34  14 

3 42  3 

1 

TC 

GSELECT  ■ 

0367 

07,3415 

00100 

0 

CCT 

00100 

0 368 

REF 

233 

LAST 

13CE 

07, 3416 

3 4 7 5 5 

1 

CAE 

ZERO 

0369 

REF 

6 

LAST 

1311 

07,3417 

55  '31 1 

1 

TS 

LGYRO 

0370 

REF 

2 

LAST 

13  IC 

07,3420 

3 3376 

0 

CAF 

LGWAKE 

0371 

REF 

6 

LAST 

1211 

C 7 , 3 4 2 1 

0 5137 

1 

TC 

JCeWAKE 

0372 

REF 

2 

LAST 

1306 

07 , 3422 

1 3224 

1 

NCRFSET  TCF 

IPUFINEO 
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CE-SELECT  LAST  GYRO. 

JUPP  CNi  PHASE  COUNTER  IN  BITS  13-14. 

=C.  DC  Y GYRC. 

=1.  DC  Z GYPC. 

=?.  DC  X GYPC. 

=3.  nCNE 

WAKE  A POSSIBLE  SLEEPING  JCB. 

DC  NOT  RESET  PCWER  SUPPLY 


gap: 


ASSEPBLE  RFVISinN  116  CF  AGC  FPrGPAP  LUMINAFY  EY  NASA  2021112-071 


L 

IMU 

MODE 

SWITCHING 

RCUTINF  S 

03  73 

PFF 

28 

L AST 

1309 

07, 3A23 

A A751 

1 

-2  CS 

FCLP 

037A 

RFF 

7 

LAST 

131  1 

07 , 3A2A 

27'311 

1 

ADS 

LGYRC 

9375 

P’^F 

3 EC 

LAST 

130  7 

C7, 3A25 

5C  002 

0 

GSELECT  INDEX 

C 

03  76 

.'7 , 3A26 

3 09i-J 

1 

CAF 

0 

0377 

PFF 

12 

LAST 

129C 

07, 3A27 

EA  C6A 

1 

TS 

I TFMFA 

037R 

REF 

19 

LAST 

1283 

07, 3A30 

7 A7E7 

1 

MA  SK 

SEVEN 

C379 

REF 

A6 

LAST 

1307 

07 ,3A31 

6 A737 

0 

AD 

P IT  13 

0389 

R FF 

a 

LAST 

1312 

07, 3A32 

27' 311 

1 

ADS 

LGYRC 

03  81. 

PEF 

75 

LAST 

130  9 

07, 3A33 

5A  9.13 

0 

TS 

F BANK 

9382 

DCF 

IF 

LAST 

1309 

07,3A3A 

7 A357 

0 

MASK 

LCWB 

0383 

REF 

50 

LAST 

1309 

07, 3A35 

5A  061 

1 

TS 

I TFMPl 

03EA 

R8F 

29 

LAST 

1312 

07 ,3A36 

A A757 

1 

CS 

SEVEN 

03E5 

REF 

13 

LAST 

1312 

C7,3A37 

7 0C6A 

1 

MASK 

ITFMFA 

0386 

REF 

lA 

LAST 

1312 

07, 2AA0 

EA  06A 

1 

TS 

I TFPP4 

0387 

U7, 3AA1 

0 09i)6 

1 

EXTEND 

0388 

REF 

51 

LAST 

1312 

07, 3AA2 

E CC61 

0 

INDEX 

I TFMFl 

0389 

07, 3AA3 

3 lAOl 

0 

DCA 

lACO 

0390 

°EF 

A9 

LAST 

129C 

07 ,3AAA 

52  071 

0 

rxcF 

PUFTRFGl 

9391 

REF 

50 

LAST 

131  2 

07, ’Aa5 

1C  070 

1 

CCS 

R LFTREC-I 

0392 

R:'F 

1 

07 ,3AA6 

1 3A61 

0 

TCF 

MAJ  + 

0393 

07,3AA7 

1 3A51 

c 

TCF 

+ 2 

039A 

RFF 

1 

97, 3A50 

1 3601 

1 

TCF 

MA  J- 

0395 

REF 

10 

LAST 

1290 

07 ,3A51 

1.0  071 

9 

CCS 

RUPTREG2 

0396 

REF 

1 

C7, 3A52 

1 3A56 

1 

TCF 

M I N + 

0397 

RFF 

1 

■7, 3A53 

1 3A03 

1 

TCF 

STRTGYR2 

0398 

P.EF 

1 

07,3A5A 

1 3576 

1 

TCF 

M IN- 

03  99 

RFF 

2 

LAST 

1312 

07, 3A55 

1 3A03 

1 

TCF 

STPTGYR2 
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USER'S  PAGE  NO.  lA  E2  SA 

SPECIAL  ENTRY  TC  REGRESS  LGYRC  FGR  X. 

SELECT  GYRC. 

PACKED  NCRC  CCNTAINS  GVPC  SELECT  EITS 
ANC  INCREMENT  TO  LGYRO. 


MOVE  CP  COMMAND  TC  PUPTREGS  FCR  TESTING 
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L IPO  PCCE  SPITCEINC-  RCLITINFS 


OAOO 

REF 

1 

C7 , 3456 

6 3512 

1 

PIN  + 

AC 

-GYRCMN 

OA  n 

TIT,  3457 

0 000  6 

1 

EXTEND 

STRTGYR  2 

0AC2 

pep 

3 

LAST 

1312 

07,3460 

6 34  > 3 

0 

BZYF 

i)Ai3 

07,3461 

0 CCG6 

1 

PA  J + 

EXTEND 

0404 

REF 

1 

07 , 3462 

3 3622 

1 

DCA 

G YROFRAC 

0405 

REF 

5 1 

LAST 

1312 

07,3463 

20  T?! 

0 

CAS 

RUFTREGl 

14T6 

PEF 

15 

L AST 

1312 

■•■7,  ’464 

2 0064 

0 

CA 

I TEMP4 

04C7 

07, 3465 

0 0006 

1 

EXTEND 

04i"e 

20 

LAST 

1311 

07,3466 

0 5 0 14 

1 

NCR 

CHAN14 

0409 

RCp 

10 

LAST 

1298 

07, 2467 

3 6077 

1 

CAF 

LCW7 

041C 

REF 

11 

LAST 

13  12 

t)7 , 347C 

7 OC  71 

0 

PAS  K 

RUPTRFG2 

0411 

REF 

12 

LAST 

1313 

C 7 , 3 4 7 1 

56  C71 

1 

XCH 

RUFTREG2 

0412 

07,3472 

'.)  0 J')6 

1 

GPERGE 

extend 

04  1 3 

R-^F 

4r, 

LAST 

12B? 

07,3473 

7 4 744 

0 

PP 

B ITS 

0414 

REF 

21 

LAST 

129'' 

17, 3474 

54  '■62 

1 

TS 

I TEPP2 

C415 

REF 

52 

LAST 

1313 

07,3475 

3 0070 

0 

CA 

RL'PTREGl 

0416 

07 ,3476 

C 0C06 

1 

EXTENC 

0417 

R F F 

28 

LAST 

13)0 

0 7, 3 F 7 7 

7 4 74  3 

1 

PP 

BI  19 

C41  F 

REF 

53 

LAST 

1?  1 ’ 

07 ,3500 

54  070 

1 

TS 

RUPTREG 1 

0419 

REF 

236 

LAST 

1302 

07,0501 

3 CCOl 

r 

CA 

L 

0420 

07,3502 

0 OTOt, 

1 

extend 

0421 

REF 

71 

LAST 

1275 

07  ,3503 

7 4736 

0 

PP 

P TT  14 

0422 

REF 

22 

LAST 

1313 

07, 350.4 

26  062 

1 

AOS 

I 7EMP2 

0423 

07 ,35.15 

0 0 )06 

1 

EXTEND 

0424 

REF 

54 

LAST 

1313 

07,0506 

3 0C71 

1 

CCA 

PLFTREGl 

047  5 

PEF 

1 

07,3507 

6 77  52 

(■ 

AD 

P I N U S 1 

C426 

RFF 

417 

LAST 

13  11 

07,3510 

10  000 

0 

CCS 

A 

0427 

REF 

1 

07,3511 

1 3535 

c 

TCF 

LCNGGYPC 

042  8 

07,3512 

7760  1 

0 

-GYRGPIN 

CCT 

-176 

0429 

07,3513 

1 3517 

0 

TCF 

+ 4 

0 430 

REF 

72 

LAST 

1313 

07,3514 

3 4736 

1 

CAF 

EIT14 

0431 

REF 

23 

LAST 

1313 

07,3515 

26  062 

1 

ACS 

I TEMP? 

0432 

REF 

224 

LAST 

13  11 

07,3516 

3 4 7 5 5 

1 

CAF 

2FRC 

0433 

REF 

52 

1 AST 

1312 

17,3517 

50  06  1 

0 

+ 4 

INDEX 

I TEMPI 

0434 

07,3520 

53 '4  U 

1 

CXCF 

1400 
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SPALL  PGSITTVE  CQpmANC.  SEE  IF  AT  LEAST 
16  GYRC  PULSES. 

CEFINITE  POSITIVE  OUTPUT. 

SELECT  FCSITIVE  TCRCUTPG  FDR  THIS  GYRO. 


LEAVE  ^U^RER  CF  PCSSIELE  8192  AUGPEPTS 
TC  TMTIAL  CCPMAND  IN  PAJCR  PART  CF  LCEG 
TFRP  STCFAGF  ANC  TRUNCATEC  FRACTION 
IN  PINCF  PART.  THE  PAJCR  FART  hILL  FE 
COUNTEC  DOWN  TC  7ERC  IN  THE  COURSE  CF 
PUTTING  CUT  THE  ENTIRE  CCPPANC. 


initial  CCPPANC. 

SEE  IF  PCRF  than  CNE  PLLSE  train  NEECEC 
(PCRF  THAN  162E3  PULSES). 


PAY  PE  ACJLSTEC  TC  SPECIFY  MNIPUP  CPC 
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L IMU  MODE  SWITTHING  RCLTIMFS  USER'S  PAGE  NO.  It  E3  S4 


1435 

043ft 

PEF 

PEF 

24 

Q 

LAST 

LAST 

1313 
1 3C5 

''7,  352  1 
C 7,  3522 

' 0C62 
54  047 

C 

0 

LASTSEG 

CA 

TS 

ITEWP2 

GYRCCWC 

ENTIRE  CCM«ANC. 

0437 

07, 3523 

1 0CL6 

1 

FXTEAD 

0438 

REF 

43 

LAST 

1308 

07, 3524 

7 4742 

0 

NP 

B1  TIC 

rattlist  ot 

0439 

PFF 

37 

LART 

1298 

07,3525 

6 625  ) 

0 

AO 

TFRFE 

TPUNCATTCN  AND  PHASE  UNCERTAINTIES. 

0440 

REF 

45 

LAST 

1 309 

C7,3526 

C 52’3 

c 

Tf. 

RAITLIST 

1441 

REF 

2C 

1 AST 

1 309 

E3  , 1474 

EeANK= 

CCUIN'D 

0442 

PEF 

2 

1 AST 

1 3C9 

C7,3527 

03377 

1 

2CACF 

STFTGYRO 

0442 

07,  353. 

16  13 

1 

044  6 

RF  = 

44 

1 AST 

1314 

07, 3531 

3 4742 

1 

GYROEX  TT 

CAF 

B IT  10 

1449 

07,3532 

C CCC6 

1 

FXTEAC 

0450 

REF 

21 

LAST 

1313 

■7,3533 

;i5  ,114 

1 

WOR 

CHAN14 

0451 

REF 

78 

LAST 

1307 

07,3534 

1 5261 

0 

TCF 

T ASKCVFR 

0452 

RFF 

53 

LAST 

1313 

07, 3535 

50  061 

0 

LCNGGYRC 

INDEX 

T TFYFl 

0453 

07,3536 

53 '4  11 

1 

CXCF 

1400 

INITIAL  CCNNAND  CLT  PLLS  N ALGNENTS  CF 

0454 

PEF 

7? 

LAST 

1313 

07,3537 

3 4736 

1 

CAF 

B IT14 

8192.  INITIAL  CGMMAMD  IS  AT  LEAST  £192. 

0455 

PFF 

25 

LAST 

1314 

07, 3540 

6 C062 

0 

AD 

I TENP2 

C45t 

PFF 

4 

LAST 

1314 

07,3541 

54  047 

0 

TS 

GYP  CCYO 

1457 

07, 3542 

0 0006 

1 

AUG3 

extend 

GET  YiAITlTST  CT  TC  TIYF  WHEN  TRAIN  IS 

0458 

REF 

45 

LAST 

1314 

07,3543 

7 4742 

0 

MP 

BI  TIC 

ALNOST  CLT. 

0459 

PFF 

4 

LAST 

1276 

07,3544 

6 7753 

1 

AC 

NFG3 

0460 

RFF 

46 

LAST 

1314 

07, 3545 

0 5203 

0 

TC 

RAT  Tl  1ST 

0461 

REF 

21 

LAST 

1314 

E3 ,1474 

EBANK= 

ecu  ! NO 

0462 

PEF 

1 

r 7, 3546 

03551 

c 

2f  ADR 

8 192  AUG 

0462 

REF 

1 

'7,3547 

16  103 

1 

C463 

RFF 

1 

07,3550 

1 3531 

1 

TCF 

GYPCFX  IT 

0464 

REF 

7 

LAST 

1311 

"7,3551 

0 3633 

1 

8192ALG 

TC 

CAGETEST 

04641 

REF 

49 

LAST 

1311 

07 ,3552 

3 4750 

1 

CAF 

B !T4 

04642 

'■^7,3  55  3 

0 0 1') 6 

1 

extend 

14643 

RFF 

64 

L AST 

ISO  7 

07,3554 

C2  012 

0 

RAND 

CHAN12 

04644 

REF 

418 

LAST 

1313 

07,3555 

10  ■)  ) ) 

0 

CCS 

A 

04645 

REF 

2 

LAST 

1304 

07,3556 

1 36  3 1 

1 

TCF 

I NUBAD 

0465 

REF 

9 

LAST 

1312 

07,3557 

3 1311 

0 

CA 

LGYRC 

ACE  8192  PULSES  TC  GYRCCNC 

0466 

REF 

7 6 

LAST 

1312 

C7,3560 

54  003 

0 

TS 

EBANK 

1467 

REE 

19 

1 AST 

1312 

C7, ’56  1 

7 4357 

c 

NASK 

LCW8 

0468 

REF 

54 

LAST 

1314 

07,3562 

54  061 

1 

TS 

I TFMP 1 

04  6 9 

RFF 

c c 

LA  'T 

1314 

'’7,3  563 

50  C61 

c 

INDEX 

ITERFl 

SEE  IF  This  IS  THE  LAST  ALG. 

0470 

07, 3564 

1 1 ' 400 

0 

cc  s 

14l;' 

C471 

PEF 

1 

07,3565 

1 3571 

c 

TCF 

AUG  2 

NOPE  TP  CON". 

047? 

REF 

74 

L AST 

13)  4 

07,3566 

3 4 736 

1 

CAF 

8IT14 

0473 

REF 

5 

LAST 

1314 

07,3567 

26  047 

0 

ADS 

G YROCMO 

0474 

REF 

1 

07,3571 

1 3523 

1 

TCF 

LASTSEG  +1 
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I «U 

MCOF 

SWITCH  I MG 

RObTI NuS 

USER'S  PAGE  MO 

0A75 

REF 

56 

LAST  1314 

07,3571 

50  061 

0 AUG2 

INOE  )< 

I TFMP 1 

0A76 

07,3572 

55' 400 

0 

TS 

1 400 

0477 

RFF 

75 

LAST  1314 

07, 3573 

3 4736 

1 

CAF 

8IT14 

0476 

REF 

6 

LAST  1314 

07,3574 

26  '’47 

0 

ACS 

GYROCYD 

0479 

RFF 

1 

07,3575 

1 3 542 

c 

TCF 

AUG3 

CCPFUTE  CT. 

E3  SA 
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L 

I ML 

»CDF 

SWITCHING 

RFUTTNES 

lsfr's  page 

NO.  18 

E3  S4 

OABO 

REF 

2 

LAST 

131  ? 

07,3576 

6 2 5 1 2 

1 

MIN- 

AH 

-GYRCMN 

FESSIELE  NEGATIVE  OUTPUT. 

OABl 

07,  35  77 

0 0006 

1 

EXTEND 

9A82 

REF 

4 

LAST 

131  ? 

07,3630 

6 3403 

0 

eZMF 

STPTGYR2 

04B3 

07, 3601 

0 3006 

1 

MAJ- 

EXTENC 

CEFTMTE  NEGATIVE  CUTPLT. 

0A64 

REF 

2 

L AST 

1313 

07,3632 

4 3622 

0 

CCS 

GYROFRAC 

0486 

REF 

c c 

LAST 

1313 

C7, 2603 

20  P71 

r 

CAS 

RLPTRFGl 

04  8b 

REF 

16 

LAS'^ 

1313 

07, 3604 

3 CC64 

G 

CA 

I TEMP4 

SELECT  NEGATIVE 

TQRCUING  FCP 

TFIS  GYRC. 

0487 

RFF 

29 

LAST 

1312 

07,3635 

6 4743 

0 

AC 

8 1T9 

0488 

07, 36C6 

C CGC6 

1 

EXTEND 

14  89 

RFF 

22 

LAST 

1314 

17, 36C7 

05  014 

1 

WDR 

CHAN14 

0490 

REF 

56 

LAST 

1316 

07,361C 

4 0170 

1 

CS 

RUPTREGl 

SET  UP  PUPTREGS 

TG  FALL  INTO 

GMERGE. 

049  1 

REF 

57 

L AST 

1316 

07,2611 

54  C7C 

1 

TS 

RLPTREGl 

ALL  NLMEERS  PUT 

TNTC  GYRCCMC 

ARE 

0492 

RFF 

13 

LAST 

1313 

'17,3512 

4 0071 

n 

CS 

RLPTREG2 

POSITIVE  - 81  T9 

CF  CHAN  14  CETEPMINES 

049? 

REF 

11 

LAST 

13  12 

07, 26  13 

7 6C77 

c 

mask 

LCW7 

TFE  S UN  CF  THE 

CCMIMANC  . 

0494 

07, 3614 

4 0000 

0 

COM 

C498 

REF 

14 

LAST 

1316 

.07,3615 

56  (3  71 

1 

xr  F 

RUPTREG2 

0496 

07, 3616 

4 Q3C0 

c 

CCM 

0497 

REF 

1 

07,3617 

1 34  72 

1 

TCF 

GMERGE 

0493 

07,3620 

01703 

1 

GFESELCT 

CCT 

1700 

TURN  OFF  SELECT 

AND  ACTIVITY 

BITS. 

0499 

)7, 3621 

03000 

1 

GYROFRAC 

2CEC 

.215  8 -21 

0499 

07,1622 

10034 

0 
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L 

I YU 

MCOF 

SWITC  HING 

RrUTI NFS 

LSEP*  S PAGE  NO.  19  E3  SA 

P050O 

I YU 

YCCE  ' 

SW  ITCH  TNG 

PCUT  INES 

CCYIE  FERE  WFEN  ACTION  COYPLETE. 

0501 

07,3623 

0 00ii6 

1 

ENCIYU 

FXTEAC 

YCCE  IS  BAD  IF  CAGE  FAS  OCCLRED  OR  IF 

0502 

PEP 

33 

LAST 

1 108 

07, 362A 

00  0 1 1 

1 

READ 

0SALYCL7 

ISS  WARNING  IS  CN. 

C5P3 

REF 

5A 

LAST 

1308 

07 ,36  25 

7 A753 

0 

YASK 

B !T  1 

050A 

REF 

A 19 

LAST 

131  ^ 

07,3626 

1C  ECO 

C 

res 

A 

0505 

RDp 

A 

LAST 

L31A 

'7, ’627 

1 3631 

1 

TCF 

T YU8AD 

0 506 

REF 

-a 

LAST 

56  7 

C7,363C 

1 3657 

1 

I YUGCCC 

TCF 

GCCOEND 

W ITF  C( A ) = 0. 

0 507 

PFF 

235 

L AST 

1313 

07, 3631 

3 A 755 

1 

T YLBAC 

CAF 

ZERO 

C5C8 

FEF 

2 

LAST 

567 

07,3632 

1 365A 

1 

TCF 

BACENC 

0 50  9 

REF 

5t 

LAST 

1309 

07,3633 

3 A7A6 

C 

CAGETFST 

CAF 

fi  IT6 

SUERCUTINE  TC  TERYINATE  lYL  YIOCE 

0510 

REF 

6A 

LAST 

130  8 

07, 363A 

7 1277 

0 

YASK 

1 Y00ES3G 

SWITCF  IF  TYU  FAS  BEEN  CACEC. 

051 1 

RFF 

^ 20 

LAST 

1317 

C7, 3635 

IP  JOO 

0 

CCS 

A 

0512 

REF 

5 

LAST 

1317 

C7. 3636 

1 3 6 3 1 

1 

ICF 

I YLBAC 

CTRECTLY  . 

0513 

PEF 

351 

LAST 

1312 

07, 3637 

0 000  2 

0 

TC 

Q 

WITH  CIA  ) = +C. 

0 5 1 A 

REF 

65 

LAST 

13  17 

07,36A0 

A 1277 

0 

CAGETSTC 

CS 

I Y0DES3O 

SKIP  IF  lYIU  NOT  BEING  CAGED. 

0515 

PEF 

57 

LAST 

1317 

07, 36A  1 

7 A7A6 

1 

YASK 

B 1 T6 

0516 

REF 

A21 

LAST 

1317 

07,36A2 

10  000 

0 

CCS 

A 

0517 

REF 

352 

LAST 

1317 

07, ’6A3 

2A  CC2 

c 

INC.R 

C 

0518 

PFF 

353 

LAFT 

1317 

07, 36AA 

0 0002 

0 

TC 

Q 

0 519 

REF 

66 

LAST 

1317 

07 ,36A5 

A 1277 

0 

cagets’-j 

CS 

IYCDES30 

IF  CURING  YCDE  SWITCH  1 N IT  I A L I Z A T I C Y 

0520 

RFF 

58 

L AST 

1317 

■■7,36a6 

7 A7A6 

1 

YASK 

B I T6 

IT  IS  FCUNC  that  THE  I YU  IS  BEING  CACEC 

0521 

RFF 

A?2 

LAST 

1317 

■'7  ,36A7 

10  ooo 

3 

CCS 

A 

SET  lYLCADR  TC  -0  TC  TYCICATE  CFERATICY 

052? 

REF 

35A 

LAST 

I’l  7 

C7,365C 

C 000  2 

0 

TC 

C 

ccyflete  rut  failec.  return  IMYECIATELV 

0523 

RFF 

236 

1 AST 

1317 

07, 3651 

A A 7 5 5 

C 

CS 

ZERO 

TC  SWFETURN. 

C52A 

REF 

A 

LAST 

1113 

07,3652 

5 5 • 30  1 

0 

TS 

IMUCAOR 

0525 

ref 

7 

LAST 

1309 

07,3653 

1 27A7 

0 

TCF 

YCOEEXIT 

G«P: 
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P0526 

OEMERALT  ZEO 

POOF  F^nCHIAG 

TERM  NATICN 

. ENTER 

AT  COCFFNC 

FCR  SUCCESSFUL  CCPPLETICN  OF  AN  I /n  CFERATICN 

R0528 

OR 

AT  BACENC 

FOR  A N 

UNSUCCESSFUL  ONE. 

C(A)  OR 

ARRIVAL 

=0  FOR  IPU, 

1 FFR  CFTICS. 

053C 

RPF 

15 

LAST 

1316 

07,3656 

56  C71 

0 

E ACENF 

TS 

F.UFTPEG2 

DEVICE  INDEX. 

9531 

RFF 

237 

LAST 

131  7 

07,3655 

6 6 755 

r 

CS 

ZERO 

FFR  FAILURE. 

0532 

PEP 

6 

LAST 

1317 

07,3656 

1 3661 

1 

TC  F 

GCnOENO  +? 

0 533 

OPP 

16 

I AFT 

1316 

07 , 3657 

56  G71 

c 

GrrOEAC 

TS 

RUPTRFG2 

053A 

RFF 

131 

LAST 

131C 

C7, 3660 

6 6 7 5 3 

c 

C' 

CINF 

FCR  SUCCESS. 

C535 

REF 

1? 

LAST 

129( 

07 , 366  1 

56  072 

0 

TS 

RLPTPEG3 

9536 

REF 

17 

LAST 

131E 

C7, 3662 

5C  C71 

1 

INDEX 

RLPTRFG2 

SFE  IF  USING  program  ASLEEP. 

0537 

RFF 

6 

LAST 

965 

'7, 3663 

1 1 • 3,.  1 

0 

CCS 

PCDECADR 

C53fi 

07 ,3666 

1 3670 

1 

TCF 

+ 6 

YF  5 - l^AKF  IT  LP. 

0539 

RFF 

1 

07,3665 

1 3700 

1 

TCF 

ENDPCDE 

IF  0,  PRCGRAM  NOT  IN  YET. 

95392 

97, 3665 

3 0006 

1 

EXTEND 

0539A 

RPF 

2 

LAST 

1316 

07,3667 

1 3 79  1 

0 

ezF 

ENCMCCF  +1 

EZ  F = TCF  IF  NCOECAOR  = -C. 

0569 

RFF 

238 

LAST 

1318 

07,3670 

3 6 7 55 

1 

CAP 

ZERC 

WAKE  SLFEPING  FRCGRAM. 

0561 

REF 

18 

LAST 

1318 

07,3671 

59  T7  1 

1 

INDEX 

RLPTREG2 

9 56? 

RFF 

7 

LA  FT 

1?  1 E 

C7,3672 

57  ' 3C  1 

1 

XCF 

PCDECACP 

9563 

PFF 

7 

t AFT 

1311 

07, 3673 

0 5 137 

1 

TC 

JCBViAKE 

0566 

REF 

16 

LAST 

1316 

07,3676 

6 C072 

n 

CS 

RUFTREG3 

AFVANCE  LOG  IF  SLCCESSFLL. 

9 565 

REF 

23 

L AST 

1211 

07, 3675 

50  C66 

0 

TNOE  X 

LCCCTR 

0 566 

REF 

66 

LAST 

1257 

07, 3676 

26  166 

0 

ACS 

LOG 

0567 

REF 

79 

LAST 

1316 

07,3677 

1 5 26  1 

0 

TCF 

taskcvfr 

0568 

RFF 

15 

LAST 

1318 

7,  3 700 

3 00  72 

1 

ENCMOOE 

CA 

RLPTREG3 

-0  INCKATFS  CPERATICN  CCNPLETE  BUT 

C56S 

REF 

19 

LAST 

13  18 

07 ,3791 

50  371 

1 

+ 1 

INDEX 

RUPTREG2 

UNSUCCESSFUL:  -1  INDICATES  CCRFLETE  ANC 

0550 

ref 

8 

LAST 

1316 

■"7, 3 7 ‘2 

55'301 

0 

TS 

WCOECACR 

SUCCESSFUL  . 

0551 

RFF 

80 

LAST 

1318 

07, 37. .13 

1 5261 

0 

TCF 

T'SkcvER 
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P 0 5 5 7 
R055  8 
R 0559 
R0560 
R0561 
R056? 
R0563 
R ) 56A 
P0565 
Pn556 
R0567 
R0568 
PT569 


FUNCTIONAL  OESCRIPTICR- 

TO  CELAY  FURTHFR  EXECUTION  OF  THE  GALLING  ROUTINE  UNTIL  ITS  SELECTED 
I/O  FUNCTION  IS  CCMPLETP.THE  FCLLCW  ING  CHECKS  ON  THE  CAU  ING  ROUTINE:S 
MODECAPP  ARE  MACE  AND  ACTED  UPON. 

U -to  INCICATES  INCCMPLETE  I/O  OPER  AT  IDN  .CALU  ING  PCUTINE  IS  PUT  TC 
SLEEP. 

2)  -1  TNCICATFS  COMPLETED  I/O  OPERAIIGN.  SIAIL  BYPASSES  JCPSLEEf 
CALL  AND  RETURNS  TO  CALLING  RCUTIN'F  AT  L + 3 

3)  -C  INDICATES  CCMPLETED  I/C  KITH  FAILURE.  STALL  CLEARS  MCCECACR 
AND  RETURNS  TC  CALLING  ROUTINE  AT  L+2. 

A)  VALUE  greater  THAN  J INDICATES  TWO  ROUTINES  CALLING  FOP  USE  CF 
SAME  DEVICE.  STALL  EXITS  TC  ABORT  KHICH  EXECUTES  A PRCGRAM 
RESTART  WHICH  IN  TURN  CLEARS  ALL  MCCECACR  REGISTERS. 


R0570  CALLING  SECUENGE- 

R0571  L TC  BAMKCALL 

RT572  L + 1 CACR  (CNE  OF  5 STALL  ACCRESSES  l.E.  IMUST ALL ,QPT STA LL , P AD STAL L , 

R0573  AOTSTALLiCR  AttSTALU 

F0574  NCPMAL-EXIT  MOCE- 

R0575  TCF  JCBSLFF.P  CR  TCF  MCCEXIT 

RQ576  ALARM  OR  ABORT  EXIT  MOOE- 
RD577  TC  AECRT 


R0578  GLTPLT- 

p.)579  MCCECACB=  CACR  IF  J08SLEEP 

R053'''  MQrECACR  = + D IF  1/0  COMPLETE 

R0581  BLF2=L+3  IF  I/O  COMPLETE  AND  GCCC. 

R05R2  EUF2  = L-i2  IF  I/O  COMPLETE  PUT  FAILED. 

R0583  ERASABLE  I N I T I A L I Z AT  I C N- 

R058A  0UF2  CONTAINS  RETURN  ADDRESS  PLUS  1,(L+2I 

R058F  BLF2+1  CONTAINS  FBANK  VALUE  OF  CALLING  ROUTINE. 

R05F6  MODECADF  OF  CAUING  RCUTINE  CCNTAINS  +3, -1,-0  CR  CACR  RETURN  ACCPESS. 

R0587  CFERIS- 

R0588  RLPTREG2  ANC  CALLING  RCUTINE  MCCECADR. 


0589 

REF 

132 

LAST 

1318 

C7, 37  14 

3 

47E3 

1 

A C T S T A 1.  L 

CAF 

ONE 

ACT. 

05  90 

PEF 

1 

17,37  5 

7 

37  11 

C 

TC 

STALL 

C59I 

REF 

85 

LAST 

13  0 9 

07 , 3 70  6 

3 

4752 

0 

R ACSTALL 

CAF 

TWC 

05°2 

PEF 

2 

LAST 

1319 

07, 37C7 

1 

3711 

1 

TCF 

STALL 
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CS93 

REF 

3 

t AST 

953 

07,3704 

CFTSTALl 

FCUALS 

ACTSTALL 

0594 

REF 

239 

LAST 

i?ie 

C7, 371C 

3 475  5 

1 

IVLSTALL 

CAF 

ZEPC 

1 RL. 

C595 

■)7,371l 

0 0 3 74 

0 

STALL 

INF  INT 

0596 

P EF 

20 

LAST 

1316 

C7 ,37  12 

54  071 

0 

TS 

PLFTPEG2 

SAVE  DEVICE  INDEX. 

0597 

REF 

4?3 

LAST 

1317 

07, ’713 

50  COO 

1 

7N0E  > 

A 

SEE  IF  CFERATICN  CCRPLETE. 

0596 

REF 

9 

LAST 

131  F 

07,3714 

1 1 ' 301 

0 

CCS 

MODFCADR 

0599 

REF 

I 

07,3715 

1 3 7 3 3 

1 

TCF 

FCnAECRT 

ALLCWAELE  STATES  ARF  tO,  -1,  AND  -C. 

0690 

PEE 

1 

. 7,3716 

1 3727 

1 

TCF 

MOOESLP 

CPERATICN  INCCRFLETE. 

0601 

RFF 

1 

07,3717 

1 372  3 

0 

TCF 

rccegccc 

CCMPLETE  ANC  GCCD  IF  = -1. 

060? 

PFE 

21 

LAST 

1320 

07, 3720 

50  C71 

1 

RG2 

INOE  X 

R LPTREG2 

CCRPLETE  ANC  FAILED  IF  -0.  RESET  TO  +0 

0603 

RFF 

10 

LAST 

1320 

(17,3721 

55 ' 301 

0 

TS 

MOOECADR 

RETURN  TC  CAUEP. 

0604 

REF 

8 

LAST 

1317 

•‘■7,3  722 

1 2 74  7 

c 

TCF 

»'CCEEX  IT 

0 6)5 

Pff 

424 

LAST 

1320 

07, 3 723 

10  COO 

c 

MGDFGOQD 

CCS 

A 

RAKE  SURE  INITIAL  STATE  -1. 

C6C6 

REF 

2 

LAST 

132C 

07,3724 

1 3733 

1 

TCF 

R Cn  A e F R T 

0607 

ref 

24 

LAST 

131  C 

C7, 3725 

24  133 

c 

INCR 

RUF2 

IF  SO,  INCRERENT  RETURN  ACCRESS  ANC 

0608 

REF 

1 

07,3726 

1 3720 

0 

TCF 

NG2 

RETURN  IRRFCIATFLY,  SETTING  CACR  = <0. 

0609 

REF 

1 3 

LAST 

9 30 

07,3  72  7 

0 4645 

1 

PCCES  LP 

TC 

rakecacp 

CALL  FRCR  SNITCH ABLE  FIXED  ONLY. 

0610 

REF 

22 

LAST 

1320 

3730 

50  07  1 

1 

INDEX 

RLPTREG2 

0611 

REF 

! 1 

LAST 

1320 

"7  ,3731 

55'3,il 

0 

TS 

MODECAOR 

0612 

REF 

6 

LAST 

131C 

1 5133 

1 

TCF 

JCeSLEEF 

0613 

RFF 

?5 

LAST 

1 320 

07,3733 

52  134 

n 

MOtlABORT 

nxcF 

BUF2 

0613? 

REF 

6 

LAST 

1118 

07,3734 

0 5 706 

c 

TC 

EA  ILCUT  1 

TWC  PROGRAMS  USING  THE  SARE  DEVICE. 

7614 

31210 

0 

CCT 

31210 

GAP: 
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L IMU  MODE  SWITCHING  RCUTINCS 


P9615 

CONSTANTS 

FCR.  MODE  S 

witching 

PCLTINES 

>616 

RFF 

4 

LAST 

964 

5 74  1 

8 ITS3E4 

= 

OCT  14 

0617 

RO-F 

■a 

LAST 

1276 

4771 

0 ITS4C6 

= 

0CT50 

7618 

07, 3736 

00030 

1 

BITS  4- 5 

ncT 

COC30 

C619 

RIF 

41 

LAST 

1313 

4744 

IMUS  EFLG 

FGUALS 

8 IT8 

0 6 20 

07,3737 

775QC 

1 

-COMNAX 

CEC 

-191 

0621 

07,3740 

77  47  7 

0 

-CGMMAX- 

CEC 

- 192 

0622 

C7,3741 

00074 

1 

6i>:)NS 

CEC 

60 

0623 

R = F 

4 

1 AST 

945 

C7, 3202 

IRLFIN20 

= 

I NUFI NE 

0624 

REF 

4 

LAST 

37C 

07 ,3742 

3 1 304 

1 

GENANUR 

CA 

ATTCACR 

0625 

07,3743 

C 0006 

1 

EXTENC 

1626 

'7,3744 

I 3 7 4 6 

C 

BZF 

+ 2 

0627 

REF 

3 

LAST 

1320 

■:i7 ,3745 

0 3 73  3 

0 

TC 

MCOABQRT 

0629 

r 7 , 3 7 4 6 

0 CCG6 

1 

+ 2 

EXTENC 

0630 

RFR 

26 

LAST 

132U 

07, 3747 

3 0 134 

1 

DCA 

BUF2 

0632 

REF 

5 

LA'T 

1321 

C7 .3750 

53>  305 

1 

CXCF 

ATTCACR 

>633 

REF 

43 

LAST 

129C 

C7, 375  1 

3 OC0  6 

1 

CA 

BBANK 

0634 

RFF 

21 

LAST 

1312 

07,3752 

7 4757 

1 

MASK 

SEVEN 

0635 

RFF 

6 

LAST 

1321 

07,3753 

27 ' 30  5 

1 

ADS 

ATTCACR  ^ 

0642 

REF 

32 

LAST 

1 105 

07, ’754 

3 C167 

I 

CA 

priority 

0643 

RFF 

2 

LAST 

23  3 

'7,3755 

7 7730 

0 

MASK 

PRIC37 

0644 

REF 

2 

1 AST 

37( 

07,3756 

55'3C6 

1 

TS 

ATTFRIC 

06452 

RFF 

1 

97, 3757 

3 3 7 6 3 

0 

CAF 

KALEBCON 

06453 

RFF 

77 

LAST 

13  W 

07,3760 

54  00  3 

0 

TS 

EPAN'K 

■J6454 

pff 

57 

L AST 

1277 

07,3761 

0 4635 

r, 

TC 

PCST JLRF 

06455 

P'^F 

1 

07 ,3762 

44004 

0 

CACR 

K ALCM  AN3 

06456 

RFF 

13 

LAST 

487 

07 .3763 

03276 

1 

KALE0CCN 

ECACP 

PCCU 

19:G9 


AUG.  11  ,1969  SKIPPER 
LSFP' S PAGE  NO.  23 


.U97  FACE  1321 
E3  SA 


IMTFPPRFTEP,  SWITCH  7. 


IS  kalcnanl  free 

BAILOUT 

SAVE  FINAL  RETURN  FOR  KALCRAN3 


1 


SAVE  USFFS  FRIG 


SET  EEANK  for  KALCNAN3 


GAP: 


ASSEMBLE  REVISION  116  CF  AGC  PPQGRAW  LU^INARV  BY  NASA  2021112-071 
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097  PAGE  1322 


L IVL  "CrE  SWITGFTNC-  RCUT  IN!  = S USER'S  PAGE  NC.  2A  E3  SA 

P06A6  PRCGRAR  OESCRIPIICN 

R16A7  IMU  STATUS  CFECK  PCUTINF  R02  (SUBRnUTIN'F  UTILITY) 

RCA'iB  RED  NC  - I 

R06A9  A'OC  BY  - N.BROOFUP 

R0650  FUNCTICNAL  CESGP  IPTIOM 
ROE  5 1 

R0652  TO  CFECK  WFETHPR  T^U  IS  CN  ANC  IF  CM  FHETFER  IT  IS  AlIGNEn  TC  AN 

P0653  ORIENTATION  KNOWN  EY  THE  CMC.  TO  REQUEST  SELECTION  O^  THE  APPROPRIATE 

R065A  PR0O,RAM  IF  THE  IRU  IS  CFF  CP  NCT  ALIGNEC  TC  AN  CRIENTATICN  KNOWN  EY  THE 
R')655  CMC.  CALLFC  TFROUGF  BANKCALL 
R0656  galling  SPCLFNCE- 
R06'^7 

R0658  L TC  BANKCALL 

RC659  Lfl  CACR  R02BCTF 

R066D  subroutines  CALLED 
R066I 

R9667  VARALARR 

R0663  PLAGUP 

RT6f4  NCPRAL  EXIT  MOOES 
P0665 

PT666  AT  L+?  CF  CALLING  SEQUENCE 
R0667  ALARM  OR  ABORT  EXIT  ROOFS 
P066B  GCTODOnH,  WITH  ALARM 

R0673  ERARAELE  in  it TAL  I 2AT Ttn  REOUIREO 
R067A 

RT67S  NONE 

R1676  OEFRIS 

R0677 


RT673 

C679 

0680 

0681 

CENTT?  ALS 
REF  1 

-A,C,I 

3A,3650 
04,2000 
U4, 3235 

BANK 

SETLCC 

BANK 

34 

R02 

C682 

REF 

1 

COUNT  X 

J J/R02 

0683 

'4,3235 

CCC63 

1 

DEC51 

DEC 

51 

068A 

REF 

7 

LAST 

130^ 

■'■4,3236 

3 

4737 

0 

R02B0TF 

CAF 

REFSMPI T 

0685 

REF 

20' 

LAST 

13CE 

C4 ,3237 

7 

0077 

0 

RAS  K 

FLAGWFC3 

0686 

REF 

A25 

LAST 

1320 

■■  4,  3240 

10  cco 

c 

CCS 

A 

0687 

REF 

1 

04,3241 

0 

3252 

1 

TC 

R02ZER0 

ZERC  IRLS 

0688 

REF 

67 

LAST 

1317 

04 ,3242 

3 

1277 

1 

CA 

IMCDES3J 

0689 

REF 

30 

LAST 

1316 

04,3243 

7 

4743 

1 

MASK 

BIT9 

IS  ISS  IMTIAlIZeC 

0690 

04,3244 

0 

0006 

1 

EXTEND 

0691 

04,3245 

1 

3 2 4 7 

1 

EZF 

+ 2 

0692 

REF 

50 

LAST 

131A 

'■■4,3246 

4 

4 7 50 

0 

CS 

B 1 T4 

SEND  IRU  alarm  CEDE  210 

06  93 

REF 

I 

04,3247 

6 

3255 

0 

AC 

0CT220 

SEND  REFSMM  alarm 

069A 

RRF 

A 

LAST 

62F 

04, 325C 

C 

5734 

1 

TC 

VAFAL  ARM 

0695 

REF 

63 

1 AST 

975 

04,3251 

0 

6001 

0 

TC 

GCTOPCOH 

0700 

RRF 

72 

LAST 

124A 

04,3252 

c 

5^04 

c 

R02ZERC 

TC 

UPFLAG 

GAP  : 
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L 

INU 

MCCE 

SW  ITCHING 

ROUTINES 

USER'S  PAGE  NO 

07C1 

RPF 

6 

LAST  975 

09,3253 

.T0C07 

C 

ACRES 

I RUSE 

0702 

RE'' 

9 

LAST  130E 

09, 3259 

1 963  1 

0 

TCF 

SWRETURN 

0702  5 

09, 3255 

00220 

1 OCT22C 

OCT 

220 

gap:  ASSFPBLE  REVISIGN  116  CF  AGC  PRCGRA''  LUNINAFY  BY  AASA  2021112-071 
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L 

P07C’ 

R07  14 

R0709 

R0707 

R0709 

R071C 

R0711 

R0712 

RC713 

R0716 

P0719 


IPU  MCCF  SWIirpiNf  ROUTTNES  USER'S  PAGE  KG.  26  E3  S4 

PROGPAP  CESCR1P7ICP  Pri6  10FEE67 

TRANSFER  ThE  ISS/CVC  FRfw  THE  GPERATE  TO  TFF  STAKC8Y  CCKDITICN. 

THE  NrPFAL  CGMCITIEN  CF  REAFINESS  OF  TFF  GMC S WHEN  NCT  IN  USE  IS  STANDBY.  IN  THIS  CCNCITICN  THE  I PU 
HEATFR  FCURR  IS  CN.  THE  l^U  OPERATE  PCKER  IS  CPP.  THE  CCMFUTEP  POwEP  IS  ON.  THE  CPTICS  PCVtER  IS  CFF.  THE 
CPC  STANLEY  ON  THE  MAIN  AND  lEB  OISKYS  IS  GN. 

CALLING  SPOLENCE: 

ASTRONAUT  REQUEST  THPCUGH  CSKV  V37E  06E. 

SUPPCUT  IKES  CALLPE: 

GOPEPFl 

EANKCALL 

PLAGPCWN 


GAP:  ASSEPBLe  REVISION  116  CP  AGC  FRCGRAW  LUMINARY  EY  NASA  2021112-071 
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L IMU  MODE  SWITCHING  RCUTINFS  LSER'S  PAGE  NO.  27  E3  S9 


POSin  PPESTANC  RREPARPS  FCR  STANCEY  by  snapshotting  tee  scaler  ANO  TTMEl  TIPE2 

R0811  THE  LCW  5 BITS  CP  THE  SCAL'^R  ARE  INSFECTEC  TC  INSURE  C C M P AT  A E IL  I Y Y 

R0812  BETWEEN  TEE  SCALER  REAHING  AND  THE  TlMEl  TIME2  REAPING. 


C812E 

REF 

1 

37,20-00 

SETLCC 

PF5P06 

08126 

37,3652 

BANK 

0813 

REF 

2 

LAST 

99 

0314 

E6ANI<  = 

TIME2SAV 

38  lA 

REF 

1 

CrUNT* 

$$/P06 

081A5 

RFF 

73 

LAST 

1322 

37, 3652 

0 5 50  4 

0 

P06 

TC 

ufflag 

SET  NCCCV37  PIT 

0E1A6 

RFF 

5 

1 A ST 

120  1 

37  ,3653 

OCC54 

0 

ACR  ES 

MCrOFLAG 

0815 

37,3654 

C CC04 

c 

PRESTANC 

INF  INT 

0816 

37, 3655 

C C0C6 

1 

EXTEND 

0817 

REF 

33 

LAST 

1297 

37,3656 

3 1025 

0 

CCA 

T IMF  2 

SNAPSHOT  TIME1TIME2 

0 818 

RFF 

o 

LAST 

1325 

37,3657 

52  31  5 

1 

CXCH 

TIPE2SAV 

081P 

REF 

1 

37,  366( 

0 3711 

0 

TC 

scalppep 

0820 

REF 

1 

37,3661 

0 3654 

0 

TC 

PRESTANC 

T1,T2, SCALER  NCT  CCMFATI8LF 

0821 

RFF 

797 

L AST 

1310 

37,3662 

52  155 

1 

CXCH 

N FAC 

T1  ,T2  ANC  SCAIEP  CK 

C822 

REF 

1 

37 ,3663 

52  31  7 

0 

CXCF 

SCALSAV6 

STCRF  SCALER 

082  3 

37 ,3664 

0 000  4 

c 

INF  INT 

0824 

REF 

302 

LAST 

1255 

’7,3665 

0 46  16 

1 

TC 

bankcall 

0825 

REF 

3 

LAST 

177 

37  ,3666 

17167 

1 

CACR 

RNDRFFOR 

REFSMM,  DRIFT,  TRACK  FLAGS  DCRN 

0826 

REF 

98 

LA  ST 

1201 

37,3667 

0 5 5 1 6 

c 

TC 

DCWN'FLAG 

0827 

REF 

7 

LAST 

1323 

37,367'' 

0000  7 

0 

ADRES 

I MUSE 

IMLSe  DCWN 

0827  1 

REF 

c c 

1 AST 

1325 

37,3671 

0 5516 

c 

TC 

CCWNFLAG 

08272 

REF 

7 

LAST 

8?  I 

37, 3672 

00010 

0 

AORES 

RNOVZFLG 

RNCVZFLG  CCWN 

0828 

REF 

29 

LAST 

13'-'  1 

37 ,3673 

3 474  1 

1 

CAF 

B IT  1 1 

0829 

37, ’674 

c crr;6 

1 

EXTENC 

0830 

RFF 

2-' 

LAST 

985 

37, 3675 

05  C13 

0 

NOR 

CHAN13 

SET  STANCSY  ENABLE  BIT 

0831 

REF 

11? 

LAST 

1233 

37,3676 

0 5353 

1 

TC 

PFASCFNG 

SET  RESTART  TC  POSTAND  WHEN  STANDBY 

0832 

37,3677 

C7F24 

0 

CCT 

07024 

RECCVERS 

0833 

37, 3 7 10 

2000  1 

0 

OCT 

2CCCC 

08335 

REF 

2 

LAST 

1 32  5 

F316 

EBANK= 

SCALSAVE 

0834 

RFF 

1 

37,3701 

0 3 7 3 1 

1 

2CACP 

FCSTAND 

C834 

REF 

1 

37,3  7.1? 

76060 

f) 

0835 

pff 

1 

37,37-1’ 

3 4774 

1 

CAE 

CCT62 

0836 

REF 

303 

1 AST 

1325 

37,  37''4 

n 4616 

1 

TC 

BANKCALL 

0837 

RFF 

10 

LAST 

964 

37,3705 

20624 

0 

CACR 

GCPERFl 

0838 

37,3706 

1 3 70  3 

1 

IFF 

-3 

0839 

37,  37 ,.'7 

1 3703 

1 

TCF 

-4 

0 84C 

37,3710 

1 3703 

1 

TCF 

-5 

0840“= 

Rff 

3 

1 AST 

602 

4 774 

0CT62 

FCL'AL  S 

. 5SEC 

CEC  50  = CCT  62 

R0841 

THF 

LCW 

5 BITS 

CF  ■ 

TFF  SCALFR 

RFAcs  loom 

FFR  TfE 

FIRST 

INTERVAL  AFTER 

A 

gap: 

ASSPR8L8  PPVISirN  116 

1 CF  AGC  FPCGRAM  LUMINARY  BY  NASA  202 

1112-171  IS 

:CS  ALG.  11,1969  SKIPPER  .097  FACE  1326 

L 

I MU  MODE 

SWITCHI NG 

rclttnes 

USER'S  PAGE  NO.  2E  EC  S3 

R0P42 

T1  INOREMFNT. 

IF  SCALFRFF  detects  THIS 

INTERVAL  THE  11, 

T2  AND  SCALER 

R0e43 

DATA  ARE 

NCT 

CCMPATA8LE  ANC  RETURN  IS  TC  L+1  FOR  ANOTFER  REAnTNJG  OF  THE 

R08A4 

DATA.  0THFRV>1SE.  THE  RETURN  IS  TC  U- 2 1C  PROCfcED.  RCLIINR  ALSO  PREPARES 

R0B45 

THE  SCALER  RFAEINC 

FCR  CCMPUTATICN  OF  THE  INCREMENT  TC 

UPDATE  T1T2.  (THE 

RT846 

10  MS  BIT  (8IT  6)  TF  THE  SCALER  IS  INCPEMENTEC  5 PS  CUT 

OF  PHASE  FPCM 

RT847 

Tl.)  ArCITIDN 

OF  5 

MS  (FIT  5 ) 

TC  THE 

scaler  rfacing  has 

THE  EFFECT  CF 

RT848 

ADJUSTING  3IT 

6 I N 

THE  SCALER 

TC  PE 

IN 

PHASE  with  bit  1 

OF  Tl.  THE  LOW 

5 

R0849 

BITS  OF 

THE  SCALER 

READING  ARF  THEN 

SET 

TC  ZEFC,  TC  TRLNCATF  THE  SCALER 

R‘)88< 

CATA  TC 

10  MS 

. RRSULTS  ARE  STCRFO  IN 

MPAC,  +1. 

C851 

37,3711 

0 ^Of'6 

I 

SCALPREP  EXTENT 

J85? 

REF  798 

LAST 

1225 

37,3712 

22  156 

C 

CXCH 

MFAC  +2 

T853 

REF  3 

LAST 

382 

37,3713 

0 41  n 

1 

TC 

FINETTME  +1 

0884 

37,3714 

0 000  3 

1 

REL  INT 

0888 

REF  799 

LAST 

1326 

37, 2715 

52  155 

1 

CXCH 

MFAC 

0884 

REF  43 

LAST 

1307 

37,3716 

3 4747 

1 

CA 

B IT5 

ADD  5 

MS  TC  THE  SCALER  READING. 

0857 

RFF  227 

LAST 

1313 

3 7, 27  17 

54  111 

1 

TS 

L 

0888 

REF  241 

LAST 

13  2U 

37, 3720 

3 4 7 5 5 

1 

CA 

ZERO 

0659 

RFF  800 

LAST 

1326 

37,2721 

20  155 

1 

CAS 

MPAC 

0860 

RFF  11 

LAST 

736 

37,2722 

4 434  6 

c 

CS 

LCli.5 

SET  Lew  5 eiTS  OF  (SCALER45MS)  TO  ZERC 

0861 

REF  801 

LAST 

1326 

37, 3723 

7 0155 

1 

MASK 

M F AC  + 1 

ANC  STCPE  RESLLTS  IN  MFAC.+l. 

0862 

REF  802 

LAST 

1326 

37,3724 

56  155 

0 

XCF 

MFAC  +1 

1863 

REF  12 

LAST 

1326 

37,^725 

7 4346 

c 

mask 

LCW5 

TEST 

LEW  5 BITS  CF  SCALER  FOR  THE  FIRST 

AC864 

INTERVAL  AFTER  THE  Tl  INCFEMENT 

A0865 

(New 

= OCOCO,  SINCE  BIT  5 ACDEC). 

0866 

REF  426 

LAST 

1322 

37,3726 

10  000 

0 

CC  S 

A 

I S IT 

1ST  interval  after  Tl  INCREMENT 

0867 

REF  8C3 

LAST 

1326 

27 , 3727 

?4  156 

c 

INCR 

MPAC  *2 

NO 

0868 

REF  804 

LAST 

1326 

37, 272C 

0 C156 

c 

TC 

MFAC  +2 

YES 

D0869 

FCSTANC  1 

rrccvfrs  time  AFTFR  STANCEY.TFF 

SCALER  IS  SMAPSHOTTFD  AND  THE 

R0870 

TTPei  TIME2  CnUNTFR 

IS  SFT  TC 

ZERO. 

THE 

Lew  5 BITS  CF  THE  SCALER  ARE 

ROB  7 1 

INSPECTFr  TO 

INJSURF 

COMPATABIl 

.ITY  SETViE 

EN  THE  SCALER  READING  AND  THE 

R0872 

clearing 

OF  the  riMF  CCUNT:R. 

IT  THEN  CCWFUTES  TFE  CIFFERENCE  IN  SCALER 

R0873 

VALL'^S  (IN  dp: 

1 AND 

ADOS  THIS  TC  THE 

PPFVICIRLV  SNAPSFCTTEE  VALUES  Cf 

R0874 

TtPFl  T1NE2  AND  PLACES  This  MEN  TIME 

INTO  THE  TIMEl  TIME2  CCLMFR. 

0875 

REF  1 

CCUNTf 

1 1/P05 

0876 

RFF  20 

L AST 

1325 

37, 2721 

4 4 741 

C 

PCSTAND  CS 

BITU 

RECCVFR  TIME  AFTER  STANDBY. 

0877 

37, 3732 

0 0006 

1 

EXTEND 

0878 

REF  2 1 

1 AST 

1325 

37,2733 

03  01  3 

0 

WAND 

CHAN13 

CLEAR 

STANCEY  ENABLE  BIT 

0879 

37, 3734 

0 0C'’4 

0 

INHINT 

088( 

REF  241 

L ACT 

1326 

37 ,3735 

3 4 755 

1 

CA 

ZERO 

0881 

REF  228 

LAST 

13  26 

37 , 3736 

54  OC! 

1 

T S 

L 

088? 

RFF  34 

LAST 

1325 

37, 3737 

52  025 

1 

DXCH 

TIME  2 

CLEAR 

TIME1TIME2 

0883 

REF  2 

LAST 

132'= 

27,2740 

0 371  1 

D 

TC 

SCALPREP 

STORE 

scaler  in  MPAC,  MPAC+1 

0884 

RFF  2 

LAST 

1325 

37, 2741 

C 3734 

1 

TC 

PCSTAND  +3 

T 1 ,T2 

.SCALER  NCT  COMPATIBLE 

0885 

37. 3742 

0 0006 

1 

EXTEND 

Tl  ,T2 

ANC  scaler  CK 

0886 

RFF  3 

LAST 

1225 

37,3743 

4 0 31  7 

0 

CCS 

SCALSAVE 

0887 

REF  805 

LAST 

1326 

37,3744 

20  155 

1 

CAS 

MPAC 

FCRM 

CF  CIFFERENCE  CF  FCSTSTANCEY  SCALER 

GAP: 
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L 

IPU 

PCDE 

SWITCFING 

RCUT  INICS 

LSFP' 5 FACE  NC.  29  EO  S3 

0P8R 

RFF 

46 

LAST 

1314 

37,3749 

3 4 74  2 

1 

CAF 

B ITIO 

MINUS  PRESTANCBY  SCALER  AND  SHIFT  RIGHT 

0889 

REF 

11 

LAST 

877 

37, 3746 

0 73  12 

P 

1C 

SHCRTNP 

5 TC  ALIGN  EITS  WITH  TIPE1TIME2. 

0890 

R'=F 

242 

LAST 

1326 

37,3747 

3 4755 

1 

CAF 

ZERO 

089  1 

PFF 

806 

LAST 

1326 

37,375C 

54  156 

1 

TS 

WPAC  +2 

NEECEC  FCR  TP  AGREE 

0892 

REF 

16 

LAST 

1309 

37,3791 

0 7262 

0 

TC 

TPAGREE 

NAKE  CF  CIFF  AGREE 

CE93 

RTF 

807 

LA'T 

1327 

37 ,3792 

1C  154 

0 

CCS 

VPAC 

3894 

RFF 

1 

37,3753 

C 3 760 

C 

TC 

PCSTCCN 

IF  CP  CIFF  NET  +,  NO  SCALER  OVERFLOW 

0899 

PEF 

2 

LAST 

1327 

37,3754 

0 376) 

0 

TC 

POSTCCM 

BETWEEN  FRE  AND  FCST  STANCEY. 

0896 

37,3755 

0 3756 

0 

TC 

+ 1 

IF  CP  CIFF  net  -,  SCALER  CVERFLOWEC.  ACC 

0897 

ORF 

47 

LAST 

1327 

37, 3756 

3 4742 

1 

CAF 

61  TIO 

BIT  10  TC  HIGH  CIFF  TC  CORRECT. 

0898 

RFF 

3 98 

LAST 

1327 

37 ,3757 

26  154 

") 

ACS 

MPAC 

0899 

37,3760 

C C0C6 

1 

PCSTCCY  FXTENC 

C(HFAC,+1)  IS  MAGNITUDE  OF  DELTA  SCALER. 

0900 

RFF 

4 

LAST 

1325 

37, 3761 

3 0315 

0 

OCA 

TIMF2SAV 

FRESTANCEY  TINE1TIMF2 

0901 

RFF 

809 

lAST 

1327 

37,3762 

20  155 

1 

CAS 

PFAC 

0902 

REF 

17 

LAST 

1327 

37,3763 

C 7262 

c 

TC 

T FAGREE 

FCRCE  SIGN  AGREEMENT 

0903 

RFF 

810 

LAST 

1327 

37, 3764 

52  155 

1 

CXCH 

MPAC 

UPDATED  \ALLE  FCP  T1  ,T2. 

0904 

REF 

3 5 

LA9T 

1326 

37,3765 

20  02  5 

1 

CAS 

T IYE2 

LOAC  LPCATEC  VALUE  INTC  T1,T2,  WITH 

0904  5 

RFF 

100 

LAST 

1325 

37,3766 

0 5RI6 

t 

TC 

DCWNFLAG 

CLEAR  NCCCFLAG 

09046 

RFF 

6 

LAST 

1325 

37,3767 

007  54 

n 

ACRES 

NCDOFLAG 

0905 

PFF 

64 

LAST 

1322 

37,377C 

C 6CC1 

c 

TC 

GCTCFCCF 

gap:  ASSENBLE  revision  lift  OF  AC-C  PRCGRAR  LURINAPV  BV  NASA  20211  12-071 


L KFYRLFT,  UPRUPT 


COO  1 

14,3775 

EANK 

14 

00(12 

PFF 

1 

04, 21.100 

SETLCC 

KEYRLPT 

0CC3 

04,3256 

BANK 

RFP 

1 

CCLNT* 

$$/KFYUF 

0005 

REF 

9 

LAST 

1121 

•■'4,3256 

54  0 16 

1 

KEYRIJPTl 

TS 

BANKRUPT 

0006 

REF 

355 

1 AST 

1317 

04,3257 

56  CC2 

0 

XGF 

G 

0007 

RFF 

8 

LAST 

1121 

04, 3260 

54  C 12 

0 

TS 

GRLPT 

0008 

REP 

2 

LAST 

460 

04,3261 

0 4 400 

1 

TC 

LODSANPI 

0009 

REF 

1 - 

LAST 

1326 

04,3262 

3 4346 

1 

CAF 

LC1.5 

OOIO 

04, 3263 

0 GC06 

1 

EXTENT 

0011 

RCF 

2 

LAST 

219 

04  ,3  264 

02  115 

1 

RANG 

MNKFYIN 

001? 

REF 

6 

LAST 

129C 

04,3265 

54  C73 

1 

KFYCCR 

TS 

RLPTREG4 

0013 

RFF 

29 

1 AST 

90  6 

^4, 3?66 

4 0101 

0 

CS 

FLAGWRD5 

OOIA 

PFF 

1 

04,3267 

7 4735 

0 

NASK 

CSKYFFIT 

0.01  5 

REF 

30 

LAST 

132E 

C4, 327C 

26  101 

0 

ACS 

FLAGNPC5 

0016 

RFF 

6 

1 AST 

1091 

04,3271 

3 4355 

0 

ACCFPTUP 

CAF 

Cf'RPR  10 

0017 

RFF 

28 

LAST 

1296 

''4,327? 

C 5C72 

1 

TC 

NCVAC 

0018 

REF 

66 

LAST 

460 

0776 

EBAN  K = 

D SPCCLNT 

OCIF 

REF 

1 

04 , 3273 

02  07  7 

0 

2CADR 

CHAP.  IN 

0019 

REF 

1 

04, ’274 

60  10  1 

1 

007!) 

RFF 

7 

t AST 

1328 

u4, 3275 

3 0173 

0 

CA 

PLPTRFG4 

00  21 

PFF 

2A 

LAST 

1316 

04,3276 

50  064 

0 

INCFX 

LCCCTP 

0022 

RFF 

8 1 1 

LAST 

132  7 

C 4, 3 2 77 

54  154 

0 

TS 

R FAC 

0023 

RFF 

22 

LAST 

986 

)4 ,3300 

0 5270 

1 

TC 

RESURF 
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TIRE  IS  SAATCHEO  IK  RtF7  FCF  NCLN  65. 
CEECK  IF  KEYS  5M-1M  CN 


(MOTE:  RLPTREGA  = KEY7ERP1) 


LEAVE  5 EIT  key  CCE  IN  RPAC  FCR  CEARIN 


GAP : 


ASS'^P8L=  RfVISION  116  CF  AGC  PRCGRAN  LUMINARY  BY  NASA  2')21112-071 


L KeYPUFT,  UORUPT 


P002A  bPRUPT  PRCGRAY 


1025 

ref 

1',' 

LAST 

132  E 

C4 . 33  0 1 

54 

016 

1 

UFRUPT 

TS 

BANK  RUPT 

0026 

RFF 

356 

LAST 

1328 

14, 3302 

56 

on? 

D 

KCH 

Q 

CC27 

REF 

9 

LAST 

1328 

04 ,3303 

54 

U12 

9 

TS 

QRUPT 

1028 

RFF 

3 

LAST 

1328 

'■4, 33^4 

C 

4400 

1 

TC 

LCnSAPPT 

002  9 

REF 

243 

LAST 

1327 

■4,  3305 

3 

4755 

1 

CAF 

ZERO 

0030 

REF 

2 

LAST 

223 

F4,33C6 

56 

C45 

0 

XCF 

INLINK 

0031 

REF 

2 

LAST 

155 

f 4,  3 3':  7 

54 

0 73 

1 

1 S 

KEYTRPPI 

0032 

REF 

35 

LAST 

1275 

')4,3310 

3 

4751 

0 

CAF 

B IT3 

00^3 

04,3311 

0 

0O')6 

1 

EXTENC 

0034 

REF 

34 

LAST 

1317 

:4, 3312 

•7  5 

Oil 

I 

NOP 

n SALPCLT 

0C35 

RFF 

14 

LAST 

1328 

:i4,33  13 

3 

4346 

1 

UPRPT  1 

CAF 

L0W5 

T036 

REF 

3 

LA  ST 

1329 

04,3314 

7 

00  7 3 

1 

NASK 

KEYTENPl 

0 03  7 

RFF 

4 

LAST 

1329 

04,3315 

56 

073 

0 

XCH 

KEYTEPPl 

003? 

04,3316 

0 

0006 

1 

EXTENT 

00  39 

RFF 

4 8 

LAST 

132  7 

C4, 3317 

7 

4 742 

0 

NF 

8IT10 

CC4C 

RFF 

1 

04 ,3320 

54 

332 

1 

TS 

KEYTEPP2 

0041 

RFF 

15 

LA  ST 

1329 

C4 , 132  1 

7 

4346 

0 

NASK 

LCN5 

0042 

REF 

1 

■)4,  3322 

6 

3^56 

1 

AO 

HIIO 

0C43 

REF 

1 

04,3323 

) 

3353 

1 

TC 

UPTEST 

0044 

REF 

49 

1 AST 

132F 

•:4,  3 324 

a 

4742 

1 

C.AF 

BITin 

0045 

04, 3325 

6 

ol'06 

1 

EXTENO 

0046 

RFF 

2 

LAST 

132  9 

04 ,3326 

7 

0332 

1 

NF 

KEYTEPP2 

0047 

RFF 

16 

) AST 

1329 

04,3327 

7 

4346 

0 

PASK 

LCN5 

CC4E 

04,3330 

4 

0 7 70 

0 

COM 

0049 

RFF 

2 

LAST 

1329 

04 , 33  3 1 

(I 

3353 

1 

TC 

UPTEST 

005  0 

REF 

1 

04,  33  32 

4 

336  1 

1 

UPOK 

CS 

ELRCODE 

0051 

RFF 

5 

LAST 

1329 

04,3333 

6 

0073 

0- 

AC 

KEYTE^'P! 

0052 

04,3334 

0 

0006 

1 

EXTEND 

0053 

RFF 

1 

74,3335 

1 

3343 

1 

BZF 

C LUPLCCK 

0054 

REF 

1 

04 , 3336 

3 

4750 

1 

CAP 

UPLCC8TT 

0055 

RFF 

26 

LAST 

891 

04,3337 

7 

0 1G3 

1 

PASK 

FLAG^PCT 

PC56 

RFF 

427 

LAST 

1326 

04,3340 

10 

000 

0 

CCS 

A 

0057 

RFF 

23 

LAST 

1326 

C4, 3341 

c 

5 2 70 

1 

TC 

RESUNE 

0058 

REF 

1 

04, 3342 

0 

3 27  1 

c 

IC 

ACCE  FTUF 

Q059 

REF 

2 

LAST 

1329 

04, 3343 

4 

475  J 

0 

C) UPLCCK 

CS 

UP L CEBIT 

0061) 

RFF 

27 

LAST 

1329 

04, 3344 

7 

0103 

1 

NASK 

F LAGWR07 

0061 

RFF 

28 

LAST 

1329 

74, 3345 

54 

103 

1 

TS 

FLACNROT 

0062 

RFF 

2 

LAST 

1329 

04,3346 

0 

3 27  1 

0 

TC 

ACCEPTUP 

A0063 

0064 

rer 

29 

LAST 

1329 

04,3347 

4 

0103 

1 

TPFA  IL2 

CS 

FLAGWR07 

006  5 

RFF 

■a 

LAST 

1329 

04, 33 5C 

? 

4750 

c 

NASK 

UP) CEBIT 

0066 

OFF 

30 

LAST 

1329 

04,3351 

26 

103 

1 

AOS 

FLAGNR07 

0067 

RFF 

24 

LAST 

13  29 

04,3352 

0 

5270 

1 

TC 

rfsupr 

0069 

REF 

6 

LAST 

1329 

04,3353 

6 

C'!73 

0 

LP7FST 

AO 

keytfnfi 
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USER'S  PAGE  NC.  2 EQ  S3 


nyp  IS  SNATCPEc  in  rupt  for  noun  tt. 


TURN  CN  LPAC7  LIGHT 
(BIT  3 CF  channel  11) 

TEST  FCR  TRIPLE  CHAR  REDLNOANCY 

LCW9  CF  NORC 

LGR5  INTC  KEYTEPFl 

SHIFT  RKHT  5 

PIC  5 


SH  IFT  R IC-HT  5 
H IGH  5 


CCCE  IS  GClC.  if  COCE  = 'ERROR  RESET', 
CLEAR  LPL0CKFL(SFT  BITA  CF  FLAGPRC7  = 0) 
IF  COCE  FOES  NGT  = 'ERROR  RESET',  ACCEPT 
CnCE  CNLY  IF  LFLCCKFL  IS  CLEAR  (=0). 

TEST  UPLCCKFL  FOR  0 OR  1 


UPlCCKFL  = I 
UFLCCKFL  = 0 

CLEAR  LPLOCKFL  (I.F.,SET  BIT  4 CF  ) 
FLAGWRC7  = 0) 


CCCE  IS  EAC 

LCCK  CLT  FLRTHER  UPLINK  ACTIVITY 
(FY  SETTING  LIFLOCKFI  = 1)  UNTIL 
'FPRCR  RESET'  TS  SENT  VIA  UPLINK. 


r;4P: 
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L KEYRUPT,  UPRUPT  USER'S  PAGE  NC.  3 EO  S3 


CC7C 

0071 

REF 

RFF 

42B 

1 

LAST 

1329 

C4 , 3354 
04,3355 

10  OIJ 
0 3347 

n 

1 

CCS 

TC 

A 

TPFAIL2 

0'J72 

04,3356 

77740 

1 

H 110 

OCT 

77740 

0073 

REF 

2 

LAST 

1 33C 

*'4,3357 

U 3347 

1 

TC 

TPFAIL2 

0074 

REF 

357 

LAST 

132  9 

C4, 3360 

0 IPO 2 

0 

IC 

C 

0075 

04,3361 

00022 

1 

ELRCCCF 

OCT 

22 

R0076  'UPLINK  activity  LIGHT'  ’S  TURNED  OFE  PY  

R0077  1.  VPREUrSP 

R0C78  ?.  PRFCR  RESE'" 

R0079  3.  UPCATE  PRQGRAMP27)  ENTEPED  BY  V 70  , V 7 1 , V7  2 , A N C V73. 


POOR' 

ROCPI  THP  RTEPTICN  CF  A PAC  CCCFII.E  CCC  FAILURE)  LCCKS  CLT  FUPTFFR  UPLINK  ACTIVITY  EY  SETTING  BITA  CF  FLAGRRC7  = 1. 
RTOBR  this  INTICATION  WIIL  be  TRANSFERRED  THE  GRCLND  BY  THF  CCWNLINK  kHICH  CCNNLINKS  ALL  FLAGWCRCS. 

Rooes  MIEN  UPLINK  ACTIVITY  IS  LbCKEC  CUT  , IT  CAN  BE  ALLOWED  WHEN  THE  GROLND  LPLINKS  AND  'ERRCR  RESET*  CCCE. 

R0087  (TT  IS  RECOMMENDED  THAT  THF  'ERRCR  LIGHT  RESET'  CCCE  IS  PRECFEDED  EY  16  BITS  THE  FIRST  CF  WHICH  IS  1 FCLLCWEC 

R0O89  BY  15  ZEROES.  THIS  WILL  ELIMINATE  EXTRANEOUS  BITS  FROM  INLINK  WHICH  NAY  HAVF  BEEN  LEFT  CVEP  FRCP  THE  ORIGINAL 

POC^l  FAILLRF) 

RT09?  UPLINK  ACTIVITY  IS  ALSO  A LL  0 WE  C ( UNLDC  K F.D ) CURING  FRESH  START  WHEN  FRESH  START  SETS  BI14  OF  FLAGWRC7  = C. 


G4P: 
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I 

RTT11 

R0002 
ROQOA 
R9005 
R 0007 
R0CC9 
ROOl'- 
pom2 


P'V)13 

RO^IA 

RQ015 
P0C17 
RCCl  9 

R0P20 

R0072 

R0C2A 

ROO?t> 

R092R 


R0029 

R0039 
R0031 
RO:)33 
R0O39 
R 0037 
R0039 
ROOAO 

ROOA  1 
RQ0A2 
ROOA3 
ROOAA 
RO  JA5 

R )0A6 
R0047 
RCCA8 


DISPLAY  INTFRFACF  POUTUrS  1S'"R'S  PAGE  NO.  1 EO  S3 

CTS^LAYS  GAN  PF  CLASSIFIED  IN7Q  THE  FCLLCHNG  CATEGCRIES- 

1.  FRIOOITY  cisplays-  displays  which  TAKF  priority  over  all  other  displays,  lslally  these  cisflays  are  sent 
OLT  under  critical  ALARY  CCNDITICNS. 

2.  ExTENDFC  verb  displays-  ALL  EXTENoEC  VERES  ANC  PARK  RCLTINES  SHOULD  USE  EXTfncEC  VERE  (HARK)  riSFLAYS. 

3.  NCPMAL  DISPLAYS-  ALL  MSS ICN  FRCGRAM  CISPLAYS  WHICH  INTERFACE  WITH  THE  ASTRCNALT  DURING  THE  NCRRAL 
'EOUENCE  OF  EVENTS. 

A.  RISC.  DISPLAYS-  ALL  CISPLAYS  NOT  FANOLEC  BY  TFE  OISPLAY  I N 7 E P F A C E R C L T I N E S . TFESE  INCLLCE  SLCF  CISFLAYS  AS 
YM  displays  and  SPECIAl  PURPOSE  DISPLAYS  HANCLEC  BY  PINBALL. 


5.  ASTRONAUT  IMTlATEn  DISPLAYS-  ALL  CISFl«YS  INITIATED  EXTERMILY. 

THE  FCLLCWING  TERYS  APF  IJS''C  TC  CFSCKIBE  THE  STATUS  PF  CISPLAYS- 

1.  ACTIVE-thF  display  WHICH  IS  (1)  BEING  CISFLAYEC  TO  THE  ASTRONAUT  AND  WAITING  FCR  A RFSPCNSE  OR 

(2)  WAITING  FIRST  IN  LINE  FOR  THE  ASTRCK'ALT  TO  FINISH  USING  THE  CSKY  OR  (?i  EFING  CISPLAYEC  CN  TFE  CSKY 
BUT  NOT  WAITING  FCR  A RFSFCNSE. 

2.  INACTIVE  -A  DISPLAY  WHICH  HAS  (1)  EFEN  ACTIVF  ELT  WAS  I NTE R R L FT F C EY  A CISFLAY  CE  FIGFER  PRIORITY, 

(2)  been  PUT  INTO  THE  WAITING  LIST  AT  TIME  IT  WAS  REQUESTED  CUE  TC  THE  FACT  A HIGHER  PRICPITY  CISFLAY 
WAS  ALREADY  GCING,  (3)  EFEN  INTERRUPTED  EY  TFE  ASTRONAUT  (CALLED  A PINBPANCF  CCNDHtCN,  SINCE  THIS  TYPE 
OF  INACTIVE  DISPLAY  IS  USUALLY  REACTIVATED  ONLY  BY  PINBALL ) CR  (4)  A DISPLAY  WFICH  HAS  FINISHED  BUT  STILL 
HAS  INFC  SAVED  FCR  RESTART  PIJRPCSES. 


ci'play  pridrities  wcrk  as  FCLLCWS- 
INTFRRIJPTS- 

1.  1HF  ASTRCFAUT  can  interrupt  any  CISPLAY  with  an  external  CISFLAY  REQUEST. 

2.  internal  displays  can  not  be  S'=NT  CUT  WHEN  THE  ASTRONAUT  IS  USING  THE  CSKY. 

3.  PfilORTTY  DISPLAYS  INTFRRUPT  ALL  OTHER  TYPES  OF  INTERNAL  CISPLAYS.  A PRICPITY  DISPLAY  INTERRUPTING  ANCTHEF 
PRIORITY  DISPLAY  WILL  CAUSE  AN  A?CPT  UNLESS  B1T14  IS  SET  FOR  THE  LINUS  ROUTINE. 

4.  A mark  CISPLAY  INTERRUPTS  ANY  NORMAL  CISPLAY. 

9.  A mark  that  interrupts  a mark  ccmpletely  replaces  it. 

OPDER  OF  WAITING  DISPI.AYS- 

1.  ASTRONAUT  external  USE 

2.  PRIORITY 

3.  INTERRUPTED  MARK 

4.  INTERPUFTCC  NORMAL 

5.  MARK  TO  BE  REQUESTED  (SEE  DESCRIPTICN  CF  ENCMAPK) 

6.  mark  WAITING 

7.  NCPMAL  WAMING 


GAP: 
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L DISPLAY  INTERFACE  RCLTINES  USER'S  PAGE  NO.  2 EQ  S3 

P00A9  THF  OISPLAY  ROUTINES  ARF  INTENCEC  TC  SERVE  AS  AN  IN'TERPACE  BETWEEN  THE  LSER  ANC  PINBAtl.  THE 

R3051  FOLLOWING  STATEMENTS  CAN  5E  MACE  A8CUT  NCPMAL  CISPLAYS  ANC  PRIORITY  CISPLAYS  (A  CESCPIPTICN  CF  MARK  RCLTINES 

R3053  WILL  PCLLCW  LATER): 


P005A 
R00S6 
Ronss 
RCCS9 
R006I 
R0D63 
R0C65 
R00  66 
R0067 
R0069 
R007(I 
9 00  72 

ROOT  4 
R007S 


1.  ALL  PCLTINES  THAT  FNC  IN  R HAVE  AN  IMMECIATE  RETURN  TO  TFF  LSER.  FOR  ALL  FLASHING  CISPLAYS  THIS  REILRN 
IS  TO  THF  USERS  CALL  CAOR  +A.  FCR  THE  CNLY  NGN  FLASHING  INMEDIATE  RETURN  riS°LAY  (GOCSPR)  THIS  RETURN 
IS  TO  THE  USERS  CALLING  LOG  +1. 

2.  ALL  RCLTINES  NTT  ENDING  IN  R DC  NCT  DC  AN  IMMEDIATE  RETURN  TO  THE  LSER. 

3.  ALL  ROUTINTS  THAT  PNC  IN  R START  A SEPARATE  JCE  (MAKFPLAY)  WITH  USERS  JCB  PRIORITY. 

4.  ALL  PCUTINES  NCT  '=NC1NG  IN  R ERANCH  DIRECTLY  TO  MAKEPLAY  WHICH  MAKES  THESE  DISPLAYS  A FART  CF  THE 

USERS  JCP. 

F.  ALL  DISPLAY  ROUTINES  ARE  CALLED  VIA  EANKCALL. 

6.  TO  RESTART  A DISPLAY  THE  USER  WILL  GENERALLY  USF  A PHASE  OF  ONE  WITH  DESIRED  RESTART  GRCLP  (SEE 
DESCRIPTION  CF  RESTARTS). 

7.  ALL  FLASHING  DISPLAY'  HAVE  3 RETLRNS  TC  THF  LSER  FRCM  ASTFCNALT  PESFCNSES.  A TERMINATE  (V3A)  BRANCHES 

TO  THE  USERS  CALL  CADR  +1.  A PROCEEP  (V33)  BRANCHES  TO  THE  USERS  CALL  CADR  +2.  AN  ENTER  CR  RECYCLE 

(V32)  branches  to  THE  LSERS  CALL  CAOR  +3. 

H.  ALL  RCUTINES  MUST  BE  USED  UNDER  EXECUTIVE  CONTROL. 


R0076  A DESCRIPTION  OF  EACH  ROLTINE  WITH  AN  EXAMPLE  FDLLCWS: 


R0077 

GODSM  IS  USED.  TC  DISPLAY  A VERB  NOUN  ARRIVING 

I N A.  NC 

RFTURN  IS 

MADE  TC  THE  USER. 

R0079 

1.  GCnSP  IS  NET  RESTARTAELE 

R0080 

2.  A VERB  PASTE  WITH  GODSP  ALWAYS  TURNS  CN  THE  FLASH. 

AOOfU 

CAF 

VXXNYY 

AOOP? 

TC 

0ANKCALL 

A00B3 

CADR 

GCOSP 

AOCEA 

VXXNYY 

OCT 

OXXYY 

R0C85 

GODSPR  IS  THF  SAME  AS  GCDSF  CNLY  RETURN  IS  TC 

THE  USER. 

A0086 

CAF 

VXXNYY 

ACC87 

TC 

8AMKCALL 

A )088 

CADR 

G CCS  PR 

A0089 

... 

... 

IMMEDIATE  RETURN  CF  GCDSPR 

ponso 

GOFLASH  DISPLAYS  A FLA'HING  VERB  NCLN  WITH  NC 

IMMEDIATE 

RETURN  TO 

THE  USER.  3 RETURNS  ARE  POSSIBLE 

from 

R009  2 

THE  ASTRONAUT  ( S E NC  . 7 ABOVE). 

ACC93 

CAF 

V X XMYY  ' 

VXX  NYY  WILL  EE  A FLASHING 

VERB  NCUN 

A0094 

TC 

BANKCALL 

A0098 

CADR 

GCFLASH 

ACC96 

... 

... 

TERMINATE  RETLRN 

A0097 

... 

... 

PRCCFEC  RETURN 

A0098 

... 

... 

ENTER  CR  RECYCLE  RETURN 

R0099  GOPFRFI  IS  ENTERED  WITH  DESIRED  CHECKLIST  VALUE  IN  A.  GOPERFl  WILL  DISPLAY  THIS  VALUE  IN  R1  BY  MEANS  CF  A 
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I r!S’’LAY  IMTEPFAGF  ROUTINES  USER'S  PAGE  NO.  3 EC  S3 

ROlOl  V 'I  N25.A  flashing  PLEASE  PERFFRM  CN  CHECKLIST  ( V50  N2E)  IS  THEN  CISt>LAYED.  NC  INN'^CIATE  RETURN  IS  RACE  TC 
R0103  USER  ( SFE  NO.  7 APCVF), 

ROMA  GOPEOFl  BLANKS  RFCISTF.RS  R2  AND  R3 


AC1C5 
AO  106 
AOIOT 
A31C8 
A0109 
AOllC 


CAR  nCTXX  COnF  for  CHECKLIST  VALLE  XX 

TC  S ANKCAL  L 

CAOR  GCPERFl 

TERMINATE  RETURN 

fpcceec  return 

...  ...  ENTER  RFTURN 


ROlll  G0PEPF2  IS  i^NTERED  WITH  A VARIABL'^  NCUN  ANC  VOl  ( VOO  FCR  MO  OR  Nil)  IN  A.  GCPERR2  WILL  FIRST  DISPLAY  THE 

R0113  RECUESTEC  NCUN  PY  MEANS  CF  A VOINYY  OR  A VOONYY.  PLEASF  PERFORM  FN  NCLN  (V50  NYY)  THEN  BECCMES  A FLASHING 

ROUE  display.  NC  IMMPCIATF  RETURN  IS  MACF  TC  THF  USER  (SEE  NO.  7 ABCVE). 


RT116  GCFERF2  COFS  NOT  PLANK  ANY  REGISTERS 

A0117 
AOll  8 
AJ119 
A012O 
A ■)  1 2 I 
A3122 


CAR  VXXNYY  VARIABLE  NCLN  YY.  XX=OCCR  01. 

TC  BANKCALL 

CACR  GCPERF2 

TERMINATE  RETURN 

...  ...  FRCCEED  RETURN 

...  ...  enter  return 


R0123  G0PERF3  IS  LSFO  FCR  A PLEASE  FERFCP«  CN  A PRCGRAM  NUMBER.  THE  CFSIRFD  PROGRAM  NC.  IS  ENTERED  IN  A.  GCFERF3 

R)12S  DISPLAYS  THE  NO.  PY  wpftNS  OF  A VCE  NQ7  HCLLCWED  BY  A FLASHING  V 50  NQ7  FCP  A PLEASE  PERFORM.  NO  IMMEDIATE  RETURN 

R3127  IS  MACE  TC  THF  USFP  (SFF  NC.  7 ABCVF). 

R0128  GOPFRFP  planks  RFCISTERS  R2  AND  R3 


A0129 
A0130 
A0131 
A 1132 
AOI33 
AH3A 


CAF 

DECXX 

RECUEST  FERFCPM  CN  PXX 

TC 

BAMKCAl L 

CACP 

GrPEPF3 

• o « 

• • • 

TERMINATE  RETURN 

• • • 

• • e 

PROCEED  RETURN 

• • • 

• • « 

ENTER  RETURN 

RU135  GCFERFA  IS  USED  FCR  A PLEASE  PERFORM  ON  AN  OPTION.  THE  DESIRED  QPTICN  ISFNTERED  IN  A AND  STCREC  IN  CFTICM. 

R0137  GOPFRFA  displays  PL  AND  R2  PY  MEANS  CF  A VOAN06  FCLLCWEC  PY  A FLASHING  V50N06  FCR  A PLEASE  PERFORM.  NC 

RU39  IMPFCIATE  RETURN  IS  MACE  TO  THE  USER  (SEE  NC.  7 ABCVF). 


AOMO 
AO  lAl 
A01A2 
A 01 43 
AT  144 
A0145 

R'1146  GCPERF4  BLANKS  RFGISTEP  R3 


CAF 

OCTXX 

RFQUE5T  FERFCRM  CN  CPTICN  XX 

TC 

BANKCALL 

CACR 

GGPF.RF.4 

... 

... 

TERMINATE  RETURN 

. . . 

... 

FPCCFFC  RETURN 
ENTER  return 

GAP : 
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DISPLAY  INTEPPACF  ROLTIMFS 


LSEF'S  PAGE  AC. 


EC  S3 


R0147 
RO  1^9 


GCCSPRFT  IS  USED  TC  CISPLAY  A VERE  NCUN  ARRIVING  IN  A WITF  A RETURN  TC  THE  LSER  AFTER  THE  DISPLAY  HAS  EEEN  SENT 
OUT. 


A0150 

CAP 

VXXNYY 

ACl  ‘=1 

TC 

BANKCALL 

AO  152 

CADR 

GCOS  PRFT 

A0153 

. . . 

... 

RFTURN  TC  LSER 

R0154 

RFGOD'P 

IS  USED 

TC  DISPLAY  A VERB  NCUN  ARRIVING  IN  A. 

REGODSP  IS  THF 

SAME  AS  GCDSP  ONLY  REGODSP  REPLACE 

R0196 

ACTIVE  NORMAL  DISPLAY  IP  CNF  HAS  ACTIVE. 

A0157 

CA  F 

V >KNVV 

A0158 

TC 

BANKCALL 

A0159 

CADR 

REGODSP 

R016C 

RFPLA  SH 

1 S THE 

SAME  AC  GCFLASH  CNLY  REELASH  RFPIACES 

ANY  ACTIVE  NORMAL 

niSPLAV  IF  ONE  HAS  ACTIVE. 

A0162 

CAF 

VKXNYY 

VXX  NYY  HILL  EE  A FLASHING  VERB  I 

A0163 

TC 

BANKCALL 

A0164 

CADR 

PEF1.ASH 

A1165 

... 

... 

TERMINATE  return 

A0166 

... 

... 

PRCCEED  RETLRN 

AO  167 

... 

... 

ENTER  RFTURN 

P0168 

GOFLASHP 

TS  SAME  AS  GCFLASH  CNLY  AN  IMMEDIATE 

RETLRN 

IS  MADE  TC  THE  LSFPS  CALL  CACR  +4. 

A017C 

CAF 

V XXNYY 

A017! 

TC 

BANKCALL 

A0172 

CADR 

GCFLASHR 

A0173 

... 

... 

TERMINATE  RETLRN 

A0174 

• • 0 

. . . 

FRCCEEC  RETURN 

AOl  75 

. . . 

. .. 

ENTER  OR  RECYCLE  RETURN 

AQ  1 76 

... 

... 

immediate  RETURN  FROM  GOFLASHR 

ROl  77 

GOPFRFIR 

IS  the 

SAME  AS  GCPERFl  CNLY  GOPFRFIR 

HAS  AN 

IMMEDIATE  RETLRN 

TCLSERS  CALL  CACR  +4. 

RC  179 

GOPERF  IR 

BLANKS 

REGISTERS  R2  ANC  R3 

AO  180 

CAF 

CCTXX 

CCCE  FCR  CHECKLIST  VALLE  XX. 

AO  1 El 

TC 

BANKCALL 

A0182 

CACP 

GCPERFIR 

AOl  83 

. . . 

. .. 

TERMINATE  RETURN 

A0184 

... 

... 

PROCEED  RETURN 

AOIS"^ 

... 

... 

ENTER  RETURN 

A0186 

... 

0 0 0 

IMMEDIATE  RETLRN  FRCM  GCPERFIR 

R0187  G0PERF2R  IS  THE  SANE  AS  GCPERF2  CNLY  AN  IVVFCIATE  RETURN  IS  MACE  TC  USERS  CALL  CADR  +A. 
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L 

DI SPL  AY 

INTERFACE  FPLTINFS 

CSFR'S  PAGE  NC.  5 

EO  S3 

RT  18P 

GrFERF2R 

CCES  ACT  ELANK  ANY  REGISTERS 

AOISO 

CAF 

VXXNYY 

VAPIAELE  NCUN  YY  REOUESTEC. 

x>=cc  CR 

A0191 

TC 

BANKCALL 

ACIE? 

GAfR 

GnPERF2R 

A3193 

... 

. . . 

TERMINATE  RETURN 

AOIPA 

• « e 

. . . 

PRCCEEC  RETLPN 

A0195 

. . . 

... 

ENTER  RETURN 

A0196 

... 

... 

IMMECIATE  RETURN  HERE  FRCM 

G0PERF2R 

R0197 

GCFFP  F3R 

I S TFE 

SApF  AS  GCPF0F3  GALY 

AN 

IPNEC  iate  feturn 

! IS  MADE 

TC 

USERS  CALL  CAOR  +A. 

R0199 

G0PERF3R 

PLANKS 

REGISTERS  R2  AND  R? 

A02P" 

GA  = 

PROGXX 

PERFORM  FRCGRAp  XX 

AO  2' 1 

TC 

BANK  CALL 

AO  21  2 

CACR 

GCPERF3R 

A3203 

... 

... 

TERMINATE  RETLPN 

A020A 

. . . 

. .. 

PROCEEC  RETURN 

A0205 

. . . 

. . . 

ENTER  RETURN 

A02''6 

... 

... 

GDPERF3R  IVMECIATELY  REILRNS  HERE 

R0207 

GOPFRFAR 

IS  the 

SAPE  AS  GCPERFA  CNLY 

AN 

INNECTATF  PFTLRN 

1 IS  PAPE 

TC 

USERS  CALL  CACR  +A. 

AG209 

CAF 

nCTxx 

RFCCEST  FFRFGRM  CN  CFTICNXX 

A021C 

TC 

PANKCALL 

A0211 

CACR 

GCPERF4R 

A0212 

... 

... 

TERMINATE  RETURN 

A0213 

... 

... 

PRCCEEC  RETURN 

A 121A 

... 

. .. 

ENTER  FftUPN 

A1215 

... 

. . . 

IMMEDIATE  RETURN  TO  USER 

R0216 

GOPEP  FAR 

PLANKS 

register  R3 

R0217 

REFLASHF 

IS  THE 

SAPE  AS  PEFLASH  only 

AN 

IPMECIATE  RETURN 

IS  MADE 

TC 

THP  USERS  CALL  CACR  +A. 

A021F 

CAF 

VXXNYY 

VXX  NYY  HILL  EE  A FLASHING 

VERB  NCUN 

A022n 

ir 

BANKCALL 

A0221 

CACR 

REFLASHR 

A0222 

... 

. . . 

terminate  return 

A3223 

... 

... 

PRCCEEC  RETURN 

A022A 

. . . 

... 

ENTER  RETURN 

AO  22  5 

... 

. . . 

immediate  return  to  USER 

RC226 

PEGCr.  SPF 

IS  the 

SAFE  AS  REGGCSF  CMY 

A 

RETURN  (INMECIATF)  IS  MACE 

TC 

THE  USER. 
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DISPLAY  INTERFACE  RCLTINES 

USFR'S  PAGE  NO, 

A0228 

CAF 

V YYNYY 

A0229 

TG 

BANKCALL 

A0230 

CACR 

PEGCCSPR 

A0231 


IPNFCIfiTE  PETLRN  70  USER 
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1 DISPLAY  TNYfRFACE  R0UTI'''C'  LSFR'S  PAGE  KC.  7 FO  S3 


P'3232 

GCFARK  is  USEG  TG  nSFl.AY  A PARK  VERB 

NOUN 

ARRIVING  IN 

A.  NO  RETURN 

I S 

MADE  TC  THE  LSFR. 

P023A 

c-nxcsp  = gtpark 

A0235 

CAF 

V XXNYV 

VXXNYY  CCNTATNS  VERB  ANC  NCUN 

A0236 

TC 

BANKCALL 

AP237 

CADR 

GCMARK 

CTHEP  FXTENCEC  verbs  USE  CACR 

C-CXOSP 

R0238 

GCPARKR  IS  THE  SAFE  AS  GCPARK  CNLY  RETURN 

IS  TO 

THE  USER. 

R0239 

GOXOSPR  = GCMARKP 

A02  40 

CAF 

V XXNYY 

A024I 

TC 

BANKCALL 

A0242 

CACR 

GCMAPKR 

OTHER  EXTENCEC  VERBS  USE  CACR 

GCXCSPR 

A0243 

... 

... 

IPMECIATE  RETURN  CF  GCPAPKR 

P02  44 

GOPARKF  displays  A FLASHING  PARK  VERB 

NCUN 

NITH 

NC  IPPEDIATF  RETURN 

TO 

THE  USER.  3 RETURNS  ARE  PC5SIBLE  FRCP 

R0246 

THE  ASTRCNAUT  (RFE  NC.  7 ABOVE  1. 

P.0  247 

GCXCSFF  = GCPARKF 

A024E 

CAF 

VXXNYY 

VXXNYY  NILL  BF  A FLASHING  MARK 

VERB  NCLN 

A0249 

TC 

BANKCALL 

A02S'' 

CACR 

GOMARKF 

OTHER  EXTENDED  VERBS  LIE  CACR 

GCXCSFF 

A029  1 

... 

• • • 

terminate  RETURN 

A0252 

... 

« • « 

PP.CCEEC  RETURN 

A0253 

... 

> • « 

ENTER  OR  RECYCLE  RETURN 

R0254 

GOPARKFR  IS  THE  SAME  AS  GOMARKF  CNLY 

AN  IPMECIATE  RETURN  IS  MACE 

TC 

THE  USER  CAl L CACR  +4. 

RC256 

GOCSFFR  = GCPARKFR 

A0257 

CAF 

VXXNYY 

FLASHING  MARK  VERB  NOUN 

A025P 

TC 

BANKCALL 

A0259 

CACR 

GOMARKFR 

OTHER  EXTENOFD  VERBS  USE  CADR 

GCXDSFFP 

A0260 

... 

... 

TERMINATE  RETURN 

A3261 

... 

... 

PRCCFED  RETURN 

A0262 

... 

... 

ENTER  OR  RFCYCLE  RETURN 

A0263 

... 

... 

IPPEDIATF  return  to  THE  USER 

P0264 

GOPARKl  IS  USED  FCR  A PLEASE  FERFCRP 

CN  A 

MARK 

REQUEST 

WITH  ONLY 

I ASTRONAUT  RETURN  TC  THE  USER.  NC  IPPECIATE 

R0266 

RETURN  IS  made.  THE  DESIRED  PARK  Fl=ASE  PERFrpw 

VERB  ANC  CESIREC 

NCLN 

ISENTEREC  IN  A.  GOMARKl  CISPLAVS 

Rl,  R2,  R 

RT26B 

PFANS  CF  A V05NYY  FCLLOWEF  EY  A FLASHING  V 

5XNYY 

FCR  A 

PLEASE  FFRFGRH 

• 

THE  ASTRCNAUT  ULL  RESPCNC  HITH 

A PARK 

R027! 

CR  PARK  REJECT  CP  AN  ENTER.  THF  ENTER 

IS  THF  CNLY  ASTRCNAUT  RESPONSE 

THAT  WILL  CCME  BACK  TO  THF  USER. 

A3272 

CAF 

V5XNYV 

X = 1 ,2  ,3  ,4  Y=  NCUN 

A027^ 

TC 

BANKCALL 

GSP: 
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L 

A027A 

A0275 

R0276 

R02  7 7 
A0279 
AO  28" 
A7281 

n T S P L A Y 

interface  RCL^IN 

S 

USER  *S  PAGE  NO.  E 

DF SIRED 
SAME  AS 

CN  NCN  R 
A GCMARKl 

CACR 

GCMARKl 

74*  IF  BLANKING 
GDMARKIF  IS  the 

rcutines,  nctify  CISFLAYER. 

ONLY  AN  immediate  RETURN  IS  MADE 
CAF  V5XNYY 

TC  PANKCALL 

CAOR  GCMAPKIR 

TO 

enter  return 

THE  LSEFS  CALL  CACR  +2. 
X=  1 ,2  ,2,  VY  = NCLN 

A0283 

A0283 

... 

... 

ASTRONAUT  ENTER  RETURN 
IMMEDIATE  RETURN  TO  USER 

80264 

GCM4RK2 

IS  THE 

SAME  AS  GCMARKl  CNLY  3 RETURNS  ARE  Marp 

TO  the  user 

FROM  THE  ASTRCNALT. 

40286 

CAF 

V5XMYY 

X=l,2,2,4  YY=NOUN 

A0287 

TC 

R ANKCALL 

AC288 

CACR 

G0MARK2 

A02RR 

... 

... 

TERMINATE  RETURN 

A0290 

. . . 

. . . 

PPCCEEC  RETURN 

A029I 

o • • 

• • • 

ENTER  RETURN 

R0292 

GCMARK2R 

IS  the 

FAWF  AS 

GOMARK  1R 

ONLY  3 ASTRCNAL'T  RETURNS  ARE  MACE 

TC 

THE  USER. 

AC294 

CAF 

V5XMVY 

X = C,l,2,:-,4  YY  = NCLN 

A0296 

TC 

E^^KC/!LL 

A0296 

CADR 

GCMARK2R 

AC297 

• • 0 

• • • 

TERMINATE  RETURN 

A0298 

• • O 

• • 0 

FRCCFEC  RETURN 

A0299 

• • « 

0 0 0 

ENTER  RETURN 

EC  S3 


AO  300 


IMMEDIATE  RETURN  TO  THE  USER 


R03I1  GCMARK3  IS  USED  FOR  A PLEASE  PERFCRM  CN  A MARK  RECUEST  HTh  A 3 CCMF.  DEC  DISPLAY.  TFiE  DESIRED  MARK  PLEASE 
R0303  PERFORM  VFRR  AND  NFUN  APE  RNTEREC  IN  A.  GCMARK3  DISPLAYS  Rl,  P2,  P2  6Y  MEANS  CF  A VC6NYY  FOLLCNEC  BY  A FLASHING 

R0305  V9>NYY  FOR  A PLEASE  PFR^CRM.  GCMAFK3  FAS  3 ASTRCNALT  RETURNS  TO  TFE  USER  WITH  NC  IMMEDIATE  RETURN. 


A03O7 
AC3F  p 
A0309 
A 7310 
A03H 
A0312 


CAF  VEKNYY  X = l,  2, 3, A YY  = NCUN 

TC  PANKCALL 

CADR  GCMAFK3 

terminate  return 

proceed  return 

...  ...  ENTER  RFTURN 


R0313  GCMARKA  IS  TFF  SAwp  AS  GCMARK3  CNLY  R2  ANC  P3  ARE  BLANKED  AMD  Rl  IS  DISPLAYED  IN  CCTAL. 


A0315 
A031  6 
AQ31  7 
A731P 
A0319 


CAF 

TC 

CACR 

V5XMYY 

8AMKCALL 

GCMARK4 

X 

II 

YY=NCUN 

... 

... 

TERMINATE 

RETURN 

... 

• • " 

PRCCFEC  RETURN 
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display  interface  RCUTINES 


A3  32” 

. . , 

. . , 

RH32  1 

FxeSPRET  IS  USEC  TC  CISPLAY 

A VERB  NOUN  ARP  IV  INC 

IN  A 

WITH  A RETURN  I 

RD323 

SENT  OLT. 

AD324 

CAE 

V XXNVY 

AC329 

TC 

BANKCALL 

A0326 

CACP 

EXeSPRET 

A0327 

... 

... 

R0328 

KLEENEX  CLEANS  OUT  ALL 

NARK 

DISPLAYS  (ACTIVE  ANC 

INACTIVE).  A RETURN 

P0330 

HAVE  BEEN  CLEANED  CUT, 

AD331 

TC 

BANKCALL 

A0332 

CACP 

KLEENEX 

A 1333 

... 

... 

RD33A 

MARKBRAN  I S A SPCCIAL 

PIIPFCSE  ROUTINE  USEC  FOP  SAVING 

JOB  VAC,  AREAS 

A3336 

TC 

BANKCALL 

AD337 

CADR 

MARKBRAN 

A0338 

... 

... 

AO  3 39 

A03AO 

RT3A1 

PINPPNCh  REESTABLISHES 

THE 

LAST  ACTIVE  flashing 

CISPLAY,  IF  there  is 

R03AT 

ELANKEC  ANC  CONTROL  IS 

S FNT 

TC  ENCOFJOe. 

AC3AA 

TC 

POST JUMP 

A 3 34  9 

CADR 

P INPRNCh 

RD3A6 

R03A8 


LSFR'S  PAGE  NO. 
ENTER  RETURN 


FO  S3 


RETURN  TC  USER 


RETURN  TC  USER 


BAC  RETURN  IF  MARK  DISPLAY  NCI  ACTIVE 


(GCCD  RETURN  TC  ImmECIATE  RETURN  LFC  OF 
LAST  FLASHING  NARK  R RCLTINE) 


PRTODSF  IS  user  AS  A PRICRTTY  DISPLAY.  IT  WILL  DISPLAY  A,  GOFLASH  TYPE  DISPLAY  RITH  THREE  FCSSIBIE  RETURNS  fRCN 
THE  ASTRONALTl  SFE  NO. 7 ABCVD. 


R0349  TEE  MAIN  PURPCSE  OF  PRICCSP  IS  TC  REPLACE  THE  PRESENT  DISPLAY  KITH  A DISPLAY  CF  HIGHER  PRICRITY  ANC  TO 

RQ35I  PROVIDE  A YEANS  FCP  PESTCRING  THE  CLC  DISPLAY  WHEN  THE  PRIORITY  DISPLAY 
RD352  IS  RFSPONOeO  TO  BY  THE  ASTRCNALT. 

RD353  the  FCFMER  pISFLAY  IS  RESTORED  FY  AN  ALTCMATIC  BRANCH  TC  WAKE  IF  TEC  CISPLAY  THAI  WAS  INTEFRLF1EC  EY  THE 

ROSE?  DR  in  01  SPLAY. 


A 1336 

CAE 

V XXNYY 

VXXNYY  WILl  BE  A FLASHING  VERB  NOLN 

AC357 

TC 

BANKCALL 

A035E 

CACR 

PPincSP 

A3350 

... 

... 

TEPMNATF  RETURN 

A0360 

... 

... 

PROCEED  RETURN 

GAP 
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L 

DISPLAY 

INTERFACE  RCLTINES 

USER'S  PAGE 

NO.  1C 

EC  S3 

A0361 

... 

... 

ENTER  CP  RECYCLE 

RETURN 

RC362 

PR IGDSPR 

IS  THE  SAFE  AS  FRTCDSPGNLY  AN 

lATt 

RETURN 

IS  MACP  TC  THE 

USERS  CALL  CACR 

+ A. 

A036A 

CAF 

VXXNYY 

VXXNYY  NILL  BE  A 

FLASHING 

VERB  NOUN 

AP369 

A0366 

A0367 

T C 

CACR 

BANKCALL 

PRIOCSPR 

TERMINATE  RETURN 

A036F 
AO  369 

. . . 

... 

PRCCEED  RETURN 
ENTER  CP  RECYCLE 

RETURN 

A037r 

• • • 

. . . 

IPNEDIATE  RETURN 

R0371 
R 1372 
R037A 

PRinLAPY 

GLFANCSP 
Cl 5PL  AYS 

DOFS  A V05NC9  FPICCSFP. 

CLEANS  nUT  ALL  NGIRPAL  DISPLAYS 
ARf  CLEANED  CUT. 

(ACTIVE 

AND  INACTIVE).  A RETURN 

IS  PACE  TO  THE  USER  AFTER 

NORMAL 

A0375 

A3376 

TC 

CADR 

PANKCALL 

CLEANDSP 

A0377 

... 

... 

RETURN  TC  USER 
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L 

P037P 

R0379 


Rn3B'i 

A03R1 

A0382 

R'7383 

R0385 

P1387 


RC3E8 

P3389 

R0361 

R0393 


R9398 

RQ396 

R0398 

R0399 
P OACO 
R04')l 

R040? 
R 9A03 
ROAOA 

RC4G5 

ROi,06 

ROAO? 

RC408 
R0409 
P.OAin 
ROAl  1 
R9412 
R041  4 
R04  15 

R 1416 
R041  8 
R9420 


nSPLAY  interface  RnUTINES  USER'S  PAGE  AC.  11  EO  S3 

GFAERAL  INFORRATIfN 


alarm  hr  sbopt  fx it  NCOFS — 


PRIOECRT  TC  ABCRT 
CCT  1502 

pRICeCRT  IS  BRANCED  TC  WFEN  (1)  A NORMAL  DISPLAY  IS  REQUESTED  AND  ANCTHFP  NCPNAL  DISPLAY  IS  ALREADY  ACTIVE 
(RF'^LASH  AND  REGPDSP  ARE  EXCEPTICNS)  CF  (2)  A PRICRITY  DISPLAY  IS  REQUESTED  WFEN  ANOTHER  PRI0RI7Y  DISPLAY  IS 
ALREADY  ACTIVE  (A  PRIORITY  WITH  LINUS  EIT14  IS  AN  FXCEPTICN). 


ERASAPLF  IMTI  AL  I ZATICN  FECUIPEC-- 

ACCOMPLISHED  by  PR'-  SH  START-  I.  FLAGWR04  (USED  EXCLUSIVELY  BY  DISPLAY  INTERFACE  RCUt  INES  t 

2.  NVSAVE  = NCRPAL  VERB  AND  NOUN  RFGISTER. 

3.  EEANKTEN  = NCPPAL  INACTIVE  FL A CWDR D ( A LSD  CCATAINS  NCRNALS  EBANK). 


5.  RISAVE  = MARKBRAN  CCNTPCL  WCRC 
4.  RESTPFG  = PRIORITY  30  AND  SUPERBANK  3. 

nuTPLT-- 

NVWORC  = PR  IF  VFR8  AND  NCUN 

NVl-CRD  +1(PARkNVI  = NARK  VERE  ANC  NCUN 

NVWnRO  +2INVSAVE)  = NCRMAL  V^RE  ANC  NCUN 


CSPFl  G (EPANKSAV  ) = FPTC  FLAGWORC  (INCLUDING  FBA.NK) 
nSPFLG  +KMARKEPAN)  = NARK  FLAGWCRC  (INCLUCING  EEANK) 
CSFFLG  +2(FBANKTEM)  = NCRMAL  FLAGWCRC  (INCILCIG  EBANK) 

FADRFLSH  = PRIC  USERS  CALL  CACF  *1  LCCATICN 

CADRFLSH  +KMARKFLSH)  = NARK  LSEPS  CALL  CACR  +1  LCCATION 

CACRFLSF  +2{TENRFLSH)  = NCRMAL  LSERS  CALL  CADR  +1  LCCATICN 


PRIOTIME  = TINE  EACH  PRIC  RECUEST  FIRST  SENT  CUT 
CPTION!  = DESIRED  CPTICN  FRCN  GCPERF4 

FLAGWRC4  = 8 IT  INFC  FQP  CCNTROL  OF  ALL  DISPLAY  ROUTINES 
CSPT8M1  = R1  INFC  FOR  ASTRCNALT  FRCM  PERFCRN  C I S P L A Y S (NO FH AL  ) 

SUERCUTINFS  USED — NVS(JP  , FLAGUP,  flAGDCWN,  ENOOFJOB,  PLANKSLB,  ABCRT,  JCEWAKE,  JCESLEEF,  FTMCVAC,  PPICCHNG, 
JANTERM,  NVSUPUSY,  FLASHCN,  TtvciCLC-,  CFANCl,  EANKJUMP,  MAKECADP  , NOVAC, 

CEBRIS — (STORED  INTO 


TEMpcRfif.Y  temporaries-  A,  Q,  L,  MPAC  +2,  MPAC  +3,  MPAC  <-4,  MFAC  +5,  MFAC  +6,  PUPTREG2,  PLFTREG3,  CYL, 
EBANK,  RLPTREG4,  LCC  , 9ANKSFT,  Nprc,  MFAC,  MPAC  +1  4,  FACEREG 

EPASABESI SHARED  AND  LSFD  WITH  CTHER  PRDGRANS)  CACRSTCF,  CSPLIST,  LCC,  CSPTFM,  CFTICNl 


R0422 


EPASA8LFS  (US  EC  CNLY  BY  CISPLAY  ROUTINES)-  NVWORO  , + 1 , +2 , D SPF LG  ,-H  ,+ 2 , C A C R F L SH  , + 1 , +2  , PPICTINE,  FLAGWRC4 
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L 

9092“* 


P'1925 
R0926 
P0  927 

R092  R 
P7929 
R093O 
D0931 
R9932 
P > 9 3 3 
R0939 
R )935 
RC936 
R 1937 
R0938 
R093C 
R099" 
R0991 
R0992 
P 1993 
R0999 
R0995 

R0996 

R0997 
R1999 
R0951 
P0953 
R0959 
R0956 
R095R 
R096O 
R0962 
R0969 
R >965 
R-1966 
P1968 
R097I 
R0972 
R09  79 
R0975 
R0976 
RC978 


DISPLAY  INTFRFACF  ROUTINE'  USER'S  PAGE  NO.  12  FC  S3 

PISAVE,  MARK2PAC, 


OEERIS--  (LSEC  PUT  NOT  STCREC  I Ni"  C I - NCUNPEG,  VFREREG,  LOCCTR,  MONSAVEl 
FLAGWGRO  OESr.P  IPT  IONS — 

FLAGWRC9-  SEE  CESCPIPTTi^N  UNCFR  LOG  SFCTIGN  ERASABLE  ASSIGNMENTS 
DSPFLG,  PSPFir+1,  DSFFLG  BR- 


ETTS 1 flank  pi 

2 BLANK  R2 
2 ELANK  P3 

9  FLASFTN'G  DISPLAY  REOUESTFC 

5 PEPFORM  DISPLAY  RECL"TFr 

6 fcxOSPRET  GOCSPRET 

7 PRin  DI  SPLAY  

q DEC  mAPK  PERFORM  

9 FSANK 

10  fBANK 

11  EPANK 

12  V99PASTE 

12  2ND  PART  OF  PERFORv 

15  R'FLASF  PR  REPP  REFLASH  PP  REDO 

jK MARK  FF  GUEST  

RESTART  ING  D I<-pi  AYS — 

PLIES  FOR  TFE  CSKY  CFEFATCP-- 

1.  PPQCEFO  AND  terminate  SERVF  AS  RESPONSES  TP  RECUESTS  FOR  OPERATOR  RESPONSE  (FLASHING  V/M.  AS  LONG 
AS  THERE  IS  any  request  AIaAITING  PPERATCR  RESFCNSE,  ANY  LSE  OF  PRGCEEr  CF  TERMINATE  WILL  SERVE  AS 
PESFPNSFS  TO  THAT  RECUFST.  CARE  SHOULC  EE  EXERCISED  IN  ATTEMPTING  TO  KILL  AN  CPEPATOR  IMTIATEC  MCMTCR 
WITH  proceed  and  TERMINATE  FCR  THIS  RFASCN. 

2.  THE  A'TPONAUT  MUST  RESPCNP  TO  A PRIORITY  DIS°IAY  NO  SCCNEF  THAN  2 SECCNL'S  FFCM  THE  TIME  THE 

PROGRAM  SENT  CUT  THE  RECUEST  FOR  PPERATCR  RESPONSE  (THE  ASTRONAUT  WOULD  SEE  THIS  DISPLAY  FCR  lESS  TIME 
DUE  TO  TIMF  IT  takes  TO  GET  DISPLAY  SENT  CUT.)  IF  THE  ASTRCNAUT  PFSPPNCS  TCC  SCCM,  THE  PRIORITY  DISPLAY 

IS  SENT  CUT  AGAIN  --  AND  AGAIN  UNTIL  AN  ACCUMULATED  2 SECS  FRCM  ThE  TIME  THE  FIRST  PRICRITY  DISPLAY 

CUT.  THE  SAME  ?.  SEC.  DELAY  WUL  CCCUR  AT  163.89  SECS  OP  IN  ANY  MLLTIPLF  OF  THAT  TIME  DLE  TC  PRCGRAM 
CONSIDERATION. 

3.  KEY  PELEASF  ELTTrN- 

A)  IF  THE  key  RF LFASE  LIGHT  is  CN , IT  SIMPLY  RFLEASFS  THE  KEYBOARD  AND  DISPLAY  FDR  INTERNAL  LSE. 

B)  IF  TH=  KEY  RfLFASE  LIGHT  IS  OFF,  AND  IF  SOME  REOUE'T  FCR  OPERATOR  RRSPCNSE  (FLASHING  V/N)  IS  STILL 

AWAITING  PESPCNSE  THEN  IT  R E - EST A EL  IS H ES  THE  DISPLAYS  THAT  ORIGINALLY  REOLESTED  RESPONSE. 

IF  AN  OPEPATCP  WANTS  THEREFORE  TO  RE-ESTABLISH  BUT  CONDITION  (A)  IS  ENCOUNTERED,  A SECCND  DEPRESSICN  CF 
KEY  RELEASE  BUTTON  MAY  EE  NECESSARY. 

9.  IT  IS  IMPCPTANT  TC  ANSWER  ALL  RECLESTS  FCR  OPERATOR  RESPONSE. 

5.  IT  IS  ALWAYS  GOOD  PRACTIC  TC  TERMINATE  AN  EXTENDED  Vr'se  EFFCRE  ASKING  FOR  ANOTHER  ONE  OR  THE  SAME  CNE 

OVER  AGAIN. 


R0979 


SPECIAL  CONS  IDEPATICN  S — 
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L 

P,0A8G 
R0A81 
R0A83 
R0A8A 
R9A86 
ROASR 
R0A89 
R )A91 
R0A91 1 


CISPLAY  IMTERFACF  ROUTIMFS  LSFF'S  FAGF  KC.  13  EC  S3 

1.  FioAF  +2  SAVED  GMY  TF  NARK  CISPLAYS 

2.  GODSP(P ) ,PEGCnSP(P)  ,GCPARK  (R)  ALWAYS  TLFN  ON  TFE  FLASH  IF  EMEPEC  WITH  A PASTE  VERB  RECLEST. 

3.  ALL  KORNAL  DISPLAYS  ARE  RESTABTABLE  EXCEPT  GODSPIRI,  PEGOOSF(R) 

A.  ALL  EXTEKCEO  VFRES  MTF  CISFLAYS  SFCULF  start  WITF  a TC  TFSTXACT  and  FINISH  WITH  A TC  ENOEXI. 

9,  GnnSP(R)  AND  REGODSP(R)  MLST  BE  IN  THE  SAHE  EBANK  AND  SUPEPEANK  AS  THE  LAST  NDRNAL  DISFLAY  RFSTARTEC 
BY  A .1  RFSTAPT  phase  CHANGF. 

6.  IN  ORDER  TC  SET  LF  A HCN  CISFIAY  .1  RESTART  FEINT,  THE  USER  MUST  MAKE  CERTAIN  THAT  RESTREG  COMAINS  THE 
CORRECT  PRIfIPITY  AND  SUPERBANK  AND  THAT  EBANKTEM  CONTAINS  THE  CC 

7.  IF  CLEANOSF  IS  RESTARTED  VIA  A .1  PHASE  CHANGE,  CAF  ZERO  SHCULC  BE  EXECUTED  BEFORE  THE  TC  BANHCALL. 


G4P:  /SSSEP6LE  REVISION'  116  CF  AFC  FRIFRA"  LUMAAEY  EV  NASA  20211  12-071 


19:09  AUG.  11.19(9  SKIPPER  .C97  PAGE  1399 


L 

01 SFL  AY 

INTERFACE  R CUT  INFS 

LSER' S PAGE  NC.  19 

EO  S3 

PC992 

C4l  U NG 

SEeUFNCF  FCP 

blanking 

A0993 

CAF 

BITX 

X = 1 

,2,3  blank  Pl,F2,R3  RESPECTIVELY 

A0999 

TC. 

blanket 

A09‘^E 

. . . 

... 

RETURN  TC  USER  HERE 

R0996 

IN 

CROFR 

TO  USE  blanket  fcrpfctly  TH' 

LSER  MUST 

USE  A DISPLAY  PCUTTNF 

THAT 

ENCS  IN  R FIRST  FOLLCNED 

BY  THE  CALL 

RC99E 

70 

BLANKET  AT 

THF  IiKpEDIATE  FETUFN  LCC 

• 

0999 

5969 

BLOCK 

02 

0500 

R = F 

1 

9000 

SETLCC 

FFTAG9 

0 5''  1 

5969 

BANK 

0 50  2 

RFF 

1 

COLNTf< 

$S/DSPLA 

0503 

REF 

812 

LAST 

1328 

5969 

59  162 

0 

BLANKET 

TS 

NIPAC  +6 

0 509 

OFF 

1 

5965 

9 ,)  1 60 

1 

CS 

PLAYTEM9 

0505 

REF 

8 13 

LAST 

1399 

5966 

7 C 162 

G 

NA  SK 

VPAC  +6 

05C6 

REF 

81A. 

LAST 

1399 

5967 

50  161 

1 

INDEX 

MPAC  +5 

0507 

RFF 

2 

LAST 

1399 

5970 

2 6 160 

1 

AOS 

PLAYTFK9 

0508 

REF 

358 

LAST 

1330 

59  71 

0 00  7 2 

0 

TC 

Q 

0511 

REF 

58 

LAST 

1321 

5 9 72 

0 9635 

0 

ENCMARK 

TC 

PCSTJUNP 

051  2 

9FF 

1 

5973 

20  3 26 

1 

CACR 

MARK END 

0512  1 

REF 

299 

LAST 

1329 

5979 

3 9755 

1 

CLEARVRK 

CAF 

Z ERO 

05122 

RPF 

17 

LA  ST 

71F 

59  7 5 

55'  C93 

0 

TS 

EXTVBACT 

05123 

5976 

C C C'M 

0 

+ 2 

INHIN  T 

C5129 

REF 

1 

LAST 

977 

5977 

9 9753 

0 

CS 

XDSPP IT 

0512  5 

REF 

5 

5 500 

7 ClCC 

1 

NAS  H 

F LAGNPD9 

05126 

REF 

6 

LAST 

1399 

55  1 1 

5 9 100 

1 

TS 

FLAGWRD9 

0 512  7 

5502 

0 00  13 

I 

PEL  INT 

15128 

RFF 

3 59 

last 

1399 

5503 

L crc2 

0 

TC 

C 

P0513 

«*>I<ALL  EXTENCFC  VEFE 

ROLiTlNFS 

THAT  FAVF  AT  LEAST 

CNF  FLASFINC  DISPLAY 

NLST 

TCF  ENDNARK  CP  TCF  ENCEX7 

NHEN 

R05  1 5 

FINISFFC 

0516 

n,  2 3 26 

BANK 

1C 

0517 

REF 

1 

10,2000 

SETLCC 

DISPLAYS 

0518 

n,  2326 

BANK 

0519 

pr-F 

1 

COUNT=» 

$$/DSPLA 

R052O 

NTERON'LY 

IS  USED  TO  riFFFRFNTIATF  THE 

NARK  RCUTINF  WITH 

ONLY  CNF  RETURN  TO 

THE  USER  FRCM  THE  NARKING 

ROLTINF  NIT 

R0522 

3 RETURNS  TO  TFF  USER 

. This  F 

CLTINF 

I s 

ONLY  LSEC 

BY  GCNARKl  AND  GCNAPKIP. 

05291 

RFF 

2 

LAST 

226 

1"  ,2326 

0 5979 

0 

NAPKENC 

TC 

C,  LEAR  NR  K 

05297 

CpF 

1 

10,2327 

1 3922 

1 

TCP 

NARKCVER' 

0 53  0 

RFF 

1 

10, 2330 

59  15  5 

1 

GCNARK 

TS 

PLAYTENI 

ENTRANCE  FCP  NARK  GOCSP 
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T53  1 

REF 

45 

LAST 

1307 

10, 2331 

3 

4735 

1 

GCMARS 

CAF 

BIT15 

053? 

REF 

1 

1 1 ,2332 

1 

250  1 

0 

TCF 

GCFLASH2 

T533 

fff 

245 

LAST 

1344 

10,2333 

3 

4755 

1 

KLEENEX 

CAF 

ZERO 

■3  534 

PC'C 

2 

LAST 

1344 

10,2334 

54 

1 155 

1 

GCMARKF 

TS 

PLAYTFMl 

0535 

RFF 

1 

1 ■>  ,2335 

3 

3032 

0 

CAF 

MARKFMSK 

0536 

REF 

2 

1 AST 

1345 

1C,  2 33  6 

1 

2 50  1 

C 

TCF 

GCFLASH2 

0539 

REF 

3 

LAST 

1.34  5 

1 ',  2337 

54 

1 155 

1 

G0MARK2 

TS 

PLAYTEMl 

0 54'.: 

RFF 

1 

10,?340 

3 

3521 

1 

MARKFCRM 

CAF 

wPERFMSK 

0541 

REF 

3 

LAST 

134'= 

10,2241 

1 

25C1 

c 

TCF 

GCFLASH2 

0 542 

RFF 

4 

LAST 

1345 

10  ,2342 

54 

155 

1 

GCMARK3 

TS 

PLAYTFpIl 

0543 

REF 

1 

10,2343 

3 

3506 

1 

CAF 

MARK3PISK 

0544 

FEE 

4 

LAST 

1345 

n,  2 244 

1 

2 5-'  1 

c 

TCF 

GCFLASH2 

0545 

REF 

5 

LAST 

1345 

I 'l , 2345 

54 

155 

1 

GCMARK4 

TS 

PLAYTEM  1 

0 546 

REF 

1 

10, 2346 

3 

35C7 

c 

CAF 

MAPK4PSK 

0547 

RFF 

5 

LAST 

1345 

1.1, 2347 

1 

2 50  1 

0 

TCF 

GCFLA  SH2 

054R 

REF 

6 

LAST 

1345 

10,235C 

54 

155 

1 

GCMARKR 

TS 

PLAYTEMl 

0 549 

R9F 

46 

LAST 

1345 

IT, 2351 

■3 

4 73  5 

1 

CAF 

81T15 

055C 

REF 

1 

10,2352 

1 

2454 

1 

TCF 

GDDSPR2 

0551 

REF 

7 

LAST 

1345 

L.,7353 

54 

15" 

1 

GCMAR  KFP 

TS 

PLAYTEPl 

055? 

RFF 

2 

LAST 

134" 

10, 2354 

3 

3032 

0 

CAF 

MARKFMSK 

0553 

R‘=F 

1 

10,2355 

1 

2640 

0 

TCF 

GCDSFfiS 

0559 

REF 

8 

LAST 

1345 

10,2356 

54 

155 

1 

GCMARK2R 

TS 

PLAYTEMl 

0 560 

REF 

2 

LAST 

1345 

10 ,2357 

3 

3 52  1 

1 

CAF 

MPERFMSK 

0561 

REF 

2 

LAST 

1345 

1Q,236G 

1 

2640 

0 

TCF 

GCCSPRS 

0561 C5 

REF 

3 

LAST 

959 

10,2361 

6 

5023 

0 

-1 

AO 

PPI C13 

0561  1 

REF 

9 

LAST 

1345 

n ,2362 

54 

155 

1 

G0MARK3R 

TS 

PLAYTFM  1 

0 5612 

REF 

2 

LAST 

1345 

10.2363 

3 

3 506 

1 

CAF 

MARK3PSK 

0561  3 

RFF 

3 

LAST 

134  5 

10,2364 

1 

2640 

0 

TCF 

GCD  SPRS 

056? 

REF 

1 3T 

LAST 

1319 

10,2365 

3 

4 7 53 

1 

nakepark 

CAF 

CNE 

0 563 

REF 

1 

10 , 2366 

0 

2 7 3 6 

1 

TC 

CCPI ES 

0564 

REF 

7 

LAST 

1344 

10,2367 

3 

0 1 l.J 

0 

CA 

FLAGWRD4 

0565 

REF 

1 

1(J,  227C 

7 

2 522 

c 

PASK 

CCT343UU 

0566 

RFF 

429 

LAST 

1330 

10, 237 1 

10 

roc 

0 

CCS 

A 

0567 

RFF 

1 

10 ,2372 

1 

2430 

0 

TF  F 

CFKPR  ir 

0568 

RFF 

8 

LAST 

1345 

10,2373 

3 

ClOO 

c 

CA 

F LAGNR04 

0569 

REF 

1 

10 ,2374 

7 

4743 

1 

MASK 

MRKNVBl T 
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EIT15  SET  FCR  ALL  MARK  REQUESTS 


CLFAN  CLT  EXTENDED  VERBS 
EMRAFCE  ECR  PARK  G^FLASF 

MARK , F LASh 

MARK  GCFERFS-3  AST.  RETURNS 
MARK,  PERFCRM,  FLASH 

LSED  FCR  3CCMF  CECIPAL  FERFCRP 


PARK, perform, FLASF, BLANK 


ENTR+NCE  FCR  PARK  GCDSFR 


ENTRANCE  fgS  MARK  GQFLASHR 


PARK  GCFERFS-3  AST.  RETS+  IMMECIATE  RET. 
MARK,  PERFCRM,  FLASH 


IS  NCFM  CR  FPIC  PLST  CF  WAITING 


IS  MARK  SLEEPING  CUE  tc  ASTRO  BLSY 
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L 

DISPLAY 

TNTERFACF 

RFUT IN  F S 

USER'S  PAGE 

NO. 

16  1 

0570 

10, 2375 

C CCC6 

1 

FKTENC 

0 571 

REF 

1 

1 ’ ,2376 

1 2400 

0 

EZF 

MAPKPLA  Y 

NO 

0572 

RFF 

145 

LAST 

1201 

10 , 2377 

1 5155 

1 

TCF 

EN DOF  JOB 

059A 

10, 24''C 

C 0CC4 

c 

MARKPLAY 

INHINT 

0595 

RFF 

21 

LAST 

1275 

10, 24'1 

4 4 756 

0 

CS 

F IVF 

RES^T  MARK  OVER 

NCRM, 

SET  MARK 

0596 

RFF 

9 

1 AST 

1345 

IG, 2402 

7 C ICC 

1 

MASK 

F LAGNRD4 

05965 

PEF 

1 ’4 

1 AST 

1345 

10,  R4'13 

6 4753 

1 

AD 

ONE 

0597 

REF 

10 

1 AST 

1346 

1"  ,2  404 

54  100 

1 

TS 

FL  AGWRC4 

0598 

lU, 24"5 

C CC03 

1 

RFLINT 

C599 

RFF 

1 

1 1,2406 

4 1070 

0 

GCGOMARK 

CS 

MAP  KFLAG 

perform 

0 600 

RFF 

44 

LAST 

1326 

10, 2“"7 

7 4747 

c 

MASK 

BITS 

0601 

RFF 

430 

I AST 

1345 

10,  24U' 

10  000 

c 

CCS 

A 

C6C2 

REF 

1 

1 ' ,24  1 1 

1 2414 

0 

TCF 

MARKCOP 

060  3 

REF 

1 

10,2412 

H C37C 

1 

CS 

HAPKNV 

0604 

REF 

2 

LAST 

1346 

11,2413 

5 4 3 70 

1 

TS 

MARKNV 

0605 

REF 

1 35 

LAST 

1346 

1 1,2414 

3 4753 

1 

MAFKCCF 

CAF 

ONE 

MARK  INDEX 

0606 

RFF 

1 

10, 2415 

1 2617 

1 

TCF 

PFl CPLAY 

0607 

REF 

1 

1 . ,2416 

3 0165 

0 

CrPYTOGD 

CA 

MPAC2SAV 

Q6CP 

RFF 

815 

LAST 

1344 

10,2417 

54  156 

1 

IS 

WPAC  +2 

06'^9 

RFF 

1 

1 ',  2420 

50  164 

1 

COPYPAC  S 

INDEX 

CCPINDEX 

06K 

REF 

1 

1 ' , 2421 

3 3532 

c 

CAF 

PRICCCT 

0611 

RFF 

1 

10,2422 

54  162 

r 

IS 

GENMASK 

0612 

REF 

2 

LAST 

1346 

10, 2423 

50  164 

1 

INDEX 

CCPINDEX 

0613 

OPF 

1 

10,2424 

3 1067 

1 

CAF 

EBANKSAV 

0614 

REF 

1 

10,2425 

54  160 

1 

TS 

TEMPCR2 

ACTIVE  EEANK  ANC 

FLAG 

0615 

REF 

78 

LAST 

1321 

10,2426 

54  00  3 

n 

TS 

EBANK 

06  16 

RFF 

’ ec 

1 AST 

1344 

10,2427 

C CCC2 

C 

TC 

C 

R0617  PINCEEK  CHECKS  TO  cPF  IF  THE  CURRENT  MARK  REOUFST  IS  MADE  BY  THE  ASIRCNALT  V,HILF  INTEPRLFTING  4 GCFLAY  CISFLAY 

R0619  (4  NCRMAL  or  a PRir).  IF  THE  ASTRONAUT  TRIES  TC  MARK  CURING  A PRIO,  THE  CHECK  FAIL  LIGHT  GOES  CN  AND  THE  MARK 

R0621  RECUE'T  IS  ENCEF.  IF  HE  TRIPS  TC  MARK  CURING  A NCFM,  THE  MARK  IS  AUCKEC.  IN  THIS  CASE  THE  NCFM  IS  PUT  TC  SLEEP 
P0623  LNTU  ALL  MARKING  IS  FINISHED. 

R062A  IF  THE  MARK  RFQLEST  CCMES  FRCM  THE  FFCGFAM  CURING  A TIME  THE  ASTPCNAUT  IS  NCT  INTERRUPTING  A NCRMAL  CR  A 

R9626  PRIG,  THE  MARK  REQUEST  IS  PUT  TO  SLEEP  UNTIL  THE  +RFSENT  ACTIVE  DISPLAY  IS  RFSFCNQEC  TC  BY  THE  ASTRONAUT. 


062  F 
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R00A9  LPON  RETURN  A CONTAINS  THE  CURRENT  FLAGWRC  SETTING. 


0050 

5 504 

BLCC  H 

02 

005  1 

RFF 

T 

LAST 

128A 

4000 

SETLCC 

F FT  A G 1 

0 '52 

5 5C4 

BANK 

0053 

REF 

1 

COUNT=( 

T 1/FLAG 

00  5 A 

RFF 

367 

LAST 

136C 

5504  3 0C02  0 UFFLAG 

CA 

G 

0055 

REF 

2 

LAST 

735 

5505  0 5522  1 

TC 

DEBIT 

0056 

55  )6 

4 0000 

u 

COM 

+(15  - BIT) 

0057 

5507 

C CC06 

1 

EXTEND 

0058 

RFF 

16 

L AST 

1 118 

5 510 

0 4 OOl 

1 

ROR 

LCHAN 

SET  BIT 

0059 

REF 

57 

LAST 

131  ' 

551  1 

5 ) Ool 

3 

CCRFI AG  INCEX 

I TEMPI 

0060 

REF 

29 

LAST 

95E 

5512 

5 4 0 74 

0 

TS 

FLAGViRCO 

0C61 

REF 

26 

LAST 

1290 

5513 

2 2 06  3 

1 

LXCF 

I T EM  P 2 

106? 

5514 

0 000  3 

1 

RFL  INT 

0063 

REF 

2 46 

LAST 

1364 

5515 

0 0 0^:  1 

Q 

TC 

L 

0064 

REF 

363 

LAST 

1265 

5516 

3 

00  32 

0 

CCViNFLAG  CA 

C 

0065 

RTF 

3 

LAST 

1365 

5517 

0 

5 5 2 2 

1 

TC 

D'BTT 

0066 

PPF 

247 

LAST 

1365 

55  20 

7 

)0  ) 1 

1 

MA  SK 

L 

RFSET  BIT 

0067 

REF 

2 

LAST 

735 

5521 

1 

551  1 

0 

TCF 

CCMFLAG 

0068 

RFF 

144 

LAST 

1360 

5 522 

6 4 7 53 

1 OFBIT 

AO 

CNF 

GFT  CE  BITS 

0C69 

5523 

1 0 304 

0 

IMH  INT 

CC7Q 

REF 

27 

LAST 

1365 

5524 

5 4 063 

C 

TS 

I TEMP3 

0071 

RFF 

3 

LAST 

10  8 4 

5525 

3 4762 

0 

CA 

L CN4 

CEC15 

C072 

RFF 

53 

LAST 

1365 

5526 

54  361 

1 

TS 

ITFMP  1 

3073 

RFF 

28 

1 AST 

1265 

5527 

5C  063 

1 

INDEX 

ITEMF3 

0074 

5530 

2'7777 

0 

CA 

0 -1 

ACRES 

0075 

REF 

248 

LAST 

1365 

553  1 

54  301 

1 

TS 

L 

00  76 

REF 

258 

L AST 

1360 

5 532 

3 4755 

1 

CA 

ZERO 
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0077 

0078 

SERVICE 

RCUT  II 
LAST 

9ES 

0 C006 
10  06  1 

L SE  R' S RAGE 

NO.  3 

REF 

59 

1365 

5533 
55  34 

I 

1 

EXTEND 

nv 

I TEMPI 

A = FLAGWRD,  L = 

(15  - E IT  ) 

0C79 

RFF 

60 

LAST 

1366 

5535 

52  062 

1 

CXCF 

ITEMPl 

0C80 

REF 

6 1 

LAST 

1266 

5536 

50  06  1 

0 

INDEX 

ITEMFl 

0081 

REF 

30 

LAST 

1365 

5537 

3 0074 

1 

CA 

FLAGYRDO 

CCE2 

REF 

249 

1 AST 

1365 

5540 

54  001 

1 

TS 

L 

CURRENT  STATE 

0083 

REF 

2 6 

LAST 

1314 

554  1 

50  C62 

c 

INDEX 

ITEMP2 

0C84 

REF 

47 

LAST 

1345 

5542 

4 4735 

0 

CS 

0 TT15 

-(15  - PIT  I 

0085 

REF 

369 

LAST 

1365 

5 54  3 

C CC02 

0 

TC 

Q 

GAP:  ASSENBte  PEVISION  116  CF  AGC  PRCGRAn  LLMNARY  ev  hASA  202U12-C71 


19:09  AUG.  11,1969  SKIPPER  .097  PAGE  1367 


L SERVICE  RCUTINFS  USER'S  PAGE  NO.  A EO  S3 

P0CE6  DELAYJCB-  A GENERAL  PGUTINE  TC  DELAY  A JCE  A SPECIFIC  ANOINT  CF  TINE  EEFCRE  PICKING  UP  AGAIN. 


Rnnse  entrance  pecuirfnfnts  . . . 

ACC69 

A3N90 

A0091 


CAF  DT  DELAY  JOB  FCR  OT  CENTISECS 

TC  BANKCALL 

CAOR  DELAYJCB 


0092 

06,3772 

BANK 

06 

0093 

RFF 

1 

00,2000 

SETLCC 

DLAYJCB 

CC9A 

OT,3735 

BANK 

R0C95 

TF  IS 

: MUST  REMAIN  IN 

BANK  0 

0096 

REF 

1 

COLNTT' 

i$/DELAY 

CC'^66 

REF 

7 

LAST 

1 306 

00 ,3735 

3 5 ) )0 

1 

2S  ECC  ELY 

CAF 

2SECS 

0097 

on, 3736 

C CC04 

0 

DELAYJCB 

INHINT 

0098 

REF 

3 70 

LAST 

1366 

09, 3737 

54  002 

1 

TS 

Q 

STORE  DELAY  DT  IN'  C FCR  DLY  - 

0099 

PDF 

1 

CO, 3740 

3 4752 

0 

CAF 

DEL  AYNUM 

NA ITL  1ST 

0 100 

REF 

5E 

LAST 

1316 

00,3741 

54  070 

1 

OELLCCP 

TS 

, RLPTREGl 

0101 

REF 

455 

LAST 

1361 

00,3742 

50  000 

1 

INDE> 

A 

0102 

RFF 

4 

LAST 

223 

CO, 3743 

3 1^23 

1 

CA 

DELAYLCC 

IS  THIS  CELAYLCC  AVAILABLE 

0103 

OT , 3744 

0 C006 

1 

EXTEND 

CICA 

REF 

1 

00 ,3745 

1 3753 

1 

BZF 

nK20ELAY 

YES 

0105 

RPF 

59 

LAST 

1367 

c 

o 

10  070 

1 

CCS 

RLPTREGl 

NC,  TRY  NEXT  DELAYLOC 

0106 

R = F 

1 

00,3747 

1 374  1 

1 

TCF 

DELLOOP 

0107 

REF 

27 

LAST 

1321 

00,3750 

52  134 

0 

CXCF 

PUF2 

0108 

RFF 

7 

LAST 

1320 

CO, 3751 

0 5 706 

r 

TC 

BAILCLTl 

NC  AVAII ABLE  LCCS. 

0109 

0.)  ,3752 

31104 

0 

OCT 

3 llOA 

0110 

REF 

1 

00,3753 

3 3 7 73 

1 

CK2DELAY 

CA 

TCSLEEP 

SET  WAITLIST  IMMEDIATE  RETURN 

Oil  1 

PEF 

7 

LAST 

1 124 

00 ,3754 

54  06  1 

1 

TS 

WAI TFXI T 

0112 

REF 

31 

LAST 

1C  97 

CO ,3  755 

3 0004 

0 

CA 

FBANK 

0113 

REF 

60 

LAST 

1 367 

00,3756 

6 CC70 

c 

AD 

RLPTREGl 

STCRF  EEANK  FCR  TASK  CALL 

0 llA 

REF 

250 

LAST 

1366 

00,3757 

54  001 

1 

TS 

L 

0115 

RFF 

1 

00,3760 

3 3 7 74 

0 

CAF 

WAKECAD 

STCRE  CADR  FOR  TASK  CALL 

0116 

REF 

2 

LAST 

1111 

376  1 

1 52  11 

1 

TCF 

DLY2  -1 

CLY  IS  IN  waitlist  ROUTINE 

0117 

RFF 

15 

LAST 

1352 

' ' ,3762 

0 4645 

1 

tcgetcac 

TC 

NAKECADR 

GET  CALLERS  FCAOR 

0118 

PEF 

61 

LAST 

1367 

00,3763 

50  070 

0 

INDEX 

PLPTREGl 

0119 

REF 

5 

LAST 

1367 

0^1, 3764 

55  • 323 

0 

TS 

DELAYLOC 

SAVE  DELAY  CACRS 

0120 

PEF 

8 

LAST 

1353 

00,3765 

0 5133 

0 

TC 

JCRSLEEP 

0121 

REF 

259 

LAST 

1365 

00 ,3766 

3 4 7 55 

1 

NAKER 

CAF 

ZERO 

0122 

REF 

45 

LAST 

1351 

on  ,3767 

50  006 

1 

INDEX 

8BANK 
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CS  ALG.  11 tises  SKIPPER 


097 


PAGE  1368 


0123 

012A 

0125 


SERVICE 

ROUTINES 

USER'S  PAGE  NO.  5 

EC  S3 

REF 

6 

LAST  1367 

00 , 3770 

57'323  1 

>CH 

DELAYLCC 

FAKE  CEIAYLCC  AVAILAPLE 

REF 

13 

LAST  1354 

00,3771 

0 5137  1 

TC 

JOBWAKE 

RFP 

fil 

LAST  1318 

CO, 3772 

C 5261  1 

TC 

TASKCVER 

1 00,3773  03760  0 TCSLEEP  GENADR  TCGETCAC  -2 

1 GO, 3774  03766  0 RAKECiC  GENACR  WAKER 


0126 

0127 


REF 

REF 
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L SERVICE  RCLTTMES  LSER'S  PAGE  NO.  6 EO  S3 

PC12R  GENTPAN,  A BLOCK  TRANSFER  RCUTINE. 

Rr.llZ9  WRITTEN  EY  C.  EYLES 

R013C  Mnn  1 BY  KERNAN  UTILI7YM  REV  17  11/18/67 

P0132  MCE  2 EY  SCFULENBERG  (REMOVE  RELIN'T)  SKIPPER  REV  A 2/2E/68 

R0133  THIS  ROUTINE  IS  USEFULL  FCR  TRiNSFFRING  N CONSECUTIVE  ERASABLE  OR  FIXED  QUANTITIES  TC  SGME  CTEER  N 

RDl’9  CONSEGLTIVR  ERASABLE  LOCATICNS.  IF  BCTH  BLCCKS  CF  CATA  APE  IN  SmTCEAELE  EEANKS,  THEY  MUST  BE  IN  THE  SAME  CNE. 

R0137  GENTPAN  IS  CALLABLE  IN  A JOE  AS  NELL  AS  A RLPT.  THE  CALLING  SECLENCE  IS: 


AC139 

I 

CA 

N-1 

H OF  QUANTITIES  MINUS  CNE. 

AOIAO 

I +l 

TC 

GENTPAN 

IN  FIXEC-FIXEC. 

ad  U1 

I +2 

ACR  ES 

L 

STARTING  ACRES  CF  DATA  TC  BE  MCVEC. 

A 0 1 A 2 

I +3 

ACRFS 

M 

STARTING  ACRES  OF  DUPLICATION  BLOCK. 

AT1A3 

I +A 

PETUPNS  FFRE. 

P n 1 A A 

GENTPAN  TAKES 

25  MCT 

• S ( 300 

MICPCSECCNCS  ) PER 

ITEM  t 5 

MCT  'S 

(60  MICS)  FOR  ENTERING  AND  EXITING. 

RD1A6 

A,  L 

AND  ITERPl  ARE 

NCT  PRESERVEE. 

01A7 

55AA 

BLOCK 

02 

OlAB 

REF 

2 

LAST 

13AA 

A900 

SETLCC 

FFTAGA 

D1A9 

5 5A  A 

BANK 

ClEC 

REF 

62 

1 AST 

1366 

C061 

fbank= 

I temp  1 

riisi 

REF 

1 

CrCNT# 

$$/TRAN 

(U52 

5 5 AA 

0 COOA 

0 GFNTRAN 

INHINT 

0153 

REF 

63 

LAST 

136  9 

55A5 

5A  061 

1 

TS 

ITEMF  1 

SAVE  N-  1 . 

U5A 

REF 

371 

LAST 

1367 

55A6 

50  002 

0 

INDEX 

Q 

C(C)  = ACRES  L. 

C155 

55A7 

6 0000 

1 

AC 

0 

ACRES  (L  + N - 1). 

0156 

rff 

A56 

LAST 

136  7 

555C 

50  300 

1 

INDEX 

A 

0157 

5551 

3 0000 

1 

CA 

0 

C(ABCVE)  . 

0158 

REF 

251 

1 AST 

1367 

5552 

5A  001 

1 

TS 

L 

SAVE  CATA. 

0159 

REF 

6A 

LA  ST 

1369 

5 553 

3 0C61 

c 

CA 

ITEMPl 

01  60 

REF 

372 

LAST 

1369 

555A 

50  002 

0 

INDEX 

Q 

'U61 

5555 

6 0001 

0 

AC 

1 

ACRES  (M  + N - 1 ) . 

1162 

REF 

A 57 

L AST 

1369 

5556 

50  000 

1 

INDEX 

A 

0163 

5557 

22  oon 

1 

LXCF 

0 

STUFF  IT. 

0 16A 

Ri^F 

65 

1 AST 

1369 

5560 

10  061 

1 

CCS 

ITEMPl 

LCCP  UNT  ]L  N-1  = C. 

0165 

ppp 

2 

1 AST 

298 

556  1 

1 5 5A5 

1 

TCF 

GENTPAN 

+ 1 

C166 

REF 

5 

LAST 

1289 

5562 

1 6 7AA 

1 

TCF 

Q + 2 

RFTLP.N  TC  CALLER. 
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L SERVICE  ROUTINES  USER'S  PAGE  NO.  7 EO  S3 

P0167  eSCFE  ZERO  PIT  E CF  EXTV0ACT,  NPICP  IS  SET  EY  TESTXACT. 

P016R  NAY  BE  USEO  as  NEEDEG  by  ANY  EXTENCEC  VERB  WEICE  HAS  DCNE  TESTXACT 


0170  PPF  I COUNT*  $*/EXTVe 


0171 

REF 

A8 

LAST 

1357 

5563 

A 

A747 

0 EECPF 

CS 

R IT5 

017? 

REF 

18 

LAST 

13AA 

556A 

7 

1CA3 

0 

NASK 

EXTVPfCT 

0173 

R'EF 

19 

LAST 

1370 

5565 

c c 

'CA3 

c 

TS 

EXTVBACT 

017A 

REF 

155 

LAST 

1362 

5566 

0 

5155 

0 

TC 

ENCCFJCB 
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ponoi 

RJ003 

E IT  PER 

THE  FnULOMNG  SLRRCUlINF  PAY  BE  CALLEC 
IN  INTFRDijPT  OR  IIMDER  EXECUTIVE  CONTRCL. 

TC  CISPLAY  A NCN-AECRTIVE  ALARM  CCNCITICN.  IT  MAY  BE  CALLED 

ROCOA 

CALLING  SEQU'^NCE  IS 

AS  FCLLCWS: 

R 1005 
R 1006 
R9007 

TC 

OCT 

ALARM 

AAANN 

ALARM  N)Q.  NN)  IN 
(RETURNS  FERE) 

GENERAL 

AREA  AAA. 

0008 

0009 

REF  1 

5567 

4000 

BLOCK 

SFTLCC 

02 

FFTAG7 

00  10 

5567 

BANK 

IMl  1 

REF  7 

LAST 

473  0375 

FBANK= 

FA  ILREG 

0012 

PEF  1 

COUNT"! 

$1/ALARM 

ROO'3  ALARM  TURNS  ONI  THE  PROGRAM  aLARN  LIGHT,  BUT  CCES  NCT  CISPLAY, 


•1  n 4 

5567 

0 (7004 

0 

alarm 

INHINT 

QC  1 5 

REF  373 

LAST 

1369 

5570 

3 000  2 

0 

C A 

0 

0016 

PEF  A 

LAST 

1276 

557  1 

55  ' 363 

1 

ALARM2 

TS 

ALMCACR 

0017 

REF  374 

LAST 

137! 

5572 

50  002 

0 

INDE  X 

Q 

O^ip 

55  73 

3 0000 

1 

CA 

0 

OOiq 

REF  252 

LAST 

1369 

5574 

54  on  1 

1 

eCRTENT 

TS 

L 

0020 

ROF  46 

LAST 

1367 

5575 

3 0UO6 

1 

PRIOENT 

CA 

6BANK 

0C2  1 

55  76 

C 0006 

1 

+ 1 

EXTENT 

002  2 

REF  27 

LAST 

1351 

5577 

04  007 

1 

ROR 

SLPERBNK 

ACC  SUPER  BITS. 

0023 

REF  5 

LAST 

1371 

5600 

55' 364 

0 

TS 

ALMCACR  +1 

00  24 

REF  375 

LAST 

1371 

56C1 

3 CCC2 

0 

GARMENT 

CA 

C 

STCRE  RETURN  FCfi  ALARM 

0025 

REF  66 

LAST 

1369 

56)2 

54  061 

1 

TS 

I TEMPI 

0026 

REF  8 

LAST 

1371 

5603 

10  375 

1 

CFKFAUl 

CCS 

FAILRFG 

IS  ANYTHING  IN  FAILREG 

0027 

REF  1 

5 6)4 

1 5610 

1 

TCP 

CHKFAI L2 

YES  TRY  NEXT  REG 

0C2R 

REF  253 

LAST 

1371 

5605 

3 000  1 

0 

CA 

L 

00285 

REF  S 

LAST 

137  1 

5606 

54  3 75 

1 

TS 

FAILREG 

0029 

REF  1 

56  17 

1 5614 

0 

TCF 

PRCGLARM 

TURN  ALARM  LIC-FT  CN  FCF  FIRST  ALARM 

0030 

REF  10 

LAST 

1371 

561C 

10  376 

1 

CFKFA  IL2 

CCS 

FAILREG  +1 

0031 

REF  2 

LAST 

1371 

56  11 

1 56  14 

c 

TCF 

PRCGLARM 

0032 

P'^F  254 

LAST 

! 371 

5612 

3 OOOl 

0 

CA 

L 

10  3 3 

REF  1 1 

LAST 

1371 

5613 

54  376 

1 

TS 

FAILREG  +1 

Of, 3 9 

PEF  12 

LAST 

1371 

56  14 

2 2 37  7 

1 

PROGLARM 

LXCH 

FAILREG  +2 

STCRE  AS  "MCST  RECENT"  ALARM  CCCE 

0040 

REF  47 

LAST 

1307 

5615 

4 1035 

1 

CS 

DSPTA8  tllC 

TURN  CN  PRCGRAM  ALARM  IF  CFF 

1041 

REF  2 

LAST 

1346 

56  16 

7 5 6 3 2 

1 

MASK 

CCT4O4O0 

0042 

RFF  48 

LAST 

1371 

5617 

27 '035 

1 

AOS 

OSPTAB  +11C 
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1. 

09  6 3 
nAA 

ALARM  AND  ABORT 

562C 

5621 

1 TEMPI 

Ri^F  67  LAST  1371 

56  Q61  C 
0 0003  1 

MLLTE>IT  YCH 

RELINT 

09  A 5 

RFF  ASF  LAST  1369 

5622 

50  POO  1 

INDEX 

A 

OOA6 

5623 

0 OCOl  C 

TC 

1 

R0051 

FRICLARM  FTSPt.AYS  V05Nu9  VTA 

FRICDSPR  WITH  3 RETURNS  TQ 

THE  USER  FRCM 

R0053 

AN  IMMECTATF  RETURN  TF 

THP  USER  at  CALL 

LCC  +A.  FXAMFLE 

FCLLCWS  , 

A005A 

CAF 

OCT  XX 

Aorss 

TC 

BAMKCALL 

AO056 

CACR 

FRICLARM 

A 1097 

... 

0*0 

AT098 

... 

• o « 

AT059 

... 

. . . 

A0060 

TC 

P HASCHNIG 

A006  1 

CCT 

X.l 

0062 

10, 3563 

BANK 

1C 

PC63 

REF 

3 

1 AST 

136A 

10 ,2000 

SETLCC 

DISPLAYS 

106A 

11,3563 

BANK 

0065 

REF 

3 

LAST 

136A  TC 

1 365: 

lA  669=F 

COUNTY 

$$/nSPLA 

00  6 6 

IT, 3563 

0 00  lA 

0 

FFIOLARM 

INHINT 

0067 

REF 

255 

LAST 

137  1 

10, 356A 

5A  00  1 

1 

TS 

L 

0068 

REF 

28 

LAST 

1367 

1 1,3565 

3 0133 

0 

CA 

BUF? 

0C69 

REF 

6 

LAST 

1371 

10,3566 

6 5 1 -3  6 "2 

1 

IS 

ALMCACR 

0070 

REF 

29 

LAST 

1372 

10, 3567 

3 0 136 

1 

CA 

BLF2  +1 

007  1 

RFF 

1 

10,3570 

C 5576 

0 

TC 

PRICENT  +1 

.1,172 

1 , 3 5 7 1 

77667 

1 

-2SEC 

CEC 

-200 

0073 

RFF 

6 

LAST 

923 

1),  35  72 

3 5006 

1 

CAP 

VC5NC9 

007A 

REF 

2 

LAST 

517 

1 1,3573 

1 2 505 

1 

TCP 

PPICCSPR 

OC75 

562A 

BLCC  K 

02 

CC76 

RFF 

2 

LAST 

1371 

AOOO 

SETLCC 

FFTAG7 

0077 

562A 

BANK 

1078 

PEF 

2 

LAST 

1371  TC 

1372: 

29  ; 

29>1 

COUNTY 

$T/ALARM 

0C79 

562A 

0 OOOA 

0 

BAILCUT 

INHI  NT 

0080 

RFF 

376 

LAST 

137  1 

5625 

3 CCC2 

Fi 

CA 

C 

0C81 

RFF 

7 

LAST 

1372 

5626 

55 '363 

1 

TS 

ALMCACR 

1082 

REF 

377 

LAST 

1372 

5627 

50  rc2 

Q 

INCEX 

Q 

0083 

5630 

3 COCO 

1 

CAF 

0 

C C 8A 

REF 

1 

56  31 

0 557A 

1 

TC 

RCRTENT 

1085 

5632 

6P60C 

1 

nCTACAOC 

CCT 

A JA  10 

0086 

5633 

0 OOOA 

0 

INHINT 

0087 

RFF 

89 

LAST 

1359 

563A 

3 A752 

0 

WHIMPER 

CA 

TWC 

0088 

REF 

2A 

LAST 

128  6 

5635 

6 0005 

1 

AD 

z 
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USER' S PAGE  NO.  2 EO  S 2 

C0TAIN  FETURN  ACCRESS  IN  A 


THE  ASTPCNAUT  AT  CAIL  LCC  +l,+2,+3  ANC 
ALARM  CCCE 


ASTRONAUT  RETURN 

IMMEDIATE  RETURN  TO  USER.  RESTART 
PHASE  CHANGE  FOR  PRIG  CISPLAY 


* * ♦ KEEP  IN  DISPLAY  RCUTINES  BANK 
SAVE  ALARM  CCCE 

2 CADR  CF  FRICLARM  USER 


* LFAVE  L ALONE 
CENT  MCVF 


G4P:  ASSEf'BLF  REVISION  116  OF  AGO  PROGRAM  LONINARY  BY  NASA  2021112-071 


L ALARP  ANC  AFCRT 


0039 

3090 

PFF 

2 

LAST 

824 

5636 

5637 

54  C17 
5 00  17 

c 

1 

ERUPT 

0C91 

RFF 

59 

LAST 

1344 

5640 

0 4635 

0 

TC 

PQSTJUMP 

0092 

RFE 

2 

LAST 

E2F 

5641 

1 2 7 6 3 

c 

CACP 

FNFMA 

0093 

5642 

0 0GO4 

0 

pnoDoo 

INHINT 

CC94 

REF 

378 

LAST 

1372 

5643 

3 .100  2 

0 

CA 

0 

0095 

P.RF 

8 

LAST 

1372 

5644 

5 5 ' 3 6 3 

1 

AR0RT2 

TS 

ALMCACR 

0096 

REF 

379 

LAST 

1373 

5645 

50  :02 

0 

INDE  X 

0 

0097 

5646 

3 OOO  I 

1 

CAf 

0 

0098 

REF 

2 

LAST 

137? 

5647 

0 5 5 74 

1 

TC 

6CPTENT 

0099 

5650 

77770 

1 

CCT77  77C 

CCT 

7777C 

•)  ion 

REE 

3 

1 AST 

1C88 

565  1 

3 4 76  5 

1 

CAF 

0CT35 

0 101 

REF 

256 

LAST 

1372 

5652 

54  T 1 1 

I 

TS 

L 

OlO? 

5653 

4 00  I'J 

n 

CCM 

U05 

REF 

9 

LAST 

860 

5654 

5 2 760 

1 

CXCH 

-PHASE4 

C104 

5655 

0 0004 

0 

GOPOOCOO 

INF  INT 

>1'42 

REE 

304 

LAST 

1325 

5656 

C 4616 

1 

TC 

RANKCALL 

01  044 

PEE 

1 

5657 

27750 

0 

CADR 

FLAGS 

U05 

RFF 

3 1 

LAST 

1329 

5660 

3 01  )3 

0 

CA 

FLAGWRC7 

•'1''6 

RFE 

3 

LAST 

281 

566  1 

7 4 7 4 6 

1 

MASK 

V37FLBI T 

0107 

poF 

459 

LAST 

1372 

5662 

10  000 

0 

CCS 

A 

Cl  C8 

REE 

1 

566  3 

1 5 6 7 1 

0 

TC  F 

STPTTCLE 

'1109 

REF 

305 

LAST 

1373 

5664 

0 4616 

1 

TC 

BANKCALL 

cue 

RFF 

2 

LAST 

231 

5665 

12650 

1 

CACR 

V37KL  FAN 

01102 

RFE 

3C6 

LAST 

1373 

5666 

0 4616 

1 

TC 

BANKCALL 

T 1 1 T 4 

REF 

2 

1 AST 

213 

5667 

12641 

1 

CADR 

MR. KLEAN 

Oil  1 

REF 

2 

LAST 

86C 

567C 

1 5634 

1 

TCP 

WHIMPER 

0 112 

RFF 

1 

56  7 1 

3 5 73  3 

c 

STRTIDLE 

CAF 

eeSERVCL 

01122 

RFF 

3 

LAST 

136C 

5672 

0 4727 

1 

TC 

SLPERSW 

0112^ 

REF 

3C7 

LAST 

1373 

5673 

n 4616 

1 

TC 

BANKCALL 

0112  5 

REF 

1 

5674 

57  22  1 

0 

CADR 

SEPVIOLE 

0114 

5675 

0 0004 

u 

CeSFOLE 

INF  INT 

Til  5 

REF 

380 

LAST 

1373 

5676 

3 CCC2 

c 

CA 

G 

0116 

RFF 

1 

5677 

0 5644 

1 

TC 

ABCRT2 

0117 

5700 

21103 

0 

CCT21103 

CCT 

2 1103 

0118 

57C  1 

0 0004 

0 

CLRTA  INS 

INHINT 

C119 

REF 

381 

LAST 

1373 

57>2 

3 0002 

0 

CA 

Q 

0120 

REF 

2 

LAST 

1276 

5703 

0 5 57  1 

1 

TC 

ALAPM2 

0121 

5 704 

CQ217 

0 

OCT217 

CCT 

0C21  7 

C122 

P^F 

9 

LAST 

1373 

5705 

0 1363 

0 

TC 

ALMICACR 

0123 

5 7C6 

C CQ04 

0 

BAI LCLTl 

INHINT 

0124 

REF 

10 

LAST 

1373 

5707 

53*364 

0 

CXCH 

ALMCAOR 

0125 

REF 

1 

5710 

3 5732 

1 

CAF 

ACR40400 

>126 

RFF 

68 

1 AST 

1372 

5711 

54  C61 

1 

8CTHA8RT 

TS 

I TEMPI 

0127 

REF 

382 

LAST 

U73 

5712 

50  002 

0 

INDEX 

Q 

0128 

9713 

3 OTOO 

1 

CAF 

0 

0129 

RFF 

257 

LAST 

1373 

5714 

54  00  1 

1 

TS 

L 

0130 

RFF 

1 

5715 

1 5 60  3 

0 

TCF 

CHKFAILl 
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LSER*  S PAGE  NC.  3 EO  S3 


RESUME  SENGS  CCNTRCl  HERE 


OCN'T  NCVE 

A.35SFCT  FCF  GCPCCCrO 


RESET  STATEFIG,  REIMTFLG,  ANC  NCDCFLAG. 
IS  SERVICER  C.LRRFN'TLY  IN  CPERATICN? 

TERMINATE  GRPS  1,  3,  5,  ANC  6 

TERMINATE  C-RPS  2,  A,  1,  3,  5,  AND  6 
( I .c  . , GRP  4 EAST  ) 

PUT  SERVICER  INTO  ITS  "GRCLNO"  STATE 
ANC  PRCCEEC  TC  GCTCPOCE. 


RETURN  TC  USER 


GAP: 


ASSEPBLE  RFVISIO^  116  CP  AGC  PRCGRA''  LURINAPY  BY  NASA  2C21112-C71 


L ALARM  ANC  ABORT 


U31 

0132 

REF 

11 

LAST 

1373 

5716 

5717 

0 0004 
53  • 364 

C 

0 

pcnonci 

INHINT 

CXCF 

ALMCAOR 

7133 

RFF 

1 

6720 

3 5 73  1 

1 

CAE 

ACR77773 

'll  34 

RFP 

1 

572  1 

1 5711 

] 

TC  F 

BCTHABRT 

7135 

5722 

0 0004 

0 

A L A R M 1 

INF INT 

0136 

REF 

12 

LAST 

1374 

5723 

53  '364 

0 

CXCF 

ALMCACR 

0137 

5724 

0 0004 

0 

ALMNCACR 

INMNT 

013  8 

RFF 

3 6? 

LAST 

1373 

5725 

50  OOP 

0 

INDEX 

C 

' 1 3 9 

5 726 

3 rooo 

1 

CA 

0 

C140 

REF 

258 

LAST 

1373 

5727 

54  o n 

1 

TS 

L 

1141 

REF 

1 

573C 

1 56C  1 

1 

ICF 

LARMENT 

0142 

REF 

5 

LAST 

1364 

5731 

1 5650 

0 

ACR7777C 

TGF 

OCT7777C 

U43 

orp 

■3 

LAST 

1371 

5732 

1 5632 

1 

ACR40400 

TCF 

CCT40400 

0 144 

REF 

156 

LAST 

1370 

5155 

DCALARM 

EQUALS 

ENECF JCB 

01444 

REF 

53 

LAST 

887 

F7 , 1515 

EBANK= 

DVCNTP 

01445 

REF 

2 

LAST 

1373 

57  33 

56C67 

c 

BFSERVCL 

PBCCN 

SERVICLE 

R'U45 

CALLING 

SEQUENCE  FCR 

VARALARM 

A 0 1 4 6 

CAE 

( ALARM  ) 

A 1147 

TC 

VARALARM 

P0148 

varalarm 

TURNS 

CN  FRCGRAM  ALARM  L ’GHT 

■ eUT  COES  NOT  0 1 SPLAY 

0149 

5 734 

0 0004 

0 

VARALARM 

INF INT 

0151 

REF 

259 

LAST 

1374 

5735 

O 

o 

1 

IS 

1 

(U51 

pr  p 

384 

LAST 

1374 

5736 

3 0002 

0 

CA 

0 

0152 

RFF 

13 

LAST 

1374 

5737 

55' 363 

1 

TS 

ALMCACR 

0153 

PEF 

2 

LAST 

1372 

5740 

0 5 5 7 5 

c 

TC 

PRI CENT 

0154 

5741 

00014 

1 

ECT14 

CCT 

14 

1155 

REF 

14 

LAST 

1374 

5 742 

C 1363 

r 

TC 

ALMCACR 

0156 

R'^F 

3 

LAST 

1373 

5634 

AEORT 

EQUALS 

WFIMPER 

0157 

13,3750 

BANK 

13 

■'ll  58 

REF 

1 

13,2000 

SETLEC 

ABTFLGS 

C165 

13,3750 

BANK 

0 160 

PEF 

1 

CCUNT3 

$ ! /AL  ARM 

0161 

REF 

1 

13,3750 

4 4 747 

0 

FLAGS 

CS 

STATEBI  T 

0162 

REF 

21 

LAST 

1322 

13  ,3751 

7 0077 

0 

MAS  K 

FLAGWRD3 

1163 

REF 

2 2 

LA  ST 

13  7 6 

13,3752 

54  C77 

c 

TS 

FLAGWRC3 

0164 

PEF 

3 

L AST 

1211 

13,3753 

4 4745 

1 

CS 

REINTBI T 

0 165 

REF 

20 

LAST 

857 

13,3754 

7 C1C6 

1 

MASK 

FLGWRCIO 

0166 

REF 

21 

LAST 

1374 

13,3755 

54  106 

1 

TS 

F LGRPCIO 

016? 

RFF 

3 

L AST 

230 

1 3,3756 

4 4 753 

0 

CS 

NOCOB IT 

0168 

RFF 

3 1 

LAST 

1305 

13,3757 

7 0)76 

1 

MASK 

FLAGWRD2 

1S:CG  ALG.  11,1969  SKIPPER  .097  PAGE  1374 
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SAVE  USERS  ALARP  CCCE 
SAVE  LSERS  C 

COM  MOVE 


RETURN  TC  USER 


gap: 
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IS:rS  AUG.  11.1S6S  SKIPPER 


097 


PAGE  1375 


I ALARP  ANC  ABORT  LSFF'S  PAGE  NC.  5 EO  S3 


0169 

PEF  32 

LAFT 

137A 

13,3760 

5A  076  1 

TS 

FLAGPRD2 

0170 

REF  385 

LAST 

137^ 

13,3761 

C CC02  C 

1C 

C 
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GAP; 

L UPDATE  PROGRAM 

ROOD  1 PRCGPAM  NAME:  P27 

ROC02  WRITTEN  BV:  KURCY/  BE  NC1'= 


USER'S  PAGE  NO. 


R00D3 

ROO'.iA 

MOC  NO: 
Mcr  BY: 

6 

KILPCY 

RG005 

DATE  : 

01DFC67 

ROD  16 

LOG  section: 

UPFATE  PROGRAM. 

POC07 

ROnns 

'^LNCT.  CESCR: 

P27  (THE  UPDATE  PROGRAM) 
INSFRTICNS  RFGUESTEC 

PROCESSES  COMMANDS  AND  DATA 
BY  TEE  GFGUNC  VIA  UPLINK. 

RD009 

R 0 ^ 1 n 

RO''U 

THF  P27  PROGRAM  kill 
CNLY  DUPING  FOO  FOR 
PC2,  AND  FRESH  START  FCP 

ACCEPT  UPDATES 

TEE  LM,  AND  ONLY  CURING  POC  , 
TEE  CSM 

1 


EC  S3 


R'ni2  CALLING  SCO:  FPCGPAM  is  IN’ITIATFC  BY  UPLINK  ENTRY  CF  VERBS  7C  , 71,  72  ANC  73. 


ROOIA  SUBROUTINES;  TFSTYACT,  NEKRCCEX,  NFNNCCEX  «3,  GCXCSFF,  BANKCALL,  FINFVAC,  INTPRET,  INTSTALL,  TPAGREE, 
RMlft  INTNAKFU,  ENDEXT,  POSTJLMF,  FALTCN,  NEKPHASE,  PFASCRNG 


RCC17  NCPNAL  EXIT:  TC  ENCFXT 


PO'IIR  ALARM/ABORT:  Tf  baLTFN  FCLLCKCD  BY  TC  ENDEXT 


R0019  RFSTARTS: 

R0020 

Rm22 

R0D23 

P');.25 

RD927 

RQ''29 

ROD  31 


P27  IS  RFSTAPT  PRQTECTEC  IN  TKG  KAYS... 

1.  PRICP  TC  VFRIFLAG  I N V E PS  I C N ( W R IC F IS  CAUSED  BY  TRE  GR OUN D / A S TRON AU T • S VERIFICATION  CF  UPDATE 

DATA  by  SENDING  A V33E  WHEN  V21N02  IS  FLASRING) 

NC  PROTECTION  EXCEPT  PRF-P27  MODE  IS  RESTORED,  COAST  t ALIGN  DCKNLIST  IS  SELECTEC  ANC  UPLINK 
ACTIVITY  LIGHT  IS  TURNFC  CFF.IJUST  A'  IF  A V34E  WAS  SENT  DURING  027  DATA  LOACS). 

V7'  ,V71,V72  CR  V73  KILL  HAVE  TO  BE  CCMPLETELY  PESFNT  BY  USER. 

2.  AFTEF  VERIFLAG  I NV E PS  I CN ( KI  R EN  UPDATE  OF  TRE  SPECIFIED  ERASABLES  IS  BEING  PFPEOPNEC) 

PROTECTED  AGAINST  RESTARTS. 


R0'J32  CEPRIS: 

P.I033 

RDtT35 

RD'I36 

RDD38 

RD039 


UPEHFF  (20D) 
UPVERE  (I) 
UPCLDMon  (1) 
CCNPNUMB  (1) 
UPC  CL NT  (1) 
UFTEMF  m 


TEMP  STORAGE  FOR  ADDRESSES  ANC  CONTENTS. 

verb  NLYBER  minus  TOC  (E.G.  FCP  V72,  UPVERB  = 72C  - 7CD  = 2) 

FOR  MAJOR  MCDE  INTERRUPTED  BY  P27. 

total  number  CF  CFMFCNENTS  TO  RB  TRANSMITTED. 

actual  number  CF  CCMPCNFNTS  RECFIVEC. 

SCRATCR,  BUT  USUALLY  CCNTAINS  CCMPCNENT  NUNEEP  TC  BE  CFANGEC  DURING  VERIFY  CYCLE 


ROCAl  INPUT: 

PD1A2  bNTRY:  description 

R VTA3  V7DFXXXXXFXXXXXE  (LI^TCfF  TIME  INCREMENT)  DOUBLE  PRECISION  OCTAL  TIME  INCREMENT,  XXXXX  XXXXX, 

IS  ADOFri  TC  TEPH^v,  SUSTPACTEC  FROM  AGO  CLOCK  (T  IM  E2,  T IMF  1 ) , SUBTRACTED  FROM  C SM  STATE 
VFCTOF,  TIMB(TETCSM)  ANC  SUBTRACTED  FROM  LEM  STATE  VECTOR  TIMEITETLEM. 

TRF  dp  CCTAL  TIME  INCPFMENT  IS  SCALFC  AT  2(23). 


G4P: 

L 

P0050 
R0C51 
R')'i52 
RorsB 
p riP54 
RT'T5  5 

R0056 
R0057 
P 0 C “i  8 
P C06r 

R0:)61 
RT062 
P006  3 
R1064 


R0065 

P0066 


RU047 

P0069 

P0072 


P.Cf;73 

P7074 

R0078 

P0077 

R0078 

pfirpc 

ROP82 

ROnS3 

RCOE4 

P0C86 

R0088 

RfCSC 

R3092 

R 

R0096 

R0098 


RC144 

R0145 
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FACE  1377 


UPDAT'^  program 


USER'S  PAGE  NC.  2 


EC  S3 


V71EI  IFAA AAE 
KKXXXE 
XXXXXE 

9 NPXl  bank 


(CCNTTGUoUS  block  UPCATE)  II-2  OCTAL  CO MPO NE M ' , X X X X X , 
ARP  LCAC^r  IMC  EPASAELP  STARTING  AT  FCADR,  AAAA. 

IT  IS  .Gf.  ? .ANC.  .LE.  200., 

ANC  (AAAA  411-3)  COES  NCT  PRODUCE  AN  ADDRESS  IN  THE 
SCALING  IS  SAME  AS  INTERNAL  REGISTERS. 


V72EI  IF 
AAAAFXXXXXE 
A • AA  E xxxxxr 


(SCATT'-p  UFPATP)  (II-1I/2  CCTAL  COM  PON)  ENT  S , X X X X X , ARE 
LCAOfn  INTO  ERASABLE  LCCATICNS,  AAAA. 

II  IS  .G'^.  3 .ANC.  .LE.  19C,  ANC  MLST  BE  CDD. 

SCALING  IS  SAMP  AS  INTERNAL  REGISTERS. 


V73FXXXXXFXXXXXF  (OCTAL  CLOCK  INCREMENT)  COLBLE  FRECISICN  CCTAL  TINE 
INCREMENT  XXXXX  XXXXX,  IS  ADDED  TO  THE  AGC  CLOCK,  IN 
CEN‘'ISECCNDS  SCALED  AT  (2)28. 

THIS  t OAO  IS  the  OCTAL  EQUIVALENT  CF  V55. 


OLTPLT:  IN  ADDITION  TC  THE  ABOVE  REGISTER  LOADS,  ALL  UPDATES 

CCMPLEMENT  RIT3  OF  FLAGK0RC7. 


ACCITTCNAL  NOTES:  VERB  71,  JUST  CEFINEC  ABOVE  WILL  RE  LSEC  TO  PERFCRM  8LT  NOT  LIMTEC  TC  THE  FCLLCWING  UFCATES-- 

1.  CSM/LM  state  VECTOR  UPCATE 

2.  RFFSMMAT  update 


THE  FCLICWING  CEMMENTS  FELINEATE  FACE  SPECIAL  UPCATE 


I.  CSM/L(A  STATE  VECTOR  UPDATE(ALL  DATA  ENTRIES  IN  CCTAL) 


ENTRIES  : 

V7  IE 
2IE 
A AAAE 
XXXXXE 

> X > X XE  X XXXXE 

xxxxxrxxxxxE 

XXXXXEXXXXXF 

xxxxxrxxxxxE 

XXXXXEXXXXXE 
XX  XXX'XXXXXE 
XXXXXRXXXXXE 
V33E 


DATA  DEFIMTICN:  SCALE  FACURS: 

CCNTIGUCLS  block  IFCATE  VERB 

NUMBER  CF  COMPONENTS  FCR  STATE  VECTOR  UPDATE 
ECADF  CF  'UFSVFLAC' 

STATE  VECT'^R  IDENTIFIi^P:  CCOOI  FCF  CSM,  77776  FCR  LPM  - EARTH  SPHERE  GF  INFLUENCE  SCALING 

0UQ02  for  CSM,  77775  FCR  LEN  - LUNAR  SPHERE  CF  INFLUENCE  SCALING 

X PCSITICN 

Y PCSITICN 
Z PCSITICN 

X velocity 

Y VFLCCTTY 
7 VFLCCITY 

TIME  FRCM  AGC  CLCCK  2EPC 

VERB  33  TO  SIGNAL  THAT  TH^  STATE  VECTOR  IS  READY  TC  BE  STCRED. 


2.  RFFSMMAT(ALL  data  ENTFIES  in  CCTAL) 

'^NTPIFS:  DATA  OEFINITICNS:  SCALE  FACTORS; 


Gao: 

asSE><RLF 

REVISION  lie  CF  AGC  FRCGRAV  LUMNapY  EY  FASa  20211  12-071 

19:09  AUG  . 11  , 19f9 

SKIPPER 

.097  PAGE  1376 

L 

UPcaiE 

FRCGRA Y 

LSEP' S PAGE 

NO.  3 

EO  S3 

RC1A7 
R 1148 

V71F 

24E 

CCNTIGUnS  eiCCK  LFCATE  VERB 

NURBER  GF  CCRFCNFM5  FCR  REFSRRAT  LF0A7F 

RrU9f 

AAAAE 

FCACR 

CF  'RE 

FSMMAT  ' 

R01S2 

>X>X>F>XXYXO 

RFR 

1 

CCllRN 

1 

2(-  1 ) 

R ,U  54 

XXXXXOXXXXX’’ 

ROW 

1 

COLUMN 

2 

2(-l) 

ROl  St 

XXXXXEXXXXXF 

RCR 

1 

CCLURN 

3 

2(-  1) 

ROl  se 

xxxxxexxxxxo 

RCR 

2 

COLLYN 

1 

2 (-1  ) 

R0160 

XXXXXEXXXXXE 

RFW 

2 

CCLUYN 

2 

2(-l) 

R0U2 

>>>XXF>XXXXo 

RCR 

2 

r r L ij  R N 

3 

2(-  1) 

R9  164 

XXXXXTXXXXXE 

ROVv 

3 

COLUMN 

1 

2 (-1  ) 

R0166 

XXXXX'XXXXX  E 

RCW 

3 

CCLUYN 

2 

2(-l) 

ROl^E 

XXXXX" XXXXXF 

RCR 

3 

COLUMN 

Zl 

2 (-1 ) 

R9170 

V330 

VERB 

33  TO  S 

IGNAL  IHAT  REFSRRAT  IS  REAFY  7C  BE  STCREC. 

Cl  71 
0172 

R FF 

7 

LAST 

298 

07,3764 

43 , 2 no 

BANK 

SETLCC 

97 

F XT VERBS 

0173 

43,3745 

BANK 

C174 

REF 

4 

LAST 

977 

>=-3,1  70  6 

EBANK= 

TEPHEM 

1175 

0 c j: 

1 

CCLNTA 

$$/P?l 

0176 

REF 

1 

43,3745 

3 4755  1 

V70UPDAT  CAF 

UP7C  CCRES  HERF  CN  V70E 

9177 

RFF 

2 

LAST 

,26  2 

43,3  746 

1 3754  0 

TCF 

V73UPFAT  +1 

0178 

RFF 

1 

43,3747 

3 4753  1 

V71UPDAT  CAF 

LF71 

CCRES  FERE  CN  V71E 

0179 

REF 

3 LAST  1378 

43  ,3750 

1 3754  0 

TCF 

V73UPDAT  +1 

9 180 
0181 

RFF 

REF 

1 

4 

LAST 

1378 

43.3751 

43.3752 

1 

4 7 52 
3 754 

C 

0 

V72LPCA7 

CAF 

TCF 

LI  F72 

V73UPDAT 
U F73 

+ 1 

CCRES  FERE  CN  V72E 

9182 

REF 

1 

1 

43.3753 

43. 3754 

3 

6250 

0 

V73UFCAT 

CAF 

COMES  FERE  CN  V73F 

0183 

REF 

5 ' 165 

0 

+ 1 

IS 

UFVEPBSV 

SAVE  UFVERE  UNTIL  IT'S  CK  TC  ENTER  F27 

01  84 

REF 

20 

LAST 

390 

43 ,375  5 

0 

?976 

1 

TC 

TESTxaCT 

GRAB  DISPLAY  IF  AVAILABLE,  CTHERNISF 

A 1 185 

TURNKCFERATCR  ERRCRX  CN  AND  tfrrinaTEJCB 

1186 

rff 

23 

LAST 

1284 

43,3756 

3 

1019 

1 

CA 

mcoreg 

CHECK  IF  LFDATE  ALLCWEC 

0187 

43  , 3 757 

C 

0006 

1 

extend 

FIRST  CHECK  FCR  MCDREG  = +0,  -0 

1188 

43,3760 

1 

3 76  3 

1 

PZF 

3 

(+9  = FOO,  -0  = FRESFSTART) 

0189 

RFF 

60 

LAST 

1373 

43 ,3761 

1 

4635 

0 

UPERRQR 

TC 

POSTJLMP 

TURN  CN  'CFERATCR  EPRCR'  LIGHT 

9190 

REF 

1 

43,3762 

11743 

1 

CACR 

UFERPCUT 

+ 2 

GC  TC  CCMMCN  LPCATE  PRCGRAM  EXIT 

0191  5 

PEF 

1 

43,3761 

CKMDMCRE 

= 

UPERRCR 

C192 

RFF 

2 

LAST 

104 

43,3763 

55'  17  1 

1 

+ 3 

TS 

UPCLDMOO 

SFT  UPCLDMCO  TC  ZEpC. 

1193 

REF 

2 

LAST 

1376 

43,3764 

0 

1 ' 165 

1 

CAE 

UFVER6SV 

SET  UFVERE  TO  INCTCATE  TO  P27 
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C19A 

REF 

2 

LAST 

IOC 

A3, 3765 

55*171 

0 

TS 

U FVERB 

WHICH 

EXTENDED  V>=RB  CALLEC  I 1. 

1195 

REF 

1A5 

LAST 

136  5 

A3, 3766 

3 A753 

1 

CAF 

ONE 

C196 

RFC 

7 

LAS'c 

1 1A 

A3, 3767 

55*172 

0 

TS 

UPCOLMT 

INITIALIZE  LPCCLNT  TO  1 

1197 

orf 

tl 

LAST 

1378 

A3 ,3770 

0 A635 

0 

TC 

POST JUMP 

L GAVE 

EXTE^CEC  VERB  BANK  AND 

0198 

RFF 

1 

A3, 3771 

11362 

0 

CAOR 

UPPART2 

GC  TC 

UPCATE  FP0GRAMIF27)  BANK. 

0211 

REF 

26C 

LAST 

1367 

A755 

UP70 

equals 

ZERO 

0212 

RFF 

1A6 

LA  ST 

1379 

A753 

UP71 

ECLALS 

CNF 

0213 

REF 

90 

LAST 

1372 

A752 

UP72 

EQUALS 

TWO 

0 21A 

REF 

A3 

1 A ST 

1362 

6250 

UP73 

EQUALS 

T FREE 

'1215 

OA, 3362 

BANK 

OA 

0216 

REF 

2 

LAST 

1216 

JA  ,2 OJO 

SETLCC 

UPDATF2 

0217 

OA, 3362 

bank 

021  8 

REF 

1 

CDUNTA 

it /P27 

1219 

OA ,3362 

LPPART2 

equals 

UPCATE  PROGRAM  - PART  2 

0220 

pep 

1 lA 

LAST 

n25 

CA.3362 

0 53  53 

1 

TG 

PHASCHNG 

SET  restart  GRCUP  6 TC  RESTCRE  CLC  MODE 

0221 

OA ,3363 

07026 

1 

OCT 

07026 

AND  DCWNLIST  ANC  EXIT  IF  FESIART  CCCURS. 

0222 

OA , 336A 

30CG0 

1 

CCT 

3 0Fino 

FRirPITY  same  AS  CPRPRID 

0223 

REF 

A 

LAST 

20  5 

1 173 

EBANK= 

UFBUFF 

022A 

RFF 

1 

OA  ,3365 

C3673 

0 

2CACP 

UPCUT  +1 

022A 

REF 

1 

OA, 3366 

1C102 

c 

0225 

REF 

1A7 

LAST 

1379 

I'A  , 3367 

3 A753 

1 

CAF 

DNF 

0226 

off 

9 

1 AST 

98A 

CA  ,3370 

5A  333 

0 

TS 

DNLSTCGC 

COWNL  1ST 

0227 

REF 

6 

LAST 

795 

FA,  337  1 

0 531  1 

1 

TC 

NEWMCDEX 

SET  MAJCP  MCCE  = 27 

0228 

OA  ,3372 

000  3 3 

1 

CEC 

27 

0229 

REF 

3 

LAST 

13  79 

OA, 3373 

51*171 

1 

INDEX 

UFVERP 

EPANCP  CEPENCING  CN  WHETHER  THE  UPCATE 

02  30 

■•'A,  337A 

1 3375 

1 

TC  F 

+ 1 

VERB  RECL1P9S  A FIXED  CR  VAPIAELE  NUMIEEP 

G231 

CA  , 3 3 75 

1 3A00 

1 

TCP 

+ 3 

V7C  F IXEC.  (CF  CCMFCNENTS. 

0232 

REF 

1 

OA,  •’Tit 

1 3A03 

1 

TCF 

OHWELLl 

V71  VARIABLE  - GC  GET  NC.  CF  CCMFCNENTS 

0233 

RFF 

2 

LAST 

1379 

1A,3377 

1 34.13 

1 

TCP 

0FW6LL  1 

V72  VARIABLE  - GC  GET  NC.  CF  CCMFCNENTS 

023A 

Rcp 

91 

LAST 

1379 

,3A0n 

3 4752 

n 

CA 

Twr 

V73  (ANC  V7C  1 FIXED 

0235 

ref 

3 

LAST 

2'I5 

OA,  3A'I  1 

55*167 

1 

TC 

CCMPNLME 

SET  NLMEEP  CF  CCMFFNENTS  TG  2. 

0236 

RFF 

1 

04 ,3A  )2 

1 3A26 

0 

TCF 

nPWELL2 

GO  GFT  THE  Twe  LPOATE  CCMFCNENTS 

0237 

R*:F 

1 

OA, 3A03 

3 3A76 

1 

OHWELLl 

CAF 

ACUPEUFF 

* REQUEST  USER  TO  S EN C NUMBER  » 

Q238 

PEF 

836 

LAST 

1363 

( 6, 3404 

54  156 

1 

TS 

MFAC  +2 

* GF  CCMFCNENTS  P A R AME T E F ( T I) . * 

0239 

R*^F 

1 

OA,3A05 

3 3A77 

n 

-t2 

CAF 

UFLGACNV 

(CKAV32  RETURN'S  HERE  IF  V32  ENCCLNTEREC) 

02A0 

RFF 

308 

LAST 

1373 

FA, 3A36 

0 46  16 

1 

TC 

8ANKCALL 

C ISFLAY  a FLASHING  V2  INOl 

02A1 

REF 

11 

1 AST 

71  7 

OA  ,3407 

2033A 

1 

CACR 

GOXDSPF 

TC  REQUEST  II. 

8bi.Ul 
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02R2 

0243 

PEF 

PEF 

1 

3 

LAST 

1379 

04, 341-1 
04,3411 

1 

1 

367  3 
3 40  5 

1 

1 

0244 

PEF 

1 

'"4,3412 

0 

3467 

1 

0245 

P^F 

49 

LAST 

1275 

14,3413 

4 

4152 

1 

0246 

REF 

5 

LAST 

1379 

04,3414 

6 

11  13 

1 

0247 

■14,3415 

G 

co^e 

1 

• 

0248 

RFF 

4 

LAST 

13  80 

"4, 3416 

6 

3405 

0 

0249 

R'"F 

6 

LAST 

138r 

C4,3417 

4 

1 173 

1 

0250 

qcp 

I 

-’4,  3420 

6 

4362 

1 

• 

'’251 

04,3421 

n 

0 1 )6 

1 

025? 

RFF 

5 

LAST 

138C 

04,3422 

$ 

3405 

c 

0253 

RFF 

7 

L AST 

1380 

04, 3423 

31 

'17  3 

• 

0254 

RFF 

4 

LAST 

1379 

04,3424 

55 

' 167 

1 

• 

P 1257 

UPBUFF  LGAtlNG  SEQUENCE 

0257  1 

PE^^ 

3 

LAST 

13  79 

14, 3425 

25 

'172 

1 

• 

0258 

RFF 

1 

■i'f  ,3426 

3 

3 643 

0 

CHNELL2 

0259 

RFF 

4 

LAST 

1380 

-.4,  3427 

6 

1172 

1 

0260 

REF 

837 

LAST 

1379 

04 ,343  .1 

54 

156 

1 

+ 2 

• 

0261 

pep 

2 

LA  ST 

1379 

04, 3431 

3 

3477 

C 

+ 3 

•126? 

RFF 

3-19 

LAST 

1379 

''4, 3432 

0 

4616 

1 

0 26? 

RfF 

12 

LAST 

1379 

14,3433 

2:1334 

1 

• 

0 264 

RFF 

2 

LAST 

1380 

04 , 3434 

1 

3673 

1 

■12  65 

PEF 

2 

LAST 

1379 

{14 ,3435 

1 

3431 

;) 

0266 

PFF 

2 

LAST 

1380 

04 , 3436 

n 

3467 

1 

• 

'1267 

RCF 

5 

1 AST 

1380 

■14,  3437 

4 

1 1 72 

0 

0268 

Rt.F 

5 

LAST 
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.14 ,344'0 

6 

1 167 

0 
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04,3441 

f 

CC(  6 

1 

• 

0270 

RFF 

1 

■’4,3442 

6 

3444 

'1272 

RFF 

3 

LAST 

1380 

r,4 ,3443 

1 

3425 

0 

• 

P 1273 

VERIFY  SFOUENCE 

• 

0274 

PFF 

1 

•04 , 3444 

3 

3475 

1 

UPVER  IFY 

1275 

ref 
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LAST 
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■’4,3445 

54 
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1 

3‘ 

02  76 

RFF 

1 

04, 3446 

3 

3 5 I" 

1 

• 

0277 

PEF 

310 

LAST 

1380 

04 , 3447 

0 

4616 

1 

I2T8 

FEF 

13 

LAST 

13  80 

P4 , 345'L 

20334 

1 

0279 

PEF 

3 

L AST 

1380 

■14, 3451 

1 

3673 

1 

• 

0280 

RFF 

1 

■04  ,3452 

1 

35P1 

1 

0281 

RFF 

•3 

LAST 

138C 

C4, 3453 

3467 

1 

2" 

028? 

RFF 

A 

1 AST 

l')4 

'4,3454 

3 

1166 

1 

• 

0283 

•■'4,34  5 5 

C 

C006 

1 

0284 

RFF 

2 

LAST 

13811 

■4,3456 

6 

3444 

0285 

REF 

c; 

LAST 

1380 

■’4,3457 

4 

1166 

p 

• 

1288 

PFF 

6 

LAST 

138G 

■.  4,  3460 

6 

1167 

c 

0289 

PFF 

55 

LAST 
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04, 346! 

6 
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TO.F 
TC  F 

LF0UT4 
HEWELLl  1-2 

V34  TFPMAATF  UFCATF(F27)  RETURN 

TC 

CK4V32 

DATA  CP  V32  RETURN 

CS 

81  T? 

AC 

UPBUFF 

IS  II (NUMBER  OF  COMPONENTS  PARAPETEF) 

EXTEMl 

.GE.  3 ANC  .LE.  20D. 

BZMF 

DHWElLi  -62 

OS 

U FFUFF 

AD 

UF21 

FXTFNC 

eZPF 

OHmELLI  *2 

r.AE 

U P 8 L F F 

TS 

CG“PNUMB 

SAVE  II  IN  CONPNUMB 

INCR 

CAE 

AO 

UPOnUNT 
AnjPBFMl 
U PC  C L N T 

INCREPENT  CCUNT  CF  OCPFCNENTS  PECEIVEC. 
calculate  LCCATIONIEC ADR  ) IN  LP8LFF 
WHERE  NEXT  CCPFCNENT  SFCULC  BE  STORED. 

TS 

MPAC  +2 

PLACE  ECADR  INTC  P3. 

CAF 

UFLCACNV 

(CK4V32  FETUR.NS  FERE  IF  V32  ENCCUNTERED) 

TO 

bankcau 

DI SPLAY  A FLASHING  V21N01 

CACP 

GCXCSPF 

TO  PECLFST  DATA. 

TOF 

UFCUTA 

V34  TEPMNATE  UFDATE(P27)  RETURN. 

TCF 

OhWELL?  +3 

V33  PRCCEFP  RETURN 

TC 

CK4V32 

CATA  CP  V32  RETURN 

CS 

UPC CL  NT 

HAVE  WE  FINISFEC  RECEIVING  «LL 

AO 

CCMPNUMB 

THE  DATA  WE  F XPECTFD. 

EXTEND 

BZMF 

UPVERIFY 

YES-  GO  TC  VERIFICATTCN  SECUENCE 

TG  F 

CFWFLL2  -1 

NO-  REQUEST  ADDITIONAL  DATA. 

CAF 

ACUPTEPIP 

PLACE  ECADR  WHERE  CCPFCNENT  NC.  INCEX 

TS 

MFAC  +2 

IS  TC  EE  STCPEC  INTO  R3. 

CAF 

LFVPFYNV 

(CK4V32  FETURNS  HERE  IF  V32  ENCCUNTERED) 

TO 

bankcall 

DISPLAY  A FLASHING  V21NC2  TC  RECLEST 

CADR 

GCXOSFF 

CATA  CCRRECTICN  OR  VERIFICATION. 

TO  F 

UFCUT4 

V34  TERMNATE  UFDATE(F?7)  RETURN 

TCF 

UFSTCPE 

V33  DATA  SENT  IS  GOOD.  GC  STCPE  IT. 

TC 

CK4V32 

CCPFCNENT  NC.  INCEX  OR  V32  RETURN 

CA 

UPTEMP 

DOES  THE  CCFCNEM  NO.  INCEX  JUST  SENT 

EXTENT 

SPECIFY  A LEGAL  CCMPONENT  NLMBER? 

BZMF 

UPVERIFY 

NC  , IT  IS  NCT  FCSITIVE  NCNZERC 

CS 

UFTFMF 

AO 

CCN  PNLPE 

AD 

B IT  1 
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0290 

0291 

REF 

3 

LAST 

138G 

f 4, 3462 
)4, 3463 

C 

6 

CC06 
3 4 44 

1 

0 

EXTEND 

BZMF 

UPVFPIFY 

0292 

RCF 

2 

LAST 

13RC 

04,3464 

3 

3643 

0 

CAF 

ADUPBFMl 

0293 

PFF 

6 

LAST 

139C 

■■4,3465 

6 

1166 

1 

AO 

LPTEMF 

0294 

REF 

4 

LAST 

1380 

•14,3466 

1 

343  ) 

1 

TCF 

0HKELL2  +2 

0295 

REF 

2 

LAS’’ 

1379 

04,3673 

LPCLT4 

ECUA  IS 

UFCUT  +1 

R02°6 

CHECK 

FCP 

VERB  3?  SFGUENCE 

C297 

REF 

839 

LAST 

1380 

04,3467 

4 0154 

0 

CK4V32 

CS 

MFAC 

0298 

REF 

6 1 

L AST 

13  56 

04,3470 

7 4746 

1 

MASK 

BI  T6 

0299 

REF 

460 

LAST 

1373 

04 ,4471 

10  01) 

0 

CCS 

A 

0300 

REF 

366 

LAST 

1375 

C4 ,34  72 

C 00O2 

0 

TC 

G 

3301 

REF 

387 

LAST 

1381 

04, 3473 

50  002 

0 

INOEX 

0 

03C2 

04,3474 

7'7771 

0 

TC 

0 -6 

0 30  5 

REF 

7 

LAST 

138  1 

04,3475 

Cl  166 

1 

ADLPTFMP 

ADRE  S 

U FTEM  F 

0306 

RFF 

8 

LAST 

13  80 

fl4, 3476 

01173 

0 

ADUPBUFF 

ADRFS 

UPBUFF 

0307 

04,3477 

G520L 

1 

UFLCACNV 

VN 

2 101 

03  OB 

C4, 3500 

05202 

1 

UPVRFVNV 

VN 

2102 

030  9 

RFF 

4 

LAST 

1091 

4362 

UP21 

= 

MOl 

0 312  1 

REF 

22 

LAST 

1346 

4756 

L'FDTFHA  5 

FCLALS 

FIVE 

RJ313  PR'^-ST^PF  and  FAN  TC  APPROPRIATE  ERANCE  SEQLPNCE 


0314 

■:4 ,3  5 )1 

LFSTCRE 

ECUALS 

0315 

04,350 1 

C C004 

0 

TNHI NT 

0316 

REF 

32 

LAST 

1373 

04,3502 

30  1 13 

0 

CAE 

FLAGWRD! 

0317 

RFF 

260 

LAST 

1374 

C4,  3 5'J3 

56  jC  1 

0 

XCH 

L 

0318 

RFF 

1 

04,  3 504 

3 475  1 

c 

CAF 

VERI FBI T 

031  9 

04,35-15 

0 0006 

1 

EXTEND 

0320 

RFF 

17 

LAST 

1365 

F4,35C6 

06  COl 

0 

RXCP 

LCHAN 

0321 

RFF 

33 

1 AST 

1381 

04, 3507 

54  103 

1 

TS 

FLAGWR07 

0322 

REF 

1 15 

LAST 

1379 

04,351;! 

0 5353 

1 

TC 

PHASCHNG 

0323 

■'4,3511 

04L26 

1 

GCT 

04026 

0324 

04,3512 

0 000  4 

0 

INIE  INT 

0325 

ref 

92 

LAST 

1379 

04,3=13 

4 4 7 52 

1 

CS 

TWC 

0326 

PFF 

4 

LAST 

1379 

'>4, 35  14 

6 1171 

1 

AO 

upverb 

C327 

04,3515 

0 0006 

1 

EXTEND 

0323 

PFF 

1, 

04,3516 

6 3 525 

c 

BZMF 

UPFNCVAC 

R033  1 

VERS 

73  ERANFE 

OB'-! 

04,3517 

0 C0C6 

1 

LFFNC73 

EXTENC 
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NC 

YES-  BASED  ON  THE  CORPCNENT  NC.  INDEX 
CALCULATF  the  ECACR  CF  LCCATICN  IN 
LPBLFF  VHICH  USER  NANTS  TC  CHANGE. 

CCNES  FERE  CN  V3R  TP  TERMINATE  LPCATE 


ON  DATA  RETURN  FRCM  'GCXDSPF* 

CN  DATA  RETURN  FPCM  "GCXCSP"!:  TEE  CCN- 
TFNTS  CF  MPAC  = VERB.  SC  TEST  FCR  V32 . 
IT'S  NCT  A V32,  IT’S  DATA.  PROCEED. 

V32  ENCOLNTEPEO  - GC  BACK  AND  GET  DATA 

ADDRESS  CF  TEMP  STORAGE  FOR  CORRECTIPN'S 
ADDRESS  CF  UPDATE  DATA  STCRAGF  EUFFER 
VERB  21  NOUN  Cl 
VERB  21  NCUN  C2 

DFC  21  = MAX  NC  CF  CCMPCNENTS  +l 


GRCUNC  EAS  VERIFIED  UPDATE.  STCRE  DATA. 


INVER!  VER  IFLAGI  BIT3  CF  FLAGERC7)  TC 
INDICATE  TC  TEE  GROUNDIVIA  DONNLINK) 

THAT  the  V33  (WHICH  TEE  GRCUNC  SENT  TC 
VERIFY  TEE  UPDATE)  HAS  BEFN  SUCCESSFULLY 
RECEIVED  BY  TEE  UPDATE  PROGRAM 


SET  RESTART  GROUP  6 TO  REDO  THE  UPDATE 
DATA  STCRE  IF  4 RESTART  CCCURS. 
(BECAUSE  PHASCHNG  DID  A RELINT) 

GC  TC  UPFNCVAC  IF  INSTALL  IS  RECUIRED, 
TEAT  IS,  IF  IT’S  A V7')  - V72. 

GO  TO  LPFND73  IF  IT’S  A V73. 


V73-PERFCRM  DP  CCTAL  AGC  CLOCK  INCREMENT 
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I UPCATF  pnOGRA'" 


0332 

PFF 

9 

LAST 

1381 

04 ,35  20 

3 1174 

1 

CCA 

UPEUFP 

0333 

PEP 

10 

LAST 

1382 

04,3521 

5 2 ' 2C4 

1 

DXCH 

UPEUFF  -fSC 

'T33A 

Rpp 

1 

04, 3522 

0 3 5 51 

1 

TC 

T IMEOIOL 

C33  9 

RFF 

8 

LAST 

F2S 

G4, 3523 

0 4364 

1 

TC 

F ALTCN 

T336 

RI3F 

7 

LAST 

1381 

■■■4,  ’524 

0 3 673 

0 

TC 

UFOUT  +I 

033  7 

RFF 

7 

LAPT 

1328 

04,3525 

3 4355 

0 

UPFNDVAC 

CAF 

CHRPR  10 

1338 

REF 

45 

LAST 

1357 

04 ,3526 

G 5 105 

0 

TC 

F INOVAC 

0339 

RFF 

5 

LAST 

1376 

F3, 1716 

FEANK= 

TEPHEN 

C3AC 

R = F 

1 

04,3527 

D3532 

0 

2CA0R 

UP  JOB 

034:1 

PFF 

1 

04, 3530 

i^no3 

1 

0341 

REF 

157 

LAST 

1374 

04,353' 

0 5155 

0 

TC 

ENDCF jce 

0342 

REF 

2 39 

LAST 

1255 

04,3532 

0 6042 

1 

UP  JCE 

TC 

INTPPFT 

0343 

04,3533 

77624 

1 

CALL 

0344 

RFF 

38 

L A ST 

1214 

04,3534 

27412 

0 

I NT  STALL 

A0345 

0346 

:.i4,  3 53  5 

mik 

! 

LPKAK  E 

Fxn 

0347 

RPF 

1 16 

LAST 

138  1 

■14, 3536 

0 5353 

1 

TC 

P HASCHNG 

0348 

04, 3537 

C4026 

1 

CCT 

04026 

■03  50 

PFF 

75 

LAST 

1355 

'04, 3 540 

0 5504 

C 

TC 

UPFLAG 

0351 

REF 

5 

LAST 

1233 

C4 ,3541 

00236 

M 

ACRES 

RFINTFLG 

J352 

■14,3542 

0 rco4 

0 

INHINT 

0355 

04,3543 

UPPART3 

EQUALS 

0356 

RFF 

C 

LAST 

1361 

C4.3543 

51 ' 171 

1 

INDEX 

UPVFR  E 

0357 

04, 3544 

1 3 545 

1 

TCF 

■F  1 

0356 

REF 

1 

04,3545 

1 3 704 

n 

TCF 

U PFNC70 

0359 

REF 

1 

:4, 3546 

1 2613 

1 

TCF 

UPENC71 

0360 

REF 

1 

■04,  3547 

1 3645 

1 

TCF 

UPEN072 

R0361 

ROUTINE  TC 

INCREMENT 

CLCCK (TINE2  ,TI NEl  ) 

KITH 

CCNTEN'TS  CF  CF 

0363 

04,3550 

0 000  6 

1 TIMED  I DL 

EXTEND 

0364 

REF 

8 

LAST 

1381 

04,3551 

23'  166 

1 

CXCH 

UPTFMP 

0365 

PPF 

261 

LA  ST 

137S 

C4, 3552 

3 4755 

1 

CAF 

ZERC 

0366 

.04,  3F53 
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IN  MFAC 

(SCALFC  IN 

HALF-REVCLUT IONS ) TC  A 

RCOl? 

CP  1 

, c 

CCMPLEMENT  number  SCAIFC  IN  FEVCLUTIONS. 

0016 

REF 

6S  ! 

LAST 

138A 

10,3577 

1C  15A 

P CFLLCGIC 

CCS 

MFAC 

0017 

RFF 

268 

LAST 

1385 

10, 3 6 IP 

3 A755 

1 

CAF 

ZERO 

cri8 

U,36U 

1 360A 

1 

TCF 

+ 3 

0019 

10,36:2 

13  6C3 

C 

NCCP 

0020 

REF 

28 

LAST 

109A 

10, 3603 

A A 736 

C 

CS 

HALF 

0021 

RFF 

652 

LAST 

13E7 

1 C,360A 

5A  155 

1 

TS 

MFAC  +1 

0022 

RFF 

269 

LAST 

1367 

1' , 3 60  5 

3 A 7 5 5 

1 

CAP 

ZEPC 

0923 

REF 

853 

LAST 

1387 

10  ,3606 

56  15A 

1 

XCH 

MPAC 

002A 

10,3607 

C C0O6 

1 

EXTENC 

002  5 

RFF 

29 

LAST 

1387 

n,  3610 

7 A 736 

c 

M P 

HALF 

QC26 

RFF 

85A 

LAST 

1387 

lo ,361  1 

20  155 

1 

CAS 

MPAC 

0027 

RTF 

61 

LAST 

1272 

10,3612 

1 6C6A 

1 

TCF 

DANZIG 

MCCE 

IS  ALREACY 

AT  COUELE-PREC ISICN 

R005A 

FORCE 

TP  SIGN  AGREEMENT  IN  MPfC: 

0055 

REF 

1 9 

LAST 

1383 

10,3613 

0 7262 

0 SGNAGREE 

TC 

TFAGREE 

0056 

RFF 

62 

LAST 

1387 

1 361A 

1 606A 

1 

TCF 

DANZIG 

R0057  CCNVRPT  THF  CP  1 ■ C CC^PL^^'F^T  fNGLH  SCiSUEC  IN  REVOLUTIONS  TO  A SINGIE  PRECISION  2'S  CC^PLEVE^^  ANGl*= 

R0059  SCALEC  IN  HALF-RE  VC L LTI CN S. 


0C60 

RFF 

1 

11,3615 

0 36A5  0 1S7U2S 

TC 

LTC2SLB 

006  1 

REP 

27C 

LAST 

i^ei 

10,3616 

3 A755  1 

CAF 

ZERO 

1062 

REF 

855 

LAST 

1367 

1 ’ 6 1 7 

5A  155  1 

7S 

MFAC  +1 

0C6? 

PEF 

5 

LAST 

1039 

10  ,3620 

1 6 ':  6 3 0 

TCF 

NEWMCCE 

R006A 

DO  1ST02S 

ON  A VEC7CR 

CF  ANGLES: 

0065 

REF 

2 

LAST 

1387 

1"’,  3621 

0 36A5  C V1STG2S 

TC 

1TC2SLB 

ANSWER  ARRIVES  IN  A ANC  MFAC. 

n"66 

REF 

856 

LAST 

13E7 

10,36^2 

52  162  0 

CXCH 

MFAC  *5 

0067 

REF 

857 

LAST 

136  7 

10,3623 

52  155  1 

CXCH 

MFAC 

0068 

RFF 

3 

LAST 

1387 

10 ,362A 

0 36A5  0 

TC 

1 TQ2SLB 

GAP: 
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L 

0069 

RTB 

RFF 

CP  CCOFS 
858  LAST 

1387 

10, 3725 

54  156 

1 

TS 

PFAC  +2 

LSER'S  PAGE  NO.  2 

E5  S4 

0C7C 

RFF 

859 

LAST 

1388 

10  ,3626 

52  160 

1 

CXCF 

PIPAC  +3 

0071 

REF 

860 

LAST 

1388 

10,3627 

52  155 

1 

CXCF 

YFAC 

0072 

REF 

4 

LAST 

1387 

1 1,  3 6 TO 

0 3645 

C 

TC 

1TC2SLB 

0073 

RFF 

861 

LAST 

1 388 

10 ,2631 

54  155 

1 

TS 

PFAC  +1 

0074 

REF 

862 

LAST 

1388 

in, 36^2 

3 0161 

1 

CA 

PFAC  +5 

0075 

PPF 

863 

1.  AST 

1388 

lo, 3633 

54  154 

0 

TS 

MPAC 

0076 

REF 

148 

last 

137R 

10,3634 

3 4753 

1 

TPPCCE 

CAF 

CNE 

MDCE  IS  TP. 

0077 

RPF 

6 

1 AST 

1387 

10, 3635 

1 6C63 

r 

TOC 

NEKPCCE 

R0C78 

V1ST02S  FCP  2 rri»FCN8\T  VECTOR. 

USEE  BY 

RR  . 

CC79 

REF 

5 

LAST 

1388 

10 , ’63  6 

0 3645 

0 

2V1STC2S 

TC 

1 TC2SLB 

0080 

15  c r 

864 

LAST 

1388 

10, 3637 

5 2 167 

1 

DXCH 

MFA-C  +3 

CC81 

RFF 

865 

LATJ 

1388 

U.  ,3640 

52  155 

1 

CXC  F 

MPAC 

0082 

RFF 

6 

LAST 

1388 

10,3641 

C 36  45 

c 

TC 

1 TC2SUB 

0083 

REF 

263 

LAST 

1384 

1 ),  3642 

54  O'M 

1 

TS 

L 

0084 

RFF 

866 

LAST 

1386 

1 J , 3 6 4 3 

3 0157 

1 

CA 

A*FAC  +3 

0085 

PPF 

3 

LAST 

1387 

1 ),  3644 

1 6060 

c 

TCF 

SLCA02 

R0086 

SLBROUT  T NF 

TC  rr  DCU8LING  ANC  1 

*S  TC  2 ' 

S CONVERS  ION; 

0087 

RFF 

867 

LAST 

1388 

10, 3645 

52  155 

1 

nC2  SL8 

CXCH 

PFAC 

FINAL  PFAC  +1  UNSPECIFIED. 

0088 

1 ',  3 646 

20  00  ! 

1 

DOnUBL 

CC89 

RFF 

469 

LAST 

138^ 

10,3647 

K COO 

0 

res 

A 

0090 

RFF 

149 

LAST 

1388 

1 >,  3650 

6 4753 

1 

AD 

CNF 

0091 

in  , 3651 

1 3653 

0 

TCF 

+ 2 

0092 

10,365? 

4 COO.) 

0 

CCP 

THIS  RAS  REVERSE  CF  MSI. 

0093 

RFF 

868 

LAST 

1388 

1>?,  36  53 

54  1 54 

G 

TS 

PIPAC 

ANC  SKIP  CA  CVEPFLCR. 

0094 

RFF 

369 

LAST 

1386 

1'  , 3654 

C 0002 

0 

TC 

Q 

00  9 5 

RFF 

470 

LAST 

1388 

10,3655 

5C  OCO 

1 

INDEX 

A 

CVERFLCW  UNCORRECT  ANC  IN 

MSU. 

0096 

REF 

5 

LAST 

1094 

1 1, 3656 

3 4734 

0 

CAF 

LIMITS 

0C97 

R>^F 

869 

LA  ST 

1388 

1C, 3657 

26  154 

0 

ACS 

PFAC 

0098 

RFF 

390 

LAST 

1388 

I-',  3 66  7 

0 one 2 

0 

TC 

0 

R0114 

THE  FCLI.FWING  RCUTINE  INCOEMENTS  IN  2S 

CCMPLEPENT  THE  REGISTER  KHCSE  ADDRESS  IS  IN  6LF  BY 

THE  IS  CCPFL. 

P0116 

QUANTITY 

POUND 

IN  TFN2.  this 

PAY  PE  1 

LSEC 

TO  INCREPENT  CESIREC  IPL 

ANC  CFTICS  ecu  ANGLES  OP  ANY  OTHER  2S  CCPFL. 

R0118 

(+3 

LNECUai  TC 

-0  1 

CUANT  TTY  . 

pay  8F  CALLEC  by  BANKCALL /SViCALL. 

0119 

RFF 

4 1 

LAST 

12  5 7 

l',3661 

54  142 

1 

CCUIPC 

TS 

TEP2 

IS  COPPl.QLANI.  ARRIVES  IN 

ACC.  STCFE  IT 

0120 

RFF 

168 

L AST 

12=^7 

1 <,  3662 

50  13C 

C 

INDE  X 

BLF 

0121 

I'l  ,3663 

10  OOO 

0 

CCS 

0 

CHANGE  2S  CCPFL.  ANGLEdN 

ELFIINTC  IS 

0 122 

REF 

150 

LAST 

1388 

I 7 ,3664 

6 4753 

1 

AC 

CNF 

0123 

1 ' ,3665 

1 3 6 7 1 

c 

TCF 

+ 4 

0124 

REF 

151 

LAST 

1388 

1"  ,3666 

6 4753 

1 

AC 

ONF 

GAP:  ASSEMBLE  PEVTSICN  116  AC-C  PRCGRAP  LUPINAPY  BY  NASA  202  1 1 12-Cll 

L RTB  TP  CnPP$ 


1125 

REF 

152 

LAST 

1388 

10,3667 

6 A753 

1 

AD 

ONE 

C126 

10,367C 

A 0000 

0 

CCF 

N127 

R'F 

32 

LAST 

1388 

12, 3671 

6 01  A2 

0 

AD 

TFP2 

0129 

RFF 

A71 

LAST 

1388 

10,3672 

10  Oo.o 

0 

CCS 

A 

0130 

REF 

1 E3 

LAST 

1389 

10,3673 

6 A753 

1 

AC 

ONE 

0131 

10, ?67A 

1 3676 

1 

TCF 

+ 2 

C132 

10,3675 

A ooon 

0 

COP 

0133 

REF 

■3  3 

LAST 

1389 

1 C ,3676 

5 A 1 A 2 

1 

IS 

TEM2 

0)  3A 

10,3677 

1 3 7f,  3 

1 

7CF 

+ A 

C135 

R.FF 

A72 

LAST 

1389 

10,3700 

50  OOO 

1 

INDEX 

A 

0137 

RFF 

6 

LAST 

1388 

10,3701 

3 A73A 

c 

CAF 

UNITS 

0138 

RFF 

3A 

LAST 

1389 

10, 3702 

6 01A2 

0 

AD 

TEP2 

PI  39 

REF 

169 

LAST 

138  f 

If ,3703 

50  130 

0 

INDEX 

8UF 

OlAi' 

lo, 370A 

5 A a CO 

0 

79 

C 

'lAl 

REF 

391 

LAST 

1388 

10  ,3705 

T 000  2 

0 

TC 

0 

IStCP  ALG.  11,1969  SKIFFEF  .097  FACE  1389 
USER'S  PAGE  NO.  3 EE  SA 

CVERFICP  HERE  IF  2S  CCNFl.  IS  180  EEC. 

SUIT  YCVES  FRCW  2M:  TC  3D  CUAC.IOR  EACK  ) 
BACK  TC  2S  CCFFL. 

STCFF  lAEIT  QUANTITY  l,lTh  PRESENT  SIGN 
S IGM  . 

FIX  IT,EY  AECING  IM  37777  OR  AOOOC 
STCRE  NEW  ANGLE  IN  2S  CCPFLEMENT. 
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I RTE  CP  GOCES  LSEF'S  PAGE  NC.  A E5  SA 

P01A2  RTR  TC  TGFCUE  GYROS,  EXCEPT  FCR  TPE  CALL  TC  IMUSTALL.  ECACP  CF  CCMMANCS  ARRIVES  IN  XI. 


OlAA 

PER 

61 

LAST 

1211 

10,3706 

5C  120 

1 

PLLSEIML  lATEX 

01A9 

R'-F 

69 

LAST 

1261 

1 1, 3707 

3 C0A6 

0 

CA 

01A6 

Rcr 

3 1 1 

LAST 

1 2EC 

10,37lC 

0 A616 

1 

TC 

01A7 

PFF 

7 

LAST 

960 

10, 37  1 1 

17315 

C 

CADR 

01A8 

REF 

63 

LAST 

1387 

10,3712 

1 606A 

I 

TC  F 

FIXLCC  ACCRESS  CF  GYPC  COMMANCS  SHOLLC  BE  IN  XI 

X I 

pankcall 

T MPLL  SE 
DANZ  IG 


gap: 


PC  192 
09193 

RO  195 

R0196 
R0197 
RC  19P 

R0199 
R02OO 
RC2P  1 

R9  202 

020A 
3205 
92  96 
Q2C7 
0 20  8 
0209 
0219 
0211 
0212 
0213 

R0214 

R"?16 

R0218 

R0220 

0222 

02221 

02222 

02223 

0222  4 
02225 

0223 

0224 

0225 

0226 

0227 

0228 

0229 

0230 

0231 
02  32 

0233 

0234 

0235 
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RTE  CF  ceres  LSrp'S  page  no.  5 E5  S4 

THE  SU8RCLTINE  STGKRFAC  SETS  C(PPAC,  PFAC  ^l)  TO  S I GN  ( M P A C 1 . 

FOR  This,  ONLY  Th":  CONTENTS  OF  PPAC  ARE  EYAPlhEC.  AISC  +0  YIELES  FCSRAX  ANC  -0  YIELCS  AEGMAX. 

FNTR',  RAY  BE  EY  EITHER  OF  THE  FCLLCW1NC-: 

1.  LIMIT  THF  size  CF  NFAC  CN  lATERFPETTVE  CVERFLCh: 

entry:  BOVR 

SIGNRFAC 

2.  GENERATE  IN  PPAf  THE  SIGNL«  FLNCTICN  CF  NFAC: 

ENTRY:  RTE 

SIGNRFAC 


IN  EIThFR  CASE,  RETURN  IS  TO  THE  NEXT  INTERPRETIVE  INSTRLCTICN  IN  THE  CALLING  SECUENCE. 


10,3713 

P 0006 

1 

S IGNMFAC 

EXTENC 

REF 

2 

LAST 

443 

ir,97H 

3 4 733 

1 

CCA 

RFF 

870 

LAST 

1388 

10,3715 

52  155 

1 

DXCH 

REF 

473 

LAST 

1389 

in  ,3716 

10  TOO 

0 

CCS 

REF 

271 

LAST 

1387 

10,3717 

iL  ^ 7 C C 

1 

DPMOCE 

CAP 

RFF 

4 

LAST 

1388 

10, 3720 

1 6062 

1 

TFF 

10,3721 

1 3722 

1 

TCF 

10,3722 

c core 

1 

EXTEND 

REF 

3 

LAST 

1391 

lo ,3723 

4 4733 

0 

CCS 

RFF 

c 

LAST 

1391 

10,3724 

1 60  60 

c 

TCF 

CFCSNAX 

MFAC 

A 

ZERO  SETS  NFAC  +2  TO  ZERO  IN  ThE  PROCESS 

SLCAD2  +2 
+ 1 

OPOSNAX 

SLCAC2 


RTE  rp  COCE  NCRNUNll  IS  LIKE  INTERPRETIVE  INSTRUCTICN  LNIT,  EXCEPT  THAT  IT  CAN  EE  CEFENCEC  CN  NCT  Tc  ELCW 
L°  UHEN  THE  VFCTCR  BEING  UMTIZEC  IS  VERY  SMALL  — IT  KILL  BLEW  UP  KHEN  ALL  CCMPCNENTS  ARE  ZERC.  IF  NCPMMT 
IS  USFC  ANT  THF  UPPER  OEDFR  HALVES  GF  ALL  CCFFCNENTS  ARE  ZFRC,  THE  NAGMTUEE  FETURNEC  IN  36D  WILL  EE  TOC  LARGE 
BY  A factor  CF  2(13)  ANF  ThF  SQUAREC  MAGNITUCE  RETURNEE  AT  34D  KILL  BE  TGC  BIG  BY  A FACTOR  CF  2(26). 


REF 

154 

LAST 

1389 

10,3725 

3 

4753 

1 

NCPMUNXl 

CAF 

REF 

1 1 

L AST 

90  5 

10 ,3726 

1 

3 730 

1 

TCF 

Rff 

2 72 

LAST 

1391 

1"  ,3727 

3 

4755 

1 

NCRMUMT 

CAF 

RFF 

62 

LASf 

1390 

m ,3730 

6 

C 120 

1 

AC 

EPF 

871 

LAST 

139  1 

1-1,373  1 

54 

156 

1 

TS 

RFF 

312 

LAST 

1390 

III  ,373? 

0 

4616 

1 

TC 

RFF 

•3 

LAST 

106? 

10 , 3733 

OlOlC 

1 

CACP 

RFF 

872 

L AST 

139  1 

10,3734 

n 

154 

0 

CCS 

RFF 

1 

10,3735 

1 

3771 

1 

TCF 

FFF 

LAST 

1391 

1;' , 3736 

1 

3740 

0 

TCF 

2 

10 , 3737 

1 

3771 

1 

TCF 

RFF 

873 

LAST 

1391 

10  ,3740 

10 

157 

0 

CCS 

REF 

3 

L AST 

n9  1 

1'1,374  1 

1 

3 7 7 1 

1 

TCF 

in  ,3742 

1 

3 744 

1 

TCF 

pff 

4 

1 AST 

139  1 

in,  3 743 

1 

377  1 

1 

TCF 

RFF 

8 74 

LAST 

1391 

1 1, 3744 

10 

161 

0 

CCS 

RFF 

c 

LAST 

1391 

1 0,3745 

1 

3771 

1 

TCF 

1’),  3746 

1 

3750 

1 

TCF 

REF 

6 

LAST 

I 391 

10 ,3747 

1 

377  1 

1 

TCF 

ONE 

NCRMLMT  +1 
ZEPn 
F IXLCC 
MPAC  +2 

BANKCALL  GFT  SIGN  AGREEMENT  IN  ALL  CCMPCNENTS 

VECAGREE 

MPAC 

NCSHIFT 

+ 2 

NOSHIFT 
MEAC  +3 
NCSHI FT 
+ 2 

NCSHIFT 
MFAC  <-5 
NCSHIFT 
+ 2 

NOSHIFT 


G/IP: 
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L 

0236 

C237 

RTB 

PFF 

CP  COOES 
87'=  1 AST 

139  1 

10,3750 
10 ,375  1 

3 

0 

CIEE 

1306 

C 

1 

CA 

EXTENC 

MPAC 

+ 1 

0278 

PEF 

79 

LAST 

136C 

1 ,3752 

7 

A736 

C 

NF 

8 IT14 

0239 

REF 

876 

LAST 

1392 

10,3753 

20  1 EE 

1 

DAS 

MPAC 

02AC 

PFF 

877 

1 AST 

1392 

10 ,375A 

3 

0160 

0 

CA 

MPAC 

+ 4 

0 2A1 

10,3755 

C 

CC06 

1 

EXTEND 

0261  1 

rff 

80 

LAST 

1392 

10,3756 

7 

A736 

0 

MP 

B1  TIA 

02A12 

RFF 

E78 

LA-:? 

1392 

10,3757 

2C  160 

1 

CAS 

MPAC 

+ 3 

02613 

RFF 

879 

LAST 

139? 

10, 376C 

3 

C 162 

1 

CA 

MPAC 

+ 6 

C2A1  A 

1"  ,3761 

0 

00.16 

1 

EXTEND 

02A1  E 

RFF 

8 1 

LAST 

1392 

10,3762 

7 

A 736 

c 

NP 

RIT)  A 

02A1  6 

PEF 

880 

LAST 

1392 

1 ', 3763 

20  162 

0 

CAS 

MPAC 

+ 5 

C2A1  7 

RFF 

2 

LAST 

1062 

10,3764 

3 

A761 

0 

CAP 

THIRTEEN 

02A1  e 

RFF 

881 

LAST 

1392 

10,3765 

5C 

: 156 

c 

INDFX 

MPAC 

+ 2 

02A19 

I'',  3766 

5A  0A5 

1 

TS 

3 70 

n?A2 

PFF 

62 

LAST 

1379 

10,3767 

A635 

0 

CFPTUMT  TC 

PCSTJUMP 

02A3 

RFF 

3 

LAST 

1005 

10, 377P 

C102A 

c 

CADR 

UNIT 

+1 

02A31 

R'-P  273  LAST  1391 

10  ,3771 

3 A755  1 NCSHIFT 

CAP 

ZERO 

02A32 

ref  1 

10,3772 

1 3765  1 

TCP 

CFPTUMT 

R030O  PTR  VECSGNAO,  ... FORCES  SIGN  AGREEMENT  OF  VECTOR  IN  MPAC. 


0 30  1 

REF  313 

LAST 

1391 

10,3773 

0 A616 

1 

VFGSGNAG  TC 

bankcall 

03T2 

REF  A 

LAST 

1 39  1 

10, 377A 

OIC  10 

1 

r ACR 

VFCAGPEE 

0 30  3 

REF  6A 

LAST 

1390 

10,3775 

0 616A 

0 

TC 

DANZIG 

***  FNC  OF  SKIPPER  .(IF? 
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CSFR'S  PAGE  NO.  6 EE  SA 

SHIFT  All  CCNPCNENTS  LEFT  12 

CAS  GAINS  A LITTLF  AGCLRACY 


SKIP  THE  "TG  VECAGREE"  COPE  AT  UNIT 


-2 
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L 

ROFOl 

0001? 

R0CC3 
ROOM  A 
ROOGA 

Rooce 

ROOOR 
ROO!  0 
RQf'  1 1 
pom? 
ROO  1 3 
ROAIA 
POO  IS 
ROO  I 6 
ROOl  fi 
R0C2O 
R0021 
R0023 
RCCZ^ 
RO'i26 
R0O28 

P0O3O 

P0031 

ACC32 

A00T3 

R003A 

A1035 

A0036 

AOC37 

A0038 

R0039 

ROCAC 

R'YOAl 

R00A2 

P00A3 

ROOAA 

ROOAS 

ROOAA 


YS-RLFT  PPCGRAPS  USER'S  PAGE  RC.  1 EO  SA 

PROGRAR  NAMES:  (II  76jrBCHK  MCE.  RG.  5 CCTCEER  2,  1967 

(2)  CCT6RU0T 

RrniFlCATlCR  sy:  ICWPLL  r Hl,Ll  (A.C.EIECTRCMCS  I 

TPFSF  PROGRAMS  FNABLF  TP-  LM  DAP  Tp  CGRTRLl  7PE  THRLST  TIMES  CP  TEE  RPACTUR  CCNTROL  SYSTEM  JETS  EY  USING  T1ME6. 
SIRCY  THE  LM  TAP  MAIRTAINS  EXCLUSIVE  CCNTROL  CVER  TIMF6  AND  ITS  INTERRUPTS,  THE  FniLCkIRG  CCRVERTICRS  PAVE  EEER 
ESTABLISHED  AND  a'LST  ROT  BE  T6PFEPEC  PITH: 

1.  NO  number  IS  EVER  PLACED  INTO  TIME6  EXCEPT  BY  LM  DAF. 

2.  NO  PPCGRAV  OTPER  TPAR  LM  TAP  ENAELES  TPE  TIME6  COUNTER, 

3.  TO  USE  TIME6,  the  FOLLOPING  SEGU!=RCP  IS  ALPAYS  EMFLCYEC: 

A.  A POSITIVE  (NON'-ZEROI  NUMBER  IS  STCPFD  IN  TIME6. 

B.  THE  TIMF6  CLOCK  IS  ENABLEC. 

0.  TIMF6  IS  INTERROGATED  AND  IS: 

I.  NEVER  FOIJNC  N'EGAT  IVE  (NCN'-ZERC  I OR  +C. 

II.  SOMETIMES  FOUND  PCS  1 T I V E ( E ETW EE N 1 ARC  2ACC)  INOICATING  THAT  IT  IS  ACTIVE. 

III.  SOMETIMES  FOUND  PQSMAX  INDICATING  THAT  IT  IS  INACTIVE  ANC  NOT  ENABLEC. 

IV.  SOMETIMES  FOUND  NEGATIVE  ZERO  INDICATING  THAT; 

A.  A T6RLPT  IS  ABOUT  TO  CCCUP  AT  THE  NEXT  CINC,  OR 

B.  A T6PUPT  IS  PAITING  IN  THE  PRIORITY  CHAIN,  DP 
0.  A T6RLPT  IS  IN  FPCCESS  NCPi. 

A)  ALL  PPCGRA.MS  PHICP  OPERATE  IN  EITHER  INTERRUPT  MODE  OF  PITp  INTERRUPT  INPIBITED  MUST  CALI  T6JCBCPK 
every  5 MTU  ISECONDS  TO  PRCCESS  A POSSIBLE  WAITING  T6RLPT  BEFORE  IT  CAN  PE  HCNCFED  EY  THE  PAPCPARE. 

(S.  PROGRAM  JTLST,  TN  C,R-AXES,  HANDLES  THE  INPUT  LIST.) 

T6JQPCPK  CALLING  SFOUENCF: 


L TC  T6J08CHK 

L +1  (RETLRNl 


DCT6RLPT  CALI  INC  SFCUENCF: 


DXCH  ARUPT  T6RLPT  LEAD  IN  AT  LOCATION  ACCA. 

EXTEND 

CCA  T6A0R 
CTCE 

SLFRGLTINES  CALLED:  DCT6RUPT  CALLS  TtjoeCHK, 

normal  EXIT  MODES:  T6JCBCHK  RETURNS  TC  L *1. 

DCT6RL0T  TBANSPFRS  CCNTROL  TC  RESUME. 

ALAPM/AECRT  mcCES:  NONE. 

INPUT:  TIME6  NXT6ACR  CLTFLT:  TIPE6  NXT6ADR  CHANNEL  E 

T6NEXT  TeNEXT  +1  TtNEXT  T6NEXT  +1  CHANNEL  6 

T6FURTHA  TAHUpYHA  +1  TftFUPTHA  T6FLRTHA  +1  BITI5/CH13 

DEPRTS:  T6J0RCHK  CLCBPFP'  A,  DCT6PUpt  CLCPBERS  NCTHING. 


ETA? 


nOA7 


BLOCK  0 


GAP: 


^SSFI'BLF  REVISION  116  CP  A GC  PRCGR^V  LUMNARY  BY  NASA  202  11  1?-071 


1.  76-RLPI  FROGRAYS 


C055 

1 7, 2C55 

BANK 

17 

00S6 

PFF 

1 

17, 2000 

SETLCC 

DAPS2 

CC57 

1 7,2055 

BANK 

onsfl 

RTF 

2 

LAST 

22C 

P6 , 1466 

EPAM<  = 

T6NEXT 

009  9 

REF 

1 

COUNT  4 

$$/0APT6 

006(1 

prp 

1 

17,2055 

10  031 

1 

T6 JCeCFK 

CCS 

T IYE6 

006  1 

RFF 

392 

1 AST 

1389 

17,2056 

0 0002 

0 

TC 

Q 

0C62 

REF 

2'. 

LAST 

1107 

17,2057 

0 5675 

0 

TC 

CCSHOLE 

0063 

OFF 

2 1 

LAST 

139A 

17, 2C60 

0 56  7 5 

C 

TC 

CCSHCLE 

R0064 

CCNTRCL 

FASSFS  TO  T6J08  ONLY 

WHEN  f(TIM 

E6)  = -Q  1 

1 I.e.  FHEN  A T6RLPT 

0069 

RFF 

Q 3 

1 AST 

112C 

17,2061 

3 4733 

1 

T6  JCP 

CA 

PCS YAX 

0070 

17, 2C62 

2 2 00  7 

r 

ZL 

CC71 

PSF 

1 

17,2063 

53 '47  1 

0 

CNGF 

T6EUPTHA 

0C72 

REF 

■a 

LAST 

139A 

17,2064 

53*467 

1 

CKCH 

T6NEXT 

0073 

RFF 

2 

LAST 

2 20 

17, 2065 

22*465 

1 

LXCH 

NXT6ADR 

0C7A 

RFF 

2 

LAST 

1394 

17,2066 

54  i31 

1 

TS 

TIME6 

0076 

PFF 

7 

LAST 

1359 

17, 2C67 

6 7730 

1 

AD 

FPI C37 

0076 

RFF 

A7A 

LAST 

1391 

17,2070 

54  000 

G 

7S 

A 

007  7 

OFF 

1 

17,2071 

1 2075 

0 

TCP 

ENABLET6 

0078 

REF 

3A 

1 AST 

1394 

17, 2072 

2 4 72  3 

1 

CA 

PC  SYAX 

0C79 

REF 

3 

LAST 

1394 

17,2073 

54  'J3  1 

1 

TS 

T IME6 

0080 

RFF 

1 

17,2074 

1 2115 

1 

TCP 

GfCH56 

0081 

17,2075 

0 0006 

1 

ENABLET6 

EXTEND 

0C812 

RFF 

3 

LAST 

985 

17,2076 

23*265 

1 

qxr  F 

C 130SAV 

008 12E 

REF 

6 2 

LAST 

1367 

17,2077 

22  C7C 

c 

LXCH 

PUPTPEGl 

00813 

REF 

8 

LAST 

985 

17,2100 

0 6022 

1 

TC 

C 13STAI L 

0081A 

17,21'’! 

C 0006 

1 

EXTEND 

00815 

REF 

A 

LAST 

1394 

17,2102 

23*265 

1 

GXCH 

C13GSAV 

006155 

RFF 

63 

LAST 

1394 

17,2103 

22  070 

0 

LXCF 

RLPTRFGl 

0081  6 

RFF 

A8 

1 A ST 

1366 

1 7, 2 104 

2 473  5 

1 

CAF 

RIT15 

0082 

17, 2 IE  5 

0 0006 

1 

EXTEND 

CC83 

RFF 

22 

LAST 

1326 

17,2106 

0 5 ni3 

0 

WCR 

CHAN  1 2 

008A 

REF 

A 

LAST 

1394 

17,21C7 

3 1466 

1 

CA 

T6NFXT 

0085 

REF 

8 

LAST 

1394 

17, 21  IT 

6 7730 

1 

AD 

PRI027 

0C86 

ogF 

A75 

LAST 

1394 

17,2111 

54  ono 

0 

TS 

A 

0087 

RFF 

2 

L AST 

1394 

17, 2112 

1 2115 

1 

TCF 

GCCH56 

CC88 

REF 

35 

L APT 

1 394 

17,2113 

3 4733 

1 

CA 

PCSMAX 

008P 

RFF 

e 

LAST 

1394 

17,2114 

55*466 

0 

TS 

T6NEXT 

0090 

ref 

26  A 

LAST 

1388 

17,2115 

50  no  1 

a 

GCCH56 

INDE  X 

L 

CC91 

REF 

1 

17,2116 

1 5743 

6 

TCF 

WRITER  -1 

0092 

5742 

BLCCK 

02 

0093 

REF 

1 

4T0O 

SETLCC 

EFTAG5 

009A 

5743 

BANK 

0095 

PEE 

15 

LAST 

90  7 

E6,  1635 

EBANK= 

CCCXC 

CC96 

OFF 

1 

COUNT  X 

1 1/DAPT6 

1S:0S  ALG.  11,1969  LYCAF 


.023 


PAGE  139A 


LSER'S  PAGE  NC.  2 EO  SA 


CHECK  TIYE6  FCR  WAITING  TtRCPT: 
NCNE:  CICCK  CCUTING  CCWN. 


YCST  BE  FPGCESSFC). 


GAP: 


ASSPNBLF  PEVTSION  116  CF  ACC  FPCGPAM  LUMINARY  RY  NASA  ?021U2-C(1 


L T6-RU3T  PROGRAMS 


0097 

CC9R 

FEF 

4 

LAST 

2 20 

5743 

5744 

3 1472 
U 000  6 

1 

1 

WR  IT  EP 

CA 

EXTEND 

NEXTP 

0099 

REF 

2 

LAST 

213 

5745 

0 1 CO  6 

C 

RPITE 

C F AN6 

Oior 

PPF 

393 

LAST 

1394 

5 746 

0 ccr2 

0 

TC 

Q 

0101 

REF 

1 

5747 

3 1473 

0 

CA 

NEXTU 

010? 

RFF 

265 

LAST 

1394 

5 7 5C 

54  CC  1 

1 

k>RI  TEL 

TS 

L 

0103 

REF 

1 

5751 

4 5764 

c 

rs 

0C314CFT 

0104 

5752 

0 00  16 

1 

EXT  F ND 

OlOE 

RFF 

Q 

LAST 

101  E 

5753 

C2  005 

c 

RAND 

CFANF 

0106 

REF 

266 

LAST 

1 395 

5754 

6 000  1 

0 

AD 

L 

0107 

5755 

C 000  6 

1 

EXTENC 

0108 

REF 

4 

LAST 

1395 

5 756 

01  00  5 

0 

NRITE 

CHANS 

01C9 

REF 

394 

LAST 

1395 

5757 

0 000  2 

0 

TC 

0 

Olio 

RFF 

1 

5760 

3 1474 

1 

CA 

NEXTV 

0111 

REF 

267 

LAST 

1395 

576  1 

54  COl 

1 

UR  ITEV 

TS 

L 

0 112 

RFF 

2 

LA  S7 

1395 

5762 

3 5764 

1 

CA 

003  14CCT 

0113 

5763 

1 5 7 5 2 

0 

TC  F 

-90 

0114 

5764 

o 

o 

1 

003140CT 

ncT 

0C314 

0115 

17,2117 

BANK 

1 7 

0116 

RFF 

2 

LAST 

1394 

17,2000 

SFTLCC 

(TAP  S2 

0117 

17,2117 

BANK 

0118 

REF 

6 

LAST 

1394 

F6,  1466 

EBANK= 

T6NEX'' 

0119 

ref 

2 

LAST  1304  TC 

1394: 

34 

34^ 

COUNT* 

$J /DAPT6 

012'' 

RFF 

1 1 

LAST 

1329 

17,2117 

22  016 

0 

DCT6PLPT 

LXCF 

BANKRUPT 

0121 

17,2120 

C C006 

1 

FXTFND 

0122 

REF 

10 

LAST 

1329 

17,2121 

22  012 

1 

CXFF 

ORUPT 

0123 

RFF 

1 

17,2122 

C 2C5  5 

c 

TC 

T6 JCeCHK 

0124 

RFF 

25 

LAST 

1329 

17,2123 

1 5270 

0 

TCP 

RESUMF 

FAC-t  13S 


1S:09  ALC-.  11  .1969  LMCAF 
CSFR'S  PAGE  NO. 
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3 E?  S9 


(INTERRUPT  LEAC  INS  COMINLEO) 


CALL  T6JCECFK. 


FNP  TIVE6  INTERRCFT  PRCCESSCR 


gap:  ASSPPBLE  revision  116  fF  AGC  PPOGRAP  LUMINARY  BY  NASA  2021112-C71 


19:09  AUG.  11  ,1969  LYDAF 


023  FACE  1396 


L CAP  INTERFACE  SLBPrUTTNES 


USFF'9  PAGE  NC.  1 EC  S4 


0001 

OCPR 

REF 

3 

LAST 

43 

20, 2115 

20,2  iTO 

BANK 

SETLCC 

20 

DAPS3 

0003 

20,2115 

bank 

0004 

REF 

16 

LAST 

1394 

F6. 1635 

EBANK= 

CDUxn 

0005 

RFF 

1 

CCUNTt' 

*j/rAPiF 

R0006  MOC  0 DATE  li/lE/66  BY  GFCRGE  k.  CHERRY 

R0CC7  «CC  1 1/23/67  MOCIFICATICN  BY  PETER  ACLER 

ROOOe  FUNCTIONAL  DESCPIPTICN 

R00O9  FERFIN  APE  A CCLLPrTlON  OF  SUEROLTINES  V.HICH  ALLCF  MSSICN  CCMRCl  FFCGFANS  TC  CCNTRCL  TFE  MOCE 

ROOll  AND  INTERFACE  WITH  TFE  CAP. 

R0012  CALLING  SEQUENCES 

R0013  IN  interrupt  cr  wit|-  INTERRUPT  INFIBITFC 
R0014  TC  lENKCAlt 

R0015  FCACR  RCUTINE 

R0016  IN  A JCE  WITFCUT  INTERRUPT  INFIPITEC 

R0017  INHIMT 

P0018  TC  IBNKCALL 

ROCIF  FCADR  RCUTINE 

P0020  PELINT 

R0n21  OUTPUT 

R0022  SEE  INDIVIDUAL  PCUTINES  B=LCW 

R0023  CEPRIS 


R002A 


A,L,  ANC  SCNETIPRS  NCUETEMF 


CDE 


NCT  IN  PULSES  NCCP 


GAP:  ASSPf'RLP  PFVISTON  116  CF  ACC  FPCGRAM  LUMINARY  8Y  NASA  20211  12-Ca 


19  :0<;  AUG.  11  ,1969  LPCAF 


.023 


FACE  1397 


L DAP  IMEPPACE  SU6PCLTINFS  USER'S  PAGE  NO.  2 F?  SA 


R0087  SLEPnUTlNE  NAMES: 

pncee  SETWAXCB,  SETMlNCe,  FESTCFCE,  FFLIYECE 

83089  MOriFlEC:  3.1  JANUARY  1968  BY  P S VETSSMAN  TC  CREATE  RESTCPCB. 

R0090  NCriFIEC:  1 MARCH  1968  PY  P S WEISSMAN  TO  SAVE  EPANK  AND  CREATE  PFLITEDB 

R0091  clJ^CTI''NAl  OESCPIPTICN: 


R009? 

SFTMAXDB 

- SET  deadband  TO 

5.0 

DEGREES 

RCC93 

SETMT  NCP 

- SET  CFACPANC  TC 

”1.3 

r EGR  E E 

R009A. 

RESTORDB 

- SET  DEADBAND  TO 

. 3 , 

1 , CR  5 ACCCPDING  TC  PITS 

6 AND 

5 CF  DAFPCCLS 

R0096 

PFI.ITECe 

- SFT  CEArpiNC  TO 

1 .0 

DEGREE  AND  ZERO 

THE  CCMMANDED 

ATTITUDE  change  AND  CCMMANOEC  FATE 

R0098 

ALL  1 

ENTRIES  SET  LP 

A NCVAC 

jce 

TC  DC  1/ACfS  SC 

THAT  THE 

TJETLAW  SWITCH  CURVES  ARE  POSITICNEC  TC 

ROlOO 

REFL 

FCT 

THE  NEW  PEACBANO.  I 

T SHCLLD 

PE 

NOTED  TEAT  THE 

CEACEANC 

FEFEPS 

TC  THE  ATTITUDE  IN  THE  F-,L-,ANC  V-AXES. 

PC1''2 

SLPRC  L 3 

INE  CALLFC  : 

NCVAC 

Po  1C3 

CALL  INC 

SEQUENCE  : 

SAME  AS  ABCVE 

A1104 

OR 

TC 

RESTCROB 

+ 1 

FRCM  ALLCCAST 

R01C5 

DEBRIS  : 

A,  L 

, c , 

RUFTRFGl , 

( ITEMFS 

IN 

NCVAC ) 

0136 

REF 

31 

LAST 

9C3 

23.2115 

3C  111 

(. 

RCSTCPPP 

CAE 

OAPBCCLS 

CETERMNE  CREW-SELFCTEC  DEAEBANC. 

11061 

REF 

1 

20, 2116 

7 6767 

0 

MASK 

0PSLECT2 

CHECK  FCR  MAX  CP  (5  DEG) 

01062 

20,2117 

0 0006 

1 

EXTEND 

01063 

2'',  2 12'’ 

1 2 122 

c 

BZF 

+ 2 

0106A 

REF 

! 

20 ,2121 

1 213U 

0 

TC  F 

SFTMAXDB 

RIT5  DAFPCCLS  IS  SET  - CREW  WANTS  5 

CEC 

0106E 

REF 

32 

LAST 

1397 

20,2122 

30  111 

0 

CAE 

CAFBCCLS 

1107 

REF 

1 

20,2123 

7 6750 

c 

MASK 

DESELECT 

CHECK  FCF  1 PEG  CEACPANC  SELECTION 

Q1C8 

2-1,2l24 

0 3006 

1 

EXTEND 

0109 

rff 

6 

LAST 

867 

20,2125 

1 2161 

0 

BZF 

SETMINCB 

01091 

RFF 

1 

23,2126 

3 2153 

I 

CAF 

POWFRDB 

BIT6  GAFBCCLS  IS  SET  - CREW  WANTS  1 

CEG 

01092 

RFF 

2 

LAST 

139  7 

20,2127 

1 2131 

1 

TCF 

S ETMAXCP 

+ 1 

0110 

RPF 

1 

2'3,2130 

3 2 152 

0 

SFTMA  xce 

CAF 

WICECE 

SFT  DEGREE  CEACEANC. 

0111 

REF 

6 

LAST 

825 

23,2131 

55*363 

0 

+ 1 

TS 

DR 

3112 

23,2132 

0 CCG6 

1 

EXTEND 

SET  UF  JCB  TC  Rc-PPSITICN  SWITCH  CURVES. 

3113 

RFF 

66 

LAST 

1396 

20,2133 

22  070 

0 

QXCH 

RLPTPEG 1 

0116 

REF 

6 

LAST 

736 

21,2136 

3 7 720 

c 

CALLACCS 

CAF 

PR  IC27 

0119 

RFF 

31 

LAST 

136  1 

21,2135 

C 5072 

1 

TC 

NCVAC 

0116 

RFF 

9 

LAST 

732 

E6, 1537 

EBANK= 

AOSQ 

0117 

REF 

2 

LAST 

193 

20,2136 

03666 

1 

ZCACR 

1/ACCJCe 

0117 

20,2137 

62  106 

0 

0118 

REF 

65 

LAST 

1397 

21  ,2160 

0 C070 

<) 

TC 

PLPTREGl 

RETURN  TC  CALLER. 

0119 

REF 

1 

20,2161 

3 2151 

c 

S F T M I N C E 

CAF 

NAPRCWCe 

SET  0.3  CEGRFE  CEACPANC. 

0120 

REF 

3 

LAST 

1397 

7'1,  2162 

1 2131 

1 

TCF 

SETMA  XD0 

+ 1 

G4P: 


/5SSEN8LE  PFVISION  116  TF  AGC  PRCGRA^  LU-MliNARV  6>  NASA  2021112-C71 
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L OAP  IMFRFACF  SUPPCUTINFF  USER'S  PAGE  NO.  3 E6  S4 


0121 

0122 

REF 

66 

L AST 

1397 

20,2143 
2 ',2144 

C CCC6 
22  070 

1 

0 

PFLI TEOE 

EXTEFC 

GXCH 

R UPTREG  1 

THE 

RETURN  FRCM  CAUUACCS 

IS 

TO  RUPTREC-  1 . 

0123 

RFF 

9 

EAST 

84  7 

20,21^5 

0 2154 

0 

TC 

ZATTERCR 

ZERO 

I THE  ERRORS  AND  COHRANCEC  RATES. 

0124 

REF 

2 

LAST 

1397 

20, 2 146 

3 El‘^3 

1 

CAF 

PCRERCB 

SET 

CF  TC  1.0  CEG. 

0125 

REF 

5 

CAST 

1397 

20 ,2147 

55  >343 

0 

TS 

DB 

0126 

RFF 

1 

20,2150 

1 2134 

1 

TCF 

CAUACCS 

SET 

UP  1/ACCS  ANC  RETURN 

TO 

CALLER . 

01261 

20 , 2 1 5 1 

,00155 

0 

NARROHDE 

OCTAL 

00155 

0.  3 

DEGREE  SCALED  AT  45. 

01262 

20  ,2  152 

03434 

1 

InICFCE 

CCTAU 

>1  3434 

5.C 

DEGREES  SCALED  AT  45. 

0127 

21,2153 

00  5 54 

c 

PCRERCe 

CEC 

.02222 

1.0 

DEGREE  SCALED  AT  45. 

0128 

RFF 

8 

LAST  896 

2 1,2154 

3 5115 

0 

ZATTEROR  CAF 

FBANK6 

0 129 

pep 

83 

LAST  1384 

20,2155 

56  C03 

1 

XCH 

FEANK 

:i  1 3ft 

REF 

268 

LAST  1395 

20,2156 

54  00  1 

1 

TS 

L SAVF  CALLERS  EEANK  IN  L. 

ni3i 

RTF 

21 

LAST  1303 

2 0 , 1 5 7 

30  032 

I) 

CAF 

CDUX 

0 132 

RFF 

17 

LAST  1396 

20,2  I6C 

55' 635 

1 

IS 

ceuxe 

0133 

OFF 

I'l 

LAST  1299 

20,2161 

30  GSE 

1 

CAD 

CDUY 

0134 

REF 

4 

LAST  904 

20,2162 

55' 636 

1 

TS 

CCUYD 

3135 

RFF 

13 

LAST  1299 

2-',  2 16R 

30  C34 

0 

CAE 

CCL  Z 

0 136 

REF 

4 

LAST  904 

2,1  ,2  164 

55  ' 637 

0 

TS 

CCUZO 

0137 

RFF 

9 

LAST  C17 

20,2165 

1 2 17  1 

0 

TCF 

STCPRATE  +3 

0138 

0139 
3141 

RFF 

REF 

PEF 

9 

84 

269 

LAST 

LAST 

LAST 

1398 

1398 

1398 

20,2166 

21,2167 

20,2170 

3 5 1 5 
56  0>33 
54  CCl 

C 

I 

1 

STOPRATE 

CAF 

XCH 

TS 

EBANK6 

EEANK 

L 

SAVE  CALLFPS  EEANK  IN  L. 

0141 

RFF 

274 

LAST 

1392 

2f  , 2 1 7 1 

3 4755 

1 

+ 3 

CAF 

ZERO 

0142 

RFF 

1 1 

LA9T 

911 

20,2172 

55 ' 643 

0 

TS 

CREGAFC 

0 143 

REF 

6 

LAST 

9 1C 

20,2173 

5 5 ' 6 4 4 

1 

TS 

CHEGACC 

0144 

REF 

6 

LAST 

910 

20  ,2174 

55 '645 

0 

TS 

OMEGARD 

0145 

IFF 

c 

LAST 

9 1 1 

2>1,217F 

55 '64C 

0 

TS 

CE  LCCLX 

0146 

RFF 

2 

LAST 

137 

23, 2176 

55 ' 64  1 

1 

TS 

OELCDLY 

0147 

RFF 

. 2 

LAST 

137 

20,2177 

55'642 

1 

TS 

DFLCDUZ 

0148 

REF 

4 

1 A ST 

91  1 

2C ,2200 

5 5 ' 2 7 4 

0 

TF 

OELPERCR 

0141 

REF 

2 

LAST 

370 

20, 2201 

55 '275 

1 

TS 

OELQEROR 

0150 

Rff 

2 

LAST 

37C 

21,22  12 

55' 276 

1 

TS 

CELRERCR 

0151 

RFF 

85 

LAST 

1398 

20,2203 

22  C03 

1 

L XCH 

EEANK 

RESTCRE  CALLERS  EEANK. 

0152 

PDF 

395 

LAST 

1395 

20  ,22  14 

0 0 00  2 

0 

TC 

Q 

R0153  SUBRnUTlNc  NAME:  ALLCCASl 


P015A  UILL  EE  CALLEC  BY  FRESH  STARTS  ANC  ENGINE  OFF  ROUTINES. 

R0156  CALIING  '''QUENCE  : (SAVE  AS  AECVE) 

R0167  FXIT:  RftuRM  TC  G. 

R015E  SUGRCUTINFS  CAUIEE:  STCFRATp,  RESTCRCE,  NCVAC 

R0159  ZERO:  (FOR  Al  U AXES)  ACS,  AUPHA,  ACSTERN,  CNEGAC,  CELCCU,  CFUFRCR 
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R016C 

GUI  PUT  : 

DPIFTBIT/CAFerriS, 

EE,  JCB  • 

TC  EC  1/ACCS 

R0161 

CEPR  is: 

A,  L, 

0,  1 

RUPTRFG 1 . 

RLPTREG2 

, (ITERPS  lA 

NGVAC  ) 

0162 

20, 22'5 

’)  0006 

1 ALLCGASl 

EXTEND 

SAVE  C FCR  RETUPN 

0 163 

REF 

23 

LAST 

1320 

20,2206 

22  C71 

1 

CXCF 

RUPTRFG2 

0164 

REF 

10 

LAST 

1396 

20, 2207 

0 2 166 

1 

TC 

S TPPR  ATE 

ClEAR  RATE  INTERFACE.  RETURN  V,  IT  F A = C 

0166 

R = F 

86 

LAST 

1398 

20  ,2210 

22  003 

1 

LXCF 

EBANK 

AND  L=EPANK6,  SAVE  CALLERS  EEANK. 

0166 

R9F 

n 

LAS"'' 

1397 

20,2211 

c K , c Q 

C 

T S 

ACSG 

0167 

RFP 

11 

LAST 

1399 

20, 2212 

5 6 ' 6 4 C 

c 

TS 

ACSQ  +1 

0168 

REF 

2 

LAST 

73  2 

21,2213 

55' 541 

1 

TS 

ACSR 

0169 

REF 

3 

LAST 

1399 

20, 2214 

55'  542 

1 

TS 

ACSR  +1 

0170 

REF 

2 

LAST 

1 96 

20,2216 

55 ' 424 

0 

TS 

ALPHAC 

FCR  DCFMI  ST. 

0171 

RFF 

1 

2^'  ,2216 

55'425 

1 

TS 

ALFHAP 

0172 

REF 

2 

LAST 

134 

20, 2217 

C C 1 c 

0 

TS 

ACSGTFRR 

0173 

REF 

1 

20  ,2220 

55 ' 546 

0 

TS 

aosrtfrn 

0174 

REF 

87 

LAST 

1399 

20,2221 

22  00  3 

1 

IXCF 

EFANK 

RESTORE  EFANK  (EEAMK6  NO  LCNGER  NEECEC) 

0175 

PFF 

33 

LAST 

1397 

2 i,  2222 

4 1 1 1 

1 

CS 

DAPBCCLS 

SET  UF  CFIFTEIT 

0176 

RFF 

2 

LA'T 

73  2 

20  ,2223 

7 4744 

0 

NAS  K 

DR  IFTBIT 

0177 

RFF 

34 

LAST 

1399 

20,2224 

26  111 

1 

ADS 

DAPPCCLS 

0178 

PFF 

8 

LAST 

847 

20,2225 

0 2116 

0 

TC 

RESTORPP  +1 

RESTORE  CEAD8ANK  TC  C R EVv-S  EL  ECT  E C VALUE. 

0179 

RFF 

24 

LAST 

1399 

20,2226 

0 0071 

1 

TC 

PUFTREG2 

RETURN  . 
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Rooni  THE  PAPICLEP  PROGRAM  IS  STARTED  RY  FRESH  START  ARC  RESTART.  THF  CAPICLEP  PRCGRAM  IS  CCNE  1C  TIMES 


R0003 

PER 

SECOND  UNTIL  THE 

ASTRONAUT  DESIR 

c c 

THE 

DAP  TC  ViAKE 

LP,  ANC  THF  IMU 

ANC  COLS  ARE  READY  FOR  USE  EY  THE  CAP. 

R0005 

THE 

necessary 

IMT  lAL  I ZAT  lOF 

CF  THE 

CAP 

IS 

CONE 

EY  THE 

CAPIDLER  PRCGRAM 

. 

00P6 

16 , 2C9R 

RANK 

16 

0007 

REF 

1 

16, 2000 

SETLCC 

DAPS  1 

COOR 

16,20^'C 

BANK 

0009 

REF 

12 

LAST 

1399 

E6,  1537 

EBA  M<  = 

A.  CSC 

0010 

REF 

1 

COUNT* 

$$/DAR ID 

0011 

16,2C0C 

0 0006 

1 

CHFKE ITS 

EXTFFC 

J 11  2 

REF 

8 

LAST 

90  4 

16, 2001 

no  031 

0 

READ 

CHAN31 

IF  eCTH  EIT13  ANC  E IT  1 4 ARE  CNF,  THEN 

0013 

16,2002 

4 con  1 

0 

COM 

THE  mode  select  SKITCH  IS  IN  THE  CFF 

0014 

REF 

6 

LA  ST 

499 

16,2003 

7 4 3 5 5 

1 

MASK 

PIT13-14 

FCSITICN,  AND  SC  THE  CAP  SHCULC  BE  CFF 

0019 

16, 2004 

0 0006 

1 

EXTEND 

kITH  NC  ATTITUDE  ERROR  DISPLAY. 

rr  lb 

REF 

1 

16,2005 

1 2157 

1 

BZF 

"CRETCLE 

0017 

RPF 

48 

LAST 

1307 

16, 2C06 

4 1300 

1 

CS 

I MCDE  S33 

0018 

RPP 

62 

LAST 

1381 

16,20  17 

7 4746 

1 

MASK 

BIT6 

0019 

REF 

476 

LAST 

1394 

16,2010 

10  ono 

n 

CCS 

A 

002f; 

REF 

1 

16, 201  1 

1 2 206 

c 

TCF 

JLMPDSP 

CG21 

RFF 

4 

LAST 

220 

16,2012 

4 1262 

1 

CS 

RCSFLAGS 

IMU  NOT  LSABLE.  SET  LF  I N IT  I A L 1 Z A T I C N 

0022 

RFF 

39 

LAST 

1386 

16,29i3 

7 4751 

1 

MASK 

B IT3 

FLAG  FCR  ATT  ERROR  DISPLAY  ROUTINE. 

0023 

REF 

5 

LAST 

1400 

16,2014 

27  ' 262 

1 

ADS 

PCSFLAGS 

00  2 4 

REF 

1 

16,2015 

1 2163 

0 

TCF 

SHUTCCWN 

00  2 9 

RFF 

9U 

LAST 

1329 

16, 2016 

3 4742 

1 

ChEKMCRE 

CAE 

8IT1.' 

BIT  10  CF  31)  IS  FGNCS  CCNTROL  QF  S/C 

0C26 

16,2017 

0 0006 

1 

EXTEND 

0027 

REF 

9 

LAST 

904 

16 ,2C2D 

0 2 0 3(1 

0 

RANG 

CHAN3-) 

BITS  IN  30  ARE  INVERTEC 

0028 

Rpp 

477 

LAST 

1400 

16,2021 

10  COO 

0 

CCS 

A 

CC29 

REF 

2 

LAST 

140R 

16 , 2022 

1 2157 

1 

TCF 

MOREI CLP 

003P  16,2023  C CC02  0 


REURR 
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L DAFICLFP  FRCGRAV 

P0C31  OAPini'^R  ENTRY. 


003? 

REF 

12 

LAST 

I39R 

16,2024 

22  016 

0 

CAPIOLEP 

LXCH 

BANKFLFT 

0C33 

16 ,202  5 

0 mo 6 

1 

EXTEND 

COTA 

PDF 

1 1 

LAST 

1 3 c c 

16,2026 

22  012 

1 

CXCH 

CFUPT 

003  5 

RTF 

6 

LAST 

14  P' 

16,2027 

3 12  6 2 

0 

CA 

RCSFLAGS 

0036 

RFF 

50 

LAST 

1356 

16,2030 

7 4737 

1 

MASK 

BIT  13 

0037 

REF 

47E 

LAST 

1*00 

16,2031 

1 C COO 

0 

CCS 

A 

0038 

RPP 

1 

16, 203? 

1 204  1 

1 

TCF 

CHECKUP 

00  38  1 

RPF 

5 1 

LAST 

1 4 G 1 

1 6,2033 

3 4737 

0 

CA 

B IT13 

00382 

RFF 

7 

LAST 

14''  1 

16, 20T4 

27  '262 

1 

ADS 

RCSFLAGS 

0C383 

RFF 

5 

LAST 

139  7 

16,2035 

3 7 7 20 

n 

CAF 

PRT027 

00^9 

PFF 

3? 

LART 

1397 

16, 2036 

C 5C7? 

1 

TC 

N C V A C 

00^0 

REF 

13 

LAST 

1430 

F6,  1537 

EBANK= 

ACSO 

CCAl 

PFF 

1 

16,2037 

C3637 

(I 

2CACP 

1/ACCSET 

OOAl 

RFF 

1 

16,2040 

4 2 1 •'  6 

r 

'104? 

REF 

1 

16,2041 

0 2 mo 

0 

CHECKUP 

TC 

CHEKBITS 

A0043 

0044 

REF 

0 c 

LAST 

1399 

16,2042 

30  111 

G 

CAF 

DAPRCCLS 

0C45 

REF 

2 

LAST 

220 

16,2043 

7 4751 

1 

MASK 

ACCSCKAY 

OP’46 

16, 2C44 

C CC06 

1 

FXTENC 

004  7 

REF 

3 

LAST 

1400 

16,2045 

1 2 15? 

1 

BZF 

MCPEIDLF 

0048 

RFF 

5 1 

LAST 

130F 

10.2U46 

0 4674 

0 

STARTCAP 

TC 

ibnkcall 

0049 

RFF 

in 

LAST 

139E 

16,2047 

4C154 

c 

FCAOP 

ZATTEPCR 

0050 

PFF 

2?R 

1 ART 

1398 

16,  2f»5<i 

3 4755 

1 

CAF 

ZERO 

0051 

RFF 

3 

LAST 

134 

16,2051 

55 ' 524 

1 

TS 

TJF 

005  2 

RFF 

Z 

LAST 

135 

16, 2052 

5 5 '525 

c 

TS 

T JC 

0053 

REF 

1 

16  ,2053 

55 '526 

0 

TS 

T JV 

30  54 

RFF 

7 

LA.  ST 

196 

1 6 , 2 1 ' 5 4 

5 5 ' 4 2 1 

c 

TS 

CMEGAP 

005  5 

REF 

6 

LAST 

754 

16,2055 

55*422 

c 

T S 

OMEGAG 

CC56 

RFF 

1 

LAST 

16,2056 

55'423 

1 

TS 

OMFGAR 

00  57 

REF 

6 

13  1 

16 , 2 C 5 7 

5 5 ' 43c 

c 

TS 

TRAPRCF 

0058 

RFF 

1 

16,  ’ -'br 

55 '43  1 

1 

TS 

TRA  PEDC 

'1059 

RFF 

1 

16,2061 

55'432 

1 

TS 

TRAPFCR 

oo&o 

RFF 

14 

LAST 

1401 

16, 2062 

55 '53  ? 

c 

TS 

AC  SC 

CC61 

Rrp 

15 

LAST 

14i'l 

16,2063 

55 ' 540 

(* 

TS 

AOSQ  +1 

0C62 

RFF 

4 

LAST 

13  9 9 

16,2.64 

55' 541 

1 

IS 

ACSP 

0063 

pp  F 

5 

L AST 

140  1 

16,  2 0 6 R 

5 5 ' 54  2 

1 

TS 

ACSR  +1 

CC64 

RFF 

3 

LAST 

1399 

16 , 2066 

55*424 

0 

TS 

ALPHAO 

0065 

PEF 

? 

LAST 

1399 

16,  2067 

55'425 

1 

TS 

A LFHAR 

0C66 

REF 

3 

L AST 

1 3 5 

16 , 2 '*70 

55 ' 50  1 

0 

TS 

NFGUG 

0067 

REF 

1 

16,2071 

55*503 

1 

TS 

NEGUR 

0068 

RPF 

3 

LAST 

nsp 

16,  ?;’72 

55*545 

TS 

ACSCTFRM 

0069 

PFF 

2 

LAST 

1399 

16,2073 

55*546 

0 

TS 

AOSRTERW 

0070 

RFF 

1 

16,2  .74 

55'51C 

r. 

TS 

CAFCCCT 

0071 

RFF 

1 

16,2075 

55*512 

1 

TS 

RACCDCT 

19:09  AUG.  11,1969  LMDAP 
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INTERRUPT  LEAC  INS  (CCNTINUEC) 


CPECK  IF  1/ACCJOe  EAS  EEEN  SET  UP  SINCE 
THE  LAST  FRESH  START  CB  RESTART. 

BIT  13  IS  1. 

SET  UF  jce  TC  CO  A LITTLE  IN  IT  I AL  IZA T 1 CN 
AND  EXECUTE  1/ACCS. 

(HILL  PRANCH  TC  NCREIDLE  CN  ACCSCRAY) 


CHECK  TC  SEE  IF  LN  OAF  IS  TC  GC  CN  ANC 
CO  ERROR  DISPLAY. 

IF  1/ACCS  HAS  NCT  BEEN  CCNPLETEC,  ICLE, 
NOTE:  CNLY  FRESH  STAPT  ANC  RESTART 
KNCCK  THIS  BIT  COHN. 


ZERO  ATTITUDE  ERROR  AND  DESIRED  RATES. 
INITIALIZE: 


PATES  IN  eCCY  (PILOT)  COORDINATES. 


CFFSET  ACCELEFATICN  ESTIMATES. 


COPIES  OF  OFFSET  ESTIMATES  FCP  DCHNLIST. 


CPAXIS  PATE  EERIVATICN  TERMS  ANC  KALMAN 
FILTER  IMTIALIZATIC'N  TERMS. 

DESCENT  ACCELERATION  CERIVATIVE  EST. 
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007? 

REF 

1 

16  ,?C76 

55 '5C2 

C 

■*•5 

All  CV.GTS 

AOSTASK  FLAG  FCR  CRAXIS  RCS  CORTRCL  LSE. 

00  73 

REF 

1 

16,2077 

55'631 

0 

TS 

CCTRCLER 

CC  TRYGTS  CN  FIRST  PASS  (WILL  GC  TO  RCS) 

0C74 

REF 

1 

16,21  H> 

55*633 

1 

TS 

INGTS 

RECOGNIZE  first  GTS  PASS  AS  SLCh. 

0079 

RFF 

3 

LAST 

135 

16,21M 

55 ' 632 

r 

TS 

CGI PT  IRR 

STCF  GIRFAL  CRIVES.  (PROBABLY  I..CULC  BE 

0076 

REF 

1 

16,  ?U'2 

55 ' 634 

0 

TS 

RGI  MTI  ''P 

GOOC  FRCUGF  JUST  TC  INACTIVATE  TIRERS) 

0077 

REF 

1 

16,21  )3 

55' 460 

0 

TS 

CLCP*'  IN 

RIRII*1LR  IMPULSE  MCDF  ERASABLES 

0078 

REF 

1 

1 6 , 2 1 ' 4 

55*461 

1 

1 F 

CLOCFRIN 

0078  1 

REF 

3 

LAST 

138 

)6 ,2135 

55 ' 767 

1 

TS 

P JETCTR 

INITIALIZE  CCCKFD  JET  IRETBITICR 

0C78? 

RFF 

1 

16,2106 

5 5 * 7 7 ■') 

1 

TS 

LJFTCTR 

CrURTERS 

00783 

2 

LAST 

138 

16,2107 

55  ' 77  1 

c 

TS 

V JETCTR 

0C79 

REF 

49 

LAST 

1378 

4747 

CALLGR8L 

EQUALS 

BITS 

RCSFLAGS  INI  IT  ALT ZATl CR. 

0080 

RFF 

1 

16, 2 1 1C 

4 22C2 

1 

CS 

RARF  LAG 

0081 

881= 

8 

LAST 

1401 

16,2111 

7 1262 

1 

NASK 

RCSFLAGS 

REGLO(R)  HAVE  BEFR  GEREPATFC. 

0082 

REF 

9 

LAST 

1402 

16,2112 

55*262 

1 

TS 

RCSFLAGS 

R0083 

SET 

UF  " 

CLC"  ) 

8EASLFEC  COL  ANGLES: 

FCFA 

16,2113 

0 0V)6 

1 

EXTENC 

0085 

RFF 

22 

LAST 

1396 

) 6, 2 1 14 

3 0033 

1 

CCA 

CCUX 

CLCXFCRP  ARC  CLCYFOPP 

0086 

RFF 

3 

LAST 

13  1 

16, 2 1 15 

53*441 

0 

CXC  H 

CLDXFCRF 

0C87 

REF 

14 

LAST 

1398 

16,2116 

3 0034 

0 

CA 

CCUZ 

0088 

REF 

1 

16,2117 

55*442 

r 

IS 

CLCZFCRC 

0089 

OFF 

1 ' 

LAST 

14)2 

16,2120 

4 1262 

1 

CS 

RC  SFLAG  S 

0090 

RFF 

36 

LAST 

1357 

16 ,2121 

7 4740 

1 

RASK 

BIT  12 

009. u 

RFF 

1 1 

LAST 

1402 

16,2122 

27*262 

1 

ADS 

RCSFLAGS 

EIT  12  SET  TC  1. 

0C91 

REF 

31 

LAST 

1354 

16,2123 

3 4751 

0 

CA 

FOUR 

0C92 

o EF 

2 

LAST 

134 

16,2124 

5 F * C -3  C 

1 

TS 

SKTPL 

0093 

RFF 

1 

16,2125 

55*536 

1 

TS 

SKI  PV 

C09A 

RFi^ 

36 

LAST 

1394 

16,2126 

3 4 73  3 

1 

CA 

POSRIAX 

3095 

REF 

4 

LAST 

1394 

16,2127 

54  C31 

1 

TS 

TIRE6 

0096 

RFF 

7 

LAST 

1395 

16, 2130 

55*466 

0 

TS 

T6NEXT 

0097 

REF 

2 

LAST 

1 394 

16,2131 

55*470 

1 

TS 

T6FUPThA 

3098 

RFF 

27  6 

LAST 

140  1 

16,2132 

3 4 7 5 5 

1 

CA 

ZERO 

CC99 

RFF 

8 

LAST 

143  2 

16,2133 

55*467 

1 

TS 

T6NFXT  +1 

0100 

RFF 

Q 

LAST 

1402 

16,2134 

55*471 

c 

TS 

T6FURTHA  +1 

010) 

RFF 

3 

1 AST 

1394 

16, 2135 

55*465 

c 

TS 

NXT6ADR 

CK2 

RFF 

5 

LAST 

1395 

16,2136 

55  * 472 

0 

TS 

NFXTP 

0 103 

REF 

2 

LAST 

1395 

16,2137 

55*473 

1 

TS 

NEXTU 

0104 

REF 

2 

1 AST 

1395 

16,2140 

55*474 

0 

TS 

NE  XTV 

0)05 

RFF 

8 

LAST 

1C3C 

16,2141 

4 4363 

1 

rs 

T FN 

0106 

REF 

1 

16,2142 

55*757 

1 

TS 

DAFZRLFT 

JASK  RCT  IN  PROGRESS,  INITIALIZE  REG. 

0K7 

REF 

93 

LAST 

138  1 

16,2143 

3 4752 

0 

CA 

TRiO 

01C8 

RFF 

1 

16, 2 144 

c c I ^ :i  :i 

c 

T S 

N FTPAFS 

0109 

RFF 

1 

16, 2 145 

55*434 

1 

TS 

NCTRAPS 

Olio 

REF 

1 

16 , 2 146 

55*435 

0 

TS 

NRTRAPS 

UU 

16,2147 

C CCQ6 

1 

EXTERO 

3112 

REF 

1 

16,2150 

3 2205 

1 

nCA 

PAXADtDL 

3113 

REF 

3 

LAST 

22C 

16,2151 

53*264 

1 

CXCF 

T5ACP 

0114 

REF 

1 

16,2152 

3 7 7 3 2 

0 

SFTTI  NE5 

CAE 

R SlOO 

0115 

RFF 

4 

LAST 

853 

16,2153 

54  030 

0 

TS 

T IME5 
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0 116 

REF 

26 

L AS"^ 

1395 

16, 2 1=4 

1 52  70 

c 

TCP 

RESUME 

0117 

PFF 

16 

LAST 

1401 

E6 ,153T 

EBANK= 

AGSQ 

0118 

RFF 

2 

LA  ST 

223 

16,2155 

C2C24 

0 

I ELERACP 

2CACR 

CAPICLER 

nil  a 

16,2156 

34 1 :6 

1 

0119 

Rt^F 

52 

LAST 

1401 

16,2157 

0 46T4 

'.) 

MCREI CL  E 

TC 

IBN'KCALL 

OIB-T 

PEF 

1 

16,2160 

36(55 

1 

CAPP 

OEPPCALC 

0121 

REF 

53 

LAST 

1403 

16,2161 

1 4674 

0 

TC 

IBNKCALL 

0 122 

RFF 

1 

16,2162 

35452 

1 

r ACP 

CALCPERR 

0123 

16,2163 

0 0006 

1 

SHUTDCNN 

EXTENO 

0124 

RFF 

1 

16,2164 

3 2156 

1 

CCA 

ICLFRADR 

0125 

REF 

4 

LAST 

1402 

16 , 2 165 

53 ' 264 

1 

CXCF 

T5A0R 

3126 

REF 

277 

LAST 

140  2 

16,2166 

3 4755 

1 

CAF 

ZERO 

0127 

PER 

f 

LAST 

1402 

16,2167 

55' 472 

0 

TS 

NEXTF 

0128 

RFF 

3 

LAST 

1402 

16.217C 

55*473 

1 

TS 

NEXTU 

0129 

RFF 

3 

LAST 

1402 

16,2171 

55*474 

0 

TS 

NEXTV 

0130 

16,2172 

0 0006 

1 

FXTFNC 

0131 

REF 

C 

L AST 

1395 

16,2173 

Cl  CC5 

c 

KPITE 

CFAN5 

0132 

16,2174 

0 0006 

1 

FXTEND 

0133 

REF 

■a 

LA9T 

1395 

16,2175 

Cl  00  6 

c 

ViPITE 

CFAN6 

0134 

RFF 

1 

16,2176 

4 2203 

0 

CS 

BGIM23 

0135 

16,2177 

0 0006 

1 

EXTEND 

0136 

REF 

65 

LAST 

1314 

16, 220C 

03  C12 

I 

kANC 

CFAN12 

0137 

RFF 

1 

16, 22'U 

1 2152 

1 

TCF 

SFTTIMF5 

0137  1 

16,22J2 

03021 

1 

MANFLAG 

CCT 

0 302  1 

0138 

16, 22T3 

C7400 

1 

BGIM23 

CCTAL 

074  10 

0139 

PFF 

8 

LAST 

1401 

E6 ,1421 

EBANK= 

OMEGAP 

0140 

RFF 

1 

16, 2 20  4 

C2213 

c 

PAXAC  ICL 

2CACF 

PAXI  S 

0140 

RFF 

1 

16, 2205 

34  136 

1 

C141 

RFF 

2 

LAST 

156 

7732 

MS  100 

= 

OCT37766 

0142 

REF 

69 

LAST 

1373 

CC61 

CCSMG 

= 

ITFMFl 

01431 

16,2206 

0 0006 

1 

JLMPCSR 

EXTEND 

01432 

RFF 

1 

16 ,2207 

3 2212 

1 

rCA 

DSPCACR 

01433 

16,2210 

52  C06 

c 

CTce 

014  3 4 

REF 

3 

LAST 

138 

F6,1761 

EBANK= 

AK 

014^5 

RFF 

1 

16,221  1 

C2227 

1 

DSPCACR 

2CACR 

A LTOSPLY 

01435 

REF 

1 

16, 2212 

4C  1U6 

1 
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CALCULATE  Q,R-AXES  ATTIILDE  FRPCRS. 
CALCULATE  P AXIS  ATTITUDE  ERRORS. 

RIIL  ANY  PCSSIELE  JET  FEGLESTS 

COMMAND  JETS  CFF. 

TURN  TRIM  GIMEAL  CFF 
RETURN  IN  100  MSEC. 


TRANSFER  TC  BANK  20 

FOR  ATTITUDE  ERRCR  DISPLAYS 


GAO: 

L 

11437 
0143  f 
01434 

R0144 

ROIAI 

R0146 

RO  14  7 

P0148 

R0149 

R0151 

R0143 

R01541 

R01?5 

R0156 

ROl  57 
R0158 

R015°1 

R014C 

RO  161 

R016? 

P0163 

RG164 

PO  165 
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rAFICLER  PRCGPAM 


19:09  AUG.  11,1969  LRCAF 
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20 .2227 
20, 2011 

21 .2227 


EANK  20 
SFTLCC  DAPS3 
BANK 

CrUK7«  Jl/NEECL 


REF  4 LAST  1396 
PEE  1 
ertgrav:  ALTOSPLY 
Non  C.  6 DEC  1967 

AUTHOR:  CRAir  KORK,  DON  K'^ENF,  viT  IL 

RCC  3 BY  rCA  KEENE  AUG  1,  I960  RCVED  PROGRAM  TO  BANK  20 
program  DFSCRIRYIck: 

ALTCSPIY  PEV'FPSES  THE  OSPLYALT  BIT  OF  RCSFLAGS  EACH  TIME  IT  IS  CALLFC,  kHICH  IS  PRESUMAELY  EVERY  100  MS. 

IF  TH=  REVERSED  BIT  1$  EKF,  NEFOLER  IS  CALLEC  TC  CISPLAY  ATTITUDE  ERRORS.  IF  THE  BIT  IS  ZERO,  THE  ATTITUDE  ERR- 
ORS ARE  CALCULATFE  AS  1)  FSTIMATEO  RATES  (FOLLCUNGl  IF  NEEC2FLG  = 1,  CTFEPRISE  AS  2)  CAP  ROLLCMNG  ERRORS  FOR 
KEPCLFLG  = 0 AND  31  TOTAL  ATTITUDE  ERRORS  FOR  NEECLFLG  = 1, 


1<APNTMG:  ALTDSPLY  MAv  ONLY  PE  CALLEC  UTF  IATERPUFT  IKFIPITEC. 

WAonING:  EBAMK  must  BE  S^T  TO  6 WHEN  USING  THIS  ROUTINE. 

INPUT:  RCSFLAGS  AND  1)  IF  NEECLFLG=0,  INPUT  F E PRC R , C ERPO R , R ERROR  . 

21  IF  NFEDLFLG  = I,  INPUT  C PF I ,f THET A , C PS  I ,C DUX  , C CUY  , C DU  2 , M 1 1 , M 2 1 , N 3 1 , M 2 2 , M 3 2 . IGPMATRIXl 

3)  IF  NEFC2HG  = I,  INPUT  Omfgao  , CMEGAG,  AND  OM=GAR. 

rUTDUlS:  RCSFLAGS  RITH  OSPLYALT  PE  V E R S £ C , A K , A K 1 , A K2 , + NEEDLFR  OUTPUTS. 

ENTRY:  TCF  ALTOSPLY 

PXIT:  TO.F  GHEKNERE 

ALARM  OR  ABORT  EXITS:  NCNF 

SUEFRCGRAMS  CALLEC:  NEECLER,  CVERSUR2 

DEPRIS:  A,L,ANC  NPECLtp  CFERIS. 

INVERT  TFE  CISFLAY  ALTERNATICN  EIT. 


0166 

REF 

12 

LAST 

1402 

21, 2227 

3 1262 

c 

ALTOSPLY  CA 

RCSFLAGS 

C167 

PEE 

270 

LAST 

139  8 

20 ,2230 

54  101 

1 

TS 

L 

0 168 

PEE 

1 

20,2231 

3 4 7 50 

1 

CA 

CSFLYALT 

0169 

20,2232 

0 0006 

1 

EXTEND 

C17C 

RPP 

18 

LART 

1381 

21,2233 

06  001 

0 

CXCR 

LCFAN 

0171 

ref 

I 3 

LAST 

1404 

21, 2234 

55*262 

1 

TS 

RCSFLAGS 

0172 

REF 

2 

1 AST 

14'i4 

2:i,  2235 

7 4 7 50 

0 

MASK 

D SPLYAL  T 

017^ 

REF 

4 79 

LAST 

140  1 

20,2216 

10  COO 

0 

CCS 

A 

IS  ALTERNATION  FLAG  ZERC? 
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017A 

PPF 

1 

2 ' . 2237 

1 2 336 

1 

TCF 

NIEEDLFR 

n 17A  1 

RFF 

31 

LAST 

1366 

2 1,224?' 

4 CC74 

0 

CS 

FI  AGWPC.) 

CFECK  FOR  RATE  DISPLAY  10  ERROR  NEEDLES 

01742 

PEE 

1 

20, 224  1 

7 4735 

0 

MASK 

NEED2BIT 

VIA  EXTENDED  VERB  60 

01743 

20 ,2242 

0 0306 

1 

EXT  END 

01‘'44 

REE 

1 

20,2243 

1 2 2 5 7 

1 

EZF 

DISPRATE 

0175 

RFF 

32 

LAST 

140  5 

?o,22‘?,4 

30  074 

1 

CAT 

F LAG1\RD0 

NEECLELG  WILL  INDICATE  TOTAL  CP  CAP  AT- 

0176 

REF 

1 

20 ,2245 

7 4750 

0 

MASK 

NEEDL8IT 

TITUDE  ERROR  DISPLAY  RECLEST. 

0177 

REF  480 

LAST 

1404 

20, 2246 

10  CCO 

0 

C.C  S 

A 

0178 

RFF 

1 

2 1,2247 

1 226F 

0 

TCP 

nSPLVTOT 

TOTAL  ERRCP  IS  NfeCEC  IN  AK,AK  +1  , A K 72 

0179 

REF 

2 

LAST 

133 

20, 225C 

4 145C 

c 

CS 

CEPRCP 

YES.  CISFLAV  ATT  ERRORS  ON  TEE  ,-BALL. 

OIRO 

RFF 

4 

LAST 

140  3 

20, 2251 

5 5 ' 7 6 2 

1 

TS 

AK  +1 

ERPCR  CCNPLEMENTS  ARE  INPUT  TC  NEECLER. 

0181 

PFF 

2 

1 AST 

132 

2"' , 2252 

4 1452 

1 

CS 

REPRCR 

01815 

PFF 

5 

LAST 

1435 

20, 2253 

55*763 

c 

TS 

AK  *2 

0182 

PEF 

2 

1 AST 

155 

20,2254 

4 1464 

1 

CS 

P ERROR 

0183 

rff 

6 

LAST 

1405 

20,2255 

57*761 

0 

XCF 

AK 

0184 

PEF 

1 

2 1 , 2256 

1 2456 

r 

1CF 

RETNMCRE 

DISPLAY  THESE  THE  NEXT  TIME  THRCUC-H 

0184  1 

PFF 

7 

LAST 

14  U 

20,2257 

4 1422 

0 

CISPRATE 

CS 

riNEGAO 

LCAD  ESTIMATFC  RATES  (FCLICWING) 

01842 

REF 

7 

1 AST 

14;j5 

20,2260 

55*762 

1 

TS 

AK  +1 

01843 

PFF 

2 

LAST 

140  1 

20, 2261 

4 1422 

1 

c s 

CMFGAR 

01844 

REF 

8 

LAST 

1405 

20,2262 

55*  763 

0 

TS 

AK  +2 

01845 

P'-F 

9 

LAST 

14P? 

20,2263 

4 1421 

f 

CS 

CMEGAP 

01  846 

RFF 

9 

LAST 

1 40  5 

20,2264 

57  * 76  1 

0 

XCH 

AK 

01847 

OFF 

7 

LAST 

14'’  « 

2 1,2265 

1 2456 

r 

TCF 

RETNMCRE 

P0185 

calculate  GIMBAL  angle  TrTAL 

ERROR  S, 

RESOLVE  INTO  PILCT  AXES,  STCPE 

TCTAl  ERRCPS  fcp  NEEELEP.  C-AXIS  FIRST. 

0187 

2’3 ,2266 

7 000  6 

1 

CPPLYTOT 

EXTEND 

i)  188 

PFF 

LAST 

1403 

20,2267 

22  C61 

C 

CXCH 

itfmfi 

SAVE  C FDR  CHEKEITS  RETURN. 

0189 

PEF 

3 

LAST 

480 

2 ', 2270 

3 0322 

1 

CA 

CTHE  ta 

DESIRED  attitude,  Y-AXIS,  2 *S  CCMF. 

0190 

2 1 ,2271 

0 0006 

1 

EXTEND 

SUBTRACT  CURRENT  ATTITUDE. 

0191 

REF 

11 

1 AST 

1398 

20,2272 

20  C23 

0 

MSL 

CDLY 

DIFFEPENCF  SCAUEC  AT  PI,  1*S  CCMP. 

0192 

RTF 

10 

LAST 

140  5 

2'i  ,2273 

55*761 

1 

TS 

AK 

SAVE  FCR  R-ERRCR  CAUCULATICN. 

0193 

23,2274 

C CC06 

1 

EXTEND 

0194 

REF 

2 

LAST 

190 

? 1 , 2 2 7 5 

7 14  15 

1 

MP 

M21 

(CHTETA-CCUV 1 *>M21  SCALFC  AT  FI  RADIANS. 

0195 

rff 

1 1 

LAST 

1405 

20, 22  76 

57*762 

0 

XCF 

AK  +1 

STORE  FIRST  TERMI,  CF  0 ERRCR. 

0 196 

RFF 

5 

LAST 

5 2 1 

21,2777 

3 C323 

c 

CA 

C PS  I 

DESIRED  ATT  ITUCE  , 2-AXI S , 2*S  CCMP. 

0197 

2(1, 2 3 10 

0 7006 

1 

EXTEND 

SUBTRACT  CURRENT  ATTITUDE. 

0198 

REF 

15 

LAST 

1402 

20,230! 

20  034 

1 

MSU 

CDUZ 

DIFFERENCE  SCAUED  AT  PI,  I'S  CCMP. 

0199 

RFF 

12 

LAST 

1405 

20, 2302 

55*763 

c 

TS 

AK  +2 

SAVE  2-AXIS  TERM  FCP  F ERRCR  CAUCUL6TI0N 

0200 

20,2303 

0 0006 

1 

EXTEND 

0 201 

RFF 

c 

LA'T 

896 

2C  , 230  4 

7 1^17 

0 

MF 

M22 

(CFSI-CDU2  )*M22,  SCAUEC  A1  PI  RADIANS. 

02  >2 

REF 

13 

LAST 

1405 

20,2375 

6 1762 

c 

AD 

AK  +1 

C ERRCP  CCMFLETF  , AT  FI  RAC. 

02C3 

RFF 

1 

20 , 2306 

0 2 451 

0 

TC 

0VERSUB2 

PIN  NEEDUFS  IN  CASE  CF  CVERFLCK. 

0 204 

ref 

14 

LAST 

1405 

2", 2307 

55*762 

1 

T F 

AK  +1 
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RC2C5  R FRRCR  CALCLLATICN  NEXT. 


0 206 

R = F 

15 

LAST 

1905 

2",  23  i:.' 

3 1761 

C 

CA 

AH 

Y-AXIS  CTFFERENCe  STORED  EY  C-AXIS  CALC. 

0207 

20,2311 

0 0106 

1 

FXTENC 

020P 

RFF 

2 

LAST 

19C 

20,2312 

7 1916 

1 

RF 

R31 

(CTHETA-CCUY ) XM3  1,  SCALED  AT  PI  RACTANS. 

0209 

RFF 

16 

I.AST 

190  6 

20 , 2 3 1 3 

57  ' 763 

1 

XCH 

AK  +2 

FIRST  TERM  CF  P ERROR. 

AQ21  P 

Z-AXIS  CIFFERENCF,  STCRED  BY  A CALC.  IS 

021  1 

20, 2319 

C CC06 

1 

EXTENC 

RECCVEREC  EY  THE  EXCHANGE. 

0212 

RFF 

3 

LAST 

896 

2' • , 2 3 1 5 

7 1920 

1 

MP 

M32 

(CRSI -CCLZ  )*R32 , SCALEC  AT  FI  RACIANS. 

02!  3 

RFF 

17 

LAST 

1966 

2'', 2316 

6 1763 

1 

AC 

ah  +2 

P ERRCR  CORPLETE  , AT  FI  FAC. 

021'! 

RFF 

2 

LAST 

190  = 

20,2317 

0 295  1 

r 

TO 

CYFRSLe2 

FIN  NFFCLES  !N  CASE  OF  CVERFLOH. 

0215 

PFR 

1 R 

LAST 

1906 

2'T  ,2320 

55  ' 763 

0 

TS 

AK  +2 

R0216 

NIOli 

CA1.CLLATE 

P EPROK.  (NCTF 

THAT  R13 

= 1 , scalec  at  1 

, SC  THE  MULTIPIICATICN  IS  EY-PASSEC.) 

02 IR 

RFF 

19 

LAST 

1906 

2 '.  232  ! 

3 17  61 

c 

CA 

A H 

Y-AXIS  CIFFERENCE  STCREC  EY  Q AXIS  CALC. 

C2  19 

20  , ’322 

C C0C6 

i 

EXTFNC 

0 220 

RFF 

7 

LAST 

1R9 

20,2323 

7 1919 

0 

RP 

Rll 

(CTHETA-CCUY  I*M11  SCALEC  AT  PI  RACIANS. 

0221 

RFF 

20 

1 AST 

19'‘i6 

2 1,2329 

57*761 

0 

XCH 

AK 

FIRST  TFRR  CF  P ERRCR  IN  AK,  AT  FI  FAC. 

0222 

REF 

1 1 

LAST 

96  7 

20,2325 

30  321 

1 

CAF 

CFHI 

CESIREC  ATTITUDE,  X-AXIS,  2'S  CGRIP. 

022? 

20,2326 

0 C0C6 

! 

EXTENC 

SLETRACT  CURRENT  X ATTITUCE. 

0229 

REF 

23 

LAST 

190  2 

20,2327 

20  132 

! 

RSU 

CCLX 

X-AXIS  DIFFERENCE,  I'S  CCRP,  AT  FI  PAC. 

R022'^ 

M 1 3 

= 1, 

SO  BYPASS 

TEE  RLlTIPLICATirN 

P0226 

EXTEKC 

R0227 

N'P 

R13 

(CPhl 

-CCUX1*M3  SGALRC 

AT  PI  RACIANS. 

022H 

PEF 

?! 

LAST 

1906 

?'),  2 3 30 

6 176  1 

C 

AD 

AK 

F ERRCR  CCRFLETE  , SCALEC  »T  PI  RAC 

0229 

PFF 

3 

LAST 

1906 

20 ,2331 

0 2951 

0 

TC 

0VFRSLB2 

PIN  NEEDLES  IN  CASE  CF  CVERFLCH. 

0230 

REF 

22 

LAST 

196  6 

20 , 23  32 

55  • 761 

1 

TS 

AK 

02  31 

20,2333 

0 0006 

1 

EXTEND 

0232 

RFF 

71 

LAST 

1905 

23,2339 

22  061 

0 

CXC  F 

ITEMP  1 

RESTORE  C FOR  CHEKBITS  RE7LRN. 

023R 

PFF 

3 

LAST 

1905 

20,2335 

1 2956 

0 

TCP 

RFTNYCRE 

DISPLAY  THESE  THE  NEXT  TIRE  THROUGH 

gap: 
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L 

P023A 

R-1235 

R0236 

R3237 

R0239 

R02A1 

R3243 

R02A5 


R02A6 

R0247 

R0249 

R''J250 

R0251 

R0252 

R0253 

R0255 

R9256 

R02F7 

R025F 

R0260 

R0261 1 
P3262 

R0  26  3 
R9264 
R-.I26  5 
RC266 

R1267 

R3269 

R0270 

R0272 

R9273 

R0274 

R0275 

RC276 

R0277 
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FCA'  ATTITUDE  ERROR  DISPLAY  SlERCl.TINE 
PPCGRfw  CFSCRIPTICN:  D.  KEENf'  E/2A/67 

MOD  1 PY  CRAIG  ^CFK,  12  CFG  67 

MOC  2 BY  CRAIG  WORK,  6 APRIL  68  CCNVERTS  ATTITUDE  ERRCR  DISPLAY  SCALIAG  FRCM  16  7/8  DEG.  TO  42  3/16  DEGREES. 

THIS  SUBPOUTIAF  IS  USED  TC  DISPLAY  ATTITUDE  ERRORS  ON  THE  FDAI  VIA  THE  DIGITAL  TC  AAALCG  CCAVEPTERS  (DAGS) 
IN  THE  crus.  CAPF  IS  TAKEN  TC  RETFR  CLT  THE  APPRCPPIATF  KUMPFR  OF  PULSES  TO  THE  IMU  ERROR  COLNTFRS  AND  PREVENT 
CV'^RFLCW,  to  control  the  RC|  4y  SECUPNCING,  and  to  Avric  I NTr-PFFPFNCE  LiITH  the  CCARSE  align  lccf  which  alsc  usfs 
the  DAGS. 


calling  SEOUENCF: 

DURING  THE  INITIALIZATION  SECTION  OF  THE  USER'S  PROGRAM,  BIT3  CF  RCSFLAGS  SHCLLD  EE  SET  TC  INITIATE  THE 
TUPN-CN  SEQUFMCF  WITHIN  THE  NFFDLES  PRCGRAN: 

CS  RCSFLAGS  IN  EBANK6 

MA'K  BIT3 
ADS  RCSFLAGS 

THEREAFTER,  THF  AfTITUOE  ERRORS  GENERATED  BY  THE  LSFR  SHOULD  BE  TRANSFEREE  TO  THE  FCLLCMNG  LCCATICNS  IN  EEANK6 


AK  SCALED  180  DEGREES  NOTE:  THESE  LCCATICNS  ARE  SUBJECT 

AKi  scaled  lEC  DEGREES  TC  CHANGE 

AK2  scaled  181  DEGREES 

PULL  SCALED  DFFLFCTTCN  CF  THE  NFFDLES  CCRRFSRCNCS  TC  5 1/16  DEGRFES,  WHILE  384  BITS  IN  THE  IMU  ERROR  CCLNTER 

CCPRESPONDS  TC  42  3/16  DEGREES.  (D^C  MAXIMUM  CAPACITY  IS  384  BITS.)  46  BITS  EFFECTIVELY  FIN  THE  NEEDLES. 


FOR  RATE  display,  FULL  SCALE  NEFCLE  CEFLECCION  IS  1 17/64  DEG/SEC,  AND  A FULL  COLNTER  IS  ABOUT  lC.5  DEG/SEC. 
A CALL  TC  NEFOLEP  WILL  ‘'HEN  LFDATE  THE  DISPLAY: 


TNFINT 

TC  IBNKCALL  NOTE:  EBANK  SHCULC  FE  SET  TO  E6 

CADR  NFFDLFR 

RELINr 

THIS  PROCFSS  SHCUO  BE  REPEATED  EACH  tiyE  THE  FPPCRS  ARE  UPDATEC.  AT  LEAST  3 PASSES  THRU  THE  PROGRAM  APE 
REGURED  BEFORE  ANYTHING  IS  ACTUALLY  DISPLAYED  CN  THE  EFRCR  METERS. 

NCTP;  EACH  CALL  TC  NEEDIER  MLST  BE  SEPARATED  EY  AT  LEAST  BOMS  TC  ASSURE  PRCPFR  RELAY  SEQUENCING. 

ERASAEL  E USED: 

AK  CDUXCad 

AKI  CCUYCMC 

AK2  COUZCMC 

FCPIYEX  A,L,G 

FDRIVEY  T5TEMP 


G4P: 
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RC27E 

ECP  IVF  Z 

r INCX 

R0279 

SWITCHES: 

RCSFLAGS 

eiT'  3 ,2 

RC2  80 
R0281 
R )282 

I/C  CHANNELS: 

C H A M 2 

CHAM2 

CHANIA 

EIT  A (COARSE  ALIGN  - READ  ONLY) 
BIT  6 (IHU  ERROR  COUNTER  ENABLE) 
8IT  13,1A,15  (DAC  ACTIVITY) 

RQ283 

SIGN 

CCNVPNT  TCN'K 

AK  = THETAC  - tpFTA 

RT284 

whfre 

THETAC  = 1 

C CRyskc 

ANGLE 

R02RN 

THFTA  = 

present 

angle 

C2E6 

REF 

19 

LAST 

190^ 

20.2336 

3 1362 

0 

NFEDLER 

CA 

RCSFL  AGS 

1287 

REP 

25 

LAST 

1360 

21, 23^7 

7 6295 

C 

MASK 

SIX 

02PP 

2 1,2  36*0 

0 0006 

1 

PXTENC 

0289 

REF 

1 

21,239  1 

1 2376 

C 

PZF 

NEED!  ES3 

0290 

REF 

41 

LAST 

1900 

20,2392 

7 9 7 5 1 

1 

MASK 

B1T3 

0291 

21 , 2393 

0 0016 

1 

EXTEND 

129  2 

R PE 

1 

20, 2399 

1 2 36  7 

c 

ezF 

NEEDLER2 

02  93 

pep 

63 

LAST 

14M{. 

21, 2395 

9 9796 

1 

cs 

B I T6 

029A 

21,2396 

0 0006 

1 

EXTEND 

0298 

REF 

66 

LAST 

1903 

20, 2397 

03  0 1 2 

1 

WAND 

CHAN12 

0296 

RFF 

2 78 

LAST 

1903 

2 1 ,2350 

9 9755 

0 

NEFCL  E 1 1 

CS 

Z FRO 

C297 

REF 

2 

L AST 

19C6 

20,2351 

55  ' 761 

1 

IS 

AK 

0298 

orp 

1 

21, 2352 

55  ' 762 

1 

IS 

AKl 

0299 

RFF 

1 

21 ,2353 

55*763 

0 

TS 

AK2 

0 301 

REF 

3 

LAST 

138 

21, 2359 

55' 769 

1 

TS 

ECPIV^X 

0301 

REP 

1 

21,2355 

55 ' 765 

0 

TS 

EDRI VEY 

0302 

PEF 

1 

20,2356 

55 ■ 766 

0 

TS 

ECRIVEZ 

0303 

PEF 

9 

LAST 

130? 

20,2357 

59  050 

c 

TS 

CCUXCMD 

0394 

RFF 

2 

LAST 

175 

2 1,2360 

59  151 

1 

TS 

CDL YCMO 

0305 

RFF 

2 

LAST 

176 

20,2361 

5 9 0 52 

1 

TS 

CCLZCMD 

1306 

RFF 

26 

LAST 

1908 

21, 2362 

9 6 2 9 5 

0 

r s 
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ACSR 

02  53 

RCF 

1 

16,2622 

1 2667 

0 

TCP 

PRFTIMCK 

025A 

16, 2623 

00C7A 

1 

KAOS 

DEC 

6C 

02  55 

REF 

2 

LAST 

1 AOl 

16 ,262A 

3 1510 

1 

WCPKT  IR  E 

CA 

QACCDOT 

3256 

16, 2625 

C CC06 

1 

FXTENC 

0257 

REF 

3 

LAST 

!'■  >7 

16,2626 

7 A766 

0 

vp 

CAt  LCCOE 

OCTAL  CCC32  IS 

DFCIPAL  .1  AT 

025P 

REF 

2'"' 

LAST 

1A17 

16,2627 

21 ' 5A0 

0 

CAS 

ACSC 

0259 

REF 

2 1 

LAST 

lAl  7 

16, 263C 

3 1537 

1 

CA 

ACSC 

0267 

REF 

5 

last 

1A17 

16,2631 

55 ' A2A 

0 

TS 

ALPHAQ 

0261 

16 , 2632 

0 000  6 

1 

EXTERD 

0262 

REF 

1 

16, 2633 

7 3622 

c 

MP 

20UYS 

.2  AT  1 

0263 

R^'F 

7 

LAST 

1 A1  7 

16,263a 

55' 5A5 

0 

TS 

ADSOTERV 

i?6A 

RFF 

2 

LAST 

lAC  1 

16,2635 

3 1512 

c 

CA 

RACCDCT 

0265 

16, 2636 

0 0006 

1 

SXTFN'D 

0266 

REF 

A 

LAST 

lAl  7 

16,2637 

7 A 766 

0 

PR 

CALLCCDE 

OCTAL  CC032  IS 

DECIMAL  .1  AT 

0267 

RPF 

8 

LAST 

1A17 

16, 2 6 AC 

2 1 ":A2 

1 

CAS 

ACSR 

02  6 8 

REF 

9 

LAST 

LA17 

16 ,26A1 

3 15A1 

0 

CA 

ACSR 

0269 

RRF 

A 

LA5T 

LAl  7 

1 6 , 26A  2 

5 5 ' A25 

1 

TS 

AL  PHAP 

0270 

16, 26A3 

0 0006 

1 

EXTEND 

C271 

PEF 

2 

LAST 

1A17 

16 , 2 6 A A 

7 363? 

0 

MP 

200MS 

. 2 AT  1 

3272 

PPF 

6 

LAST 

1A17 

16, 26A5 

5 5'  5 A 6 

c 

T S 

ACSRTERN 

02721 

RFF 

2 

LAST 

LA  17 

16.26A6 

1 2667 

0 

TCF 

PRETI  YCK 

E6  SA 


VALUES. 


2(6). 


2(6)  . 
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R 1273 


027A 

REF 

1 

16,2647 

3 4747  1 

PAXFILT 

CA 

CAl  LGMBL 

EXECUTE  ACCTFC12,  IF  NEECEC. 

027A2 

RTF 

21 

LAST 

14C9 

16 ,265C 

7 1262  1 

MASK 

RCSFLAGS 

027AA 

REF 

489 

LAST 

14  17 

16,2651 

1C  ■'■'iO  0 

CCS 

A 

CAILGFBL  IS  NCT  EIT15,  SC  THIS  TEST  IS 

027A6 

RPF 

1 

16 ,2652 

0 3742  0 

TC 

A COT +C  12 

VALID. 

0275 

RFF 

1 i 

LAST 

1121 

16,2653 

52  Cll  C 

CXCF 

ARUPT 

0276 

REF 

4 

LAST 

138 

16,2654 

53 '754  1 

CXCH 

DAPARLPT 

C277 

REF 

1 

16,2655 

3 2666  0 

CA 

SUPER JCB 

SETTING  LP  THE  SLPERJCB 

0278 

RFF 

3 

LAST 

1273 

16,2656 

56  C17  1 

XCH 

BPLPT 

0279 

RFF 

13 

LAST 

1411 

16,2657 

22  012  1 

LXCH 

ORLPT 

0280 

REF 

1 

16 ,266C 

53*756  0 

CXCF 

DA  F8CRPT 

■1281 

REF 

1 

16,  266  1 

3 2665  0 

CA 

SLPERACR 

C282 

REF 

1 

16,2662 

52  )16  1 

CXCF 

ZRLPT 

02F3 

PFF 

■a 

LAST 

1411 

16,2663 

53 '760  C 

CXCF 

OAFZRLPT 

02  84 

R cF 

1 

16, 2664 

1 5275  C 

TCF 

NCQBRsw  +l 

PFLINT  (JUST  IN  CASE)  ANC  PFSUME,  IN  TFE 

AC285 

FORM  OF  A JASK,  AT  SLPFPJQP. 

0286 

REF 

2 

LAST 

1418 

16,2665 

02667  1 

SLPERAOR 

GENACF 

SLFEPJCE  +1 

R0287 

fClNT  CFNN  GIMBAL 

CR  IVF  T IMER 

S ANC  TURN 

OFF  CP  IVFS  IF  REQUIRED. 

02P8 

REF 

1 

16,2666 

1 3 64  5 1, 

SLFFR JCE 

TCF 

RATELCCF 

12881 

RFF 

4 

LAST 

1412 

16,2667 

U ' 632  0 

PRETINCK 

CCS 

CGIMTIWP 

02E9 

RFF 

1 

16 ,2670 

1 2710  1 

TCF 

OECQT  IMR 

POSITIVE-  CCUNTING  CCFN 

0290 

REF 

1 

16 , 267  1 

1 2714  C 

TCF 

TUPNCFFC 

NEGATIVE-  DRIVE  SFOLLC  BE  ENDED 

0291 

REF 

2 

L AST 

1402 

16, 2672 

11'634  0 

CFKRT  IMP 

CCS 

RGIMTIVR 

NEGATIVE-  INACTIVE 

C292 

PEF 

1 

16 , 26  7 3 

1 2712  0 

TCF 

DECRTIMR 

(NEG  ZERO-  IMPOSSIBLE) 

1203 

PPF 

1 

16,2674 

1 2724  0 

TCF 

tlrncffr 

REFEATFC  lABCVEi  FOR  R AXIS. 

0294 

16, 2675 

0 0006  1 

EXTEND 

DECREMENT  COCKED  JET  INFIBITKN  CCUNTERS 

0295 

REF 

4 

LAST 

1402 

16,2676 

27'767  1 

CIN 

FJFTCTR 

0296 

16,2677 

0 C0Q6  1 

EXTEND 

0297 

REF 

2 

LAST 

1402 

16 ,2  700 

27*771  1 

C IM 

U JETCTR 

0298 

16,27-1 

C CC06  1 

EXTEND 

0299 

RFF 

3 

LAS-'' 

14'I2 

16, 2702 

27*771  r 

DIM 

VJETCTR 

03CG 

R = F 

37 

LAST 

140  2 

16,2703 

3 4740  0 

CA 

B IT12 

0 311 

REF 

22 

LAST 

14  1 8 

16,2704 

7 1262  1 

MASK 

RCSFL  AC-S 

0302 

16 , 27  )5 

0 0116  1 

EXTEND 

0303 

REF 

1 

16,27  16 

1 2714  1 

EZF 

SKIPPAXS 

1314 

RFF 

1 

16,2707 

0 2740  C 

TC 

CHK VI SF  Z 

03P5 

R -F 

5 

LAST 

141  8 

15,2710 

55 '632  0 

CECGT  IMR 

TS 

OCIMT  IMR 

CCLNT  TIMERS  CCInN  TC  FCS  ZERC. 

03C6 

RFF 

1 

16,2711 

1 2672  1 

TC  F 

CFK  RT IMR 

0307 

PEF 

3 

LAST 

1418 

16, 2712 

5 5 ' 6 3 4 0 

CECRT  IMR 

T S 

RGI PTIMP 

C3CE 

REF 

2 

LAST 

141  8 

16 , 27  13 

1 2675  0 

TCF 

CFKRTIMR  +3 

1309 

ref 

4 

LAST 

140  1 

16,2714 

55'501  C 

TLRNCFEC 

TS 

NEGUC 

HALT  CRIVES. 

0310 

RFF 

3 

1 AST 

1417 

16,2715 

55 ' 510  P 

TS 

QACCDCT 

0311 

RFF 

1 

16,2716 

4 5107  1 

cs 

GGIMBITS 

■1312 

16,2717 

C CCC6  1 

EXTEND 

gap:  1 

L 

0313 

131A 
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0315 

6 

LAST 

1418 

16  ,2722 

55 '632 

0 

TS 

QG  IMT IMR 

0316 

RFF 

3 

LAS'F 

141F 

16,2723 

1 2672 

1 

TCF 

CFKRT IMF 

031  7 

PPP 

2 

LAST 

1401 

16, 2724 

55  ■ 503 

1 

TLRNOFFR 

TS 

NEGUR 

0318 

R'^'F 

3 

LAST 

14  17 

16,2725 

55 • 512 

1 

TS 

R ACCDCT 

1319 

REF 

1 

16, 2726 

4 502C 

1 

CS 

RGIMETTS 

032'' 

16,2727 

0 0006 

1 

EXTEND 

0321 

REF 

70 

1 AST 

1419 

16,2730 

03  012 

1 

WANE 

CFAN12 

0 32  2 

RFF 

9 

LAST 

1419 

16,2731 

3 4 735 

I 

CAF 

NEGMAX 

0323 

R'^F 

4 

LAST 

1418 

16 ,2732 

55*634 

0 

TS 

P,  GTMT  TMR 

032A 

RFF 

4 

LAST 

1419 

16,2733 

1 267  5 

c 

TG,  F 

CFKPTIMR  +3 

0325 

RFF 

12 

L AST 

1293 

5 >’0  7 

OGIMB  ns 

EOLALS 

GCT1400 

eiTS  9 AND  10  (CF  CHANNEL  12). 

0326 

RFF 

4 

LAST 

1276 

5 0 20 

RCIM8 ITS 

EQUALS 

PRID6 

BITS  11  AMD  12  (OF  CHANNEL  12). 

fJ327 

REF 

23 

LAST 

1418 

16,2734 

4 1262 

1 

SHIPPAXS 

CS 

RCSFLAGS 

0325 

RFF 

38 

LAST 

1418 

16,2735 

7 4740 

1 

MASK 

BITIZ 

1325 

REF 

24 

LAST 

1419 

16,2736 

27' 262 

1 

ACS 

RCSFLAGS 

BIT  12  SET  TO  1. 

03  30 

RFF 

1 

16,2737 

1 3 6 30 

0 

TCF 

ORAXI S 

GE  TC  CPAX  IS  CR  TC  GTS  . 

A0331 

Y-Z  TRANSLAT  ION 

A0332 

I AFLT  : 

BITS  9- 

12  CF  CF31  (RPCM  TRANSLATICN  CCNTRCLFR) 

A0333 

OLTPLT  : 

NEXTR 

AC33A 

NFXTP 

IS  TFE 

CHANNEL  6 CCCE 

OF  JETS  FOP.  THE  DESIRED  TRANSLATICN. 

A0335 

IF  THERE  APE 

FATLUPFS  in  the  DESIREE  PCLICY,  THEN 

A0336 

( 1 ) 

FOR  DIAGONAL  TRANS: 

UNFAILEC  PAIR 

A033  7 

ALARM  (IF  NO  "A IR ) 

A0338 

( 2 ) 

FCP  FFIMCIPAL  TRANS: 

try  TC  TACK  (.IITH  CIAGGNAL  PAIRS 

AC33  9 

ALARM  (IF  riAC-CNAL  FAIRS  ARE  FAILED) 

03AC 

16 , 2740 

0 CC06 

1 

CFKVI SFZ 

EXTEND 

0341 

RFF 

9 

LAST 

1400 

16,274 ) 

OP  C3  1 

c 

REAP 

C HA  N3  1 

C3A2 

REF 

490 

LAST 

14  18 

16,2742 

4 0000 

.1 

CS 

A 

0343 

REF 

1 

16,2743 

7 36  17 

0 

MASK 

07400CCT 

034'^ 

16, 7744 

0 C<A06 

1 

eXTFNO 

0345 

REF 

1 

16,2745 

1 3014 

0 

ezF 

TSN'EXTP 

0346 

16, 2746 

0 C0C6 

1 

EXTFNC 

C347 

RFF 

42 

LAST 

1289 

16,2747 

7 4745 

1 

MP 

BIT7 

0348 

RFF 

49  1 

LAST 

1419 

16,2750 

50  0')0 

1 

INDEX 

A 

0349 

RFF 

1 

16,2751 

3 3 576 

c 

CA 

INDXYZ 

C35C 

RFF 

1 

16,2752 

55  ' 744 

0 

TS 

ROT  INDEX 

0351 

RFF 

28 

LAST 

1408 

16,2753 

3 6245 

1 

TRYLCRV 

CA 

SIX 

0352 

RFF 

1 

16,2754 

0 3 55  5 

1 

TC 

SELFC  TYZ 

0353 

Rff 

29 

1 AST 

1419 

16,2755 

4 6245 

0 

CS 

S IX 

0354 

RFF 

1 

16,2756 

6 17  4 3 

0 

AD 

NLMBEFT 

0355 

16,2757 

0 0006 

1 

EXTEND 

lA  19 
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I 

0 3 56 

0357 

0358 

0359 
F36r 

0361 

0362 

0363 
>364 
036  5 

0366 

0367 

0368 

0369 
93Y0 
0371 
037? 

0373 

0374 

0375 
G376 

0377 

0378 

0379 

0380 

0381 
038? 

0383 

0384 
A0385 

A0386 
AO’87 
A 7388 
A >389 
A0390 
0391 
039? 
0393 
03  94 

0395 

0396 

0397 

0398 

0399 

04cr 
0 4'  1 1 
040? 
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REF 

2 

LAST 

141  F 

16, 276C 

1 30  13 

1 

ezF 

T SNFXTP 

RFF 

25 

LAST 

1417 

16,2761 

4 4756 

0 

CS 

F IVE 

RFF 

2 

LAST 

1419 

16,2762 

6 1744 

1 

AD 

PCTINCEX 

16,2763 

0 000  6 

1 

EXTEND 

P-F 

1 

16 , 2764 

6 3:>02 

0 

eZMF 

ALTERYZ 

REF 

2 

LAST 

14  19 

16,2765 

4 17  4 3 

1 

CS 

NLNBEFT 

RFF 

32 

LAST 

1402 

16,2766 

6 4751 

0 

AD 

FCUR 

16,2767 

0 00O6 

1 

EXTEND 

RFF 

3 

LAST 

1420 

16, 277C 

6 3C13 

C 

PZVF 

tsnextf 

REF 

48 

LAST 

1308 

16,2771 

7 5 56  7 

0 

AECRTYZ 

TC 

ALARN 

16,2772 

0?T:1  1 

1 

CCT 

02001 

REF 

57 

LAST 

138  4 

16,2773 

3 4 7 5 3 

1 

CA 

8IT1 

RFF 

25 

LAST 

1419 

16 , 2774 

23'262 

0 

LXC  F 

RCSFLAGS 

16,2775 

C 0006 

1 

EXTEND 

16,2776 

06  '0  1 

0 

P XOR 

1 

RFF 

26 

LAST 

L42P 

16,2777 

5 5 ' 2 6 2 

1 

TS 

RCSFLAGS 

pff 

282 

LAST 

1416 

16, 300C 

3 4 7 5 5 

1 

CA. 

ZEFC 

REF 

4 

LAST 

1420 

16 , 300  1 

1 3T14 

0 

TCF 

TSNEXTP 

RFF 

58 

LA  FT 

142C 

16,3002 

3 4 7 53 

1 

ALTFR  YZ 

CA 

B ITl 

PFF 

27 

LAST 

1421’ 

16, 3003 

23'262 

0 

LXCH 

RCSFLAGS 

16,3004 

0 0006 

1 

EXTEND 

16,3005 

C6  CCl 

r, 

RXCR 

1 

REF 

28 

LAST 

14  2'’ 

16, 3006 

55'?62 

1 

TS 

RCSFLAGS 

RFF 

59 

LAST 

142G 

16,3C07 

7 4753 

0 

NAS  K 

6 ITl 

REF 

3 3 

LAST 

1420 

16, 3C1C 

6 4 7 ■=  1 

0 

AO 

FCLR 

REF 

3 

LAST 

1420 

16,3011 

2 7 '744 

0 

AOS 

ROT  INDEX 

REF 

1 

16,3C12 

1 2 753 

c 

TCF 

TRYUCRV 

RFF 

1 

16,3013 

3 174  1 

1 

CA 

PCLYTFNF 

RFF 

7 

LAST 

1403 

16,3014 

55'472 

0 

TSNFXTP 

TS 

NEXTP 

S7ATF  LOGIC 


CHECK  IN  ORDER: 

L PC  FH  AS  E 
PUSES 

CETENK  8 IT  15  CH31  ) 
GC  TC  FLFGENCY 


REF 

52 

LAST 

140  1 

16. 3015 

16.3016 

■3 

>1 

4 7 3 7 
0006 

C 

1 

CA 

EXTENC 

BIT13 

PFF 

10 

LAST 

14  19 

16, 3C  17 

C2 

’ 03  1 

1 

RAND 

CHAN31 

16, 3020 

0 

CO  16 

1 

EXTEND 

OFF 

1 

16,3C21 

1 

3’27 

0 

PZF 

manmccf 

REF 

38 

LAST 

14  17 

16, 3022 

3 

0 111 

0 

CA. 

CAPBCCLS 

REF 

2 

LAST 

903 

16,3023 

7 

4 74  3 

1 

NASK 

XGVINhlB 

RFF 

49  2 

LAST 

14  19 

16 , 3024 

1C 

COO 

r 

CCS 

A 

RFF 

1 

16,3025 

1 

3467 

c 

TCF 

DLRGENCY 

RPF 

I 

16,3026 

1 

3 071 

0 

TC  F 

DETENTCK 

RFF 

2 

LAST 

73C 

16,3027 

3 

4 73  5 

1 

NANRCCE  CA 

PUSES 

RFF 

39 

LAST 

1420 

16, 3030 

7 

0111 

1 

NA  SK 

DAPBOCL  S 
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INVERT  BIT  1 CF  RCSFLAGS. 


INVERT  EIT  1 OF  RCSFLAGS. 


IF  ON 

GO  TC  PLRC-ENCY 
MMMjR  FULSE  LOGIC 
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1403 

16, 30? 1 

0 CCC6 

1 

F X T E N C 

04->4 

REE 

2 

LAST 

1420 

16 , 3032 

1 307  1 

0 

ezF 

OFTENTCK 

04. )5 

REF 

283 

LAST 

1420 

1 6 , 3 03  3 

3 4755 

1 

CA 

ZERO 

1406 

RFF 

4 

LAST 

141  1 

16, T034 

55 ' 464 

1 

TS 

PFPRCR 

RC4''7 

MT  M ML*' 

IMPULSE  MCCE 

1408 

REF 

2 5 

LAST 

1411 

16,3035 

3 0032 

0 

CA 

CDUX 

04  op 

RFF 

2!1 

LAST 

1411 

16, 3036 

55  '635 

1 

TS 

COL  XD 

04  10 

RFF 

2 

LAST 

14P2 

16,3037 

1 1 ' 460 

0 

CCS 

CLCPM  IN 

0411 

PEF 

1 

16 , 3040 

1 3054 

1 

TCF 

CHECKF 

0412 

REF 

42 

LAST 

1409 

16,3041 

3 4 751 

0 

F IRFP 

CA 

B IT3 

0413 

16,3042 

0 CC06 

1 

EXTEND 

C4I4 

RTF 

1 1 

LAST 

1420 

16, 3043 

C2  03  1 

1 

RAND 

CHAN31 

0415 

1.6 , 3044 

0 0006 

1 

EXTEND 

0416 

PEF 

1 

16, 3C45 

1 3F64 

1 

P7F 

4XMI  N 

0417 

REF 

57 

LAST 

1409 

16,3046 

3 4750 

1 

CA 

RIT4 

0418 

16 ,3C47 

0 0006 

1 

EXTEND 

0419 

RFF 

12 

LAST 

1421 

16, 3C5C 

G2  031 

1 

RAND 

CHAN31 

042C 

16 ,30.51 

0 000  6 

1 

EXTFND 

0421 

RTF 

1 

16,3052 

1 3062 

1 

EZF 

-XMIN 

0422 

RFF 

1 

16, 3053 

1 3446 

0 

TCF 

JETSCFF 

0423 

16  ,3054 

C 0006 

1 

CHECKP 

EXTEND 

0424 

PEF 

13 

LAST 

1421 

16,31 55 

CO  C31 

0 

READ 

CHAN31 

0425 

REF 

493 

LAST 

1420 

16,3056 

4 0000 

0 

CS 

A 

0426 

REF 

e 

LAST 

1321 

16,3057 

7 5741 

1 

MASK 

0CT14 

1427 

REF 

Q 

LAST 

142  1 

1 6,3060 

5 5 ' 460 

0 

1 S 

OLDPMIN 

0426 

REE 

2 

LAST 

1421 

16,3061 

1 3446 

0 

TCF 

JETSCFF 

0429 

REF 

9 

LAST 

14--2 

16,?C62 

4 4363 

1 

- >MI  N 

CS 

TEN 

0430 

16, 3063 

1 3065 

0 

TCF 

42 

0431 

REF 

K 

LAST 

142  1 

16 , 3064 

3 4363 

0 

4 xw  IN 

CA 

TEN 

0432 

RFF 

4 

LAST 

140  1 

16, 3F65 

55' 524 

1 

TS 

T JF 

0433 

REF 

156 

LAST 

1412 

1 6,3066 

3 4753 

1 

CA 

ONE 

0434 

RFF 

4 

LAST 

1421 

16,3C67 

55 '460 

0 

TS 

CLDPMIN 

1435 

off 

1 

16, 3070 

1 3 3 54 

1 

TCF 

P JETSLEC 
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RT44?  THE  DIRECT  RATE  MrrE  AFFOPrS  IMMIFCIATF  CONTROL  HTHOUT  CVERSHCOT 
R0AA4  RATE  CFNTRCL  AND  ATTITUDE  hCLC. 

R044  5 


19:CS  AUG.  11  ,1S6S  LMCAF 


,023 


FACE  1A21 


LSFR' S PAGE  NO.  1 1 

E6  S4 

BRANCH  FCR  RATE  CCMMANC 

ANYTHING  LESS  THAN  lAMS.  CORRECTED 
IN  JET  SELECTICN  ROUTINE 

6 

1)  DIRECT  RATE  ANC  2)  PSEUDC-ALTC 
THE  PSEUCr-ALTC  MCDE  FRCVIDES  PRECISE 
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R0AA6  IN  niRFCT  RATE,  JETS  A»F  ^IRFC  WHEN  STICK  POSITICN  CHANGES  BY  A FIXED  NUMBER  CF  INCREMENTS  IN  CNE  CAP  CYCLE. 

PT448  THF  'EPFAKOUT  LEVEL'  IS  .6  n/c  FOR  LM-CNLY  AND  .3  0/S  FCR  CSM-CCCKEC.  THIS  LAR  NULLS  THE  RATE  ERRCR  TO  MTEIN 

ROASB  THE  • TARCFT  CEArPANC',  WFICF  ECUALS  THE  EREAKCUT  LEVEL. 

R0A91  IN  PSELCO-ALTO,  BCOY-FIX'O  BATE  AND  ATTITLCE  EPRCRS  ARE  SUPPLIEE  TC  TJETLAW,  NHlCh  EXERCISES  CONTROL. 

ROA93  CCNTPCL  SNITCHES  FRCM  DIRECT  RATE  TO  PSEUCO-ALTC  IF  THE  targFT  DB  IS  ACHIEVED  OR  IF  TIME  IN  (1)  EXCEEDS  A SEC. 
R0A59  IF  IMF  INITIAL  CCMMANC  DCFS  NCT  EXCEED  THE  BREAKCLT  LEVEL,  CCNTRCL  GCES  TO  PSELDO-ALTG  IMMEDIATELY. 

ROA57 

R0A58  SINCE  E-AXIS  CONTROL  IS  'EPAPATE  EROM  Q,R  AXES  CCNTRCL,  IT  IS  PCSSIELE  TC  USE  (1)  IN  P-AXIS  AND  (2)  IN  C,R  AXES, 

R0A6O  OR  VICE  VERSA.  THIS  ALIENS  A DEGREc  rp  ATTITUDE  FOLD  IN  UNCCNTROLLEC  AXES.  DUE  TO  U,V  CCNTRCL,  HCHEVER,  C AND 

R0A62  R AXES  ARE  COUPLED  ANC  MUST  USE  THE  SAME  CCNTRCL  LAV,. 

R 0 A 6 3 

RTA6A  HAND  CCNTROLLER  COMMANDS  AR-^  SCALFQ  BY  A L I N E A P / C UA D R A T 1 C IAW„  FOR  THE  LM-ALONE,  MAXIMUM  COMMANDED  RATES  ARE  2C 
RDA66  and  a C/S  IN  NORMAL  AND  FIND  SCALING:  HOWEVER,  STICK  SENSITIVITY  AT  ZERC  COUNTS  (CETAINEC  AT  A STICK  DEFLECTION 
R0A6E  CF  2 DEGREES  FRCM  THE  CNTEPED  POSITION)  IS  .5  CP  .1  C/S  PEP  CFGRFE.  NORMAL  ANC  FINR  SCALINGS  FOR  THE  CSM-CCCKEC 

R0A7O  CASE  IS  AUTOMATICALLY  SF T TO  1/n  THE  ABOVE  VALLES.  SCALING  IS  CFTEFMINEC  IN  ROUTINE  3. 

A0A72  ZEROFN-eL  ENABLES  COUNTERS  SC  TRFY  CAN  BE  READ  NEXT  TIME 

A0A7’  JLSTCUT  FIRST  CETECTIGN  OF  OUT  CF  CFTENT  (BY  CLPRCBIT) 

A0474 

ATA75 


0A76 

16,3071 

n 

0006 

1 

CETENTCK 

EXTEND 

TA77 

REF 

lA 

LAST 

1A2  1 

16,  ’-'72 

00  -IBI 

(• 

READ 

CHAN31 

0A78 

REF 

1 

16,  V173 

55' AA3 

1 

TS 

CH31TEMP 

0A79 

RTF 

50 

LAST 

lA  12 

16, 3C7A 

7 

A 73  5 

C 

MASK 

B 1T15 

CHECK  CUT-CF-CETENT  BIT. 

0A8O 

16, 3075 

p 

no  16 

1 

EXTEND 

OAPl 

RFF 

1 

16,3C76 

1 

3226 

0 

ezF 

RHCMCVEC 

BRANCH  IF  CUT  CF  DETENT. 

OA82 

REF 

1 

16, 3077 

3 

A7AQ 

c 

CAF 

CLRRCEI T 

IN  DETENT.  CHECK  THE  RATE  COMMAND  BIT. 

CAE3 

REG 

AG 

LAST 

1A2C 

16 ,31  )0 

7 

0111 

1 

MASK 

OAPBOOLS 

OAEA 

I6,31.'l 

C 

r.  10  6 

1 

EXTEND 

flA85 

RFF 

2 

L.VSI 

1A2' 

16,  3 1 '2 

1 

3A67 

BZF 

PLRGENCY 

BRANCH  IF  NCT  IN  FATE  CCMMANC  LAST  PASS. 

ROA  £6 

OA8  7 

REF 

32 

LAST 

1383 

16,3103 

•3 

A7A3 

c 

CA 

BTT9 

JUST  IN  CETENT7? 

0A88 

FEF 

29 

LAST 

1A20 

16,31  lA 

7 

1262 

1 

MASK 

RCSFLAGS 

0A89 

16,31  15 

0 

0006 

1 

EXTEND 

0A9O 

REE 

1 

16,3  1G6 

1 

3 120 

0 

BZF 

PLTH 

HA91 

RFE 

53 

LAST 

1A2( 

19,31  '7 

3 

A737 

0 

CAF 

B IT13 

CHECK  FCF  ATTITUDE  HCLC. 

0A92 

16,3  lie 

0 

0006 

1 

EXTEND 

DA93 

PEE 

15 

L AST 

1A22 

16,3111 

02 

' 03  1 

1 

RAND 

CHAN'31 

0A9A 

16,3112 

1 

0'ri6 

1 

EXTEND 

0A96 

REF 

1 

16, 3 1 1 3 

1 

3223 

c 

BZF 

RATECAMF 

ERANCH  IF  IN  ATTITUDE  HCLC. 

DA  96 

REF 

1 

16,  3 llA 

A 

501A 

0 

CS 

BITS9,11 

IN  AUTC. 

0A97 

REF 

30 

LAST 

1A22 

16,3115 

7 

1262 

1 

MASK 

RCSFLAGS 

(X-AX  IS  CVERR  IDE  ) 

9 AD  8 

RFF 

31 

LAST 

1A22 

16,^116 

C C 

'262 

1 

TS 

RCSFLAGS 

2EEC  CPEIT  (PIT  U)  ANC  JUST-IN  BIT  (91. 

0A99 

REF 

2 

LAST 

1A22 

16,3117 

1 

3223 

0 

TCF 

RATEOAMP 

050'“ 

REF 

? ? 

LAST 

1A22 

16, 3120 

3 

1262 

n 

PLTH 

CA 

PCSFLAGS 

05U1 

REF 

1 

16,3121 

7 

A7A2 

0 

MASK 

PBIT 

IN  attitude  HCLC. 

GE''2 

16,3122 

0 

0006 

1 

EXTEND 

0503 

16, 3 12R 

1 

312  5 

0 

BZF 

+ 2 

ERANCH  IF  P-RATE  CAMPING  IS  FINISHED. 

05CA 

RFF 

3 

LAST 

1 A22 

16, 312A 

1 

3223 

r> 

TCF 

RATEOAMP 

G/SP:  /SSSEf/BLE  REVISION  116  CF  AC-C  PROGRAM  LUMINAPV  6V  NASA  2C21112-C71 
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0505 

RFF 

1 

LAS''' 

1422 

16, 3 125 

2 126  2 

C 

CA 

RCSFLAGS 

0506 

REF 

1 

16, 3126 

7 474  1 

0 

MASK 

QRPT  T 

0507 

16,  U27 

C 0006 

1 

FXT  ENC 

0508 

REF 

1 

16,313C 

1 3 134 

r 

ezF 

RATEDCNE 

0509 

REF 

4 

LAST 

1422 

16,3131 

1 3223 

0 

TCF 

R ATEDAMP 

R0510 

0 511 

REF 

60 

LAST 

L42f> 

4 753 

1/lOSEC 

= 

B I T1 

0512 

RTF 

5 

LAST 

1361 

4771 

4CCYC 

= 

OCT  50 

0513 

16,3132 

74  7 77 

c 

PGR3I T 

CCT 

74777 

0514 

R'=F 

14 

LAST 

951 

5014 

eiT$9 , 11 

EQLALS 

EBANK5 

051'= 

16,3133 

00056 

1 

L INRATF 

CFG 

46 

R0516 

0517 

REF 

2 

LAST 

1422 

16,3134 

4 4 740 

1 

RATEDCNE 

rs 

OURPCBIT 

0518 

16,3135 

0 00 '14 

0 

INF  INT 

0519 

PEF 

41 

LAST 

1422 

16,3136 

7 Q 1 1 1 

1 

MASK 

OAPBCCLS 

052C 

42 

LAST 

1423 

16,3137 

54  111 

1 

TS 

DAPROOL  S 

R0521 

R FAC 

ecus  INTO 

enu 

DESIRED  REGISTERS 

0522 

REF 

54 

LAST 

1422 

16,3140 

3 4737 

0 

CAE 

BIT13 

0523 

16,3141 

0 0006 

1 

EXTENT 

0524 

PEF 

16 

LAST 

1422 

16,3142 

0 2 T’! 

1 

RAND 

CHAK31 

C525 

16 ,3143 

0 0 106 

1 

EXTEND 

0526 

16,3144 

1 215) 

1 

BZF 

+4 

0527 

REF 

26 

L AST 

142  1 

16, 3145 

2 0032 

c 

CA 

CDUX 

0528 

REF 

21 

LAST 

1421 

16,3  146 

55' 635 

1 

TS 

cruxo 

0529 

16,2141 

C 2152 

1 

TC 

+ 3 

0530 

REF 

54 

LAST 

1403 

16, ’150 

0 4674 

0 

TC 

I3NKCALL 

0531 

PEF 

1 1 

LAST 

1401 

16,3151 

40154 

0 

FCACP 

ZATTFRGR 

0532 

16,3152 

C 0CC3 

1 

RELINT 

0533 

REF 

3 

LAST 

1422 

16,3153 

1 3467 

0 

TCF 

PLRGENCY 

0 53-^ 

(3  f-  h 

LAST 

142  1 

16,3154 

5 5 * 6 ^ 

1 

TS 

PEFRCR 

0535 

OPF 

3 

LAST 

1423 

16, 3155 

3 4740 

0 

JLSTCLT 

CA 

OLRRCBIT 

0536 

REF 

43 

LAST 

1422 

16,3156 

2 6 111 

1 

ACS 

OAPBCGLS 

0 53  7 

REF 

284 

LAST 

1421 

16, 3157 

3 47  5 5 

1 

CA 

ZERO 

0538 

REF 

5 

LAST 

1414 

16,3160 

55 '446 

1 

TS 

D XFPRQR 

0539 

R‘=F 

6 

LAST 

1423 

16,3161 

5 5 * A4  7 

0 

TS 

CXERPCR  +1 

0540 

RFF 

4 

LAST 

1414 

16, 3162 

55*^50 

c 

TS 

DYEPRCR 

0541 

PFF 

s 

LAST 

1423 

16 ,3163 

55'451 

1 

TS 

OVERRCR  +1 

0542 

REF 

4 

LAST 

14  15 

16,3164 

c c 1 K p 

1 

TS 

T ZFRRCP 

QSA3 

RFF 

5 

LAST 

1423 

1 6 T 1 ^ - 

5 5 * 4 5 3 

c 

TS 

OZFRRCR  +1 

C544 

REF 

2 

LAST 

14  14 

16,3166 

55' 454 

1 

TS 

P LAST 

0 545 

REF 

2 

LAST 

14  1 ^ 

16,3167 

55*^55 

c 

TS 

GLAST 

REF 

2 

LAST 

1415 

16,3170 

55' 456 

0 

TS 

RLAST 

0547 

R'7F 

1 

16,3171 

54  04  2 

0 

TS 

G-PHCCTR 

0548 

REF 

1 

16, ’ 177 

54  044 

c 

T R 

R-PHCCTR 

0549 

REF 

1 

16,3173 

3 3132 

1 

r A 

PQRBTT 

055*^ 

Rcp 

34 

LAST 

1422 

16,3174 

7 1262 

1 

MASK 

RCSFLAGS 

0551 

REF 

35 

LAST 

1423 

16,3175 

55  ' 262 

1 

TS 

RC  SFLAGS 

19:09  AUG.  11,1969  LMCAF  .023  PAGE  1A23 
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EPANCP  IF  C,R  PATE  CAMPING  IS  FINISFEC. 


MANUAL  CCMPANC  ANC  DAMPING  CCMFLETEC  IN 
ALL  AXES. 


(X-AX  IS  CV  ERR  ICE  ) 


IMTIALIZATICN  - FIRST  MANUAL  PASS. 


BITS  10  ANC  11  OF  RCSFLAGS  ARE  0 


G«P: 
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0552 

RFF 

36 

1 AST 

1423 

16,3176 

4 1262 

1 

CS 

°CSFLAGS 

SET  * JLST-  IN  * BIT  TO  1 . 

0553 

REF 

33 

LAST 

1422 

16, 3177 

7 474  3 

1 

PASK 

BIT9 

055A 

RFF 

17 

LAST 

1424 

16,3200 

27*262 

1 

ACS 

PCSFLAGS 

0555 

REF 

1 

16,  :’2  1 1 

0 32C4 

1 

TC 

ZFPGEN6L 

05551 

16, 32  12 

0 0003 

1 

RELINT 

0556 

RFF 

3 

LAST 

1421 

16,32  13 

1 3446 

C 

TCF 

JETSCFF 

0557 

REF 

2 

LAST 

1423 

16,32''4 

22  044 

1 

ZEROENEL 

L XCH 

P-PHCCTR 

055E 

RFF 

2 

LAST 

1423 

16,3205 

3 10  4 2 

1 

CA 

Q-RHCCTR 

0559 

RFF 

1 

16,3  206 

53*463 

G 

CXCF 

SAVEhANC 

0560 

RFF 

235 

LAST 

1423 

16, 2207 

3 4755 

1 

CA 

ZERO 

C561 

R^F 

1 

16,3210 

54  043 

1 

TS 

P-RHCCTR 

0562 

REF 

O 

LAST 

1424 

16,3211 

54  C42 

C 

TS 

C-RHCCT  R 

0563 

RFF 

3 

LAST 

1424 

16, 3212 

54  044 

0 

TS 

R-RHCCTR 

C563C5 

16,3213 

0 0004 

0 

INF  I NT 

05631 

16,3214 

0 0CC6 

1 

EXTENC 

05632 

RFF 

c 

LAST 

1394 

16,3215 

23*265 

1 

CXCF 

C 13QSAV 

05632 

RTF 

9 

LAST 

1294 

16,3216 

0 6022 

1 

TC 

C13STALL 

0 564 

PEE 

1 

16,3217 

’ 36  2 3 

0 

CA 

8 I TSe  ,9 

C565 

16,3220 

0 0006 

1 

EXTEND 

0566 

RFF 

23 

LAST 

1394 

16, 3221 

05  C13 

0 

NCR 

CHAN13 

CCUNTERS  ZEROED  AND  ENABLED 

0567 

REF 

6 

LAST 

1424 

16, 3222 

0 1265 

1 

TC 

C 13QSA V 

0568 

RFF 

286 

1 AST 

1424 

16  , ’223 

3 4755 

1 

PATECAN  F 

CA 

ZERO 

0569 

REF 

2 

LAST 

1424 

16,3224 

54  04  3 

1 

TS 

P-PHCCTR 

057C 

RFF 

1 

16 ,3225 

1 3232 

0 

TCF 

RATERRQR 

0571 

P FF 

4 

LAST 

1423 

16, 3226 

3 4 740 

c 

RHC^C  VEC 

CA 

CCPPCEIT 

P CCNTFCL 

0572 

FEF 

44 

1 AST 

1423 

16, 3227 

7 0 111 

1 

MASK 

DAPBCCL  S 

C573 

16,3230 

0 CC06 

1 

extend 

0574 

REF 

1 

16,3231 

1 3154 

0 

ezF 

JLSTCLT  -1 

0575 

REF 

27 

LAST 

1423 

16, 3232 

3 0032 

0 

R ATERROR 

CA 

COIJX 

FINDCDUN  RECUIRES  TFAT  CDLXD=CDUX  DURING 

0 5 76 

R=F 

22 

LAST 

1423 

16,3233 

55*635 

1 

TS 

CCUXD 

X-AXIS  OVERRIDE 

0577 

RFF 

o 

LAST 

1424 

16, 3234 

K.  043 

1 

CCS 

F-f HCCTC 

C57fl 

16,3235 

1 324  ) 

0 

TCF 

+ 3 

0579 

16,3236 

1 3240 

0 

TCF 

+ 2 

0580 

16, 3237 

1 3240 

n 

TC  F 

+ 1 

0581 

16,3240 

6 OOOO 

1 

CnUBLE 

LINEAR/QLADRATIC  CCNTRCLLER  SCALING 

0 582 

16,3241 

6 CCOO 

i 

CCLPLE 

(SEE  explanation  in  q,r-axes  RCS 

0583 

REF 

1 

16,3242 

6 3133 

u 

AD 

LINRATF 

ALTDP  ILCT  ) 

0584 

16,3243 

0 0006 

1 

EXTEND 

0585 

REF 

4 

LAST 

1424 

16,3244 

7 C04  3 

1 

PP 

F-PHCCTP 

0586 

RFF 

278 

LAST 

1414 

16,3245 

3 nool 

0 

CA 

L 

0587 

] 6,3246 

0 000  6 

1 

EXTEND 

0588 

REF 

6 

LAST 

29  5 

16,3247 

7 1444 

0 

PP 

STI KSFN  S 

0589 

REF 

3 

LAST 

1423 

16 ,32511 

57  * 454- 

0 

XCF 

PL  AST 

0590 

16,3251 

4 CCOO 

r 

CC  P 

0591 

REF 

4 

LAST 

1424 

16, 3?52 

6 14  54 

0 

AD 

PLAST 

059? 

REF 

25 

LAST 

1416 

16, ’253 

55*  737 

1 

TS 

DAFTEPPl 

0593 

RFF 

2 

LAST 

1424 

16, 3254 

C 3 204 

1 

TC 

ZERCENEL 

INTERVAL.  ZERC  AND  ENABLE  ACA  COUNTERS. 
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05931 

0599 

REF 

c 

LAST 

1929 

16 . 3255 

16.3256 

0 

9 

0 1 13 
1959 

1 

1 

C595 

REF 

15 

1 AST 

1915 

16,3257 

6 

1921 

1 

0596 

RFF 

1 

16,3260 

c;  c 

:'927 

C 

0597 

REF 

26 

LAST 

1929 

16,3261 

1 1 

' 737 

1 

0590 

16, 3362 

1 

3265 

1 

05oq 

16,3263 

1 

3273 

r 

0600 

16, 3269 

1 

3265 

1 

OBOl 

RFF 

C 

lAST 

295 

16 , 3265 

6 

19  76 

0 

060? 

16, 3266 

0 

0 30  6 

1 

0693 

16,3267 

6 

3273 

1 

0699 

REF 

1 

16,327C 

3 

9 7 7 1 

1 

0605 

FEF 

2 

L AST 

1912 

16, 3271 

c c 

• 995 

1 

06C6 

RFF 

1 

16,3272 

0 

3 30  9 

0 

060  7 

RFF 

38 

LAST 

1929 

16,3273 

3 

1262 

0 

06  0 8 

PEF 

2 

lAST 

1922 

16, 3279 

7 

9792 

0 

0669 

16,3275 

C 

0006 

1 

061U 

16,3276 

1 

3^00 

n 

0611 

REF 

2 

lA  ST 

192  5 

16,3277 

0 

3309 

0 

0612 

PEF 

7 

LAST 

1923 

16,3300 

•3 

1996 

r 

0613 

PEF 

1 

16,3301 

5 5 

'752 

1 

0619 

REF 

6 

1 APT 

1923 

19,3302 

55 

' 969 

1 

0615 

P PF 

9 

LA  ST 

1923 

16, 3303 

0 

39  73 

1 

0616 

PFF 

2,8 

LAST 

1929 

16,3309 

3 

C03? 

0 

0617 

RPF 

22 

LA  'T 

1929 

16  ,3305 

55 

' 635 

1 

0618 

RFF 

287 

LAST 

1929 

16,3306 

3 

9 7 5 5 

! 

061  9 

RFF 

8 

LAST 

1925 

16 ,3.307 

5 5 

• 996 

1 

0620 

R pp 

9 

LAST 

1925 

16,33  1C 

c;  p 

'997 

C 

062! 

PFF 

7 

LAST 

1925 

16,3311 

t,  c 

•9  69 

1 

0622 

RPF 

2 

LAST 

1925 

16,3312 

11 

' 927 

0 

0623 

16,3313 

c 

3316 

c 

0639 

16,3319 

0 

3316 

0 

0635 

16,3315 

0 

3316 

(J 

062  6 

PEF 

1 

16,3316 

c; 

'737 

1 

C627 

REF 

1 

16,3317 

6 

1976 

0 

0628 

16,3320 

0 

0006 

1 

0629 

REF 

1 

16, 332  1 

6 

3^31 

0 

063C 

RPF 

3 

LAST 

1925 

16 , 3322 

3 

1 995 

0 

0631 

16, 3323 

0 

CCC6 

1 

0632 

REF 

2 

LAST 

1925 

19, 3329 

6 

3331 

0 

0633 

REF 

39 

lAST 

1925 

16,3325 

9 

1262 

1 

3639 

REF 

3 

LAST 

192  5 

16,3326 

7 

9792 

0 

0635 

RFF 

90 

LAST 

1925 

16,3327 

27 

' 262 

1 

0636 

16,3330 

1 

3 3 3 9 

1 

0637 

FEF 

9 

LAST 

1925 

16,3331 

9 

9 79  2 

c 

C63E 

RPF 

91 

LAST 

192P 

16 ,3332 

7 

1262 

1 

0639 

REF 

92 

LAST 

1925 

16,^333 

c c. 

■262 

1 

0690 

PEF 

3 

LAST 

192  5 

16, 3339 

9 

1927 
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-RATECe 
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eZMF 
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CA 
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TS 

TCP 

TC 
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CA 
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E7F 
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TC 
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CA 
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TS 
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TC 
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CA 
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CIRFCT  RATE  CCNTPCL. 

TS 
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CA 
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TS 

OXEP.PCR 

TS 
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TS 
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ZFFC  F-AXIS  FFRCP  FCP  PCDEl  FCAI  DISPLAY 

CCS 
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TC 
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TC 
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TC 

+ 1 

TS 

AESECCTF 

AT. 

TARGFTOB 
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IF  RATE  ERRCR  IS  LESS  THAN  DEADBAND, 

BZMF 
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CA 
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BZNF 

LAST 

CS 
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PBIT 
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CS 

PBIT 
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TS 
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CS 
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PF 
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1 
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A 

06AA 

PFF 

10 
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1 

TC 
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1 
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1 
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C 

NP 

25/32 

A CONTAINS  TJET 

SCALED  AT 

06A7 

P P F 

5 
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1A2  1 

16, 33A3 

55  ' 52A 

1 

TS 

T JP 

A. JET  TINE 

06A  e 

RFF 

2 

LAST 

1A25 

16 , 33AA 

3 1 737 

0 

CA 

A8SED0TP 

D6A9 

R FF 

2 

LAST 

13  1 

16,33A5 

6 1A75 

C 

An 

-2 JET( IN 

CCNFAPING  DELTA 

RATE  WITH 

0650 

16, 33A6 

0 0006 

1 

EXTEND 

06  5 1 

16,33A7 

6 3352 

0 

EZNE 

+ 3 

3652 

RFF 

30 

LAST 

lAlS 

16,3350 

3 62A5 

1 

CA 

SIX 

C6  53 

16 ,335  1 

1 3361 

1 

TCF 

+ ED 

065A 

REP 

6 

LAST 

1A26 

16,3352 

3 1 52A 

f 

CA 

TJF 

0655 

RFF 

7 
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1A26 

16,3353 
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1 
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T JP 
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TC  PJETSLEC  ROR  TWO 

JETS 
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PJUMPADR  FGR  P-A>15  SKIP 

(JTLST  CALL)  (SPALL  TJF) 


A0663 
AC66A 
A0665 
A 0666 
Anp67 
A0668 
A066S 
A0670 
AT671 


C672 
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1 

16,335A 

3 

A7A7 

1 

0673 

REF 

31 
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1328 

16,3355 
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C 1C  1 

C 
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RFF 

A95 

LAST 

1A26 

16,3356 

1C 
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0 
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157 
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1A2) 

16,3357 

3 
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1 
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3A 
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6 
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c 
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3 
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1 
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1 

0679 

PEP 
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1 
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8 
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16 ,336A 
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1 
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1 
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0 
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RFF 

A 
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1A2A 

16,3366 

1 
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''6E3 

16,3367 

1 
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0 
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RFF 

5 
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0 
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22 
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0 

0686 
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CA 
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F LAGWPD5 
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A 

CA 

CNF 

AD 
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TS 

NLNBEPT 

PJETSLEC  CA 
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L 
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TCF 

JETSCFF 

TCF 

+ 2 
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7L 
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PEF 
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1 

1 
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31 
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16,3376 

4 6245 

0 

0691 

REF 

4 

LAST 

1426 

16,3377 
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c 

0692 

16, 34  10 

0 C006 

1 
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16,3401 
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1 
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RFF 

95 
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1409 

16, 3402 

4 4 7 5 2 

1 

0695 

PEF 

35 

LAST 

1426 
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0 
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RFF 

2 

LAST- 

1 34 
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55*521 

1 
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2 
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1 

C698 
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2 
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1394 
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0 
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2 
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1426 
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1 
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1 

16,3410 
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0 
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1 
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2 

LAST 
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16,3412 
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1 
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0 
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P 
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3 
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5 
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16,3417 
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0 
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RFF 
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LAST 

1425 

16  ,3465 

57 ' 464 

0 

XCF 

PEPRCR 
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c 
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1 
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TC 
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CALCULATE  P-AXIS  ERRORS. 
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RFF 

12 
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1398 

16, 3470 
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0 

cs 

CYEGAFD 
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0753 

REF 

16 
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1425 

16,3471 

6 1421 

1 

AC 

nYFGAF 

SPS-e.ACKLP  NCCF. 
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4 
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1425 
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c 

TS 
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RFF 

RPF 

REF 
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2 
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16.3474 
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TS 
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ONF 
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8 
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1 
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0 
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PFF 

1 
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1 
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c 

ezF 

REACT  JET 
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0 

INF  TNT 

IF 
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RFF 
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U 

4674 

0 

TC 
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REF 

1 

16, 3502 

4 3 730 

1 

CADR 

SPSRCP 

0 764 

RFF 

11 
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1428 

1 6, 3504 

3 
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0 

CA 
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0 765 

16, 35C5 

C 
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1 

FXTFNO 

0766 

RPP 

1 

16, 3506 

1 

3445 

0 

BZF 

DKALT 

I F 

TJF  = ZERC,  CHANGE 

ACP  ESYST  . 

0767 

16,3507 

0 
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1 

RFL  INT 

0768 

PFF 

2 
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1421 

16, ’51C 

1 

3354 

1 

TCF 

FJETSLEC  -6 

SELECT  ACRBSYST  ANC 

LSE  Two  JETS 

0769 

REF 

2 89 

LAPT 

1428 

16,3511 

3 

4755 

1 

HFACTJET  CA 

ZERO 

C77C 

RTF 

1 

16,3512 

p 

5 ' 500 

1 

TS 

SFNSETYP 

0771 

16,3513 

c 

00(  4 

c 

INHINT 

♦ 
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R'-F 

57 

LAST 
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16,3514 

0 

4674 

0 

TC 
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1 
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1 
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0 
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1 
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RpF 

PEP 

1 

1 
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4 

6 

1741 
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r 

c 

cs 

An 

FIPEFCT 

-FCUROFG 

0777 

16,3521 

0 

0006 

1 

tXTFFD 

0778 

REF 

3 
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1428 

16,2522 

6 

2354 

c 

EZMF 

PJETSLEC 

0779 

RFF 
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LAST 

1428 

16,3523 

11 
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1 

CCS 

TJP 

0780 

16,3524 

1 

3 526 

1 

TCF 
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0781 

RPF 

6 
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1426 

16,3525 

1 

3446 

c 

TCF 

JETSCFF 
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! 

16,3526 

6 

3533 

1 

AO 
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16,2527 

C 
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1 

FXTEFC 

0784 

RFF 

4 

LAST 

1429 

16, 3530 

6 
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n 

BZMF 

PJETSLEC 

0785 

RFF 

22 
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16,3531 

■a 
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1 

CA 
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0786 

rff 

5 

LAST 
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16,2522 

1 
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1 

TCF 

PJETSLEC 
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1 
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-256 
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7 
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A0792 

THIS  SUBROUTINE 

SELECT  A SUBSET 

CF  THE  CES  IFFC  JETS 

WH  ICh  1-fiS  NC  FA  ILURE 

0793 

REF 

33 

PART 

1429 

16  ,3535 

3 6245 

1 

SELFCTP  CA 

S IX 

0794 

P F P 

1 

16,^536 

55 ' 742 

C 

TS 

TERPNUR 

0799 

RTF 

5 

LAST 

1427 

16, 3537 

51*743 

0 

INDEX 

NLNBEPT 

0796 

RFF 

1 

LAST 

16,3540 

3 3567 

0 

CA 

TYPEP 

0797 

P'=F 

6 

142  7 

16,3541 

51' 744 

1 

INDEX 

P C T I N C E X 

0798 

RFF 

1 

16,3542 

7 3 560 

0 

MASK 

JETSALL 

0799 

REF 

3 

LA  ST 

1427 

16,3543 

55'  741 

0 

TS 

FCLYTFMF 

0800 

REF 

6 

L AST 

21  2 

16, 3564 

7 126C 

0 

RASK 

CH6RA  SK 

C8P1 

REF 

496 

LAST 

1426 

1 6 ,3545 

10  TOO 

0 

CCS 

A 

0802 

16,3546 

1 3 55C 

f 

TCF 

+ 2 

0803 

REF 

407 

LAST 

1428 

16,3547 

0 00C2 

0 

3C 

Q 

06C4 

REF 

2 

LAST 

1430 

16.3550 

11 ’ 742 

0 

CCS 

TERPNUM 

0805 

16,3551 

1 3555 

G 

TCF 

+4 

OFOt, 

REF 

49 

LAST 

1420 

16, 3552 

0 5 56  7 

0 

TC 

ALARR 

0807 

16,3553 

02003 

0 

CCT 

0 200  3 

0808 

REF 

7 

LAST 

1429 

16  , ■’554 

1 3^1^* 

0 

TCP 

JETSCFF 

*«^<*«TCF  ALAFRJET 

C8C9 

REF 

6 

LAST 

1430 

16  ,3555 

55*743 

I 

SELFCTYZ  TS 

NUMBEPT 

C810 

RFF 

2 

LAST 

1427 

16,3556 

1 3 536 

c 

TCF 

SELECTP  +1 

0811 

PFF 

1 

16, P557 

1 2773 
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1665 

17 , 3252 

51*505 

0 

INDEX 

AXISCTR 

0679 

RFF 

13 

LAST 

1665 

17,3253 

55*525 

c 

TS 

T JU 

0680 

RFp 

51 

LAST 

1633 

17,3256 

0 5567 

0 

TC 

ALARR 

0681 

17,3255 

02  0(16 

1 

CCT 

0 2006 

068? 

Rpp 

■3 

L AST 

1663 

17, 3256 

1 3026 

1 

TCP 

NCRCTAT 

0683 

17 , 3257 

0011) 

1 

ALLJETS 

OCT 

OCllO 

0686 

17,3260 

00  )22 

1 

CCT 

00022 

0685 

17,3261 

0C206 

1 

CCT 

Or2o6 

06  86 

17,326? 

00061 

1 

GCT 

OC061 

0687 

17, 3263 

00125 

1 

TYPFPCLY 

CCT 

00125 

0688 

17,3266 

0)252 

1 

CCT 

CC252 

0689 

17,3265 

00166 

1 

CCT 

no  166 

0690 

17,3266 

0023  1 

1 

CCT 

00231 

0691 

17 ,3267 

00377 

1 

OCT 

OC377 

R0692 

THE 

FOLLH'nlNG 

RETS 

THE  INTERPLFT  FLIP- 

FLCP  AS  SCCN  AS 

PCSSIELE,  WF 

06  96 

RFF 

1 

17,3270 

3 3272 

0 

CLOSEOUT 

CA 

ADRRLFT 

C695 

REP 

1 

1.  7 , 3 2 7 1 

0 7757 

0 

TC 

MAKFRUPT 

0696 

REF 

1 

17,3272 

C 3 2 7 3 

1 

ACPRLFT 

ACRES 

END JASK 

0697 

RFF 

5 

LAST 

1618 

17, 3273 

5 3 * 756 

1 

PNDJASK 

DXCH 

n XPARUPT 

0698 

RFF 

1’ 

LAST 

161F 

17,3276 

52  Oil 

0 

CXCF 

ARUPT 

0699 

RFF 

2 

LAST 

161E 

17,3275 

53*756 

r 

DXCH 

DAPBCRPT 

07CC 

PPP 

6 

LAST 

161  8 

17,3276 

56  T 17 

1 

XCF 

BRLPT 

1S:CS  AUG.  11  ,1969  LMDAF  .023  PAGE 
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-L 

6 

13 

-V 

2 

9 

+ U 

5 

16 

+ v 

1 

10 

-X 

1 

5 

9 

13 

+ x 

2 

6 

1C 

16 

A 

2 

C 

10 

13 

8 

1 

6 

9 

16 

ALL 

1 

2 

c 

6 9 

1AA8 


ICP  PERMTS  A RETURN  TO  THE  INTERRUPTED  JCB 
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L Q,R-A>E5  RCS  AUTTPILCT 


0701 

0702 

REF 

R'=F 

416 

10 

LAST 

LAST 

1448 

1419 

17,3277 

17,3300 

22  C02 
3 4735 

0 

1 

LXCh 

CAF 

Q 

NFGMAX 

0703 

REF 

4 

LAST 

14ie 

17,33C1 

53' 760 

C 

CXCF 

DfiPZPUFT 

0704 

PTF 

2 

LAST 

1418 

17,3302 

52  0 16 

1 

DXCH 

ZRLPT 

07C5 

REF 

1 

17,3303 

1 5272 

1 

TCF 

NCCPSM 

0706 

7757 

BLCCK 

3 

0707 

REF 

5 

LAST 

1292 

6000 

SETLCC 

FFTAG6 

070R 

7757 

PANK 

J709 

RFF 

1 

rCLNT* 

$$/DAP 

071  f 

7757 

0 0006 

1 

MAKERUPT  EXTEND 

0711 

R'^F 

2 

LAST 

144f 

7760 

07  757 

c 

FCPL  FT 

MAKEPUPT 

1S;C<?  AUG.  11  ,196S  LMDAP 


02B  PAGE  lAAS 


USER'S  PAGE  NO.  IF  E6  SA 

NEGATIVE  OAPZPLPT  SIGNALS  JASK  IS  CVER. 
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L LAP  LSEP'S  PAGE  NC.  1 EO  S4 

ROOOl  PRCGRAW  CESCR IPT ION 

ROOO?  CESIGNEC  8Y : P.  f.  GGSR  ANC  P.  S.  WEISSMAN 

R0no3  CnOFO  ny:  S.  RFISSYAN  23  "^PBRIJAPY  1968 

R0OJ4  tjptLAW  is  CAILEC  AS  A SUPPHUTINF  WHEN  THE  LEP  IS  NCT  OnCKEO  ARC  THE  AUTCFILCT  IS  IN  THE  AUTEPATIC  GR 

R00C6  ATTI  TLDF-HCLO  MCOE  TC  CALGULATE  THE  J ET  - F IP  IN  G-T  IN  F (TJET)  RFQUIRED  FOR  THE  AMS  INOICATFO  BY  AXISCTR: 

RJ0'i8  -1  INDICATES  THP  °-AxI? 

ROOOO  <1.1  INGICATfS  TFE  L-4XIS 

RGOio  +1  indi:at<=s  tfp  Y-axis. 

R'lOll  thf  registers  e ahc  edot  contain  the  afprcpriate  attitlcf  frrcr  ant  errcr  rate  anc  sensetyp  shews  whether 

R0013  UN6A1  ahcED  CCUPLES  ARE  PREFERPEC.  tjetLAW  ALSO  USES  VAPIOLS  FUNCTICNS  OF  ACCELERATION  AND  DEACEANC  WHICH  ARE 

ROniE  COMPUTED  IN  THE  1/ACCCNT  SECTION  CF  1/ACCS  ANC  APE  STCRFD  IN  SUCH  AN  ORCER  THAT  THEY  CAN  BE  CONYENIENTLY 

R)P17  ACCESSFC  BY  INCEXIMG. 

ROOIB  THE  SIGN  OF  THF  PEQuIRFF  FCTATICN  IS  CARRIEC  THROUGH  TJETLAW  AS  ROTSENSE  AND  IS  FINALLY  APPLIED  TC  TJET  JLST 

P0D2'1  PREVIOUS  TO  ITS  STORAGE  IN  THF  LCCATICN  CCPR  E S P CN  C I N C-  TC  THE  AXIS  (TJF,  TJU  OF  T JV  ) . THE  NUMBER  OF  JETS  THAT 

ROn22  TJETLAW  ASSUMES  WILL  BE  U$PD  IS  INCICATEO  PY  TFE  SETTING  CF  HUMBERT  FCR  THE  U-  CR  V-AXIS.  TWC  JETS  ARE  ALWAYS 

'>0024  ASSURED  FDR  TH>"  P-AXIS  ALTFCLGH  FCUR  JETS  WILL  EE  FIFED  WFEN  FIREFCT  IS  MCRE  NEGATIVE  THAN  -4.C  CEGPEES 

R0026  (FIREFCT  IS  THF  OISTANCF  TO  A SWITCH  CURVE  IN  THE  PHASE  PLANE)  ANC  A LCNG  FIRINC  IS  CALLED  FOR. 

R0C28  IN  CPDEP  TC  AVOID  SCALING  C I F F ICIJ  LT I ES , SIMPLE  ALGORITHMS  TAGGED  RLFLAWI,  -2  AND  -3  ARE  RESCRTEC  TC  WHEN  THE 

R003O  Fppofj  aNC/OR  ERRC>R  RATf  4RP  LAPG  = . 

P3031  CALL  ING  SEQUENCF: 


R0032 

R003? 

OR 

TC 

TJET) AW 

(MUST 

e E 

IN 

JASK  ) 

R0034 

R00>5 

R0O36 

INHINT 

TC 

CACR 

IBNKC all 
T JFTl AW 

(MUST 

BE 

IN 

JASK  ) 

ROD  3 7 

RFL INT 

R0C38 

EXIT: 

RETURN  TO  0. 

R0039  I''FUT: 

R004C  FRCM  THE  CALLER:  E,  FCCT,  AXISCT=,  SENSETYP,  TJP,-U,-V. 

R004I  FROM  l/ACCONT:  48  FRASABLES  BEGINNING  AT  BLCCKTCF  (INCLUDING  FLAT,  ZCNE3LIM  ANC  ACCSWU,-V). 

R0043  CUTPUT: 

RCC44  TJF,-L  CR  -V,  NLNEERT  ( C A f T E I"  F5  ) , FIREfCT  (CAFTENF3). 

R1045  DEERIS: 

RO046  A,  L,  C,  E,  EDCT,  CAPTFWPl-6,  DAPTREGl-4. 

P0047  ALARM:  NONE 


004  8 

17,  3>  )4 

BANK 

17 

CC49 

REF  1 AST 

143  2 

17,2100 

SETLCC 

DAPS2 

TO  50 

17, 3304 

BANK 

0C51 

P=F  13  LAST 

1429 

F6, 1 524 

EBANK= 

TJF 

GAP:  ASSF^BLE  REVISION  116  CF  AGC  PROGRAM  LUMINARY  BY  NASA  202U12-C71  19:09  AUG.  11,1969  LMCAP  .023  PACE  1A51 


L 

I 

LAV. 

LSER  * S PAGE  NC.  2 E?  S4 

9052 

Rff 

1 

CFLNT* 

SS/DAPT J 

0053 

17, 3304 

0 0006 

1 

TJETLAi,!  EXTEND 

SAVE  G FCR  RETURN. 

005  6 

REF 

1 

17,3305 

23' 745 

0 

CXCH 

HCLCC 

R00  55 

SET 

INCFXFRS  TO  rCRRESPCNO  TC 

THF  AXIS 

ANT  TC  THE  SIGN 

CF  FDCT 

0C56 

REF 

29 

1 AST 

1448 

17 ,3306 

51 ' 505 

0 

INDEX 

AXISCTR 

AXISDIFF(-1)=NC  CF  LOCATICNS  EER  P ANC  L 

0CF7 

REF 

2 

LAST 

1439 

17,3307 

3 3 755 

c 

CAP 

AXISCIFF 

AX  ISC  IFF  (0  ) = C 

005  R 

DCF 

1 

17,3310 

5 5 • 7 4 6 

1 

TS 

ADRSOIF 1 

AXI  SC  IFF  ( + 1 ) = NC  CF  LCCATICNS  BET  V ANC  U 

0059 

PEE 

3 

LAST 

1442 

17,3311 

31 ' 427 

1 

CAE 

EECT 

IF  EDCT  NEGATIVE,  PICK  LP  SET  CF  CALCES 

0060 

17, 3212 

C CC06 

1 

EXTEND 

THAT  ALLCW  USE  CF  SA»*F  CCCING  AS  FOR 

006  1 

REF 

1 

17  ,33  13 

6 3 3 20 

0 

EZMF 

NEGFOCT 

FCSniVE  EDCT. 

0062 

REF 

2 

LAST 

14  5 1 

17,3314 

31 ■ 746 

0 

CAE 

ACRSCIFl 

SET  A SECOND  INDEXER  KHICH  MAY  BE 

0063 

RFF 

1 

17,3315 

55*744 

0 

IS 

ACRSDir2 

NCCIFIEC  EY  A CECISICN  FCR  MAX  JETS. 

0064 

REF 

1 

17,3316 

3 3757 

1 

CAP 

SENSOR 

FDR  POSITIVE  EDCT,  ROTSENSE  IS 

0065 

RFF 

1 

17,3317 

1 3 3 30 

0 

1CF 

SETSENSE 

TMTIALTZEC  POSITIVE. 

0066 

RFF 

9 

LAST 

1442 

17, 3320 

4 1752 

1 

NEGFOCT  CS 

E 

IN  CFDEP  FCR  NEG  EDCT  CASE  TG  USE  CCCING 

0067 

RFF 

10 

LAST 

14  51 

17,3321 

55 ' 752 

1 

TS 

F 

CF  POS  EDCT,  N*UST  MCOIFY  AS  FCLLCkS: 

0063 

pcF 

4 

LAST 

1451 

17, 2322 

4 1927 

c 

rs 

FDCT 

l.CCNFLENENT  E AND  ECCT. 

0069 

REF 

5 

LAST 

1451 

17,3323 

55  ’ 427 

0 

TS 

FDOT 

2.SEI  SENSE  CF  RGTATICN  TC  NEGATIVE 

0070 

REF 

63 

LAST 

143f 

17,  "324 

3 4 753 

1 

CAF 

e ITl 

(REVERSEC  LATER  IF  NECESSARY). 

0071 

REF 

3 

LAST 

1451 

17,3325 

27*746 

1 

ADS 

ADRSniF 1 

3. increment  INDEXERS  EY  ONE  SC  THAT 

0072 

REF 

2 

LAST 

145  1 

17,3326 

55 ’ 744 

0 

TS 

ADRSD IF2 

THF  PROPER  PARAMETERS  APE  ACCESSED. 

0073 

RFF 

2 

LAST 

1451 

17,3327 

4 3 7 57 

c 

CS. 

SFNSCR 

0074 

REF 

1 

17,3330 

55  *740 

1 

SFTSFNSE  TS 

RGTSENSE 

P.0O75 

TEST 

MAGNITUDE 

OF  F 

( ATT ITUDF 

ERRFR  , 

SINGLS-FREC ISICN, 

SCALED  AT  P I RAD  TANS  ): 

R0077 

IF  GREATER 

THAN'  (OR 

EQUAL  TO) 

PT/16  RADIANS,  GC  TO  THE  SINFLIFIED  TJET  RCUTINE. 

R0C79 

IF  LESS  TFAF  PI/16  RACTAAS. 

RESCALE  TO  Pl/4. 

0080 

REF 

1 1 

LAST 

145  1 

17, ’331 

31*752 

C 

CAE 

F 

PICK  UP  ATTITUDE  ERROR  FOP.  THIS  AXIS 

0C81 

17,3332 

0 0006 

1 

EXTEND 

0082 

REF 

5 1 

LAST 

1434 

17,3333 

7 4747 

0 

NF 

8 IT5 

SHIFT  RIGHT  TFN  BITS!  IF  A-PEGTSTER  IS 

0083 

REF 

5 17 

LAST 

144P 

17,3334 

1C  CCO 

o 

CCS 

A 

ZERC,  RESCALE  AND  TEST  ECOT. 

0084 

RFF 

1 

17,3335 

1 3717 

1 

TC  F 

RLFLAV.2 

0085 

REF 

1 

17,3336 

1 334U 

1 

TCF 

SCNLEE 

)0P6 

PFF 

1 

17,3337 

1 36  63 

0 

TCF 

RLFLAV-l 

CC87 

RFF 

57 

LAST 

1434 

17,3340 

3 4 73  7 

0 

SC  alee  CAF 

B IT13 

ERROR  IS  IN  L SCALED  AI  PI/16.  RESCAIE 

00°8 

17,3341 

C CC06 

1 

EXTEND 

IT  TC  FT/4  ANC  SAVE  IT. 

0C89 

DCF 

289 

LAST 

144  7 

IT, 2342 

7 CCOl 

1 

NP 

L 

CC90 

REF 

12 

LAST 

1451 

17,3343 

55  * 752 

1 

TS 

E 

R009  1 

TEST 

MAGNIFUOE 

OF  EDCT  (cpROR 

RATE  SCALED  AT  PI/4  o AD  I A N S / SEC C N C ) 

RO092 

I F CP 

EATEP 

THAN  (OP 

EQUAL  TC) 

Fl/32  RSCIANS/SECONO,  GO  TO 

THE  SIMFIIFIFC  TJET  RCLTINE. 

R3094 

TF  LESS  THAN  PI  /32  R AD I A A S / S EC CN D , THEN  RESCALE  TC  PI/32 

RAC  lANS/SFCCND  . 

0096 

REF 

6 

LAST 

1A5  1 

17, 3344 

31*427 

1 

CAE 

EDCT 

PICK  LF  SINGLE-FPECISICN  ERRCR-RATE 
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L IJFT  L/SV. 


0C97 

17,3395 

0 CCC6 

1 

EXTENC 

0098 

R'F 

58 

LAST 

192  1 

17,3396 

7 9750 

0 

Mp 

8IT9 

CC99 

17 , 3397 

0 C006 

1 

EXTEND 

0 1,1'. 

REF 

1 

1 7 , 3 35C' 

1 3 3 52 

1 

BZF 

SCALECCT 

0101 

REF 

1 

17,3351 

1 3725 

0 

Tf  F 

RLFLAV.3 

R0102 

'^INEI.AW  STARTS 

HERP 

0113 

REF 

7 

LAST 

195  1 

17,3352 

23  '927 

1 

SCALFDCT 

L XCH 

FCCT 

0109 

RFF 

8 

LAST 

1952 

17,3353 

31  >927 

1 

CAF 

EDCT 

01?5 

17,3359 

r.  CCC6 

1 

EXTENC 

11  16 

17, 3355 

7 C'1C0 

0 

SQUARE 

0107 

17, 3356 

0 0006 

1 

EXTENC 

0108 

REF 

58 

LAST 

19  5 1 

17,3357 

7 9 73  7 

1 

R P 

BTT13 

J1  19 

RFF 

1 

1C,  3 36.0 

55  ' 737 

1 

TS 

FDHTSQ 

0110 

RFF 

1 3 

LAST 

195  1 

17,3361 

1 1 ' 752 

1 

ERRTEST 

CCS 

F 

0111 

1 7,  3 36  2 

1 3 3 6 5 

C 

TCF 

+ 3 

0112 

17,3363 

1 3365 

■0 

TCP 

+ 2 

0112S 

17, 336A 

1 3 3 6 5 

c 

TCF 

+ 1 

0113 

ocp 

1 

17, 3365 

6 3 7 60 

0 

AD 

-30EG 

CL19 

17,3366 

0 0 006 

1 

EXTEND 

0115 

RFF 

9 

LAST 

1951 

17,3167 

5 17  9 6 

c 

INDEX 

ACRSCTFl 

0116 

REF 

1 

17, 337C 

6 1 '6C  1 

1 

SU 

F IREDB 

0 117 

17,3371 

C 0006 

1 

EXTENC 

0118 

REF 

1 

17,^372 

6 3377 

1 

BZMF 

SENSTEST 

0119 

RFF 

101 

LAST 

1 99  5 

17 ,3173 

3 9752 

0 

M AXJ  ETS 

CAF 

TkO 

0120 

REF 

“3 

LAST 

1951 

17,3379 

27'  799 

0 

ACS 

ACPSCIF2 

>1121 

RFF 

99 

L AST 

1995 

17,3375 

3 9 75  1 

c 

CAF 

FCLR 

0122 

RFF 

1 

17,3376 

1 3902 

0 

TCF 

T JCALC 

1123 

REF 

5 

LAST 

1999 

17, 3377 

11' 500 

1 

SENSTEST 

CCS 

SENSETY  F 

0129 

RFF 

2 

LAST 

1952 

17,3900 

1 3 90  2 

0 

TCF 

TJCALC 

0125 

RFF 

1 

17 , 3901 

1 3373 

1 

TCF 

MAXJETS 

0126 

REF 

17 

LAST 

199E 

17, 3902 

5 5 ' 793 

1 

T JCALC 

TS 

NLMBFPT 

P0127 

8E0INMNG 

; CF  tjft  calculaticns; 

0 128 

RFF 

2 

LAST 

19  52 

17,3903 

9 1737 

1 

CS 

EDOTSC 

0129 

17, 3909 

0 0006 

1 

EXTEND 

C13C 

REF 

9 

LAST 

1952 

17,3905 

5 1799 

1 

INDEX 

ACRSC  IF2 

0 131 

RFF 

8 

LAST 

135 

17,3906 

7 1567 

0 

MP 

1 /ANETl 

0132 

RFF 

5 

LAST 

1952 

17, 3907 

5 1 ' 796 

n 

TNDF  X 

ADPSDIF 1 

0 133 

RFF 

2 

LAST 

1952 

17,3910 

6 1601 

1 

AC 

F IPECE 

0 139 

17,3911 

0 cn  + 6 

1 

EXTEND 

0135 

RFF 

19 

LAST 

1952 

17,3912 

61 ' 752 

0 

SU 

E 

0136 

RFF 

2 

LAST 

1929 

17,3413 

5 5 ' 7 9 1 

c 

TS 

FIPEFCT 

0137 

17,3919 

C 0006 

I 

EXTEND 

C13P 

RFF 

1 

17  ,3915 

6 3575 

0 

eZMF 

ZON 1, 2, 3 

0139 

RFF 

6 

LAST 

1952 

17,3916 

51  ' 796 

c 

Z0NE9  ,5 

INDEX 

ADRSDIFl 
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LS'I-R'S  FAGP  NC.  3 E6  S4 

FCR  THIS  AX IS= 

shift  right  eleven  bits,  if  the  a-rec-  is 

ZERO,  THEN  RESCALE  AND  LSE  FINELAV,. 


ECGT  IS  SCALEE  AT  FI/32  R A C I AN S / S ECCNC  . 
CCPPUTE  (EDCT)(EnCT) 

FRCDIC7  SCALEE  AT  PI(2)/?(10)  FAC/SEC. 

SHIFT  RIGHT  Tt«n  BITS  TO  RESCALE  ECOISQ 
TC  FI  (2 ) /2 ( 8)  R AD(2  ) /SEC  (2  ) . 

CGES  BIG  ERfiCR  (THREE  CEG  BEYOND  ThE 
CEACeANE)  RECUIRE  RAXIRUM  JETS? 


IF  NCT:  ARE  UNBALANCED  JETS  PPEFERREOI 
IF  yes  : INCPERENT  ACCFESS  LECATCR  ANC 
SET  SNITCH  FOR  JET  SELECT  LCGTC  TC  9. 
(ALViAYS  EC  THIS  FCR  F-AXIS) 

CCES  TRANSLATICN  PREFER  MIN  JETS. 

YES.  LSE  RIN-JET  PARARETERS. 

NO.  GET  max-jet  FARAMETfrS. 

SET  TE  +0,1,9  FCR  (U,V-AXES)  JET  SELECT. 


SCALEE  AT  FI(2)/2(E). 


.5/ACC  SCALED  «T  2(6)/PI  S EC ( 2 ) /R AO  I AN . 

cfaebanc  scaled  at  Pi/i  radian. 

ATTITlDE  ERRCR  SCALED  AT  FI/9  FACIAN. 
-E-.5  (EECTSG) /ACC-CP  AT  PI/9  RADIAN. 


GIP:  AS?F«BLE  REVISION  Ufc  CF  flGC  FRCGBi*'  LLPIN4PV  E>  SA  2021112-071  19:09  AUG.  11,1969  LMDAP  .022  PAGE  1AE3 


L 

ClAO 

1141 

7,1  ET 
REF 

LAW 

1 

17,3417 

17,3420 

31 

C 

' 573 
0006 

1 

1 

CAF 

EXTEAD 

1/ACCAST 

USER*  S FACE  AC.  4 E6  S4 

.5/ACC  SCALED  AT  2(6)/FI  WHERE 
ACC  = MAXIAAIA,  ACS-1. 

0142 

REF 

3 

1 AST 

1452 

17 ,342 1 

7 

1 737 

1 

MP 

EDOTSO 

SCALED  AT  PI/2(8). 

0143 

RFF 

15 

LAST 

14  52 

17,3422 

6 

1 752 

0 

AC 

F 

SCALFC  AT  DI/4 

0144 

RFF 

7 

LA'T 

1452 

17,3423 

51 

•746 

0 

INDEX 

AORSDIFl 

0145 

ocp 

1 

17  ,3424 

6 

160  3 

0 

AD 

CDASTDB 

SCALFC  AT  FI/4  POS.  FCR  AEG.  INTERCEPT. 

0 146 

17,3425 

C 

0006 

1 

EXTEAD 

TEST  E + .5 ( ECOTSQ  l/ACC+CB  AT  PI/4  RADIAN. 

0147 

Q^F 

1 

17, 3426 

6 

3 46  1 

1 

BZPF 

ZCAE5 

IF  FUACTICN  NEGATIVE,  FINE  TJET. 

AC  14P 

IF  FUNCTION  PCSITIVF,  IN  ZONE  4. 

R0149 

ZONE  4 

I S THE  coast  R 0 G ION. 

HOWE VFR , 

IF  the  jets  are 

CN  AND  DRIVING 

TCWAPC 

ROIEI 

A.  IFE  AXIS  WITFIN  + rR  - 

(CB  + 

FLAT)  FOR  CPIFTINC 

FL  IC-FT  , OR 

RO  1 52 

P.  TFF  LSUAL  7ARGFT  PAR-'SCLA 

FCR 

FCWEREC  FLIGFT 

R0153 

TFEN 

TFE 

thrusters 

/IDF  KFRT  OF 

k • 

0154 

ore 

30 

last 

145  1 

17,3427 

51 

' 505 

Z0NE4 

INDEX 

AX  ISCTR 

IS  THE  CURRENT  VALUE  IN  TJET  NCN-ZERC 

0 155 

R '"F 

1 

17, 3430 

4 

1525 

0 

f S 

T JETU 

WITH  SENSE  ODPOSITE  TO  EDGT, 

0156 

17,3431 

0 

0006 

1 

extend 

(T.E.,  ARE  JETS  CN  AND  FIRING  TCWARC 

0 157 

RFF 

2 

LAST 

145  1 

17,3432 

7 

1 740 

1 

AF 

RCTSENSE 

THF  DESIRABLE  STATE  1 . 

0154 

17,3433 

Q 

000  6 

1 

EXTEAD 

015  9 

RFF 

1 

17 ,3434 

6 

3455 

0 

BZMF 

COASTT J 

NO.  CCAST. 

J160 

RFF 

1 

17, 3435 

1 1 

, c K 5 

1 

JETSCA 

CCS 

FIAT 

YFS.  IS  THIS  DRIFTING  CR  POWEPEO  FLIGHTI 

0161 

RFF 

1 

17, 3436 

1 

3447 

1 

TCF 

DRIFT/CN 

drifting,  gc  aakf  further  test. 

0162 

RFF 

7 

LAST 

1452 

17,3437 

4 

1 741 

0 

cs 

F TPEFCT 

POWERED  (OR  ULLAGE).  CAN  TARGET  FARABCLA 

;)  1 6 3 

REF 

8 

LAST 

1453 

17,3440 

51 

' 746 

r 

INDEX 

ACRSniFl 

EE  REACHED  FRCM  THIS  POINT  IN  THE 

0164 

RFF 

1 

17,3441 

6 

16'15 

0 

AC 

AXISDIST 

PHASE  FLANEI 

0165 

17,3442 

0 

00  ’6 

1 

EXTEND 

0166 

RFF 

2 

LAST 

1453 

17, ’4^3 

6 

3455 

c 

BZMF 

CCASTT J 

NC.  SET  TJET  = 0. 

0167 

REF 

1 

17,3444 

'1 

3561 

0 

TC 

Z 12  3COM P 

VPS.  CAICULATF  TJET  AS  THCLGH  IN  ZCAE  1 

0168 

RRF 

4 

LAST 

14  53 

17,3445 

31 

' 741 

1 

CAE 

fipffct 

AFTER  CONFUTING  THE  REGLIRED 

0169 

RFF 

1 

17,3446 

1 

3 6 15 

1 

TC  F 

ZCNEl 

PAPAHETPRS. 

0170 

RFF 

Q 

LAST 

1453 

17,3447 

51 

' 746 

Q 

cpift/ca 

INDEX 

ACPSCIFI 

CAN  TAPCPT  STRIP  CF  AXIS  EE  PEACHED  FRCM 

n n 

RFF 

a 

LAST 

1452 

17, 3450 

4 

1601 

0 

CS 

FIRECE 

This  PCTNT  IN  TFF  PEASE  PLANE! 

0172 

17,3451 

6 

00<>) 

1 

CCUBLF 

0173 

REF 

c 

LAST 

14  5 3 

17,3452 

6 

1741 

1 

AC 

F IPEFCT 

0174 

17, 3453 

/> 

0006 

1 

EXTEND 

Cl  75 

17,3454 

6 

3457 

1 

BZMF 

+ 3 

0176 

REF 

30  1 

LAST 

1 44  5 

17,3455 

3 

4 7 5 5 

1 

CCASTT J 

CAF 

ZERO 

NC.  SET  TJET  = 0. 

01  77 

RFF 

1 

17. 3456 

1 

3521 

0 

TCF 

RFTUPNTJ 

0178 

RTF 

2 

1 AST 

1453 

1 7 ,3457 

0 

3561 

c 

TO 

Z1  23CCMP 

VFS.  calculate  TJFT  as  THCLGH  IN  ZONE  2 

■1179 

RFF 

1 

17 , 3 4 6U 

1 

36i;2 

1 

TCF 

ZQAE2  ,3 

CP  3 AFTER  CCMPUTINC  PEGUIREC  VALUES. 

01  eo 

RRF 

290 

1 AST 

1451 

17,3461 

54 

IJI 

1 

ZCNF5 

TS 

1 

TEMFCRARILY  STORE  FUNCTION  IN  1. 

0181 

RFF 

7 

LAST 

145’ 

17,3462 

1 1 

•740 

1 

res 

RFTSFASE 

MODIFY  ACRSCIF?  FOR  ACCESSING  1/AAET2 

018? 

17, 3463 

1 

3467 

0 

TCF 

<■4 

AAC  ACCFCTZ5,  WEIGH  MUST  EE  PICKED  UP 

0183 

RC-F 

22 

LAST 

1394 

17,3464 

0 

5675 

r 

TC 

CCSHCLE 

FRCM  the  next  lower  REGISTER  IF  THE 
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L 

TJFT 

LAFi 

LSE-F'SPfGENO.  5 E6S4 

0184 

9FF 

112 

LAST 

1452 

17, 3465 

4 4 7 52 

1 

CS 

Twr 

(ACTUALl  ERRCR  RATE  IS  NEGATIVE. 

0185 

RFF 

R 

LAST 

145  2 

1 7,3466 

27' 744 

0 

ACS 

ACPSC  1F2 

3186 

RFF 

29  1 

1 AST 

14  53 

17,3467 

3f  00  1 

0 

CAE 

L 

tUE7 

17,3470 

0 0006 

1 

EXTEND 

01  88 

R9F 

6 

LAST 

1454 

1 7,347  1 

5 1744 

1 

INDEX 

ACPSC  IF2 

TTCAXIS  AND  HH  ARE  THE  PARAMETERS  UPON 

0189 

RFF 

1 

17,3472 

7 1576 

c 

MR 

ACFFCTZS 

NHICH  the  AFRRCXIMATICNS  TC  TJET  ARE 

C19r 

17,3473 

20  CCl 

1 

CDCUEL 

BASEC. 

1191 

17,3474 

20  COl 

1 

CnCLBL 

0192 

RFF 

1 

1 7, 3478 

53'750 

0 

Dxr  h 

HH 

CDLBLE  PRECISICN  H SCALED  AT  8 SEC(2). 

0193 

RFF 

7 

LAST 

1454 

1 7,3476 

51 ' 744 

1 

INDEX 

ACPSC  IF? 

0194 

RFF 

2 

LAST 

1439 

17, 3477 

31 ' 57Q 

1 

CAE 

1 /ANET2 

SCALEC  AT  2(71/RI  SFC(2I/RAC. 

C195 

17,3500 

0 000  6 

1 

EXTEND 

0196 

REF 

9 

LAST 

1452 

1 7,35C1 

7 1427 

c 

NP 

ECOT 

SCALEC  AT  FI/215) 

0197 

RFF 

1 

17,3512 

55  ' 742 

0 

T S 

TTCAXI S 

SCALEC  AT  4 SEC. 

R019P 

7F  ST 

FHETHFR  TJET  GREATER  TFAA 

■ 51  MSEC. 

0199 

1 7, 35F2 

C CC06 

1 

EXTEND 

020fl 

REF 

1 

17,  35  14 

7 3767 

0 

MP 

-.05AT2 

H - .C5  TTCAXIS  - .00125  G.T.  ZEPC 

0201 

rff 

2 

LAST 

17,3505 

6 1747 

1 

AC 

HF 

( SCALEC  AT  6 SEC( 2)  ) . 

020? 

RFF 

9 

LAST 

17,3506 

6 7 7 5 1 

0 

AD 

NEC-2 

C2^3 

17,3507 

n 0006 

1 

EXTEND 

0294 

9 FF 

1 

17,351C 

6 3 536 

1 

EZNF 

FCFMULAl 

R02  i5 

TFST 

FFFTFER  TJET  GREATER  THAN 

: 150  msec 

C2C6 

REF 

2 

LAST 

1454 

17,3511 

31 ■ 742 

1 

CAE 

TTCAX IS 

02C7 

17,3512 

c ccce 

1 

EXTEND 

02'i8 

RFF 

1 

1 7, 3513 

7 3770 

0 

MP 

15AT2 

F - .15  TTCAXIS  - .01125  G.T.  ZEPC 

0209 

RFF 

*3 

LAST 

1454 

17,3514 

6 174  7 

1 

AD 

HF 

(SCAL9C  AT  e SEC( 21  ) 

0210 

PF  F 

1 

17,3515 

6 3 76  1 

1 

AD 

- . C 1 1 2 A 8 

0211 

17,3516 

.1  0006 

1 

EXTEND 

0212 

REF 

1 

17,3517 

6 3^46 

c 

EZMF 

FCPMULA? 

R021  3 

IF  TJFT  GREATER  THAN 

156  msec, 

ASSIGN 

1 IT  VALLE 

CF  25C  MSEC,  SINCE  THIS 

R021  4 

I S 

ENCLGH  T(1 

ASSURF 

NT  SKIP 

NEXT  CSF 

(ion  M S E C 1 . 

0215 

REF 

3 1 

LAST 

1326 

17, 352C 

3 4 74  1 

1 

FLLLTINF  CAE 

BIT!  1 

250  MSEC  SCAl  EC  AT  4 SEC. 

P0216 

RETURN  TC 

‘ CALLING  FRCGPAM  WITH 

JET  TIME 

SCALEC 

AS  TIME6 

AND  SIGNED. 

0217 

17,3521 

C C0C6 

1 

RETURNTJ  EXTFNC 

ALL  BRANCHES  TERMINATE  HERE  F^ITF  TJET 

0218 

REF 

4 

LAST 

1453 

17,3522 

7 1740 

1 

MP 

RCTSENSE 

(SCALFC  AT  4 SECl  IN  TFE  ACCUMULATOR. 

0219 

RFF 

31 

LAST 

1453 

17 ,3523 

51 ' 5C5 

0 

INDEX 

AXISCTR 

POTSENSF  APPLIES  SIGN  AND  CHANGES  SCALE. 

0220 

RFF 

2 

LAST 

1453 

17,3524 

C C , C ^ c 

r 

^ s 

T JETU 

0221 

17, 3525 

C 0006 

1 

EXTEND 

0222 

rff 

32 

LAST 

14 

17,3526 

5 1505 

0 

INDEX 

AX  ISCTR 

0223 

REF 

2 

LAST 
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17,3527 

7 1547 

1 

MR 

ACr.SNL 

SET  SWITCF  ECR  JET  SELECT  IF  RCTATICN  IS 

0224 
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1454 

I"'  ,3530 
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0 

CAE 
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17,3531 

C C0C6 

1 

EXT  END 

IN  A SENSE  for  which  1/ACCS  FAS  FCRCEO 
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17,3532 
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0227 
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PEF 

RFF 
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1452 

1452 

17.3533 

17. 3534 
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CAF 

ts 

FCUR 
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RFF 
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LAST 

1451 

17  ,3535 

J 1745 
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TC 

HCLOQ 

RETURN  VIA  SAVED  Q. 
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TJET 
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TTOAM  S) 
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0231 

RFF 

1 

17,3536 

4 3766 

1 
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CS 
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.C25  SEC  scaled  AT  4. 

0232 

RRF 

Q 

LAST 

14  54 

17,3537 

6 1742 

1 

AC 

TTCAX IS 

SCALEC  at  4 SECONDS. 

0233 

PPP 

4 

LAST 

14  54 

12,3540 

53  • 75C 

c 

rxch 

HH 

STORE  CFNCAINATCR  IN  FIRST  ViCRC  OF  H, 

0234 

1 7 ,3541 
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1 

F XT  END 
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RFF 
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1 4 5 E 

17,3542 
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c 
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HF 

CP  H ANC  CIVICE  BY  C ENC"  INATCR . 
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17, 3543 
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1 

EXTEND 

0237 

RFF 

83 
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1413 

17,3544 

7 4736 

0 

NP 

B 1T14 

RESCALE  TJFT  FROM  2 TC  LSLAL  4 SEC. 

0238 

R'^F 

1 

17,3545 

1 3656 

0 

TC  F 

CHKMINT  J 

CHECK  THAT  TJFT  IS  NOT  LESS  THAN  MIMMLM 

R0239 

TJFT 

= ( F 3 

• .003  75  l/l”  .1  + 

TTCAX  IS  ) 

FOR  TJET 

■ GREATER  THAN  5C  MSEC. 

02  40 

1 7,3546 

0 0006 

1 

FCPRULA2 

EXTENT 

0241 

REF 

1 

17,3547 

3 3772 

0 

DCA 

. 003  7 5A\8 

.00375  SEC  (2  ) SCALEC  «T  8 . 

0242 

RFF 

6 

LAST 

14  5.5 

17 ,3550 

21 • 750 

c 

CAS 

HH  ] 

STORE  NLNERATCRIN  CF  F,  which  NEED  ACT 

A0243 

EE  FRESERVEC. 

0244 

PFF 

4 

LAST 

1455 

17,3551 

31  '742 

1 

CAE 

TTCAXIS 

SCALEC  AT  4 SEC. 

0245 

RER 

1 

17,3552 

6 376? 

1 

AD 

. 1AT4 

0.1  SEC  SCALEC  AT  4. 

0246 

RPF 

7 

LAST 

14  55 

17,3553 

53 ' 75P 

c 

CXCH 

HH 

STCPE  CEACMNATCP  IN  FIRST  WOR  C OF  F, 

0247 

17,3554 

0 0006 

1 

EXTEND 

WHICH  AEEC  ACT  BF  PRESEFVEC.  PICK  UP 

0248 

RFF 

P 

LAST 

1455 

17,3555 

11 ' 747 

0 

CV 

HH 

CP  NUMFRMOR  and  DIVIDE  BY  CENGMIAATCR 

0249 

17, 3556 

C 0006 

3 

FXTENC 

0250 

PRF 

84 

LAST 

1455 

17,3557 

7 4736 

0 

MP 

P IT14 

RRSCALE  TJET  FPCM  2 TC  LSLAL  4 SEC. 

0251 

REF 

2 

LAST 

1453 

17,3560 

1 3 521 

c 

TCF 

PETUFNT  J 

EAC  SLERCUT  INE. 

R0252 

SLPRGUTIMZEG 

CONFUTATICMS  PECUIREC 

FOR 

ALL  ENTRIES  INTO  CGDING  FCR  ZCNE 

S 1,  2 , ANC  3. 

R0254 

REACHEC 

BY  TC 

FRCA  : 

S FflMS  lA  TJETLAV,. 
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RpF 

5 

L AST 

14  54 

17,356  1 

4 1 740 

1 

Z 123CCNF 

CS 

RCTSENSF 

LSEC  lA  PETURATJ  SECTICN  TO  RESCALE  TJET 

0256 

REF 

6 

LAST 

1455 

17,3562 

55 '740 

1 

TS 

ROTSENSE 

AS  TIME6  AND  GIVE  IT  FPCFEP  SIGN. 

025  7 

RFF 

10 

LAST 

14  54 

17,3563 

31 ' 427 

1 

CAE 

FCPT 

SCALEC  AT  PT/2(5)  RAC/SEC. 

0258 

17, 3564 

0 0006 

1 

EXTEND 

0259 

REF 

8 

LAST 

1454 

1 7 ,3565 

5 1 744 

1 

INDEX 

ACRSD  IF2 

0260 

RPF 

9 

LAST 

1452 

17,3566 

7 1567 

0 

MP 

1/ANETl 

SCALEC  AT  2(7)AP1  SEf(2)/PAD. 

0261 

RTF 

5 

LAST 

1455 

1 7,3567 

55 ' 742 

u 

TS 

TTCAXl S 

STORE  TINE-TC-AXIS  SCALED  AT  4 SECCNCS. 

0262 

REF 

1 

17,3570 
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1 

AC 
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0263 

17,3571 

C 000  6 

1 

EXTEND 
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0264 

17,3572 
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1 

BZ.M  F 

+ 2 
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RFF 
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1 

TCF 

FULLT IME 

NO.  FIRE  JET',  DC  MOT  CALCLLATE  TJET. 
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17, 3574 
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0 

RFTLRN 

YES.  GC  CN  TC  FIND  TJET 

C267 

REF 

3 

LAST 

1453 

17,3575 
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0 
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TC 
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PARAECLA  IS 

LESS  than  flat 
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RC2e,9 

LOGIC  TO 

ACCLIRF  MMNUF  THFULSF  LIPIT  CYCLE.  CUPIAC  PCWEREE  FLIGHT 

R')270 

OR  ULLAGE,  FLAT  = 

c 

0271 

RFF 

6 

LAST 

1453 

17,3576 

31  ' 741 

1 

CAF 

FIRFFCT 

SCALED  AT  PT/r  r/)C. 

9272 

rff 

2 

LAST 

1453 

17,3577 

6 155  5 

0 

AC 

FLAT 

0273 

17,  36i'i' 

0 ro.  6 

1 

EXTEND 

027A 

R^F 

2 

LAST 

1453 

1 7,36)1 

6 3615 

0 

EZHF 

ZCNEl 

NOT  IN  SPECIAL  ZONES. 

R0275 

F IRE 

FOR 

AXIS 

OP  , 

IF  CLO'E,  FIRE  *'!MMLP 

IRPLLSE.  IF  CN  AXIS,  CFAST. 

0276 

R8F 

1 

17,3602 

4 1556 

1 

ZCA'E2,3  CS 

Z0NE3LIR 

HFIGHT  CF  RIN-IRPLLSE  ZONE  SET  EY  1/ACCS 

0277 

RFF 

e 

LAST 

145‘= 

17,3603 

6 1742 

1 

AO 

TTCAX  IS 

35  RSFC  IN  DRIFTING  FLIGHT 

0278 

17,  ?6f’4 

0 C(lU6 

1 

EXTEND 

ZERC  WHEN  TRYINC  TC  ENTER  GTS  CONTROL. 

027C 

REF 

1 

1 7,3605 

6 3610 

0 

8ZRF 

ZCNF3 

0280 

RTF 

7 

1 AST 

I486 

17,3606 

3 1 ' 742 

! 

ZCNE2  CAF 

TTCAX IS 

FIFE  TC  AX  IS. 

0231 

RFF 

3 

1 AST 

1455 

17, 3607 

1 352  1 

0 

TCF 

RETURNT J 

02E2 

RFF 

11 

LAST 

1455 

17  ,?61C 

1 1 ' 42  7 

0 

ZCNE3  CCS 

FEET 

CHECK  IF  EDCT  IS  ZERC. 

0283 

REF 

67 

LA  ST 

1435 

17,3611 

3 4 746 

C 

CAF 

B1T6 

FIRE  A CNE-JET  MINIMUM  IMPULSE. 

028A 

PPF 

A 

1 AST 

1456 

17,361? 

1 3521 

0 

TC  F 

RETUPNTJ 

TJET  = +C. 

0285 

RFF 

23 

LAST 

1453 

17,3613 

0 5675 

0 

TF 

rCSHELE 

CANNOT  BE  BECAUSE  NEG  EDCT  C C MPLF ME NTEC . 

0286 

RFF 

5 

LAST 

1456 

17,3614 

1 352  1 

c 

TCF 

PETLRNT J 

TJET  = +0. 

0287 

17,3615 

0 0006 

1 

ZCNIFl  EXTEND 

0288 

RFF 

10 

1 AST 

1453 

17,3616 

5 1746 

c 

INDFX 

ACRSCIFl 

0289 

RFF 

2 

LAST 

1453 

17,3617 

61  • 6C5 

Q 

SL 

A XI SDT  ST 

SCAIEC  AT  FI/4  RAC. 

0290 

17 , 36  2 ) 

0 0 006 

1 

extend 

029  1 

RFF 

9 

LAST 

1455 

17, 362 1 

5 1744 

1 

INDFX 

ADPSCI‘^2 

0292 

RFF 

1 

17,3672 

7 1575 

0 

HP 

ACCFCfZl 

SCALEC  AT  2(7)/PI  SEC(2)/PAC. 

0293 

17,3623 

2 0 001 

1 

CDCURL 

029A 

17, 3624 

?c  on 

1 

DDCLBL 

0295 

RFF 

9 

LAST 

1455 

17,3625 

53 ' 750 

0 

CXC  F 

HH 

DOUBLE  FRECISICN  H SCALEC  AT  8 SEC(2). 

R0296 

TfCT 

wfethfr  total 

TIRE  REQLIPFO  greater 

THAN  150  RSFC : 

R0297 

2 

2 

RC29E 

r $ 

.5  1. 

15C  - 

■ TTCAXTS)  - H 

RFGAT IVF 

(SCAl.  FC  AT  8 SECONDS  ) 

0299 

REF 

8 

L AST 

1456 

17,3626 

3 1 ' 742 

1 

CAE 

TTCAXTS 

TTCAXIS  SCALFC  AT  4 SECCNDS. 

0300 

RFF 

2 

LAST 

1455 

17,3627 

6 377  3 

1 

AD 

-TJMAX 

-.150  SECCND  SCALED  AT  4. 

0301 

17,3630 

0 00''6 

1 

EXTEND 

0302 

17,3631 

7 CCOO 

c 

SCLARE 

03C3 

17,363? 

0 0006 

1 

EXTEND 

O30A 

RFF 

10 

LAST 

1456 

17,3637 

61'  747 

1 

SL 

HH 

HICH  WORD  CF  H SCALED  AT  8 SEC(2). 

0305 

17,3634 

0 0006 

1 

EXTEND 

03C6 

REF 

2 

LAST 

1455 

1 7 , 3635 

6 352  ) 

0 

eZRF 

FULLT IME 

YFS.  NEED  NOT  CALCULATE  TJET. 

R0307 

TEST 

WHETHER  tire  BEYONFj  AXIS 

GREATER 

THAN  50  RSEC  TC  CETFRRINE  WHICH 

A F FPCX  IP  AT  ICN  TC  USE . 

0308 

RFF 

11 

LAST 

1456 

17, 3636 

31  ' 747 

1 

CA.F 

HH 
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031  “I 
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1 

17,3642 

3 3763 

0 

FAF 

. 1AT2 

STCPF  .1  SEC  SCALED  AT  2 FCR  DIVISICN. 

03U 

PPF 

12 

LA'T  1456 

17,3643 

53 ' 75C 

c 

eXF  F 

HH 

CP  F SCALEC  AT  E SEF(2)  NEEC  NOT  BE 
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1 7, 3644 

0 0006 

1 

EXTEND 

FRESEPVEC  . 

C3ie 

REF 

13 

LAST  1457 

17,3645 

11 ' 747 

0 
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HH 

CLOTIFNT  SCALED  AT  4 5ECCNCS. 

1319 

P=F 

9 

LAST  1456 

17,3646 

6 1742 

1 

AO 

TTFAXI S 

SCALEC  AT  4 SEC. 

0320 

P = F 

1 

17,3647 

6 3764 

1 

AC 

.G375AT4 

.C375  SEC  SCALED  AT  4. 

032! 

RFF 
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L A F T 14  5 6 

1 7 ,365C 

1 3521 

0 

TCF 

RETUPNTJ 

ENC  CCMFLTATICN. 
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TJFT 
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TTOAXIS 

FOR  I'PPROXT  MAT  ICN' 

OVER  LE 

SS  THAN  50 

MSEC. 

0323 

REF 

1 

17,3651 

4 3765 

1 
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PPF 

14 

LAST  1457 

17,3652 
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c 

eXFH 

HH 
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0325 

17,3653 

n 0006 

1 

EXTF-NO 

PRESERVED. 

0326 

RFF 

1 f 

LAST  1457 

17,3654 

11 ■ 747 

(■ 

rv 

HF 

CUOTIFkT  SCALEC  AT  4 SECCNDS. 

J327 

REF 

10 

LAST  1457 

17,3655 

6 1742 

1 

AD 

TTFAXI S 

SCALEC  AT  4 SEC. 

R032fi 

IF  CCPFLIFC  JFT  TIRE 

IS  IFSS 

THAN  T JM  IN, 

, TJET  IS 

SET  TG 

ZERO. 

R0329 

M T NJ  T L ^ 

IMPULSES  PFQLIREO  IN 

2CNF  3 - 

apF 

NOT  SLBJECT  TC 

THIS  CCNSTRAINT, 

NATUR/CLV. 

1331 

pep 

1 

17,3656 

6 3 775 

1 

CHKM INT J 

AD 

-TJMI  N 

IS  CCNFLTEC  TIME  CESS  TFAN  TFE  MINIMUM. 

''33? 

17,3657 

C n006 

1 

extend 

1333 

PPF 

3 

LAST  1463 

17,366L 

6 3455 

r 

BZMF 

CCASTTJ 

YES,  SET  TIME  TC  ZEPC. 

1334 

RPF 

1 

17,3661 

6 3774 

0 
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T JMINI 

NF,  PESTCRE  CCMPUTFO  TIME. 
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4 
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CS 
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1456 
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C0O6 

1 
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1 
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Rf-F 

1 

17 , 3667 

0 

3745 

1 

TC 
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REVERSE  ROTSENSF  AND  INCIEATE  MAX  JETS. 

0355 

RFF 

13 
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145F 

1 7, 3670 

31 
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1 
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ECCT 
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0356 
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0 
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1 
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CCMFLTE  TJET 

0357 

RE  F 

10 
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5 

1 744 

1 
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ACRSCIF2 

= (DESIPED  RATE  CHANGE  1 /( 2- JET  ACCEL.) 

0358 

RFF 

IC 

LAST 

1455 

17,3673 

7 

1571 

1 

MP 

1/ANFTl  +2 

0359 

D.TF 

3 
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6 

7744 

1 

AD 

- 1/8 

IF  TJET,  SCALED  AT  32  SEC,  EXCEEDS 
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17,3675 

C 

C0C6 

1 

EXTENC 

4 SECCNCS,  SET  TJET  TC  TJMAX. 

0361 

17,3676 

6 

3 700 

C 

BZMF 

+ 2 

0362 

RFF 

3 

LAST 

1456 

1 7,3677 

1 

3 52  0 

1 

TCF 

fulltime 

0362  1 

17, ?7CC 

0 

000  6 

1 

EXTEND 
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4 
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17,3701 

1 

3520 

1 

BZF 

FULLTIME 

0363 

REF 

4C 

LA  ST 

1427 

1 7,3702 

6 

4 74  0 

0 

AC 

BIT12 

RESTORE  COMPUTED  TJET  TC  ACCLMLLATCR. 

0 36  4 

PFF 

5 18 

LAST 

145  1 

17,3703 

2C 

00  1 

1 

DA  S 

A 

0365 

REF 

519 

LAST 

1458 

1 7 ,3704 

20 
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1 

CAS 

A 

0366 

REF 

520 

LAST 

145f 

17,3 7 J5 

20 

m 

1 

CAS 

A 

RESCALED  TJET  AT  4 SECCNDS. 

03  6 7 

RFF 

2 

L AST 

14  5 5 

17,3716 

1 

3656 

c 

TCF 

CHKMI NT J 

RETURN  AS  FRCM  FINELAW. 

0368 

REF 

2 

LAST 

1458 

17,3707 

0 

3 74  7 

0 

smalrate 

TC 

RUFSETUP  +2 

SET  NLMBERT  AND  FIPEFCT  FCR  MAXIMUM  JETS 

0369 

REF 

7 

LAST 

1455 

17,  3711" 

11 

• 74P 

1 

CCS 

RCTSENSE 

0370 

RFF 

172 

last 

1445 

17, 3711 

3 

4753 

1 

CAP 

ONE 

MODIFY  INDEXER  TC  POINT  TC  1/ANET 

0371 

17,3712 

1 

3714 

1 

TCF 

+ 2 

CORRFSPONDING  TO  THE  FPCPER  SENSE. 

0372 

PFF 

13 

LAST 

1276 

17, 3713 

Q 

7 75  2 

0 

CAF 

NEC-CNP 

0373 

REF 

11 

LAST 

1458 

17,3714 

27 

' 744 

0 
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ACRSC 1F2 

0374 

ref 

14 

LAST 

145E 

17,3715 

4 

142  7 

0 

f S 

ECCT 

(.144  AT  PI/4  - EDOT  )=CFSIRED  RATE  CHNG. 

0375 

RFF 

1 

17,3716 

1 

36  7 1 

c 

TCF 

RLFLAW12 

03  76 

RFF 

3 

LAST 

1 4 5 t 

17,3717 

0 

3 745 

1 

RLFL  A W2 

TC 

RUFSETUP 

REVERSE  RCTSENSE  AND  INDICATE  MAx  JETS. 

0377 

RFF 

2 
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145F 

17, 372C 

3 

3776 

1 

CAF 
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0378 

RFF 

15 

L AST 

145F 

17,  372  1 

6 

142  7 

1 

AD 

EDOT 

(.144  AT  PI/4  t EOCT)=CESIPEC  RATE  CHNG. 

0379 

RFF 
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145E 

17,3722 

54 
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0 

TS 

A 

IF  OVERFLOW  SKIP,  FIRE  FCR  FULL  TIME. 
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RFF 

2 
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14^f 

17, 3723 

1 
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0 

TCF 
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5 
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1 
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1 
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1 
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RLFSETLP 
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0383 
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11 
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1456 

17,3726 

51  ' 746 

0 
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0384 

RPF 

4 
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14  53 
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4 1601 
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CS 

F I BEDP 
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RF.F 

16 
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17, 3730 
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C 

AD 

r 
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03P6 

17, T731 

0 0006 

1 

EXTENC 

SCALED  AT  4 PI  RADIANS 

0387 

REF 

32 
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17,3732 
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c 

NP 

PITH 

0388 

RFF 

1 6 
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1458 

17,3733 
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1 

XCH 

ECOT 

038C 

17,3734 

0 0006 

1 

EXTENC 

0390 

17,3735 

7 COCO 

c 

SQLAPE 

C391 

17,3736 

0 0 ) )6 

1 

EXTENC 

0392 

REF 

12 

LAST 

1459 

17,3737 

5 17  4 6 

c 

INDEX 

ACPSCIFI 

0393 

REF 

1 1 

1 AST 

1458 

17,3740 

7 157  1 

1 

MP 

1/ANTTl  +2 

03^4 

REF 

17 

LAST 

1459 

17,3741 

6 1427 

1 

AT 

ECCT 

0395 

17,374? 

0 CC06 

1 

EXTEND 

0 39  6 

REF 

4 

LAST 

1457 

17,3743 

6 3455 

ri 

PZMF 

COA  STTJ 

COAST  IF  BELCN  IT. 

0397 

REF 

6 

LA'T 

1456 

17,3744 

1 3520 

1 

TCF 

FLLLT  IME 

FIRE  FCR  FUIL  PERIOD  IF  ABOVE  IT. 

R0398 

SLEROUTINE  USEC  IN 

ALL  entries 

TO  ROUGFLAN. 

C399 

REF 

8 

LAST 

145  6 

17,3745 

4 1740 

1 

RLFSETUP 

CS 

RCTSENSE 

REVERSE  ROTSENSE  NHFN'  ENTER  HERE. 

0400 

REF 

9 

LAST 

lA'^S 

17,3746 

55' 740 

1 

TS 

RCTSENS  E 

0401 

REF 

46 

LAST 

145'^ 

17.3747 

3 4751 

0 

+ 2 

CAE 

FOUR 

RFCLIRE  NAXINLM  (2)  JEIS  IN  U,V-AXES. 

04  0 2 

REF 

19 

LAST 

1455 

17,3750 

55' 743 

1 

TS 

NUMBEPT 

0403 

REF 

I 1 

LAST 

1449 

17,3751 

3 4735 

1 

CAE 

NFC-MAX 

SLGGEST  NAXINUM  (4)  JETS  IN  P-AXIS. 
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RTF 

7 

LAST 

1456 

17,3752 

55 ' 741 

0 

TS 

F IREFCT 

C405 

REF 

4 1 7 

LAST 

1 449 

17,3753 

C C002 

0 

TC 

C 

R0406 

CCNSTAN'TP 

; FER 

T JFTLANI 

C4C7 

17,3754 

77757 

1 

DEC 

-16 

AXISDIFF(INDEX)  = NUMBER  CF  REGISTERS 

3408 

17,3755 

CCOOO 

1 

AXI SCIFE 

DEC 

+ 0 

eetneen  stcpec  1/accs  parameters  for 

0409 

17,3756 

00020 

0 

DEC 

16 

THE  INDExPD  AXIS  AND  THE  U-AXIS. 
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17,3757 

14409) 

0 

SFNSCR 

CC.T 

L44U0 

RATIO  CF  TJET  SCALING  NITHIN  TJFTLAN 
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(4  SEC)  TC  SCALING  FCR  T6  (10.24  SEC). 

0412 

17,3760 
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1 

-3CEG 

EEC 

- .06667 
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0413 

17,3761 

7775C 

0 
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17, 3762 
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. 1AT4 
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.025 
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17,3763 

01463 

1 

. 1 «T2 
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.05 
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1 7, 3764 
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1 
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DEC. 

.00  93  8 

.0375  SEC  SCALED  AT  4. 

0417 

17,3765 

77462 

1 

- .025AT2 

DEC 

-.C125 

-.C25  SRC  SCALED  AT  2. 
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17,3766 
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0 

-.025  AT4 

EEC 

- .00625 

0419 

17,3767 

77  145 

1 
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DEC 

-.025 
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17 ,3770 
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0 
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CEC 

- .075 

0421 

17,3771 
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r 
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2DEC 
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17,3772 
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0 
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1 7 ,3773 
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1 
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1423 

17,3774 

00122 

0 
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16,3653 

1 3655 

0 

TC  F 

+ 2 

0011 

REF 

1 
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-1CQNST6 

0013 

16  ,3656 

0 00  16 

1 

BXTENC 

0014 

PEF 

1 
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RFF 

5 

LAST 

1460 

16, 3660 

51  ' 744 
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RFF 
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16,3671 
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0 

CS 

-lOONS 
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16,3673 
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1 
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16,3674 
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EXTENC 

0028 
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RFF 
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1 

NP 

NO. P JETS 
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29 
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1 
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RFF 
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27'  513 

0 

ADS 

DCLNTCRK 

0032 

PFF 
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RFF 
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RFF 

1 
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PCTCRCUE 

0C35 
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Z FFO 
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MR 

ACENTRAL 

1 

ACS 

K2THETA 

+ 1 

I 

TS 

L 

1 

TCF 

+ 2 

1 

ACS 

K2THETA 

1 

GETF.nOT 

CA 

K2GNTRAL 

1 

EXTEND 

r 

MR 

KCENTPAL 

1 

CXC  H 

F LNC  TiriN 

0 

CA 

K2CNTRAL 

4l 

1 

EXTEND 

0 

MP 

KCEMTRAL 

1 

ADS 

FLNCTirN 

+ 1 

1 

TS 

1 

1 

TCF 

42 

1 

ADS 

FLNCTICN 

652  52 

0 0006 

6 1763 

5R • 763 

0 CT06 

3 1767 

21 ' 763 

3 1766 

G CCC6 

7 3236 

53  ' 767 

3 CGOl 

0 Ofl'16 

7 3236 

27  • 767 

56  Cr  I 

1 3256 

27' 766 

0 CC06 

3 1763 

21' 767 

3 1766 

0 0006 

7 1766 

2 1 ' 760 

3 1 767 

G CCC6 

7 1 766 

27' 760 

56  001 

I 3276 

2 7 ' 7 3 7 

3 1762 

0 CC06 

7 1761 

53 '752 

3 1 763 

0 0006 

7 1 761 

27'  752 

56  OCl 

1 3307 

27'  751 
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.023  FACE  1665 
E6  S6 


OEL*ONEGA  + ALPHA(2) /(21K  ) A1  16*PI,r.F, 


A2fNTFAL  NCVv  CCNTAINS  - A L F F A ( 2 )/ ( 6 1 K ) , 
SCALED  AT  16*PI  , IN  D. F. 


CFL#nNEGA  4 ALPHA  (2  ) / (3=fK  ) IN  A2CNTFAL, 
SCALEC  AT  16=!'PI,  D.P. 


ACENTRAl  may  NCW  BE  CVERLAIG. 


TNC  yfrns  cf  negusum  acclnuatec,  sc  far 

SCALEC  AT  6YPK2),  IN  C.P. 

K*(CFL«rPEGA  4 ALPHA(2  )/(2=>K))  IS  TPE 
TERM  FCR  WHICH  A SCLARE  RCCT  IS  NEECEC. 

K AT  FI/2(8) 


CESIREC  TERM  IN  FUNCTION,  AT  Pl(2)/16 


GAP:  ASSEMBLE  RFVISIGM  lit  CF  AGC  FRCGRAM  LUMINARY  BY  NASA  2021112-071 


19:09  AUG.  ll,igtS  LMDAP 


C22  PAGE  1A66 


L TRIM  GIMBAL  fTNTCCL  SYSTEM 


L SEP' S RAGE  NO.  5 E6  SA 


0167 

0168 

REF 

REF 

3 

1 

LAST 

1464 

21,3307 
21,  3310 

11 

1 

• 748 
3S15 

1 

1 

CCS 

TCF 

DEL 

RSTDFGTS 

0169 

PFF 

1 

21,3311 

1 

3587 

1 

TCP 

NEGUSUM 

0170 

REF 

1 

21,3312 

1 

3314 

0 

TCF 

NEGATE 

0171 

REF 

2 

LAST 

1466 

21,3313 

1 

3557 

1 

TCF 

NEGLSLM 

0172 

21,3314 

■1 

0006 

1 NFGATE 

EXTEND 

0173 

REF 

1 1 

LAST 

146  F 

21, 33  1 S 

4 

1743 

1 

DCS 

K2CNTPAL 

0174 

REF 

12 

1 AST 

1466 

21,3316 

5 3 

•743 

1 

DXDH 

K2CNTRAL 

C178 

REF 

2 

LAST 

166  6 

21,3317 

1 

3515 

1 

TCF 

RSTCFGTS 

0176 

16,3741 

BANK 

1 6 

0177 

PEE 

5 

LAST 

1418 

E6,15')l 

EBANK= 

NEGUO 

0178 

RFF 

4 

LAST 

146C 

16,2000 

sftlcc 

DAPSl 

0179  16,3741  BANK 

ROieO  the  NRCHM2  SL'BRCLTINF  SETS  BITS  9,10,11,12  CF  CHANNEL  12  ON  THE  BASIS  OF  THE  CONTENTS  CF  NEGLG.NEGLR  HHICH  ARE 
P0182  THE  NEGATIVES  OF  THE  DESIRFC  ACCELERATION  CHANGES.  ACCT+C12  SETS  C(P)ACCCCT  TC  REFLECT  THE  NEH  DRIVES. 


R0184  NAPNING:  ACCT+C12  AND  WRCHN12  MUST  BE  CALLED  WITH  INTERRUPT  INHIBITED. 


0185 

16,3741 

C7400 

1 

8GIM 

CCTAL 

U7400 

0186 

REF 

8 

LAST 

1290 

0 .1 6 6 

CHNL  12 

EQUALS 

I TEMP6 

0187 

RDF 

6 

LAST 

1466 

16,3742 

4 15  71 

0 

A CDT  + C 12 

CS 

NIEGUC 

0188 

16,  ■’743 

0 CC06 

1 

EXTEND 

GIMEAL  DRIVE  REQUESTS. 

0189 

REF 

4 

LAST 

133 

! 6 , 7 4 4 

7 150  7 

0 

MP 

ACCDCTC 

0 190 

REF 

4 

LAST 

1418 

16,3745 

23' 510 

1 

LXCF 

CACCCDT 

0191 

REF 

a 

LAST 

1419 

16,3746 

4 1503 

1 

CS 

NEGUR 

0192 

16,3747 

0 0006 

1 

EXTEND 

0193 

REF 

1 

16 ,375C 

7 15  11 

1 

MP 

ACCDCTR 

0194 

RFF 

4 

LAST 

1419 

16,3751 

23  ' 512 

c 

LXCH 

PACCDDT 

C195 

REF 

7 

LAST 

1 466 

16 , 3752 

11' 501 

0 

CCS 

NEGUQ 

0196 

REF 

52 

LAST 

1460 

16,3753 

3 4742 

1 

CAE 

BITIO 

0197 

16, 3754 

1 3756 

1 

TCP 

+ 2 

0198 

REF 

36 

LAST 

146^ 

16,3755 

3 4743 

0 

CAE 

B IT9 

T199 

PFF 

1 

16, R756 

54  D66 

c 

TS 

CHNL12 

02CC 

REF 

4 

LAST 

146  6 

16,3757 

1 1 ' 50  3 

1 

CCS 

NECLR 

0263  1 

REF 

41 

LAST 

145E 

16,376C 

3 4740 

c 

CAE 

B m2 

0202 

16,3761 

1 3 7 6 3 

1 

TCF 

+ 2 

0203 

REF 

33 

LAST 

1459 

16,2762 

3 4741 

1 

CAF 

B IT  1 1 

0204 

REF 

2 

LAST 

1466 

16, 3763 

26  066 

0 

ADS 

D.HNL12 

(STDPED  FESLLT  NOT  USED  AT  PRESENT) 

0205 

PFF 

1 

16,3764 

4 374  1 

1 

CS 

BGI  M 

0 20  6 

16,3765 

C C0C6 

1 

EXTEND 

0207 

RFF 

71 

LAST 

1419 

16,3766 

0 2 L 1 2 

0 

PAND 

CHAM2 

02(  8 

RFF 

3 

LAST 

1466 

16,3767 

6 0066 

1 

AD 

CHNL12 

0209 

16 ,377C 

0 000  6 

1 

EXTEND 

021(: 

RFF 

72 

LAST 

1466 

16,3771 

01  C12 

0 

HR  I TE 

CHAN12 

GAP: 


ASSFPBLE  REVISION  lit  OF  AGO  PRCGRAW  LLRINARY  PY  NASA  2021112-1:71 


L TRIP  GINBAL  CONTROL  SYSTci^ 


R021  1 
0212 

R = F 

2 

LAST 

1416 

16,3772 

4 4 747 

0 

CS 

CALLGNBL 

0213 

REF 

52 

LAST 

1438 

16  ,3773 

7 1262 

1 

MASK 

RCSFLAGS 

021A 

RFF 

53 

LAST 

1467 

16, ’774 

55*262 

1 

TS 

RCSFLAGS 

0213 

REP 

421 

LAST 

1461 

16, 3775 

0 0002 

6 

TC 

Q 

0216 

21 , 332 C 

BANK 

21 

0217 

RFF 

3 

LAST 

1463 

E6, 1450 

EBAN  K = 

CCTFF 

021R 

REF 

2 

LAST 

1462 

21 ,2000 

SETLOC. 

0APS4 

0219 

21 ,332C 

BANK 

19:09  AbC  . 11  ,1969  LRCAP 
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LSER'S  PAGE  NO.  6 
TLRN  CPF  PECUtST  FOR  ACCT4C12 


E6  SA 

EXECUT  ION  . 


REURN  TC  CALLER 


GAP:  ASSe^BLF  ’’FVTSIDN  116  Cc  A fC  FKCGRAM  LUMINARV  8V  NASA  2CH112-C71 


19  :09  AUG.  11  ,1969  LRCAF 


,023  FACE  1A68 


I TRIR  GIRBAL  CONTRCL  SYS^FW  USER'S  PAGE  NO.  7 E?  SA 

P'1220  .SUBROUTINE  TIMEGMBL:  MPO  1,  OCTC0ER  1 9 6 7 , CRAIG  RCRK 

R122)  TIREGNBL  CCRFUTES  TEE  DRIVE  TINE  NEEDED  FCR  THE  TRIM  C IMBAI  TC  FOSITICN  THE  DESCENT  ENGINE  NCZZLE  SC  AS  1C  NULL 

R1223  THE  OFFSET  ANGULAR  A.CC  F I,  EP  A T I C N ASCLT  THE  G (CR  R)  AXIS.  INSTFAD  OF  USING  ACSC(R),  TINEGNBL  USES  .A*ACSQ(R), 

R0225  SCALEC  AT  PIZ8,  FOR  EACH  AXIS,  THE  DRIVE  TINE  IS  CCNFLTFC  AS  A ES  ( A L P F A / A C C CCT  ) . A 2ERC 

R0227  ALPHA  CR  ACCOPT  OR  A ZPf'C  GUCTIENT  TURNS  CFF  TFF  GIMBAL  DRIVF  IMMEDIATELY,  OIHFRNISE,  THE  GIN8AL  IS  TURNED  CN 
R0229  DRIVING  IN  THE  CORRECT  OTRECTION.  thE  QIRIGIMINR  IS  SET  TC  TERMNATE  THE  DRIVE  ANC  G(R)ACCOOT 
R1231  IS  STCREC  TC  REFLECT  thr  NEW  ACCELERATION  DERIVATIVE.  NEGLQ(R)  WILL  CCNTAIN  +l,+0,-I  FCR  A CIRIACCCCT  VALUE 
R0233  WHKH  IS  NF.GATIVF,  ZERC,  CR  PCSITIVE. 

R023A  INPUTS:  AOSC,AGSR,  SCAIEC  AT  RI/2,  ANC  ACCDCTC,  ACCDCTP  AT  PI/2(7I.  PI/2m. 

R0236  CLTPLIS:  NEW  GIN0AL  DPIVR  E r’’S  IN  CHANNEL  1 2 , N E GU  G , N EGU  R , 0 ACC  COT  AMO  RACC001,  THE  LAST  SCALEC  AT  FI/2(7). 

R023P  QIPIGTNTINP  WILL  PE  SET  TC  TINE  AND  TERMNATE  GIMBAL  CPIVE(S) 

RD239  C = eRlP:  n , i , c , ITEMFS  2,3,6,  RLFTRRG2  ANF  ACCT+CIE  DEBRIS. 

R0240  EXITS:  VTA  TC  0. 

RT2A1  ALARMS,  ABORTS,  : NCNF 

9C2A2  SUBROUTINES:  ACnT+ri2,  IBNKCALL 

RT2A3  WARNING:  THIS  SLRRCLTINF  WRI1ES  INTC  CHANNEL  12  ANC  USES  THE  ITEMFS.  THFREFCRE  IT  MAY  ONLY  EE  CALLED  WITH 

R0245  INTERRUPT  INHIBITED. 

R0246  FRASAB1.F  STGRAGR  CCNF IGIIRAT I C N (NEECFC  EY  THE  INFEXINC  METHODS): 


A1247 

NEGUC 

ERASE 

+ 2 

NEGATIVE  CF  C-AXIS  GIMEAL  CRIVF 

A024R 

( SPWCRD ) 

EQUALS 

NEGUQ  +1 

ANY  S.P.  ERASABLE  NUMBER,  NCW  THRSTCNC 

A0249 

NEGUP 

equals 

NEGUC  +2 

NEGATIVE  OF  P-AXIS  GIMBAL  DRIVE 

A12  50 

ACCOQTC 

ERA  SE 

*Z 

C-JEPK  tern  SCALFC  at  PI/2I7)  RAC/SEC(3 

A02EI 

(SPWORC  ) 

equals 

ACCOOTQ  tl 

ANY  S.P.  ERASABLE  NUMBER  NCW  GACCCCT 

A02F? 

ACCOC  IR 

ECUAL  S 

ACCOCTQ  +2 

P-JERK  TERM  SCALEC  AT  P1/2I7)  RA0/SEC.(2 

A')293 

ACCCGTQ  ,ACCDCTR  ARE  MAGNITUDES. 

A0254 

ACSQ 

ERASE 

+ 4 

Q-AXIS  ACC.,D.P.  AT  PI/2  PZSEC(2) 

A0255 

ADSR 

EQUALS 

ACSQ  +2 

R-AXIS  ACCELERATICN!  SCALEC  AT  PIZ2  P/S2 

0296 

RFF 

9 

LAST 

1466 

1066 

CPNCX  ER 

EQUALS 

ITEMP6 

0257 

21, 332G 

23146 

r 

CCT23146 

CCTAL 

23146 

decimal  .6 

0258 

RFF 

29 

LAST 

1365 

"'4  63 

NZACCCOT 

EQUALS 

I TEMP 3 

0259 

RRF 

173 

LAST 

145B 

21,3321 

3 4753 

1 

T INEGNBL 

CAF 

ONE 

INITIALIZE  ALLOWGTS. 

0260 

REF 

2 

LAST 

1439 

21 , 3322 

C C 1 c 2 

C 

IS 

ALICWGTS 

0 261 

RFF 

1C6 

LAST 

146? 

21 ,3323 

3 4752 

0 

CAF 

TWO 

SET  LF  ICGP  FCR  R AXIS. 

0262 

RFF 

422 

LAST 

1467 

21 ,3324 

22  002 

n 

LXCH 

C 

SAVE  RETURN  ADDRESS. 

0263 

RFF 

25 

L AST 

1399 

21,3325 

22  CTl 

1 

LXCH 

RLPTREG2 

GftP:  ^SSel“eLP  REVISIOM  lit  OF  AGC  PRCGRAW  LUMINARY  BY  NASA  202!112-'‘71 


L TRIP  GIPPAL  CriNTPCL  SYSTEM 


0264 

21,3326 

1 3330 

C 

TCF 

+ 2 

0268 

PEE 

306 

L AST 

146  2 

21,3327 

3 4 755 

1 

T IP.QGPBL 

CAP 

ZERO 

D266 

REF 

1 

21 , 3330 

54  066 

n 

TS 

QRNOXER 

0267 

REF 

2 

LAST 

146P 

21,3331 

5C  C66 

1 

INDEX 

CPNCXFP 

0268 

REE 

5 

LAST 

1466 

21,3332 

3 150  7 

1 

CA 

ACCncTQ 

0269 

21 , 3333 

0 0006 

1 

FXT  FNC 

0270 

RFF 

1 

21,3334 

6 

1 

eZPF 

TC-CFFNCW 

0271 

REF 

1 

21  .3335 

54  063 

0 

TS 

NZACCDQT 

0272 

R'^F 

3 

LAET 

146  9 

21  , P?36 

50  C66 

1 

ALFHATFV 

INDEX 

CRNCX  FR 

02  T 3 

REF 

24 

LAST 

1462 

21, ^337 

4 1537 

c 

C,S 

AC'C 

0274 

21 , 334C 

0 0016 

1 

EXTEND 

)278 

REF 

2 

LAST 

1469 

21,334] 

1 3404 

c 

BZF 

TGCFFNCW 

0276 

REF 

423 

LAST 

1468 

21 , 3342 

54  002 

1 

TS 

Q 

0277 

21,3343 

0 0006 

1 

FXT  ENC 

0278 

REF 

1 

21,3344 

7 3 3 20 

1 

w p 

0CT23146 

0279 

REF 

424 

LAST 

1469 

21 ,3345 

6 CO  )2 

0 

AC 

0 

0280 

RFF 

3C2 

LA  ST 

1465 

21,3346 

54  CCl 

1 

TS 

L 

02  81 

REF 

1 

21, 3347 

1 3354 

1 

TCF 

SETNEGL 

0282 

R'F 

526 

LAST 

146  3 

21 ,3350 

4 EOOO 

0 

CS 

A 

0283 

REF 

4 

LAST 

1469 

21.3351 

50  066 

1 

INDEX 

SPNDXER 

0284 

RFF 

8 

LAST 

1466 

21 , 3352 

57 ' 501 

1 

XCh 

NEGUQ 

0285 

Rfc 

! 

21,3353 

1 3410 

0 

TCF 

NCTALLCW 

0 2 86 

21,3354 

C CC06 

1 

SETNEGL 

EXTEND 

0267 

REF 

1 

21 ,3355 

6 3362 

0 

PZMF 

PCSALPH 

0288 

21,3356 

4 CCCO 

0 

CCP 

0289 

REF 

27 

LAST 

1366 

21,3357 

54  062 

1 

TS 

ITENP2 

0290 

RFF 

66 

LAST 

1464 

21 ,8360 

4 4753 

0 

CS 

BITl 

029  1 

RFF 

2 

1.  AST 

1469 

21,3361 

1 3364 

1 

TCF 

PCSALPH  +2 

0292 

RFF 

28 

LAPT 

1469 

21 ,3362 

54  062 

1 

PCSALFF 

TS 

ITENP2 

0293 

REP 

67 

LAST 

1469 

21,3363 

8 4 753 

1 

CA 

BITl 

02  94 

RFF 

5 

LAST 

1469 

21 , 3364 

PE  066 

1 

+ 2 

INDEX 

ORNDXFR 

C2'^5 

PEF 

9 

LAST 

1469 

21 ,3365 

5 5 ' 5v)  1 

0 

TS 

NEGUQ 

0 296 

RFF 

2 

LAST 

146P 

21,3366 

3 0C63 

1 

CA 

N ZACCCGT 

0297 

21,3367 

0 C0.)6 

1 

EXTEND 

0298 

RTF 

42 

LAST 

1466 

21 ,3370 

7 4 740 

1 

PR 

8 IT  12 

02°0 

8EF 

29 

LAST 

146  9 

21, 8371 

6 CC62 

0 

AD 

ITEPP2 

C3CC 

21,3372 

n 0006 

1 

EXTEND 

0301 

RFF 

2 

LAST 

1469 

21 ,3373 

6 341) 

1 

EZPF 

nctallow 

0302 

Rpp 

3.) 

LAST 

1469 

21,8374 

4 0062 

1 

CS 

I TEPP2 

03C3 

21 ,3375 

0 000  6 

1 

EXTEND 

0 304 

REF 

1 

21,3376 

7 343  1 

0 

PP 

CCTOU240 

0305 

21, 3377 

0 0006 

1 

EXTEND 

0306 

REF 

3 

LAST 

1469 

21 ,3400 

1C  063 

0 

CV 

NZACCCCT 

19:09  AUG.  Il,19t9  LPCAF 


023  PAGE  lAtS 


LSFR'S  PAGE  NO.  6 E6  S4 


NGN  DC  tee  G-AXIS 


AGCDOT  IS  PRESUPFG  TC  EE  AT  PI/2I7). 

IS  ACCCCT  LESS  THAN  CR  EGUAL  TC  C7 
NO.  STCRE  NCN-ZCRC,  FCSIIIVE  ACCCCT. 


IS  ALFFA  ZERO? 

SAVE  A CCPY  CF  -ACS. 

NO.  . RESCALE  FCP  TIPIEGPBL  L5E. 

CCTAL  23146  IS  CFCIPAL  .6 
-1.64ACS  AT  PI/2  = -.44ACS  AT  FI/8. 
WAS  TFEPE  CVEFFLON? 

NC.  CCP  FUTE  CR  IVE  T I^E . 

RECOVER  -SGM(AOS)  IN  THE  A PFGISTEF. 
YES.  START  CRIVE  WITHCUT  WAITLIST. 

KNOCK  CCWN  THE  ALLOWGTS  FLAG. 


STCRE  -A8SI.4YA0S)  SCALEC  AT  FI/8. 


STORE  -ABS(.4*ACS)  SCALEC  AT  FI/8. 

SGMACS)  INTC  NEGU 
STORE  SGMAPLHA)  AS  NEGL 


2»ACCCCT,  SCALED  AT  PI /E. 

-AES(ALFFA)  + 2AACCCCT,  AT  PI/E. 

IS  CRIVE  tjve  more  THAN  TNO  SECONDS? 
NC.  CCPFUTE  CRIVR  TTPE. 

ABSIALPHA ) AT  PI /E. 

CECIPAL  lCI/1024 

CLCTIENT  IS  DRIVE  TIPE  AT  WAITLIST. 
AESIALDHA  )/ACCOCT  AT  2(I4)/1CC 


GAP:  ASSPP8LE  RPVISION  116  CP  AGC  FPCGPA«  LUPINARY  PY  NASA  2021112-071 


L TRIP  GTPRAL  CrNTPTL  SYST£pi 


03P7 

21 ,34)1 

0 0)06 

1 

EXTEND 

0308 

RFF 

LAST 

146  F 

21 ,3402 

1 3404 

0 

PZF 

T GCFFNCN 

03T9 

PEF 

1 

21,  34  1 3 

1 34  16 

0 

TCF 

DRI VFCN 

0310 

REF 

3C5 

LAST 

1469 

21  ,34)4 

3 4 755 

1 

TGCFFNON 

CAP 

Z ERO 

0311 

RFF 

6 

LAST 

1469 

21,34:5 

5C  C66 

1 

I NCEX 

CPNDXEP 

0312 

REF 

10 

LAST 

1469 

21 , 34)6 

C C , C 

C 

T S 

NEGUC 

0313 

orp 

1 

21 , 3407 

1 3420 

0 

TC  F 

CCNEYFT 

T31A 

RFF 

A 

LAST 

8 23 

21, 3410 

3 6310 

0 

NCTALLCN 

CAF 

0CT31 

0315 

RFF 

7 

LAST 

147C 

21  ,341  1 

50  066 

1 

INDEX 

QRNDXER 

0316 

RFF 

8 

LAST 

14  6 2 

21,^412 

55'632 

0 

TS 

OGIPT  IPF 

>317 

per 

306 

LAST 

147P 

21,3413 

3 4 7 5 5 

1 

CAF 

ZERO 

0318 

A1319 

REF 

4 

LAST 

1468 

21,3414 

55'  5'J7 

0 

TS 

ALLCWGTS 

032P 

RFF 

2 

LAST 

147C 

21,3415 

1 342T 

0 

TCF 

DONE  VET 

•)321 

RTF 

8 

LAST 

1470 

21,3416 

50  366 

1 

CPI VECN 

INDEX 

QRNDXER 

0322 

PFF 

<5 

1 AST 

1 4 7 •’ 

21,3417 

55 ' 632 

0 

TS 

CGIPiTIWR 

0323 

pep 

9 

LAST 

147C 

21  ,3420 

10  065 

0 

CGNFY  et 

CCS 

QRNDXER 

032R‘ 

REF 

1 

21,3421 

1 3 327 

c 

TCF 

TIP0GP8L 

0325 

PEF 

IR 

LAST 

1352 

21, 3422 

52  C73 

] 

cxr  H 

RLPTRFG3 

0326 

RFF 

3 I 

LAST 

1469 

21,3473 

52  063 

0 

CXCF 

ITFPP2 

.1327 

RFF 

6 2 

LAST 

144? 

21 , 3424 

0 4 6 74 

0 

TC 

I ENKGALL 

0326 

RFF 

2 

LAST 

1418 

21  ,3425 

35742 

0 

CACR 

ACCT+Cl 2 

0329 

RFF 

3 2 

LAST 

14  7 f 

21 , 3426 

5 2 063 

0 

CXCF 

I TEPF2 

033  0 

RFF 

19 

LAST 

1470 

2 1 , T 4 2 7 

52  073 

1 

DXCH 

RLPTPEG3 

0331 

RFF 

26 

LAST 

1466 

21  , 3430 

0 0071 

1 

TC 

PUPTREG2 

0332 

21,3431 

CC24C 

1 

OCT00240 

OCTAL 

0C240 

1S:0G  AUG.  ll.lStS  L^IDAP 
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CRIVE  TIPE  PUST  BE  GREATER  THAN  ZERC. 


TURN  CPF  GIP0AL  NON. 


CPIVE  TINE  IS  POPE  THAN  2 SECCNCS,  SC 
CC  NOT  PERPIT  FURTHER  GTS  A T T I T UC E- P AT E 
CCNTPCL  UNTIL  AOSTASK  APPROVES. 

NO  HAITI  1ST  CALL  IS  PACE. 


CHCCSE  C CR  P AXIS. 


PPCTECT  IBNKCALL  ERASAELES.  ACCT+C12 
LEAVES  ITEMPS2,3  ALCNE. 

TUPN  CF  CHANNEL  BITS,  SET  CIPIACCCCTS. 
RESTORE  ERASAELES  FOR  IBNKCALL. 

RETURN  TC  CALLER. 


CECIPAL  10/102A 
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P033:> 

IFF 

FCLICWTNG 

SEGTICN  IF  A CCMIALATICA  CF  TPE  TETH  CIREAL  CCATRCL 

PRCR  THE  LAST  GTS  ENTRY.  THE  ClANTITY  NECLSLR 

R >135 

IS 

CGRPUTED  FCR  fACH 

AXIS  (C, 

R),  .707XCFLXFUNCTinN(3/2) 

+ X2THETA  = 

NEGUSUR.  NEW  DRIVES  ARE  ENTERED  TC  CH  12. 

R033  7 

THF 

SIBRCLTINF 

GTSCRT  ACCEPTS 

A CCUPLE 

PRECISICN 

VALUE 

IN  function. 

FUNCTICN  41  AND  RETLRNS  A 5 1 NGLE- F P EC  I S I C N 

R >339 

SCUAR6 

RCCT  Of 

: the 

FCLRTEEN  MCST  SIGNIFICANT  BIT 

S CF  THF  APGURENT. 

ALSC,  TFE  CELL  SHETRLAG  CCNTAINS  A EINARY 

R034  1 

EXPONENT  S,  SUCH  TFAT  TFE  SCUAPE  POOT 

(RETURNFO 

IN  THE 

A REGISTER) 

REST  BE  SHIFTED  RIGHT  (RLLTIFLTEC  PY  2 TC  THE 

P 034  3 

POWER  ( 

-S ) 1 TN 

1 CROFR 

TO  BE  THE  TRUE 

SCLARE  RCCT 

CF  THE 

FCURTFfN!  RCST  SIGNIFICANT  BITS  CF  FUNCTICN,  FLNCTICN  +1. 

R9345 

SCUARE 

ROOT  ERROR 

IS 

NOT  MORE 

THAN  2 

IN  THE  14TH 

SIGNIFICANT  BIT. 

CELLS  CLCPPERFD  ARE  A , L , S H F T EL  A G , IN  IN D E X , 

R0  34  7 

HALFARG 

.SCRATCH, SR 

,FUNCT ICN  , 

FUNCTICN 

+1.  GTSCRT  IS  CALLED  BY  TC  GTSCRT  AND  RETLRNS  VIA  TC  Q CP  1C  FLNCTICN  +1. 

R0349 

ZERO  OR 

MfgAtivf  arguments  YIELD  ZERC 

FCR  SCLARE 

RCCT  S. 

03  56 

Rcp 

8 

1 AST 

1465 

? 1 , 3432 

1 1 • 75  1 

1 

GTSQRT 

CCS 

F LNC  TI CN 

735  1 

pep 

1 

21,3433 

1 3451 

r 

TCP 

GCCDARG 

FUNCTION  IS  POSITIVE.  TAKE  SCLARE  FCCT. 

135? 

21, 3434 

1 3 4 36 

1 

TCF 

+ 2 

HIGH  CRDER  WCRC  IS  ZERC.  TRY  THE  LCWER. 

0353 

RFF 

1 

?1 ,3435 

1 3442 

1 

TC  F 

Z ERPCT 

NEGATIVE.  LSE  ZERC  ^CR  1/2  FCHER. 

0354 

RFF 

9 

LAST 

147  1 

21,3436 

3 n5? 

C 

CA 

FLNCTICN  +1 

0355 

71, 3437 

0 0C06 

1 

extend 

0356 

R'=F 

2 

LAST 

1471 

21 ,3440 

6 3442 

0 

BZYF 

ZEROOT 

0357 

R'F 

1 

21,3441 

1 3445 

c 

TCF 

ZEPPHIGH 

FPCCEEC. 

03  5 8 

PFF 

307 

LAST 

147.- 

21,3442 

3 4755 

1 

ZFROGT 

CA 

ZERC 

0359 

RFp 

1 

21,3443 

55*741 

0 

TS 

SHFTFLAG 

>360 

RFF 

425 

LAST 

1469 

21, 3444 

C CC02 

0 

TC 

C 

0361 

RFF 

If; 

LAST 

147  1 

21 ,3445 

57*751 

0 

ZEROF  IGH 

XCH 

FUNCTION 

14  RGST  SIGNIFICANT  PITS  ARE  IN  THE 

036? 

RFF 

1 1 

LAST 

147  1 

21,  3.446 

57 ' 752 

c 

XCH 

FUNCTICN  +1 

LCWER  WCRC.  exchange  THERl. 

0363 

REF 

24 

LAST 

1364 

21,3447 

3 4 7 57 

c 

CA 

SEVEN 

0364 

RFF 

2 

LAS-F 

147  1 

21 ,345C 

1 3452 

0 

TCF 

GCCDARG  tl 

0365 

RFF 

308 

LAST 

147  1 

21,3451 

3 47  5 5 

1 

GCCDAPG 

CA 

ZERC 

0366 

RFF 

2 

LAST 

147  1 

21  , 3452 

55 ' 74 1 

0 

TS 

SHF  TFLAG 

0 367 

RFF 

1 

21  , 3453 

3 57^,1 

'0 

CA 

TWELVE 

INITIALIZE  the  SCALING  LCCP. 

9368 

RFF 

1 

?1  , 3454 

55*744 

f 

TS 

1 NINCEX 

C369 

RFF 

1 

?1  ,3455 

1 3464 

0 

TCF 

SCALLCOP 

0376 

RFF 

12 

LAST 

147  1 

21,3456 

3 1751 

f 

SCALSTPT 

CA 

FLNCTICN 

0371 

RFF 

1 

21,3457 

1 3500 

r 

TCF 

SCALDCN'F 

0372 

REF 

11 

LAST 

1456 

2!  ,346;. 

3 7751 

0 

A'ULBLSH 

CA 

NEG2 

IF  ARC-  IS  MOT  LESS  THAN  1/4,  INDEX  IS 

03’'3 

PEF 

? 

LAST 

147  1 

21  , 3461 

27 ' 744 

r 

ADS 

I NTNDcX 

ZERC,  indicating  NO  SHIFT  NEEDED. 

0374 

2 1 , 3462 

0 0 00  6 

1 

EXTEND 

BRANCH  IF  ARG  IS  NCT  LESS  THAN  1/4. 

0375 

RFF 

1 

21  , ^463 

6 3456 

0 

eZRF 

S CALSTRT 

OTHERWISE  CCRFARF  ARG  WITH  A REFERENCE 

A0376 

WHICH  IS  4 TIRES  LARGER  THAN  THE  LAST. 

0377 

PEF 

13 

LAST 

147  I 

21 ,3464 

4 1751 

1 

SCALLOQP 

CS 

FLNCT  ION 

0378 

RFF 

3 

LAST 

147  1 

21 ,3465 

51  * 744 

1 

INDEX 

I N INDEX 

0379 

RFF 

53 

LAST 

1446 

? 1 , 3 4 6 6 

6 4735 

1 

4I> 

BIT15 

REFEPENCF  RACNITUCF  LESS  CR  ECUAL  TC  1/4 

03  Et 

21  ,:^467 

0 0 0 0 6 

1 

EXT  END 

0381 

REF 

1 

21 ,3470 

6 3460 

0 

PZRF 

**11  BUSH 

IF  ARG  IS  NCT  LESS  THAN  REFERENCE,  GC 

A0382 

ARCLNC  THF  RULBEPPY  ELSE  CNCE  RCFE. 

GAP: 
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1383 

038A, 

REF 

REF 

4 

54 

LAST 
1 AST 

147  1 
147  1 

21.3471 

21 . 3472 

5 ! ' 744 
3 4735 

1 

1 

INDEX 

CA 

I MNDEX 
BI  TI5 

This  IS  THE  SCALE  NAGMTUCE 

038B 

REF 

1 

21 ,3473 

5 7'  74  7 

1 

XCF 

HALFAPG 

2**(- IN  INDEX  ) IS  THE  SHIFT  DIVISOR. 

0386 

21,3474 

0 C006 

1 

EXTEND 

PFSCALE  ARGLRENT. 

1387 

REF 

14 

LAST 

147  1 

21 ,3475 

3 1752 

0 

EGA 

FUNCTION 

03P8 

21, 3476 

C CC06 

1 

EXTEND 

03  89 

RFF 

2 

LAST 

1472 

21, 3477 

1 1 ' 747 

c 

nv 

HALFARG 

AP390 

ININDEX  AND  SFFTFLAG  PRESERVE  INFC  FCP 

A0391 

RESCALINC  AFTER  ROOT  PROCESS. 

1392 

21 , 35  10 

0 00'i6 

1 

SCALCCNE  EXTEND 

0393 

RFF 

15 

LAST 

1472 

21,350! 

23' 752 

0 

CXCF 

FUNCTION  +1 

SAVE  Q FCR  RETURN 

139A 

21, 3512 

c core 

1 

EXTEND 

0395 

REF 

86 

LAST 

1463 

21  ,3‘=.)3 

7 4736 

0 

MP 

BIT14 

0396 

RFF 

0 

LAST 

1472 

21  , 3 504 

55 ' 74  7 , 

r 

TS 

HALFARG 

0397 

PEP 

59 

LAST 

1452 

21 , 3515 

7 4737 

1 

RASK 

BITL3 

C398 

RFF 

527 

LAST 

1469 

21 ,3506 

10  000 

0 

CCS 

A 

1399 

ref 

1 

21,3507 

3 362  5 

6 

CA 

0CT11276 

0410 

RFF 

1 

21,3510 

6 3623 

0 

AO 

ROOTHALF 

INITIAL  GUESS  IS  RCCT  1/2  CR  FCSRAX 

04. '1 

RFF 

1 

21  ,T511 

0 3627 

1 

TC 

RCCTCYCL 

1412 

REF 

2 

LAST 

1472 

21,3512 

0 3627 

1 

TC 

RCFTCYCL 

04<  3 

RFF 

3 

LAST 

1472 

21  ,3513 

0 3627 

1 

TC 

ROOTCYCL 

0404 

RFF 

16 

LAST 

14  7 2 

21  , "'514 

n 1 7 2 

c 

TC 

FUNCTION  +1 

R0405 

04C7 

0408 

C4rs 

R'^F  1 21,3515 

REF  13  LAST  1466  21,3516 

21,3517 

0 3432  1 PSTCFGTS  TC 
57'742  1 PRCDLCT  XCH 
0 0006  1 EXTEND 

GTSQRT 

K2CNTFAL 

>|c  :<c  >|c>ic  ^ s};  jjc Ajs 

0410 

REF 

14 

LAST 

1472 

21  ,3520 

7 

1 142 

C 

VP 

K2CNTPAL 

0411 

RFF 

15 

LAST 

1472 

21, ’521 

c z 

•743 

1 

CXCF 

K2CNTPAL 

0412 

21 ,3522 

0 

0.7' 16 

1 

EXTEND 

THE 

PRODUCT  CF 

0413 

REF 

303 

LAST 

1469 

21,3523 

7 

CCl 

1 

N F 

L 

1/2 

2 1/2 

3414 

REF 

16 

{.AST 

1472 

21,3524 

27 

' 743 

1 

ADS 

K2CNTRAL  +1 

K « (DELYCRFGA 

+ ALPHA  / (2«K  ) ) 

0415 

REF 

304 

LAST 

1472 

21  ,3525 

54 

001 

1 

TS 

L 

AND 

0416 

21,3526 

1 

3530 

C 

TCF 

+ 2 

2 

041  7 

REF 

1 7 

LAST 

1472 

21 ,3527 

27 

•742 

0 

ADS 

K2CNTRAL 

DEL*(DEL*CMEGA 

+ ALPHA  /(2*K)  I NCVi  IN 

A04T8 

K2CNT  RAL 

041  9 

REF 

5 

LAST 

1472 

21 , 353D 

z 

1744 

1 

DOSHIFT 

CA 

I MNDEX 

042C 

21,3531 

n 

0006 

1 

extend 

MULTIPLY  IN  THE 

FACTOR  2 (-S  ) , RETURNED 

0421 

RFF 

87 

LAST 

1472 

21,3532 

7 

4 736 

c 

NF 

BIT14 

FY  THE  GTSCRT  SUBROUTINE 

0422 

RFF 

3 

LAST 

147  1 

21,3533 

27 

• 741 

D 

ADS 

SHFTFLAG 

0423 

21 ,3534 

0 

CCC6 

1 

EXTEND 

0424 

PEF 

1 

21,3535 

1 

3 5 5 4 

1 

ezE 

ACDI T IN 

0425 

REF 

4 

LAST 

147? 

21 ,3536 

51 

' 741 

1 

INDEX 

SFFTFLAG 

0426 

RFF 

55 

1 AST 

1472 

21 ,3537 

z 

4 73  5 

1 

CA 

B ITl  5 
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092  7 
0928 

PEP 

18 

1 AST 

1972 

21  ,R593 
21,^591 

57 

C 

'792 

CC06 

1 

1 

XCF 

EXTFPC 

K2CNTRAL 

0929 

REP 

19 

1 AST 

1973 

21,359? 

7 

1792 

C 

MP 

K 2CNTPAL 

C93C 

RTF 

7 

LAST 

196  9 

21,3593 

21 

• 790 

1 

CAS 

K2THFTA 

.193! 

REF 

23 

LAST 

1973 

21,3599 

57 

' 792 

1 

XCH 

K2CNTRAL 

093? 

21,3595 

0 

0006 

1 

EXTEND 

0933 

RPF 

2 1 

LAST 

1973 

21,3596 

7 

1793 

1 

PF 

K2CNT  RAD 

3939 

REP 

8 

L AST 

1973 

21,3597 

27 

'79  0 

1 

ADS 

K2THE  TA 

0939 

RPC 

305 

LAST 

1972 

21  ,3550 

59 

001 

1 

TS 

1, 

39^6 

21,3551 

1 

3 5 5 3 

G 

TCF 

+2 

093  7 

RPF 

9 

1 AST 

1973 

21, 3552 

27 

•737 

1 

ADS 

K2THETA 

09^8 

Rcp 

3 

LAST 

1966 

21,3553 

1 

3557 

1 

TC  F 

NEGUSUM 

093° 

21,3559 

C 

C006 

1 

ACDI TIN 

EX■"F^c 

099n 

REF 

22 

LAST 

1973 

21 ,3555 

3 

1 793 

0 

DC  A 

K2CNTRAL 

0991 

REF 

1C 

LAST 

1973 

21  ,3556 

21 

• 790 

1 

CAS 

K2THETA 

)992 

REF 

11 

LAST 

1973 

21,3557 

11 

'737 

1 

NEGUSLM 

CCS 

K2THETA 

0993 

RFF 

1 

21 ,3560 

1 

3569 

1 

TCP 

NEGDR IVE 

0999 

21,3561 

1 

3 563 

c 

TCF 

+ 2 

0999 

REF 

2 

1 AST 

1963 

21, 3562 

1 

3 5 66 

c 

TCF 

PCSDRI VE 

0996 

RPF 

12 

1 AST 

197^ 

21 , 0563 

11 

' ?90 

1 

CCS 

K 2THETA 

0 997 

ref 

68 

LAST 

1969 

21 , 3569 

3 

9 753 

1 

NEGORIVF 

CA 

RlTl 

0998 

2! ,3565 

1 

3567 

1 

TCF 

+ 2 

0999 

REF 

69 

LAST 

1973 

21 ,3566 

9 

9753 

0 

FCSCR  IV  E 

CS 

B ni 

0990 

»FF 

3C6 

LAS'i' 

1973 

21,3567 

59 

CO  1 

1 

TS 

L 

0991 

RFF 

6 

LAST 

1963 

21 ,3570 

51 

•750 

1 

INDEX 

ORCNTR 

C952 

PFF 

1 1 

LAS'" 

19  ?r 

2 1 , ’ 5 7 1 

5 7 

• Ffl 

1 

XCF 

NEGUC 

0953 

21,3572 

c 

COO  6 

1 

EXTEND 

0999 

RFF 

3C7 

LAST 

1973 

21  ,3573 

7 

0001 

1 

MP 

L 

09  55 

RPF 

308 

LA  ST 

1973 

21,3579 

I'l 

CCl 

1 

CCS 

L 

0956 

RFF 

1 

21,3575 

1 

3612 

0 

TCF 

LC.UPE 

0957 

REF 

1 

21 ,3576 

1 

3607 

1 

TCF 

Z ERDLCUP 

0958 

RPF 

1 

21, 3577 

1 

360  1 

1 

TCF 

REVERSAL 

0959 

RFC 

2 

LAST 

1 973 

21 ,3600 

1 

3 60  7 

1 

TCF 

ZEROLPUP 

0960 

RFF 

7 

LAST 

197  3 

21  , 1>601 

5 1 

• 750 

1 

REVERSAL 

IPDEX 

CRCNTP 

3961 

RPF 

5 

LAST 

1966 

21, 3602 

5 5 

•510 

c 

TS 

OACCDCT 

0962 

RPF 

e 

LAST 

1973 

21,3603 

51 

• 750 

1 

INDEX 

GRCNTF 

0963 

REP 

1 

21, 3609 

9 

3629 

c 

CS 

GPBLBTTA 

0 969 

21 , 36i)5 

a 

0006 

1 

EXTEND 

09  6.5 

REF 

73 

LAST 

1966 

21  ,36F6 

03 

U2 

1 

WAND 

CHAN12 

3966 

RFF 

59 

L 1ST 

1967 

21, 3607 

9 

1262 

1 

ZERGLCLP 

CS 

RCSFLAGS 

0967 

RFF 

3 

LAST 

1967 

21  ,36r'i 

7 

9797 

0 

MASK 

CALLGMBL 

0968 

RFF 

55 

LAST 

1973 

21,361! 

27 

' 262 

1 

ADS 

RCSFLAGS 

;C9  AUG.  11,1969  LMDAP 
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NOW  ACD  IN  YhE  K2THETA  TFRp. 

TEST  SIGA  CF  HIGH  CRCEF  PART. 

SIGN  TEST  FCR  LCA  CPDFR  PART. 

STOP  GIPFAL  CRIVE  FCR  A ZEPC  AEGUSUP. 
SAVE  FCR  CRIVE  REVERSAL  TEST. 


MULTIPLY  OLD  AEGU  AND  AEk  AEGL. 

NCIA-ZERC  GIPBAL  DRIVE  EEIAG  CCATIAUEC. 

NO  REVERSAL  PROBLEM  HERE. 

ATA-ZERC  GIPEAL  DRIVE  EEING  REVERSEC. 

AD  reversal  PPC8LEPI  HERE. 

A ZERC-CFIVE  PAUSE  IS  AFFCEC  FFRE.  ZERO 
IS  IN  A REGISTER  FRCM  CCS  CN  (-1). 


SET  UP  RECUEST  fcR  ACCT-IC12  CALL 
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L 

TRIP 

GI«PAL  CONTRCL 

SYSTEM 

USER'S  RAGE  NO.  13  E6  S4 

CA6C 

REF 

c 

LAST 

1473 

21 ,3612 

11 • 75  1 

0 

LCUPE 

CCS 

CRCNTR 

HAVE  BOTH  AXES  BEEN  RRCCESSED? 

REF 

2 

LAST 

1462 

21, 2612 

1 3106 

1 

TCP 

GCCTPI PG 

NC.  DC  G AXIS  NEXT. 

0471 

RcF 

2 

LAST 

1462 

21,3614 

3 1505 

0 

CA 

SAVE  SR 

RFSTCRE  THE  SR 

047? 

REF 

28 

LAST 

14  6 2 

21  , 3615 

54  021 

0 

TS 

S R 

2 1 , 2, 6 1 6 

0 0006 

1 

GCCLCSE 

extent 

TERMINATE  THE  JASK. 

0474 

REF 

1 

21,3617 

3 3622 

1 

CCA 

CLQSFADR 

0475 

21  ,362C 

5 2 00  6 

c 

CTCB 

0474 

“EF 

25 

LAST 

1469 

E6,  1 527 

EBANK= 

ACSQ 

04  7 7 

REF 

4 

LAST 

1445 

21  ,362  1 

0327  ) 

1 

CLCSEAGR 

2CACR 

C.  LCSFCUT 

TFRMINATE  the  JASK. 

0477 

21, 2622 

36  1C6 

c 

R0478 

047P 

RFF 

6 

LAST 

1421 

5741 

TWELVE 

ECUALS 

CCT14  ■ 

0480 

21,  ■’623 

26  5C1 

1 

RCOTHALF 

CCTAL 

26501 

SCLARE  PCCT  CF  1/2 

048  1 

21 ,3624 

01400 

1 

GMBL  EITA 

OCTAL 

0 1400 

INDEXED  WRT  GNBLBITB  DC  NET  PCVEXXW*** 

048? 

21  , 3625 

11276 

1 

OCT11276 

CCTAL 

11276 

FESMAX  - RCCTHALF 

rj4«  0 

21  , 3626 

06  )0  J 

1 

C-MBLB  ITP 

octal 

06000 

INCEXEC  WRT  GNBLBITA  EC  NET  pcVFXX*w*A 

R0484 

R0485 

SUBRCLTTNC  PCCTCYri: 

BY  CPA  IG  WCPK  ,3 

APR  11  66 

R0486 

RCCTCYCL 

I S A 

SUPRCLTINF  WHICH  EXECUTES  CNE  NEWTCN  SCUAPE  FOCT  ALGCPTTHM  ITERATICN.  THE  INITIAL  GUESS  AT  THE 

R0488 

SCL'APF  RCQT  IS 

PRESUMED  TC  BE 

IN  THT 

A 

REGISTER 

AND  CNE 

-HALF  THE  SCLARE  IS  TAHEN  FREM  HALFARG.  THE  NEW  APPRQXl- 

R0  4cr 

PA7IFN  7C  THE 

SCUAPE 

POHT  IS 

FETUFNEO 

IN  THF  A REGISTER 

. DEBRIS:  A 

, L, SR  , SCRATCH.  RCCTCYCL  IS  CALLEC  FFCN 

R049? 

LOCATION' 

(Lor ) 

RV  A 

TC  RCCTCYCL,  and 

RETURNS  (TC 

C ) TC 

LCC  +U 

R0493 

WARNING  : 

IF  THF  IMTTAl  GUESS  IS  NOT 

GREATER  THAN  THE 

SQLARE,  DIVIDE 

CP  ACC  CVEFFLCW  TS  A REAL  PCSSIBILITY. 

0495 

RFF 

1 

21,3627 

55' 746 

1 

RPOTCYCL 

TS 

SCRATCH 

STORE  X 

0496 

RFF 

29 

LAST 

1474 

21  , 263C 

54  C21 

C 

I S 

SR 

X/2  NCW  IN  SR 

0497 

RFF 

4 

t AST 

1472 

21 , 3631 

3 1747 

1 

CA 

HAl  EARG 

ARG/2  IN  THE  A REG 

0498 

21  , T632 

22  007 

0 

7L 

PREPARE  FOR  DIVISION 

0499 

21, 2623 

0 C''0  6 

1 

EXTEND 

0500 

RFF 

2 

LAST 

1474 

21  , 3634 

11 >746 

1 

DV 

SCRATCH 

( APG/X) /2 

C5C1 

ref 

20 

LAST 

1474 

21, 26T5 

6 C021 

1 

AC 

SR 

(X  + ARC/X  ) /2  IN  THE  A REG 

0502 

ref  4?6 

LAST 

147  1 

21,3636 

0 COO 2 

c 

TC 

0 

RC5C3 
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ROOOl  FPrGRAF  RARE:  l/ACGS 

R0002  PROGRAM  kPITTEN  BY:  BOB  CGVELLI  ARC  MKE  FCUSTCR 
POO-ia  last  MODIFICATION:  FEB. 14, 1969  BY  G.KALAN 

RCCC4  FRCGRAM  CESCRIPTICR: 

R0005  1/ACCS  PROVIDES  THE  INTERRACF  EETREEN  THE  GUIDANCE  PROGRAMS  AND  THE  DIGITAL  AUTCPILCT.  WHENEVER  THERE  IS  A 

ROOT?  CHANGE  IN  THE  MASS  CE  THE  VEHICLE,  IN  THE  DFACBAND  SELECTED,  IN  THE  VEHICLE  C C N R IG LR A T I C N ( A SC E NT- C E S C E NT - 

RCC09  COCKED),  AND  DURING  A FRESH  START  CR  A RESTART,  1/ACCS  IS  CALLED  TC  CCMMUN1CA.TE  THE  DATA  CHANGES  TC  THE  CAR. 

ROOll  THF  INPUTS  TO  1/ACCS  AR  MA«;S,  ACCELERATICN  (ABDELV),  CFACBAND  (CE),  CFFSET  ACC  f L ER  AT  I CNS  (ACSC  AND  ACSR), 

R00I3  STAGE  VERIFY  E'lT  ( C H A N3  ■ , B I T2  ) , DCCKEC  BIT  ( C A P FOOL  S , E IT  1 3 ) , DRIFT  BIT  ( D A PBO  C L S , B IT  6 ) , USECRJTS  (CAFBCCLS, 

R0015  RIT14),  AND  SURFACE  FLAG  ( F L AG W R C F , 8 IT  6 1 , ANC  CH5MASK. 

RD016  1/ACCS  CCMFUTFS  THE  JET  ACCELERATIONS  (IJACC,  IJACCQ,  IJACCR)  AS  FLNCTICNS  CE  MASS.  IJACCU  ANC  IJACCV  APE 

R0D18  FORMED  BY  RESOLVING  IJACCC  NAC  IJACCR.  IN  THE  CFSCENT  CASE,  THE  DESCENT  ENGINE  MCMENT  ARM  (L,P\T-CGI  IS  ALSC 

R002n  COMPUTED  AS  A FUNCTICN  OF  MASS.  THF  RATE  CF  CHANGE  CE  ACCELEPATICN  CUE  TC  RCTATICN  CE  THE  GIMBAL  (ACCCOTQ, 

R0022  ACCDCTR)  is  AISC  CCMPUTFC  IN  THE  CESCENT  CASE. 

RJ023  AFTER  THE  ABOVE  C 0 MPU T AT I C N S , THE  RRCGPAM  1/ACCCNT  CCMFUTES  THE  RECIPROCAL  NET  ACCELERATIONS  ABOLT  THE  F,  L, 

R0025  ANC  V AXES  12  JETS  FOR  P AXIS,  BOTH  1 AND  2 JETS  FOR  L AND  V AXES),  AND  THE  RFCIFRCCAL  CCAST  ACCELERATIONS  ABOUT 

R0027  THE  0,  L,  AND  V AXES.  THE  AC C EL R AT  I pN  FUNCTIONS  (ACCFCT71  AND  ACCFCTZ5)ARE  ALSC  CCMPUTED  FOR  THESE  AXES.  THE 

RD029  FIRE  ANC  COAST  OEACBANDS  AND  AXISCIST  ARE  CCmflTET  TCR  EACH  AXIS.  FLAT  ANC  Z0NE3LIM,  THE  WIDTH  AND  HEIGHT  CF  THE 

R0031  MINIMUM  IMPULSE  ZCNE,  ARE  COMFUTEC.  1/ACCONT  ALSO  SEIS  ACCSWlU  AND  ACCSWV,  WHICH  INDICATE  WHEN  1 JET  ACCELEPATICN 

R0C33  IS  NCI  SLFFiriENT  TC  FRCDLCE  MINIMUM  ACCELEPATICN.  AT  THF  CCMPLETICN  OF  1/ACCS,  THE  ACCSOKAY  BIT  IS  SET. 


ROOTS  SUEBOU'PIMES  CALLED: 

R0C36  TIMECMPl 

R0077  MAKFCADR 

R0038  P0T45DEG 

RCC39  CALLING  SEQUENCF: 

A004D  TC  BANKCALl  (1/ACCS  MUST  EE  CALL  BY  BANKCALL 

A0D41  CADR  1/ACCS 

R0047  NCPMAL  EXIT:  VIA  BANKJUMF  ALARM  AND  ABCFT  EXIT  MCCES:  NCNE. 

R0043  INFUT/OUTPUT  : SEE  P9CGRAM  DESCRIPTION 

RCC44  CEFRIS: 

P0045  ALL  OF  THE  EXECUTIVE  TEMPCRARY  REGISTERS,  EXCEPT  FIXLCC  AND  OVFINC,  ANC  THE  CCRE  SET  AREA  FROM  MPAC  TO  BANKSET. 
RQQ47  RFStr  KT  IONS  : 

RCC48  I/ACCS  mlST  BE  CAllEC  BY  BANKCALL 
R0049  EPANK  IS  SFT  TO  6,  RLT  NCT  RESTORED. 
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ANO  AOSjne 
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0G5C 

0051 

REF 

■3 

21 ,3637 
21 ,2CQr 

8ANK 
SET  1 CC 

2 1 

CA  FS4 

0052 

21 , ’637 

BANK 

0C53 

REF 

1 

CnUNTX 

T 1/DAPAC 

0054 

RFF 

26 

LAST 

1474 

'=6,  1537 

EBANK= 

ACSC 

R0055 

ENTRY  IS 

THROUGH  1/ACCJCR  FP 

i/accsft  when  1/ACCS 

; IS  TO 

BE  DONE  A 

5 A SEPARATE  NCVAC  JCB. 

PO057 

IT  ’ 

1 S POSSIBLE 

■ FOR  PCRE  THAN 

CNE  CF 

THESE  JCeS  TC 

: BE  SET  UP  CCN'CURRENTLY.  HOWEVER,  SINCE  THERE  IS  NC  CHECK  CF 

R0059 

NEN JOE , 

A SECONC  PAN  IFESTAT  ION  CANNOT  BE 

STARTED 

LNTIL 

THE  FIRST 

I S CCPPLFTEO. 

0C61 

REF 

3C9 

LAST 

L47  I 

21  ,3637 

3 4755 

1 

1/ACCSFT 

CAE 

ZERO 

ENTRY  FRCM  FRESH  S T AR T / P E S T A R T CCCING. 

0062 

REF 

27 

LAST 

1476 

21 , 3640 

55' 537 

0 

TS 

ACSC 

NULL  THE  OFFSET  ESTIMATES  FOR  1/ACCS. 

0C63 

REF 

10 

LAST 

1417 

21 , 3641 

55*541 

1 

TS 

AC  SR 

0064 

RPF 

6 

LAST 

1417 

21  , 3642 

55' 424 

0 

TS 

ALPHAC 

NULL  THE  OFFSET  ESTIPATES  FOR  DCWNLI 

0065 

REF 

c 

LAST 

1417 

21 , 3643 

c c * 4 2 c 

1 

TS 

ALPHAR 

0066 

REF 

314 

LAST 

1392 

21 ,3644 

0 4616 

1 

1/ACCJOE 

TC 

BAN'KCALL 

1/ACCS  ASSLPES  ENTRY  VIA  EANKCALL. 

0067 

RFF 

2 

LAST 

858 

21,3645 

4C465 

1 

CADR 

1 /ACCS  +2 

SKIP  EBANK  SETTING. 

0068 

REF 

1 58 

LAST 

1382 

21, 3646 

0 5 155 

0 

TC 

ENDCE JCB 

00682 

20,2463 

BANK 

20 

00683 

REF 

5 

LAST 

1404 

26,2000 

SETLCC 

DAFS3 

006  8 6 

2-T  ,2463 

BANK 

006-8  8 

PEF 

■a 

LAST 

43  TO 

44  : 

3 

4* 

CCLNT* 

tJ/DAPAO 

1069 

RFF 

10 

L AST 

1398 

20, 2463 

3 501  5 

c 

1 /Arc  S 

CA 

EBANK6 

eeank  set  ELT  NCT  RESTCREC  >!■«*#=> 

0070 

PEF 

88 

LAST 

1399 

20,2464 

54  003 

0 

TS 

EBANK 

0071 

RFF 

1 6 

LAST 

1367 

20,2465 

0 4645 

1 

TC 

PAKECACR 

SAVE  RETURN  SC  THAT  ruF2  PAY  BE  USED 

0072 

REF 

1 

2.3, 2 466 

54  117 

1 

TS 

ACCRETRN 

R0073 

DETERMINF  MAS'^ 

OF  THE 

LFP. 

0074 

REF 

59 

LAST 

1443 

20,2467 

3 cm 

c 

CA 

DAPBCCLS 

IS  CSP  CCCKEC 

0C75 

REF 

11 

LAST 

1442 

21,247  ) 

7 4737 

1 

MASK 

CSMOOCKD 

0076 

PEF 

1 

23,2^71 

54  157 

c 

TS 

DCCKTFRF 

STCRE  RECCRC  CF  STATE  IN  TEPP  (PPAC  +3 

0077 

PEF 

528 

1 AST 

1472 

20, 2472 

10  000 

c 

cr  s 

A 

0C78 

RFC 

C 

LAST 

315 

20, 2473 

4 1327 

1 

cs 

CSPMASS 

COCKED:  LEPMASS  = «ASS  - CSPP«SS 

0079 

R-:F 

14 

LAST 

855 

20, 2474 

6 1243 

0 

AO 

MAS  S 

LEM  ALCNF:  LEPPASS  = PASS 

0080 

PEF 

11 

LAST 

315 

20,2475 

55 '326 

0 

TS 

LEPMASS 

R0081  ON  THE  BASIS  OF  A^SFLAG: 

R'30R2  set  TFE  P-AXIS  RATE;  rO’^MANT  LIMIT  FOR  2-JET/A-JET  CCNTROL 

RQ083  SET  PFAC,  NHICh  INCICATFS  T|-tr  pfiCFFR  S i=T  CF  COEFFICIENTS  FOR  THE  LEM-ALCNE  F(MASS)  CALCULAIICNS 

POORS  ENSURE  THAT  THE  I.FM  PASS  VALUE  IS  HTHIN  THE  ACCEFTABIE  RANGE 


OflRSS 


2 ),  2^76  0 0Tj4  0 


INHINT 
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0086 

RFF 

24 

LAST 

1443 

2 1,  2 47  7 

3C  106 

C 

CAE 

FLCViRCl'i 

CDTEPPINE  (nFETFER  STAGEC. 

0087 

R8F 

16 

LAST 

1443 

20,  25’im 

7 4737 

1 

MASK 

APSFLBI T 

0088 

20,2501 

0 0006 

1 

EXTEAC 

008° 

REF 

1 

20, 2502 

1 2 5 2 6 

c 

BZF 

DFSFLITE 

0090 

REF 

40 

LAST 

1464 

20,2503 

4 4733 

0 

cs 

POSMA  X 

ASCENT  (CR  CN  LUNAR  SURFACE) 

0091 

REF 

■a 

LAST 

1426 

20,2514 

C C , ^ 3 c 

1 

TS 

-2 JETLI N 

ALWAYS  2 JETS  FOP  P-AXTS  RATE  COMPAND 

009? 

RFF 

7 

LAST 

1474 

20, 2505 

3 5 74  1 

0 

CAP 

OCT  14 

INITIALIZE  INDEX  AT  12. 

0C9? 

REF 

8F2 

LAST 

139  5 

20 ,2506 

54  154 

0 

TS 

MFAC 

0094 

REF 

12 

LAST 

1476 

20, 2 5 '7 

4 1326 

0 

CS 

LEPPASS 

CFEDK  IF  PASS  TOO  FIGF.  CATCF  STAGING. 

0095 

RFF 

3 
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213 

20, 2510 

6 1400 

1 

AD 

H lA  SCENT 

0096 

20,2511 

0 CO'06 

1 

FXTFAC 

0097 

PEF 

1 

20, 2512 

6 2 5 1 7 

c 

eZPF 

PA  'SF  IX 

0098 

PEF 

13 

LAST 

1477 

?'),2513 

4 1326 

0 

CS 

LFPiMASS 

CHECK  IF  PASS  ICC  LCW.  THIS  LIMITS  THE 

0099 

REF 

1 

20,2514 

6 2C'd 

1 

AC 

LCASCENT 

DECFEPENTING  BY  MASSMON. 

0 1 00 

20, 2515 

9 00*'6 

1 

EXTEND 

Old 

REF 

1 

20 ,2516 

6 2544 

0 

eZMF 

F (MASS ) 

0 102 

REF 

14 

LAST 

1477 

2), 2517 

27' 326 

0 

MASSFIX 

ADS 

LEPPASS 

STDRF  THE  VIOLATED  LIMIT  AS  LEMMASS. 
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20, 2520 

2 2 0 17 

0 

ZL 

ALSD  CDRRECT  TOTAL  PASS,  ZERDTNG  TFE 

0 104 
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p 
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1476 

20,2521 

10  157 

0 

CCS 

CCCKTEMP 
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REF 
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LAST 
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20,2531 
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0 

TS 
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0 

CS 
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REF 
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1 

AD 
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0115 

20,2534 

0 CC06 

1 

EXTEND 

ICAD  TS  CCNE. 

0116 

RFF 

2 

LAST 

1477 

20,2535 

6 25  1 7 

0 

BZPF 

MASSF IX 

0117 

PEF 

17 

LAST 

1477 

20 ,2536 

4 1336 

0 

CS 
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CHECK  IF  WASS  TOC  LCW.  THIS  LIMITS  THE 
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RFF 

1 

20,2537 

6 2C03 

0 

AD 

LCDESCNT 
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01  19 

REF 
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LAST 

1477 

20 ,2540 

6 14  1) 

1 

AD 

HIASCENT 

0120 

20,2541 
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PEF 
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1477 
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20 ,2552 

26  154 

0 

ADS 

MPAC 

JX=10,e,6  CR  4,2,C  TC  INDEX  CLEFS. 
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NASS  + C 


IJACC  ( J ) =A (JX  ) /( MASS  + C ( JX ) + E(JX) 

IJ ACC (- n = L ,PVT-CG  SCALEC  AT  E FEET 


RESOLVE  G-R  COMPONENTS  INTC  NC N-C PT FCGC N A L 


EPSILCN  IS  A MEASURE  CF  COLPLING  ANC  IS 
CEFINEC=1-IC/IR  FCR  IR  GREATER  TPAN  IG  . 
THE  CCMPLTEC  EXPRESSION  IS  ECLIVAI.ENT 


EPSILCN  IS  LIMTEC  TC  A MAX.  CF  .A2265 


IN  THIS  case  V,FER£  IR  IS  GREATER  THAN 
IG,  CCEFFQ  = -.7C7(  1 + .5EFSUCN)(I-EPSILCM 
ANE  CCEFFR=.7C7(H.5FPSILCN) 


EPSILCN  IS  rPFINEC  AS  I-IR/IO  FOR  IG 
GPEATFR  than  IR.  -EPSILCN  IS  CCMPUTEC 
RATHER  THAN  EPSILCN  FCR  C.CNVEMENCE 


G/sp: 
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017B 

2T, 2630 

0 C0C6 

1 

EXTEND 

C179 

REF 

1 

20 ,263  1 

6 2634 

1 

BZMF 

GC0DEPS2 

0180 

RFF 

4 

LAST 

1478 

20, 2632 

3 3 110 

1 

CA 

-EPSRAX 

0181 

PE  F 

3 

LAST 

1478 

20, 2633 

c 4 ] c c 

1 

TS 

-EPSI LCN 

EPSILCN  IS  LIRITEC  TC  A MAX.  OF  .42265 

G182 

REF 

4 

LAST 

1479 

20 ,2634 

3 C155 

n 

GCCDFFS2  CA 

-EPSILCN 

0183 

20,2635 

C CCC6 

1 

FXTENC 

0184 

REF 

2 

LAST 

1478 

20, 2636 

7 3104 

0 

RP 

0.35356 

0185 

RFF 

1 

2'', 2637 

6 3 1 ' 7 

1 

AD 

-.7071 

0186 

REF 

4 

LAST 

147  8 

2'"  , 2640 

55  '627 

1 

T S 

CC E F F C 

IN  this  CASE  WHEPE  IC  IS  GREATER  THAN 

0]  87 

REF 

5 

LAST 

1479 

20,2641 

4 0155 

1 

CS 

-EPSILON 

IR,  CCFFFG  = -.  707  ( 1 + . 5EF SI LCN  ) ANC 

0188 

RFF 

12 

LAST 

1459 

2 0,264 2 

6 4 735 

1 

AD 

NFGMAX 

CrEFFR=.707(l+.5EPSIL0N)(l-EPSIL0N) 

0189 

20, 2643 

(<  0 016 

1 

extend 

C19C 

PEF 

5 

1 AST 

1479 

20  ,2644 

7 1627 

1 

RP 

CCEFFG 

oin 

RFF 

4 

last 

1478 

20,2645 

55'  630 

1 

TS 

C C t F F P 

0192 

REF 

6 

LAST 

1479 

2), 2646 

4 1627 

1 

JACCLV  CS 

CCEFFC 

0193 

20,2647 

C 0006 

1 

EXT  END 

0194 

PEF 

4 

LAST 

1478 

20,2650 

7 153  1 

0 

R P 

1 JACC  C 

IJAfCC  IS  SCALED  AT  PI/4 

0195 

RFF 

1 

2 ) ,265  1 

55 ' 533 

1 

TS 

1 JACCL 

IJACCL  LSFC  AS  TERRCRAFY  'TCKAGE 

0196 

REF 

c 

LAST 

14  79 

29 , 26  52 

3 1630 

c 

CA 

CFEFFP 

0197 

20, 2653 

0 0006 

1 

EXTEND 

. Cl  98 

REF 

4 

LAST 

1478 

20,2654 

7 1532 

0 

MR 

IJ ACCR 

0199 

REF 

2 

1 AST 

1479 

20, 2655 

6 1533 

c 

AD 

1 JACCL 

0200 

20,2656 

0 0006 

1 

EXTFNO 

0201 

REF 

88 

LAST 

1472 

20,2657 

7 4736 

0 

RP 

BIT  14 

SCALING  CHANGED  FRCR  PI/4  TF  PI/2 

0 20  2 

RFF 

■3 

LAST 

1479 

20, 2660 

55  ' 533 

1 

T S 

1 JACCL 

0203 

RFF 

1 

20 ,2661 

55  '534 

0 

TS 

1 JACeV 

SCALED  A1  FI/2  R AC  I A N S / S E C (2 ) 

0 204 

PEF 

893 

LAST 

1478 

2j,2662 

11  154 

c 

CCS 

MFAC 

CCRFUTE  L,FVT-CG  IF  IN  DESCENT 

0205 

RFF 

310 

LAST 

1476 

20, 2663 

3 4 7 5 5 

1 

CAF 

ZERO 

ZERC  SNITCHES  ANC  GC  TC  1/ACCGNT  IN 

C2C6 

RFF 

5 

LAST 

147G 

20 ,2664 

55' 502 

0 

TS 

ALLOWGTS 

ASCENT 

0207 

P FF 

1 

20,2665 

1 3 2 3 4 

p 

TCF 

1/ACCCNT 

-1 

0208 

PEF 

1 19 

LAST 

1477 

20,2666 

4 4752 

1 

CS 

THO 

0209 

REF 

894 

LAST 

1479 

2 ) ,2667 

54  154 

0 

TS 

MFAC 

0210 

RFF 

174 

LAST 

1468 

20,2670 

4 4 7 5 3 

0 

CS 

CNE 

0211 

RFF 

895 

LAST 

1479 

20  ,2671 

54  155 

! 

TS 

MPAC  +1 

0212 

rff 

1 

20 , 2672 

1 2 553 

1 

TCF 

STCTRl 

R0213 

THIS 

SECTION  CCRPUT 

c 

S the  rate  of  CHANG 

E OF  ACCELERATICN  DUE  TC  THE  RCTATICN  CF  THE  GIRBALS.  THE  EGLATICN  IRFLE 

R0215 

RENTED  IN  BOTH 

THF 

Y 

-X  PLANE 

ANC  THE 

z- 

X plane  is  — D(ALPHA)/DT 

= TL/I*D(rELTA) /DT,  NHERE 

R0217 

T = 

ENGINE  thrust  force 

P021  8 

1 = 

FI  VCT 

TC  CG 

EISTANCF 

OF  ENGINE 

RC219 

I = 

NCMENT  OF 

INERTIA 

0220 

pep 

6 

LAST 

856 

20,2673 

31  ' 245 

c 

LPESC  CAE 

AECFIV 

SCALEC  AT  2(13)  CR/SEC(2) 

0221 

20  ,2674 

0 0006 

1 

EXTEND 

0222 

RFF 

16 

LAST 

1477 

2(1 ,2675 

7 1243 

1 

RP 

MASS 

SCALED  AT  8+16  KGS 

02  2 3 

PEF 

1 

20,2676 

0 300  2 

0 

TC 

DVCVSLB 

GET  CLCTIENt  IvITH  CVERFLDH  PPOTECTICN 

0224 

REF 

1 

20 , 2677 

03105 

.1 

ACRES 

GFACTR 

R0225 

MASS 

IS 

DIVIDED  BY 

ACCELPRATICN  CF  GRAVITY  IN  CPDEP  TC 

RAKH  THE 

UN  ITS 

CF  1XX,IYY,I2Z,  WFICF  ARE  SLUG-FT(2). 

R0227 

THF 

PATIO  OF  ACCL  ERAT  ICA  FROY  PIPAS 

TO 

ACCELERATION  CF 

GRAVITY  I 

S IHE 

SARIP  IN  METRIC  CR  ENGINEERING  UMTS,  SC 
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R0229 

THAT  IS 

UNCONVERTED . 

2.20462 

CONVERTS 

KG.  TC  L8 

. NCH 

T IS  IN  A 

02X1 

2-7 ,27  10 

0 0006 

1 

EXT  END 

0 23  2 

RFF 

1 

20 ,2701 

7 1527 

1 

MR 

L,PVT-CG 

0233 

20,2702 

0 '"cn^i 

C 

INHINT 

023A 

REF 

896 

LAST 

1479 

20  , 2 7 ) 3 

54  154 

0 

TS 

MPAC 

0239 

2i:  , 2 704 

C CCC6 

1 

EXTFNC 

0236 

RFF 

9 

1 AST 

1479 

2D  , 2 7 0 9 

7 1532 

0 

HP 

1 JACCR 

0237 

REF 

2 

LAST 

1479 

20,2706 

0 3002 

0 

TC 

0VCVSU8 

0238 

RTF 

1 

20,2  70  7 

C2J0J 

o 

ADPE5 

TCPKJETl 

0239 

RFF 

2 

LAST 

1 466 

27,2710 

55'511 

1 

TS 

ACCDOTR 

02AC 

RFF 

897 

LA  ST 

1 4Pr 

20,2711 

3 0 154 

1 

CA 

MFAC 

0241 

2D  ,2712 

0 8006 

1 

EXTEND 

0242 

RFF 

9 

LAST 

1479 

2>'  ,2713 

7 1531 

0 

MR 

IJACCQ 

0243 

RFF 

3 

LAST 

148C 

20,2714 

: 3C02 

c 

TD 

nvcvsuB 

0244 

RFF 

2 

LAST 

1480 

27,2719 

0 2 300 

0 

ADPES 

TCRKJET  1 

0249 

RFF 

6 

LAST 

1469 

20,2716 

95' 507 

0 

SFSCCNT 

TS 

ACCDCTC 

0246 

20,2717 

0 C0Q6 

1 

EXTEND 

0247 

RFF 

1 

20,2729 

7 3103 

1 

MP 

OGBE 

0248 

REF 

4 

LAST 

1463 

2 ' , 272  1 

5 5 * 5 C 4 

c 

TS 

KC 

024F 

RFF 

3 

LAST 

1480 

20, 2722 

3 1 ' 5 11 

r 

CAE 

ACCDC'TR 

C2FG 

2D  , 2 723 

0 0006 

1 

EXTEND 

0291 

RFF 

2 

LAST 

1480 

20,2724 

7 3 103 

1 

MP 

DGPF 

0252 

REF 

1 

2 ),  2729 

59 '506 

1 

TS 

KRDAP 

0253 

20,2726 

0 0006 

1 

EXT  END 

02  54 

REF 

74 

LAST 

1473 

2' ',  2 727 

00  0 12 

1 

READ 

CHAN12 

0255 

RFF 

898 

LAST 

1 480 

2 1,2730 

54  155 

1 

TS 

MPAC  +1 

02^6 

RFF 

5A 

LAST 

146  2 

2D, 2731 

3 4 7 52 

c 

CAE 

PIT2 

0257 

RFF 

1 

20, 2732 

1 2734 

1 

ICE 

LCCP3 

C258 

REF 

311 

LAST 

1479 

20 ,2733 

3 4795 

1 

CAF 

ZERO 

0259 

PEE 

899 

LA  ST 

1 480 

20,2734 

54  154 

0 

LCCR3 

TS 

MFAC 

0260 

REF 

900 

LAST 

1480 

20,2739 

3 0155 

0 

CA 

MPAC  +1 

0261 

RFF 

901 

LAST 

148C 

20,2736 

50  154 

1 

INDEX 

MFAC 

0 26  2 

REF 

1 

20, 2737 

7 30  7 7 

0 

MIA  SK 

G 1 MBLPTS 

C263 

20,2740 

0 1006 

1 

EXTEND 

0264 

REF 

1 

20,2741 

1 2 755 

c 

PZF 

ZACCCCT 

0265 

RFF 

902 

LAST 

1480 

20, 2742 

3 0155 

0 

CA 

Ml  FAC  +1 

0266 

REF 

90  3 

LAST 

1480 

2 > ,2743 

50  1 54 

1 

INDEX 

MPAC 

0267 

RFF 

2 

LAST 

148G 

20,2744 

7 3100 

1 

MASK 

GIMBLBTS 

0268 

20,2749 

0 COD 6 

1 

EXTEND 

0269 

RFF 

1 

20 ,2746 

1 2752 

1 

PZF 

ERST  ZERC 

0270 

REF 

904 

LAST 

1480 

20,2747 

50  154 

1 

INDEX 

MFAC 

0271 

RFF 

7 

LAST 

1480 

20 ,2  790 

4 150  7 

0 

rs 

ACCDCTQ 

0272 

REF 

1 

20,279  1 

1 2 7 56 

G 

ICF 

STACCDOT 

0273 

RFF 

9 39 

LAST 

14  80 

20,2792 

5C  154 

1 

FPSTZERr 

INDEX 

MPAC 

0274 

RFF 

8 

LAST 

1480 

2-',  2793 

3 150  7 

1 

CA 

ACCDOTQ 

0279 

RFF 

2 

LAST 

1480 

20, 2794 

1 2 75  6 

c 

TCF 

STAC.CCCT 

02  76 

RF  p 

312 

LAST 

1480 

29,2799 

3 4755 

1 

ZACCDGT 

CAF 

ZERO 
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SCAIEC  AT  2(1AI. 

SCALEE  AT  8 FEET. 


GET  OtOTIENT  MTH  OVERFLCVi  FPCTECTICN 


SCALED  AT  FI/2I7) 


GET  CUCTIENT  HITE  OVERFLOW  PPOTECTICN 

SEAL  EC  AT  PI/2I7) 

.3ACCCCTG  SCALED  AT  PI/2IE) 

.3ACCCCTF  AT  FI/2(8) 


NOW  CCMPLTE  OACCPCT,  RACCDCT,  THE  SIGNED 
JERK  TERNS.  STCRE  CHANNEL  12.  WITH  GIN 
BAL  DRIVE  BITS  9 THRCLC-H  12.  SET  LCCF 
INDEX  TC  CCPPUTE  RACCDCT,  THEN  CACCCCT. 

ACCDGTQ  AND  ACCDOTR  ARE  NCT  NEGATIVE, 
BECAUSE  they  are  MAGNITUDES 

MASK  CHANNEL  IMAGE  FOR  ANY  GIMEAL  MCTICN 


IF  NCNE,  G(P)ACCCCT  IS  ZERO. 

GIMBAL  IS  MOVING.  IS  PCTATICN  FCSITIVE. 


IF  NOT  POSITIVE,  BRANCH 

FCSITIVF  ROTATION,  NEGATIVE  G(R)ACCCOT. 


NEGATIVE  RCTATICN,  FCSITIVE  CIRIACCCOT 


G4P: 
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0 27  7 
0278 

REF 

REF 

936 

6 

LAST 

LAST 

168C 

1673 

20.2756 

20 .2757 

5C 

55 

156 
' 51C 

1 

0 

STACCDCT 

1NDE> 

TS 

HFAC 

OACCnOT 

0279 

REF 

907 

LAST 

1681 

20 , 2 76C 

10 

156 

0 

CCS 

M FAC 

0 280 

FEF 

2 

LAST 

16BC 

2F ,2761 

1 

273  3 

c 

TCF 

LC0P3  -1 

0281 

RFF 

60 

LAST 

1676 

20,2762 

6 

0111 

1 

CS 

DAPBOOLS 

0282 

REF 

6 

LAST 

166  2 

20,276? 

7 

6736 

c 

HASK 

USECP JTS 

02  83 

20, 2766 

0 

CQ06 

1 

EXTEND 

02EA 

REF 

1 

?o  ,2765 

1 

3712 

1 

BZ  F 

DDWNGTS 

0285 

REF 

5 

LAS'F 

1603 

20, 2766 

6 

1263 

0 

CS 

T5  ADR 

02  86 

PEF 

1 

2 0,2767 

6 

3772 

0 

AD 

PAXI SADR 

02F7 

20,2770 

C 

0006 

1 

EXTENC 

0288 

20,2771 

1 

2772 

1 

BZF 

+ 2 

0289 

RFF 

2 

CAST 

168  1 

20,2772 

1 

3712 

1 

TCF 

DGWNGTS 

0290 

ref 

6 

LA  ST 

1662 

20,2773 

1 1 

•623 

1 

CC  S 

INGTS 

0291 

RFF 

1 

2 '^  , 2 7 7 6 

1 

2 7 7 7 

c 

TCF 

DCCKTEST 

Q2‘^2 

RFF 

63 

LAST 

1 67C 

20 , 2775 

0 

6576 

0 

TC 

I BNKCALL 

0203 

RFF 

2 

LAST 

1660 

20,2776 

A3321 

c 

CADR 

TIREGNBL 

0296 

REF 

A 

LAST 

1677 

20,2777 

10 

157 

0 

CCCKTEST 

CCS 

DOCKTEMP 

0295 

RFF 

1 

20,3000 

1 

3675 

1 

TC  F 

1 /ACCRET 

0296 

REF 

2 

LAST 

1679 

20,3001 

1 

3235 

1 

TCF 

1 /ACCCM 

19:C9  AUG.  11  apes  LMCAF  .023  FAC-E  1A81 
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STCFF  C (F)  ACCCCT. 

ACI.  CC  C7CCCCT. 

IS  GIYBAL  USABLE? 

NO.  BE  SURF  THE  GIMBAL  SUTCHES  ARE  CCRA 
YES.  IS  THE  CAP  RUNN  ING? 


NC.  BF  SURE  THE  GINBAl  SHITCHES  AFE  COHA 
YES.  IS  GTS  IN  CONTROL- 
YES.  FRCCEFC  W ITH  1/ACCS  . 

NO.  NULL  OFFSET  AND  FIND  ALLCHGTS 


BYPASS  1/ACCCAT  HHEN  CCCHEC 
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I.  AnSTASK  AND  ACSJOB  USER'S  PAGE  NO.  8 E6  S9 

P0297  SLEFrUlTNE:  rVGVSLB 

RC298  ALIHGR:  C.  kCRK,  FCC  ' 12  JUNE  68 

R1299  PIJRPnsP:  THIS  SLBRCLTIN.F  PPCVIOES  A S I N G L F- F F E C I S I C N ''ACFINE  LANGUAGE  CIVISICN  CPERATION  WHICH  RETURNS 

P03O]  (1)  THE  CUCTITNT,  IF  THF  CIVISIGN  WAS  NCFMAL. 

R0302  (2)  NEGNAX,  IF  THE  CLCTIENT  WAS  IMPROPER  ANC  NEGATIVE. 

90303  ( 3)  PDSMAX,  IF  THE  CUPTIENT  WAS  IMPRCPEP  ANC  PCSIUVE  CP  IF  THERE  WAS  A ZERC  CIVISOR. 

R03P5  THE  CALLING  PROGRAM  IS  PRESUMED  TO  BE  A JOB  IN  THE  F BANK  WHICH  CONTAINS  nvCVSUB.  E EANK  RUST  BE  6. 

R03O7  THF  DIVISCR  FPR  THIS  RCLTINE  MAY  BE  IN  EITHER  FIXED  CR  EPASAFLE  STOPAGF.  SIGN  AGREEMENT  IS 

R03OO  ASSUMED  BETWEEN  THE  TwC  HALVES  CF  THE  DIVIDEND.  (TplS  IS  CERTAIN  IF  THE  A ANC  L REGISTERS  ARE  THE  PE- 


R0311 

SLUT  CF  A 

MULT  IPL  ICAT ICN  CFERATTON.) 

R031  2 

CALL  SEQLENCF: 

A0313 

L 

TC 

OVOVSLB 

A0319 

L +l 

ACRES 

( CIVISOR  ) 

A0315 

L +2 

RETURN 

HERE,  WITH 

RESULT  IN  A,L 

R 7316 

INPUT  : 

riVIDFND  IN 

A,1  (SIGN 

AGREEMENT 

ASSUMED  ) , 

, nrVISCR  IN  IGCATICN  DESIGNATED  BY  "ACRES". 

R031R 

DIVISOR  m/iy 

EE  IN  THF 

CVCVSUB  F8ANK  , F IXFC-F  IX  EC 

FEANK.EEANK  6,  CR  LN'SWITCHEC  ERASABLE. 

R032O 

CUTPUT  : 

gUOTIFNT  ANC  RFMATNDFR,  CR 

PCSMAX  (NEGMAX),  WHICHEVER  IS 

AFFRCFRIATE. 

R0322 

DEFR  T S : 

SCRATD.HX  .SCRATCHY  ,SC  patch  Z, 

A ,L 

(NOTE: 

SCRATCHX,Y,Z  ARE 

ECUATED  TC  MPAC  +9,f5,ANC  +6.) 

R0329 

ABORTS 

OR  ALARMS: 

NCME 

R0325 

EXITS  : 

TO  the  call 

FCTN'T  + 2 

• 

R 0376 

SUBROUTINES  CALLED: 

NONE  . 

0327 

RPF  1 

2'T,  30  7 2 

59  161 

0 

OVCVSLB 

TS 

SCRATCHY 

SAVE  UPPER  FALF  CF  CIVTCFNC 

G32R 

REF  1 

20,3003 

59  160 

1 

TS 

SCRATCHX 

0329 

RPR  927 

LAST  1979 

20,3709 

50  00  2 

C 

INDEX 

C 

CBTAIN  ADDRESS  OF  CIVISOR. 

0330 

20, 30 

3 rono 

1 

CA 

0 

0331 

RpF  92E 

LAST  1982 

20 ,30,J6 

29  002 

0 

IN'CR 

Q 

STEP  C FCR  PRCPER  RETURN  SEGLENCE. 

0332 

REF  529 

LAST  1976 

20,3007 

5C  000 

1 

INDEX 

A 

0333 

2 A, 3010 

3 C^OO 

1 

CA 

0 

PICK  LP  TEE  r IVISCR. 

0339 

20, 3 Oil 

0 0006 

1 

EXT  END 

RETURN  PCSMAX  FQp  A ZERC  DIVISCP. 

033  5 

REF  1 

?0,?'’12 

1 3C9  1 

0 

BZF 

MAXPLLS 

0336 

PFF  1 

20 ,3  >13 

59  162 

n 

TS 

SCR ATCHZ 

STCPE  DIVISCR. 

0337 

RFF  530 

LAST  1982 

2 l,3C19 

10  COO 

C 

CG  S 

A 

GET  AESICIVISCR)  IN  THE  A REGISTER. 

0338 

RRF  70 

LAST  197? 

20 ,3015 

6 9 753 

1 

AD 

B ITl 

C33T 

REP  1 

20,3016 

1 3020 

I 

TCP 

ZERCFLUS 

0390 

P^F  71 

LAST  1982 

20,3C17 

6 9 7 53 

1 

AD 

BlTl 

0391 

REF  2 

LAST  1982 

20 , 3020 

56  161 

1 

ZEROPLUS 

XCH 

scratchy 

STCRE  AB S ( Cl  V ISCR  ) . PICK  UF  TCP  FALF 

0392 

2 0,3'Vl 

0 0006 

1 

EXT  END 

C IV  IDEND  . 

0393 

REF  1 

27 , 3022 

6 3029 

1 

EZMF 

GCCDNEG 

GET  -AES(CIVICEND) 

023  PAGE  lAE 


GAP:  ASSEMBLE  REVISION  1)6  OF  AGC  PRCGRAm  LLMINARY  BV  AASA  20211  12-071  19:09  AU  C- . 11,1969  LMDAP 

L ArSTASK  AFC  ArsjCE  ISFR'S  PAGE  FC.  9 E6  SA 


03AA 

RFF 

5 3 1 

LAST 

1A82 

20 ,3C23 

A COCO 

0 

CS 

A 

0 3A5 

PFF 

3 

LAST 

1A82 

20, 3Q2A 

6 n 16  1 

1 

GOODNEG 

AD 

SCRATCHY 

AESICIVISCR)  - ABS  I CIV  ICENC  ) 

Q3A6 

2. ',3025 

T 0 )->5 

1 

EXTEND 

03A7 

RFF 

1 

20, 3126 

6 3C33 

1 

BZVF 

VAKEVAX 

ERANCH  IF  CIVISICN  IS  ACT  PROPER. 

U3A8 

RFF 

2 

LAST 

1A82 

20, 3 T27 

3 3 160 

0 

CA 

SCPATCHX 

RE-FSIAELISH  THE  CIVICERC. 
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L 

S0ST4  SK 

ANO  ACSJCP 

USER'S  PAGE  NO.  21  E6  S4 

08^6 

PFF 

12 

LAST 

149  1 

20) 3747 

K 163 

1 FIXMIA 

CCS 

SIGNACS 

63  7 

R6F 

110 

1 AST 

1479 

2"  ,3  750 

3 4752 

0 

CA 

tno 

IF  ACS  NEG,  ACCSN  = +1 

0838 

RFF 

15 

LAST 

1462 

20,375 1 

6 7752 

a 

AC 

NEGCNE 

IF  ACS  PCS,  ACCSW  = -1 

0 83G 

FFF 

4 

LAST 

1494 

20 , 2 7 5 2 

54  122 

1 

7S 

ACC  SN 

C640 

REF 

7 

LAST 

1492 

20 ,3753 

6 0154 

1 

AD 

UV 

IF  ACCSR  = +1,  TEST  FCR  +L  ( + Y)  JET  FAU 

084) 

RFF 

538 

LAST 

149  1 

20,3754 

50  OCO 

1 

INDEX 

A 

IF  ACCSW  = -1,  TFST  FOR  -L  (-V)  JET  FAIL 

0842 

REF 

2 

LAST 

149  1 

20,3755 

3 3774 

c 

CA 

-UMASK  +1 

0643 

REF 

1 1 

LAST 

1492 

20,3756 

7 1257 

1 

FAS  K 

CF5MASK 

0 844 

20 ,3757 

C C0C6 

1 

EXTEND 

0 645 

20,3760 

1 3764 

0 

BZF 

+ 4 

0646 

REF 

6 

LAST 

1494 

20,3761 

4 3770 

0 

CS 

-.03R/S2 

JET  FAILURE  - CANNOT  USE  2-JET  VALLES 

0 647 

REF 

11 

LAST 

1494 

20, 3762 

54  157 

Q 

T S 

ANFT 

AN  ET  = AMN 

0648 

RFF 

1 

20 ,3763 

1 353? 

1 

TC  F 

STMIM 1 

CALCULATE  FUNCTIONS  USING  AFIN 

0849 

REF 

3 15 

LAST 

149  1 

20,3764 

3 GOOl 

c 

CA 

L 

L FAS  ACCFUN 

0850 

REF 

2 

LAST 

1495 

2", 3765 

1 3533 

0 

TCF 

STM  N- 

STORE  FAX  VALLES  FCR  FIN  JETS 

A0851 

0852 

REF 

r 

LAST 

135 

E6, 1551 

ERASAELE 

1/ANETF 

ASSIGNMENTS  FCR  1/ACCONT 
ECUAL5  BLCCKTCF  +2 

0853 

RFF 

6 

LAST 

1495 

F6 ,1553 

1/ACCSTP 

EQUALS 

BLPCKTOP  +4 

0 854 

RFF 

7 

LAST 

1495 

E6,  1557 

P ACCFLN 

ECIA  IS 

BLCCKTCF  +86 

0855 

REF 

8 

LAST 

1495 

F6,  1561 

pcei 

EQUALS 

BLCCKTCP  +inc 

CP56 

PEF 

9 

LAST 

1495 

86,1562 

PCE2 

EQUALS 

BLCCKTOF  + 1 ID 

0857 

RFF 

10 

LAST 

1495 

F6,1563 

PCB4 

EQUALS 

BLCCKTCF  +12C 

0858 

REF 

11 

LAST 

1495 

F6, 1564 

PDB3 

EQUALS 

RLQCKTOP  +130 

0859 

RFF 

12 

LAST 

149  5 

86 ,1565 

PAXCIST 

E CU  A IS 

BLCCKTOP  +14C 

0860 

PEF 

71 

LAST 

1254 

; 1 2 2 

ACCSW 

EQUALS 

VBUF 

EXECUTIVE  TFMFCRARIES 

40861 

CANNCT  DC  CCS  NEWJCB  CURING  1/ACCS 

0662 

RFF 

C 

LAST 

1495 

C 123 

1 /ATEM 

EQUALS 

ACCSW  +1 

TFNF  EUFFER  FCR  U AND  V AXES 

0863 

PEF 

7 

LAST 

1492 

0124 

1/ATFN2 

EQUALS 

1/ATEMl  +1 

0 6 64 

PEF 

8 

LAST 

14  9 5 

C127 

1 /ACCSTT 

ECUALS 

1/ATEMl  +4 

0865 

rff 

9 

1 AST 

1495 

C13  1 

ZITFR 

EQUALS 

1/ATERl  +6 

0866 

REF 

U 

1 AST 

1495 

0132 

Z‘=TEM 

EQUALS 

1/ATEMl  +7 

0667 

Rt^F 

1 1 

LAST 

1495 

C135 

UCPl 

E CU  A L S 

1/ATEM  +10C 

U AXIS  DEADBAND  BUFFER 

0868 

REF 

12 

LAST 

1495 

‘■136 

unB2 

EQUALS 

1/ATEMl  +11E 

0669 

RTF 

13 

LAST 

1495 

0137 

UCE4 

EQUALS 

1/ATFRI  +12C 

087C 

RFF 

14 

LAST 

1495 

r 14C 

LCB3 

ECLALS 

1/ATEM  +13C 

0871 

REF 

15 

LAST 

1495 

. 14  1 

UAXDIST 

FOLALS 

1/ATFM  +14C 

0872 

RTF 

16 

LAST 

1495 

0143 

ceei 

EQUALS 

1/ATEM  +16C 

TEMP  CEACRAND  BUFFER,  ALSC  V AXIS 

0873 

RFF 

17 

LAST 

1495 

C144 

DPB2 

EQUALS 

1/ATEMl  +17C 

0674 

rff 

! 8 

LAST 

1495 

;-'14  5 

C EE4 

equals 

1/ATEMl  tlEC 

0875 

RFF 

19 

LAST 

1495 

C 146 

reP3 

equals 

l/ATENl  +19C 

0876 

R>=F 

20 

LAST 

149  5 

0147 

AXCSTEM 

EQUALS 

1/ATEM  +2CC 

0877 

P'-F 

21 

LAST 

1495 

1 5 1 

FIATE^F 

EQUALS 

1/ATFMl  +22C 

0878 

RFF 

22 

LAST 

1 495 

1 152 

Z3TEM 

EQUALS 

1/ATEM  +236 

MUST  FCLLGW  FLATEMR 
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C879 

0880 

REF 

RFF 

8 

5 

LAST 

LAST 

1A89 

607 

) 343 
0114 

CEVALl 

OeVAL2 

ECUALS 

ECLAIS 

ce 

I ATP15  + 

08P  1 

REF 

6 

LAST 

1A96 

'U15 

DRVAL3 

EQUALS 

INTBl 

5+  +1 

0P82 

RFF 

7 

LA'T 

1A96 

C116 

CP  I FT  FP 

EQUALS 

INTP15+  +2 

0883 

P^F 

920 

L AST 

1A86 

0154 

LV 

EQUALS 

PPAC 

C8  8A 

REF 

921 

LAST 

1A96 

0 15  7 

AAET 

FCUALS 

MPAC 

+ 3 

0889 

REF 

922 

LAST 

lACf 

C157 

FLMER 

EQLALS 

PFAC 

+3 

0886 

REF 

923 

LAST 

1496 

160 

l/ANET 

EQUALS 

MPAC 

+ 4 

0P87 

RFF 

92A 

LAST 

1496 

F 161 

ARET 

FCUALS 

MEAT 

+ 5 

0888 

REF 

925 

LAST 

1496 

0 162 

APSACS 

FCUALS 

MFAC 

+6 

0889 

F^F 

926 

LAST 

1496 

0163 

S IGNACS 

EQUALS 

MPAC 

+ 7 

0P90 

RFF 

927 

LAST 

1496 

016  4 

-S IGAACS 

ECLALS 

MPAC 

+8C 

0891 

RFF 

928 

LAST 

1496 

0 1 6 5 

HOLD 

EOLALS 

MPAC 

+ 90 

CP92 

RFF 

63 

LAST 

1391 

0117 

ACCR  ETRN 

EQUALS 

FIXLOC  -1 

0893 

0894 

20, ^766 
20,3767 

CC  110 
00443 

1 

1 

ZCNE3  NA  X 
FLATVAL 

CEC 

DEC 

.0043  75 
.01778 

17.5  MS  (35  MS  FOR  1 JET)  AT  4 SECCNCS 
.8  AT  PI/4  RAC 

0895 

26,3770 

77377 

1 

-.03R/S2 

CCT 

77377 

-PI/2(7)  AT  PI/2 

0896 

20,3771 

00356 

1 

. C23P  /S2 

OCT 

003  56 

.0228  RAC/SEC(2)  AT  PI/2 

0897 

PFF  45 

LAST 

149  1 

4733 

1/.03 

EQUALS 

POSMAX 

2(7) /PI  AT  2( 7) /PI 

0898 

RFF  2 

LAPT 

1 403 

20, 3772 

0221  3 

0 

PA>I 5ACP 

GEFACP 

PAX  IS 

A0899 

A0900 

0901 

20, 377^ 

CC  1 10 

1 -LMASK 

OCT 

C C 1 1 0 

THE  FCLLCWIMG 
FAILURE  MASKS 

-U 

4 CONSTANTS  ARE  JET 
ANC  ARE  INDEXED 

0902 

20,3774 

00022 

1 

OCT 

00022 

-V 

090  3 

20,3775 

C02C4 

1 +LMASK 

CCT 

00204 

+U 

0904 

23, ’776 

C0'-51 

1 

OCT 

or  04  1 

+ V 
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L SPS  PACK-LP  RCS  CrMRCL  USER'S  PAGE  NQ.  1 EC  SA 

P>)001  PRCGFAN  NAME:  SPSPCS 

RC092  ALTHCP;  EDGAP  M.  CSFIKA  (AC  ELECTPCMCS) 

ROO'^21  MOCIFIEC:  TO  RETURN  TO  ALL  AXES  VIA  C BY  F.  S . l»  E 1 S SR  A N , GET  7,  1968 

R30n22  MCCIEIFP  TC  IMPPCVE  eENCING  STABILITY  BY  G . K A L A N , FF R . 1 A , 1 E 6 9 
RCCC3  FLNCTICNAL  OESCPIFTICN: 

ROOOA  TI-IS  program  roNTROLS  THE  FIRING  OF  ALL  RCS  JETS  IN  THE  CECKEC  CC N F I G U P AT  I CN  ACCCRCING  TC  THE  FCLLOHING  PHASE 
R0TI6  PLANE  LCGIC. 

P0007  1.  JFT  SENSE  ''PST  (SFSREc) 

PORdS  IF  JETS  ARE  FIRING  NFGAT I VEL Y , SET  OLCSENSE  NEGATIVE  ANC  CCNTINLE 

R0CF9  IF  JPTS  ARE  FIRING  PC S ! T I V F L Y , S ET  CLCSENSE  POSITIVE  ANC  CONTINUE 

RCCIC  IF  JETF  ARE  NOT  FIRING, 5=7  CLCSENSE  TC  2EPC  ANC  GC  TC  CLTEp  RATE  LIMT  TEST 

P‘)012  2.  RATF  CFAD  BANC  TEST 

R0C13  IF  JETS  ARE  FIRING  N FG  A"'' I VE  L Y ANC  RATE  IS  GREATER  THAN  TARGET  RATE, LEAVE 

ROOIA  JETS  CN'  ANC  GO  TO  INHIBITION  LOGIC.  CTHEP  V>  I S E ,C  CNT  I N LF. . 

ROOIS  IF  JETS  APE  FIRING  FCSITIV=LY  ANC  RATE  IS  LESS  THAN  TARGET  RATE,IFAVE 

P0016  JETS  CN!  ANO  GO  TO  INHIBITICN  LCGIC.  CTH  E P k IS  E , C C NT  I NU  E . 

R0017  3.  OUTER  FATE  LIMIT  TEST  (SPSSTART) 

R0C18  IF  MAGMTLOF  OF  FCCT  IS  GREATER  THAN  1.73  CEG/SFC  SET  JET  FIRING  TINE 
R0019  TO  RECUGF  RATE  AND  GO  TC  INHIBITION  LCGIC.  C T H EP  Vv  I S F , C CNT  I NU  f . 

R102P  A.  CCAST  ZONE  TFST 

R0021  IF  STATE  (f,EDOT)  IS  BELCN  LINE  E + 4 X ECCT  > -1.4  EEC-  ANC  ECCT  IS  LESS  THAN  1.30  DEG/SEC  SET  JET  TIME  PCSI 

P0O23  TIVE  ANC  CONTINUE.  OTHFRUSE,SET  JET  FIRING  TIME  TC  ZERO  ANO  CONTINUE. 

R0C24  IF  STATE  IS  ABOVE  LINf  E + 4X  ECCT  > +1.4  CEG  ANC  ECCT  IS  GREATER  THAN  - 1 . 3C  CFG/SEC,  SET  JET  TINE  NEGATIVE 

R0026  ANC  CONTINUE.  OTHERHi  I Sf  , 'ET  JET  FIRING  TINE  Tf  zpRC  ANC  CONTINUE. 

R0027  5.  INFieiTICN  LOGIC 

R0r28  IF  OLCSENSE  IS  NCN-ZEPF: 

R0029  A)  PETUPM  IF  JFT  TIME  HAS  SAME  SIGN  AS  CLCSENSE 

R003P  E)  SET  INHIBITION  CQUNTER*ANC  RETURN  IF  JET  TIME  IS  ZERO 

R0031  C)  Sft  INHIPITICN  CCUNTcq  jfj  TIME  TC  ZERO  ANC  RfTLRN  IF  SIGN 

R3032  OF  JET  TIME  IS  OPPOSITE  TO  THAT  OF  OUnSENSF 

RCG33  IF  OLCSENSE  IS  ZPPG: 

R003A  Al  RETURN  IF  INHIBITION  COUNTER  IS  NCT  POSITIVE 

P0039  E)  SET  JET  TIME  TC  ZERO  ANC  RETURN  IP  INHIBITICN  COUNTER  IS  POSITIVE 

R0037  *N0TE  : INHIBITICN  COUNTERS  CAN  BE  SFT  TC  A CR  10  FCP  TFF  P,ANG  UV  AXES, 

R0038  RESPECT  IVFLY,  IN  SPSRCS.  THEY  ASF  CECREMENiFD  BY  CNE  AT  THE  BEGINNING  CF 
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R0039  EACH  CAP  PASS. 

R0040  TEE  MINIMUM  PULSE  klCTH  CP  THIS  CCNTRCLLEP  IS  CETFRMTNED  BY  THE  PEFETITICN  PATE  AT  WEICE  THIS  ROUTINE  IS  CALLEC 

ROOA?  ANH  IS  NOMINALLY  100  MS  FTP  ALL  AXES  IN  CRIFTING  FLIGHT.  DURING  POWERED  FLIGHT  THE  MINIMUM  IS  ICO  MS  FCR  THE 

ROOAA  P AXIS  AND  200  MS  FOP  THE  CCNTRCL  CF  THE  L ANC  Y AXES. 

RC1045  OALLING  SFCUFNCE: 

R0046  INHINT 

R0'-)47  to  I3NKCALL 

R0'148  CACR  SPSRCS 


R0049  EXIT: 

RCOFO  TO  C 

ROC^I  ALARM/APCRT  MOOF:  NONE 

R00B2  SUEROUTINES  CALLEC:  NCNf 

R0053  INPUT:  E.ECCT 


R0054 

T JP  , 

T JV  , 

TJL 

TJ  MUST  NCT  BE  NEGATIVE  ZERO 

ROT  5 5 

OUTPUT  : 

TJP, 

T JV, 

TJU 

R0PF6 


0057 

21,3647 

EAN'K 

21 

005  8 

PPP 

4 

LAST 

1476 

21,2  DO 

SETLCC 

DAPS4 

0C59 

21  1 364  7 

BANK 

0060 

REF 

1 

CCLNT-T 

$$/DAFBU 

0061 

PFF 

14 

LAST 

144  6 

F6, 1525 

EBANK= 

TJU 

0062 

21,3647 

0C632 

0 

RATEL 1M2 

CCT 

00632 

1.125  CEG/SEC 

0063 

PEP 

30 

LAST 

1387 

21,3650 

3 4736 

1 

PCSTHRST 

CA 

HALF 

0C64 

RFF 

33 

LAST 

1454 

21  ,3651 

51  ■ 505 

0 

NCX 

AX  I SCTR 

0C65 

PFF 

15 

LAST 

14  9 E 

21,3652 

c c , c ^ c 

r 

TS 

TJL 

0066 

PFF 

1 

21, 365? 

11  ' 745 

1 

CC  S 

OLD  SENSE 

CC67 

RFF 

1 

2!  ,365  4 

1 3674 

0 

TCF 

POSCHECK 

JETS  FIRING  PCSITIVELY 

0068 

REF 

1 

21, 3655 

1 3677 

0 

TCF 

CTRCHECK 

JFTS  OFF.  CFECK  INHIBITION  CTR 

0069 

RFF 

34 

LAST 

1498 

21 , 3656 

51  '505 

0 

NEGCFECK 

INDEX 

A XI SCTR 

JFTS  FIRING  NEGATIVELY 

0070 

REF 

16 

LAST 

149E 

21 ,3657 

4 1525 

0 

cs 

TJU 

007  1 

REF 

539 

LAS" 

149  5 

21 , 3660 

1C  COC 

0 

CCS 

A 

QC72 

REF 

433 

LAST 

1494 

21  ,3661 

0 000  2 

0 

TC 

0 

RFTLRN 

0073 

21 ,3662 

1 3664 

1 

TCF 

+ 2 

0074 

21, 3663 

1 366  4 

1 

TC.  F 

+ 1 

JFTS  CCMMANCEC  OFF, SET  CTP  ANE  RETURN 

0075 

REF 

35 

LAST 

1498 

21  ,3664 

5 1 ' 50  5 

0 

SETCTR 

INDEX 

AXISCTR 

JET  FIRING  REVERSAL  CCMMANDEC.  SET  CTR, 

0076 

ref 

1 

21,3665 

3 3 706 

c 

CA 

UT  I ME 

SET  JET  TIME  TO  ZER0,ANC  RETURN 
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PACK 

-UP  PCS  COMRCL 
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S4 

C''77 

R-'F 

36 

LAST 

1A9P 

?l  ,3666 

51  ' 505 

0 

INCEX 

AX  ISCTR 

1078 

pff 

3 

LAST 

lAi  e 

21 , 3667 

C C , 

1 

T^ 

U J'^TC'-R 

007Q 

REF 

318 

LAST 

1A9A 

21,3670 

3 4 7 55 

1 

ZAPT  J 

CA 

ZERO 

0080 

RFF 

37 

LAST 

1A99 

21 ,3671 

51 ' 5C5 

0 

lACEX 

AX  ISCTR 

008  1 

PFF 

17 

1 AST 

1A9E 

21, 3672 

55*525 

C 

TS 

T JL 

0CF2 

R9F 

A3A 

LAST 

1A98 

21  ,3673 

0 0002 

0 

or 

Q 

0083 

OFF 

38 

LAST 

1A9  9 

21,3674 

5 1*  5 

c 

PCSCFFCK 

INCEX 

AXTSCTR 

nCBA 

PFF 

18 

LAST 

1A99 

21,3675 

3 1525 

1 

CA 

T JL 

ores 

pcF 

1 

21 ,3676 

1 3660 

0 

TCF 

NEGCFECK  +2 

0086 

RFF 

3 9 

LAST 

1A99 

21 , 3677 

51 ' 5C5 

c 

CTPCHECK 

INDEX 

AXISCTR 

CHECK  JET  INHIBITION  COUNTER 

0087 

RFF 

A 

LAST 

1499 

21, 37MO 

11 ' 770 

1 

CCS 

UJETCTR 

0088 

21  ,37''l 

1 3703 

1 

TCF 

+ 2 

0089 

REF 

A35 

L AST 

1499 

2 1 , T -u  2 

0 C002 

0 

TC 

Q 

CTP  IS  NCT  FCSITIVE.  RETURN 

0090 

REF 

1 

21  ,3  703 

1 3670 

1 

TCF 

Z APTJ 

CTR  IS  PC  SI TI VE. INHI BIT  FIRINGS 

0091 

RFF 

A36 

LAST 

1499 

21,3704 

C fCC2 

c 

TC 

0 

CTR  IS  NCT  PCS  IT  IVE. RETURN 

009? 

21, 37)5 

ft  CO  0 4 

0 

OCT 

OFf004 

CC90 

21  ,3  706 

0:0012 

1 

UT  IME 

CCT 

00012 

009A 

21,3707 

CCCl? 

1 

rcT 

000  12 

0095 

REF 

3 

LAST 

134 

P6, 1745 

OLCSFNSE 

EQUALS 

DAPTREGl 

0096 

PFF 

161 

LA  ST 

1492 

21 ,3710 

4 4753 

0 

^EGFI  RE 

CS 

ONE 

JFTS  FIR  ING  NEGATIVELY 

0097 

REF 

2 

L AST 

1496 

21,3711 

5 5 * 74  5 

1 

T S 

OirSENSE 

0C98 

RFF 

le 

L act 

1459 

21,3712 

3 1427 

1 

CA 

ECOT 

0099 

21,3713 

1 3717 

1 

TCF 

+4 

0100 

ref 

1 82 

LAST 

1499 

21,^714 

3 4 7 ^3 

1 

PLLSF  IRE 

CA 

ONE 

Old 

RFF 

3 

LAST 

1499 

21,3715 

55 ' 745 

1 

TS 

0 LPSENSE 

0102 

REF 

19 

LAST 

1499 

21,3716 

4 1427 

0 

CS 

ECCT 

RATE  CEAC  BANC  TEST 

0193 

REF 

5A0 

L AST 

1498 

21,3717 

22  000 

1 

LXCH 

A 

01>i4 

REF 

6 A 

1 AST 

1494 

21 ,3720 

4 Clll 

1 

CS 

OAPPCCLS 

IF  CP  IFTEIT  = 1,  USE  ZEPC  TARGET 

RATE 

01  )5 

REF 

7 

LAST 

1487 

21,-721 

7 4 744 

c 

YASK 

DR  IFTHI T 

IF  CRIFTEIT  = 0,  USE  0.10  RATE  TARGET 

0106 

RFF 

5A1 

LA9T 

1499 

21 ,3722 

10  om 

0 

CCS 

A 

01C7 

REF 

1 

21,3723 

3 4 767 

r 

CA 

PATECEl 

0108 

REF 

3 16 

LAST 

1495 

21,3724 

6 OO'U 

0 

AD 

L 

Cl  C 9 

2 1 , 3 72  5 

0 0006 

1 

FXT  END 

Oll'i 

REF 

1 

21,3726 

6 3736 

c 

eZRF 

SFSSTART 

0111 

REF 

1 

21, 2727 

1 3653 

,0 

TCF 

PCSTHPST  +3 

0112 

REF 

A'‘ 

LAST 

1499 

21 ,t75C 

51 ■ 5C5 

0 

S FSPCS 

INCEX 

AX  TSCTP 

JET  SENSE  TEST 

0 1 1 3 

REF 

19 

LAST 

1499 

21, 3731 

11*525 

0 

CC  S 

T JL 

OllA 

Rt^F 

1 

21,3732 

1 3714 

1 

TCF 

PLUSF  IRE 

JEIS  FIRING  FCSITIVELT 

0115 

21,2733 

1 3 735 

1 

TCF 

+ 2 

0116 

RFF 

1 

LAST 

1499 

21,3734 

1 3 71') 

c 

TCF 

NEGFIRE 

JETS  FIRING  NEGATIVELY 

C 1 1 7 
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13,3631 

12  15 

1 

1233 

COARSREY 

15,2161 

923 

1 

9A  1 

CHECKN J 

A3, 3353 

1277 

■i 

1277 

12E2 

ckmoocac 

A?, 2A3C 

275 

3 

265 

27A 

CCARSTCL 

■17,311) 

1 3CA 

1 

130A 

CHFP  KP 

16 ,305A 

1A21 

1 

1 A21 

CKST  »LL 

32 , 2 105 

209 

1 

209 

COARSTYP 

15,2171 

92A 

1 

923 

CHFCK  RR 

A?, 271A 

28  1 

1 

2S1 

CKAV32 

LA  ,3A67 

1381 

3 

1380 

CCAPSl 

07,3007 

1302 

1 

139  2 

CHFCKTAB 

)A  ,2  <72 

228 

1 

228 

CLEANDSP 

10, 2A57 

13A7 

2 

727 

73  E 

CCAPS2 

07  ,3032 

1303 

2 

130  3 

130A 

CHFCKLF 

16, 2CA  1 

lAOl 

1 

lACl 

CLE  "NENC 

1 ' , 323A 

1357 

1 

1 ^ ' 5 

COASCCDF 

C 7 , 2 1 3 7 

2A7 

1 

2A6 

CHFCKYAW 

07, 2667 

BA5 

2 

8AA 

CLFAR 

AO  , 2A6  7 

AOS 

1 

AOO 

CCASTCE 

E6 , 16  )3 

= 

135 

7 

1A53 

1A93 

CHFKAXIS 

27,2137 

ABA 

1 

ASA 

clfarmpk 

5A7A 

13AA 

2 

226 

13AA 

CDAST'ET 

36 , 36  1 2 

7 5 A 

1 

753 

CHFKBITS 

16,2CHC 

lACO 

2 

1 A<U 

lAl  1 

C LEAR  1 

A.)  ,2522 

AOS 

1 

AO  5 

COASTT J 

17, 3A55 

lA  53 

A 

1A53 

1A59 

CHFKYCFF 

16,2016 

1 AOO 

1 

lAl.' 

CLOAD 

A 1 , 2 7 6 A 

A29 

1 

Aid 

CCATR  IN 

15,3237 

966 

1 

962 

CHFKSTI  K 

17,235A 

1A36 

1 

1A3A 

CLCCKCCN 

n,  35AA 

1363 

1 

13A8 

cne 

OCAC 

= 

1 lAC 

A 

1 135 

1136 

CHFXFRR 

B2, 2537 

575 

1 

'7A 

CLCCPLAY 

1C  ,2A7A 

13A8 

2 

737 

738 

fCCE 

0 12A 

- 

96 

15 

AGC 

A5  5 

CHKBl TIO 

17,2237 

1A3A 

CLOG2/32 

30, 3067 

ESI 

1 

651 

cncFiTGe 

07  ,2123 

2A6 

1 

2 A 6 

CHKBMAG 

30 , 2 5A  1 

8A  1 

1 

8A1 

C ICK jce 

36 ,27A3 

737 

1 

726 

C0CE5CC 

32,3255 

7E2 

1 

7 62 

CHKCCPS 

07,3  165 

130  3 

1 

13F  A 

CLCKIA'K 

36,2723 

736 

A 

2A3 

736 

CrCE7 

<7,2197 

2A6 

2 

2A6 

CHKOATAI 

20 ,201A 

29A 

1 

29A 

CLCSF  ADR 

21,3621 

1A7A 

1 

1A7A 

CCE  EC  TP 

cue 

= 

1AE6 

7 

1A8A 

1A85 

CHKFA! L 1 

560B 

1371 

1 

1373 

CLCSFCLT 

17,327C 

1AA8 

A 

lAAA 

1A7A 

CCEFF 

20,2217 

lA  E6 

A 

1A8X 

1A65 

CHKFA  IL2 

5610 

1371 

1 

1371 

CLPA  SHI 

AO, 2505 

ACS 

1 

AOS 

CCFFFC 

96,1627 

135 

7 

135 

1A65 

CHKI MGTS 

17,26A1 

1 AAO 

1 

lAA'i 

CLPASS 

I ilA 

102 

13 

222 

A56 

COEFFR 

E 6 , 1630 

= 

135 

6 

1AA7 

1A85 

CHKLA  STY 

21 , 2 63A 

897 

1 

89  7 

CLRAOMCD 

6011 

518 

11 

230 

83  1 

CCE 

F 6 , 1670 

= 

136 

A 5 

3 5 3 

A 6 5 

CHKL I NLS 

26,2205 

A76 

2 

A 7 6 

CLRMaCN 

13,2712 

12C2 

2 

1203 

123C 

COFNA  XGC 

22  ,2176 

35A 

CHKLI ST 

05, 352A 

98A 

CLRCVFLW 

13,2512 

1129 

1 

1129 

COFSKEn 

E6,1725 

= 

136 

c 

136 

356 

CHKMTNTJ 

17, 3656 

1A57 

2 

1A55 

1A58 

CLR  XFLAG 

30,2722 

EA3 

1 

BAA 

CFGA 

'5,1765 

= 

126 

16 

126 

1 19C 

CHKNCVAC 

01  ,36A0 

1295 

1 

1298 

CLR5 

AO , 2 5 2 5 

AC  5 

1 

AO  5 

CCGAEB IT 

A7  5C 

= 

6( 

ChKPOCH 

A"",  2 1 1 7 

26A 

6 

282 

A69 

CLLPDATE 

35,3573 

681 

1 

680 

CCGAFLAG 

0203 

= 

EC 

3 

1176 

CHKPR  IC 

1 ',2A3  ) 

13A6 

1 

13A5 

CLUPLGCK 

CA, 33A3 

1329 

1 

13  29 

CCGANAX 

0016 

= 

119A 

A 

1 185 

1189 

CHKPT I RR 

16,2672 

1A18 

A 

1A18 

1 A19 

CLI/NET+ 

20, 3A66 

1A90 

COGAMIN' 

OC  1C 

= 

119A 

3 

1166 

lies 

CHKSAE 

lA, 3253 

939 

CMNTCVFL 

12,231 5 

1170 

1 

1 170 

CCGACV  EL 

12, 276A 

1 178 

2 

1 176 

119C 

CHKSB 

1A,3255 

9 39 

1 

R’39 

CMOON 

00  2 2 

= 

929 

2 

928 

929 

COGLOITN 

OA  ,3CAA 

1177 

1 

1189 

CHKSn 

1 X , 3 2 7 A 

939 

1 

939 

C M C C N e I T 

A7A0 

= 

79 

1 

21  A 

COGUPL  IM 

OA,3CA2 

1177 

2 

1166 

CHKSCA 

1A,3315 

939 

1 

93' 

CYCONFLG 

0173 

= 

79 

9 

37 

1202 

CCL  INEAR 

()A,31A2 

1 lec 

1 

1 180 

CHKSOATA 

1 A , 3250 

939 

2 

938 

9AA 

cx  fcnent 

30, 2612 

6A  1 

1 

EAC 

CCLREG 

1116 

= 

ICA 

7 

lOA 

123A 

CHKSP  CH 

26, 3AAA 

59  1 

1 

595 

Cxpxl 

E5,1AA5 

= 

129 

2 

387 

CCNACPS 

A3,355A 

126G 

2 

1282 

CHK'UFP 

A3 ,3667 

123  2 

1 

1282 

CNGL 

2 2, 2 AOO 

35E 

CCNFA  I L 

36,2575 

73A 

2 

2A2 

857 
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symbol 

DEP 

H 

PEFERENCeS 

SYMBOL 

DEE 

H 

PEFERENCES 

SYMPOL 

CEF 

H 

REFERENCES 

CGMFA  I LI 

36 , 261A 

734 

1 

737 

CON  2 

10, 2312 

1292 

1 

1289 

CSI  /E) 

34  ,2125 

636 

1 

644 

COMFA  IL2 

36,2627 

734 

1 

737 

CCN2ACR 

5422 

1289 

1 

1289 

CS  I/B  1 

34,2165 

636 

2 

64  1 

644 

CCMFA  1 1.3 

36,2616 

734 

3 

723 

? 2 5 

COPIES 

10,2736 

1252 

1 

1345 

csi/e2 

34,2176 

626 

1 

642 

CCMFA  ILA 

36,2620 

734 

2 

12i 

724 

CCFIES2 

10, 2737 

1352 

1 

1350 

CS I/p  22 

34,2216 

627 

1 

637 

COMF1  AG 

55  11 

1365 

2 

7?5 

1365 

CCFINDEX 

0164 

= 

1363 

23 

1346 

1360 

CS  I/B23 

34,2224 

627 

1 

637 

CCMMANC 

F3,1A71 

= 111 

6 

1299 

13*'  4 

COPMPAC 

C157 

= 

1362 

3 

1258 

136  1 

CS I/E23C 

34,2237 

637 

1 

637 

COMME  CS 

20,2574 

1478 

1 

1478 

CCPYCYC 

33, 2423 

862 

3 

856 

863 

C S I /B  2 

34  ,233C 

63E 

1 

638 

COMMFx 

4^, 3546 

1280 

2 

12  8 2. 

CCPYCYCL 

33,2275 

856 

1 

872 

CS  1/CCH 

3 5,200.) 

= 

2 c 

2 

624 

66  1 

CCMMI  MT 

3r  ,2279 

834 

2 

827 

834 

COPYCYC  1 

33, 2551 

£71 

1 

£69 

CSI /CDHl 

34  ,2000 

= 

34 

1 

635 

COMMNCLT 

12,27X7 

L178 

1 

1191 

C0PYCYC2 

33,2632 

872 

CS  1/SCL 

34,2737 

644 

1 

643 

CCMMfF 

36, 2404 

730 

1 

724 

0 CPYNC  pM 

10,2735 

1252 

1 

1349 

CSIALRN 

E7 ,1613 

142 

c 

142 

644 

CCMRCFLR 

12,3436 

1188 

1 

1188 

COPYPACS 

10, 2420 

1346 

1 

1355 

CSI STEP 

24,2732 

643 

1 

643 

COMNFG 

'.7,3111 

13C4 

1 

130  3 

CCCYTCGC 

1C  ,2416 

1346 

1 

1356 

CSHCCMC 

13,3067 

1205 

2 

340 

592 

CCMF 

7673 

1338 

4 

10'  5 

1 '68 

CORFINC 

01,3034 

1 103 

2 

1C99 

1103 

CSRCKFLG 

0305 

= 

87 

COMPCHK 

>6 ,3  56  1 

334 

1 

333 

CCRFCUNC 

01 ,2637 

1099 

CSMCOCKD 

4737 

T= 

E7 

1 1 

294 

1476 

COMPn I cp 

37,  3 24') 

735 

1 

707 

C0RSCHK2 

07,3077 

130  4 

2 

1303 

1304 

CSMN'T 

24  ,3274 

569 

1 

569 

COMFIOK 

41,2515 

41  7 

1 

417 

CQPSIT 

15,3266 

966 

1 

96  6 

C SMMA  SS 

1327 

1C7 

7 

294 

1484 

COMPmat 

13,2237 

71G 

CGSCDU 

0743 

= 

100 

5 

100 

1251 

CSMPREC 

13,3044 

12c  5 

ti 

3 7 

726 

CCPPMATX 

27, 2'.:72 

483 

1 

485 

CCSCOLX 

0747 

= 

ICO 

6 

480 

1256 

CSNSTCPE 

23  ,2431 

697 

1 

697 

CGMPMFSN 

27,2151 

484 

1 

484 

crsccuY 

0743 

ICC 

5 

480 

1256 

CSNVEC 

43,3C71 

290 

1 

263 

COMPNUMP 

1U7 

= 1;T4 

10 

1 C4 

13  84 

CCSCDL2 

0745 

= 

100 

7 

480) 

1255 

CSS 

00  16 

= 

932 

1 

932 

CCMPr  P 

'7 , 3044 

1 303 

1 

13--3 

cnsE 

CC3C 

= 

1 195 

4 

1190 

1191 

CSSLN 

14  ,2577 

929 

1 

929 

COMPTE  ST 

41,2426 

415 

6 

4 15 

429 

OQSI 

26  ,2000 

52 

2 

1136 

CPP22 

14,2756 

922 

2 

93  1 

COMPT  GO 

35,2437 

653 

1 

680 

COSINE 

CC  ,35  17 

1074 

2 

1005 

1250 

C S '40 

14  ,2754 

922 

1 

931 

CCMPTS":! 

4 1,24  3.) 

415 

1 

416 

COSMG 

006  1 

= 

1 4C3 

3 

189 

19C 

C SS5 

14  ,2575 

929 

2 

92P 

92  9 

COMP  12 

22,2211 

3 55 

1 

355 

CCS  PHI /2 

0)2  2 

= 

1238 

6 

1225 

1228 

CSTH 

E5,1731 

= 

126 

c 

126 

1191 

CCMTEFM 

1 1 ,306  1 

1225 

1 

1228 

COSPHIE 

11,2273 

1228 

1 

1225 

CSTH-RHC 

E5 ,1735 

126 

4 

126 

1 1E6 

CCMZF  FC 

07,3121 

1 3 04 

2 

1303 

1304 

CCSTALIN 

oooc 

= 

236 

3 

236 

CSTCDAY 

05 ,2C23 

52 

1 

977 

CONC  + P 1 

43,3262 

1276 

1 

1280 

CCPTH 

C02C 

3 

125 

18 

3!K) 

1243 

CSUN 

0020 

= 

929 

1 

929 

CCNC+P2 

43,3263 

1276 

1 

1 2 8'T 

COSTHFT 1 

E5,  157C 

= 

123 

2 

123 

844 

CS359+ 

35  ,2422 

634 

CON  IF  P 

12,2CCQ 

= 29 

■2 

1165 

1 1 El 

ggsthet? 

25,1572 

= 

123 

2 

122 

844 

CTHETA 

0322 

= 

99 

2 

270 

14C5 

CON  ICS  1 

.14 , 2000 

= 28 

4 

45 

1 ne 

CC'I /2DG 

25 ,3C76 

554 

1 

552 

C T L I S T 

'T334 

9E7 

6 

984 

CCNST 

31,2572 

841 

1 

8 4." 

C0S15DEG 

22,2217 

522 

1 

521 

CTRCHECK 

21  ,3677 

1499 

1 

1498 

CON'-PABPT 

‘35,3400 

824 

1 

824 

CCS60CEG 

23,2521 

3 

596 

2 

593 

CULTB  IT 

4 7 4 5 

= 

7 1 

CCNTRL2 

3 1 ,3  666 

1296 

2 

1298 

cctrcler 

E6,  1631 

135 

6 

1402 

1462 

CLLTEC 

1 4 ,2751 

9 32 

4 

932 

CONTOESG 

26,3567 

993 

1 

995 

CCUNT 

0143 

= 

97 

12 

400 

44  7 

CULTFLAG 

0065 

7 1 

4 

931 

932 

C0NTPES2 

26, 3576 

593 

C C U NT • F M 

11  ,2347 

815 

1 

815 

CULTR  IX 

E5,  17C6 

= 

125 

1 

932 

continu 

43 ,3637 

1282 

5 

1281 

12E2 

COUNTPL 

F5,1542 

= 

128 

CLP'CF 

1235 

= 

953 

4 

261 

952 

CONTMANL 

22,3170 

368 

1 

367 

CCVCNY 

42,3675 

490 

1 

490 

CURTA  INS 

57C1 

13  73 

6 

935 

961 

CGNTPFPV 

33,2545 

870 

r 

86  6 

862 

C0ZY4 

E7,  1666 

143 

4 

686 

689 

CUTCF  F 

14,2416 

846 

4 

739 

£46 

CCNLMNCF 

4 1 ,3075 

431 

1 

43  3 

OPHI 

T221 

3 

c c 

1 1 

341 

14C6 

CUTOFF  1 

14,2430 

847 

1 

846 

C0NV3 

42,3623 

489 

C PSI 

0323 

= 

99 

5 

352 

1405 

CUTCFF2 

34,3454 

8 47 

2 

E4  7 

CCNVA 

42,3634 

489 

1 

489 

CRFWMANU 

43,3032 

287 

1 

262 

CVECTR 

no  10 

= 

1140 

1 

1136 

CQNV5 

4?  , 3636 

489 

1 

489 

CR  ITCCN 

40,2315 

402 

1 

401 

CYCLSHFT 

42,3516 

1260 

CONI 

5 4‘15 

1289 

1 

1290 

SI  /A 

34,2113 

635 

1 

626 

CYL 

0022 

92 

24 

40  1 

12EC 
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SYMBOL 

DEF 

H 

peffffnce 

S 

SY«ECL 

CE  F 

F 

FEFERENCES 

SYMBFIL 

OFF 

H 

REFERENCES 

CYR 

JO  20 

= 

92 

46 

233 

1295 

E6  ,1742 

= 

138 

4 

132 

1437 

CCV/PCCV 

00,2353 

1049 

6 19 

1036 

C 1/2 

7722 

1009 

1 

1094 

DAPTEMF5 

F6, 1743 

138 

C 

132 

14  15 

DDVCA  LL 

00 ,3CC4 

1C6C 

1 

1060 

C IMP 

F6,  17  2? 

= 

136 

DAFTEN'P6 

F 6 » 1 7AA 

= 

138 

1 1 

132 

1460 

CFAC 

27,2230 

744 

2 

7^4 

Cl  PP 

F6,  172  1 

= 

136 

n APTRFG  1 

E6,1745 

= 

136 

3 

133 

1499 

DFPIT 

5522 

1365 

•a 

735 

1365 

r 13BANK 

17,2000 

= 

31 

1 

563 

C A FT  REG? 

F6, 1746 

= 

138 

1 

134 

CFG-  12 

12,2C16 

1 r c3 

C13FSAV 

1 267, 

105 

2 

5^3 

564 

CAPTREG3 

E6 ,1747 

= 

138 

1 

134 

CEC-6 

12, 2015 

1093 

C L3QSA V 

1 26  5 

1)5 

6 

985 

1447 

DAPTREG4 

E6, 1750 

138 

10 

132 

1416 

CFCBRNCF 

0777 

10  1 

18 

400 

449 

C 13SLCCP 

17,20  30 

563 

1 

6 64 

CAFTREG5 

£6 ,1751 

= 

138 

5 

132 

14  16 

CECCNTR 

33,2366 

657 

1 

65  7 

C13ST  ALI 

6)22 

564 

IP 

A69 

1446 

DAPTREG6 

F 6 , 1 7 5 2 

138 

7 

134 

1416 

CFCDSF 

41  ,2525 

417 

1 

409 

C 13STAI  1 

17,2022 

563 

1 

564 

CAFT4S 

06, 314C 

= 

169 

■3 

16C 

166 

CECDSF3 

41,2577 

4 16 

2 

416 

C2MP 

E6,  1717 

= 

136 

DAFZRUFT 

E6,1757 

= 

138 

4 

1402 

1449 

CFCENE 

40,2265 

4C  1 

2 

4C1 

C2PP 

F6 , 1715 

= 

1 36 

RAS^MPL 

2‘I,  334  5 

559 

1 

561 

CFCCN 

40,2322 

402 

1 

401 

C2SQM 

■^,1713 

- 

136 

c AT  AF  A IL 

25, 3444 

561 

1 

556 

OFCOUNT 

G117 

96 

27 

4 11 

435 

C2SQP 

F6,  17  1 1 

1 3 6 

OATAGCOD 

£7,1733 

= 

145 

5 

145 

595 

CECCT  INF 

16,2710 

14  18 

1 

14  16 

C3/2 

7 7A2 

1090 

1 

1094 

DATAOUT 

21,2224 

892 

? 

692 

893 

DECRET 

0115 

96 

2 

431 

432 

C 33JMF 

C6, 276 3 

182 

I 

169 

DATAFL 

F5  ,1472 

= 

128 

13 

376 

380 

CECROUNC 

40,3315 

444 

1 

443 

C33TEST 

06 , 2 37 A 

168 

6 

165 

167 

DATGOFHK 

26,3654 

5 c 5 

1 

595 

CECRT  INF 

16,2712 

14  18 

1 

14  16 

r 5/2 

5 OP  5 

1088 

1 

1094 

CAXMAX 

30,3754 

9 18 

2 

909 

918 

CFCTFN 

C 122 

96 

3 

417 

DAY/2NAX 

3 3 f 3 / 1)  6 

918 

2 

90  9 

918 

CECTEST 

4 1 , 2445 

A 16 

2 

^ 1 ^ 

A 1 6 

CACL  IM  IT 

2 ) ,2446 

14  )0 

3 

140g 

C A7MA  X 

30, 3754 

= 

9 18 

1 

90  9 

CECTCE  IN 

40,2232 

4C1 

1 

40  1 

DACLOrP 

2',  ,24  IG 

140P 

1 

140  9 

CP 

1343 

107 

fi 

2 13 

1496 

CECI7 

4361 

= 

362 

3 

374 

654 

DAT 

7'TD 

I 'M  8 

1 

1(-:M 

DBPl 

0143 

= 

1495 

5 

1488 

1493 

FEC227 

15,2557 

955 

2 

950 

95^ 

OALTRATE 

= 1 , 1716 

= 

152 

3 

152 

891 

^•^32 

0 144 

= 

1495 

0 

nee 

1492 

CEC23 

42  ,2033 

276 

1 

276 

DAMPING 

17,2374 

1436 

1 

1436 

D883 

0146 

= 

1495 

A 

1 489 

1492 

CEC27 

4764 

= 

1C66 

DANZIG 

6064 

995 

6 ^ 

94  1 

1392 

DBR  4 

0145 

= 

1495 

6 

1489 

1493 

CEC29 

4765 

= 

1068 

DAPARLPT 

E6,1753 

= 

138 

5 

133 

1448 

CPFUN 

20,3562 

1492 

1 

1 492 

DEC45 

477? 

1C88 

2 

1CC8 

1C81 

DAPATTER 

43, 2157 

266 

1 

26  7 

CRCNF 

20,3371 

1489 

1 

1489 

CEC51 

04,3235 

1322 

DAPP  ns 

05,3466 

826 

1 

825 

CPSELECT 

47  5C 

= 

88 

1 

1397 

CEC58 

37  ,2474 

382 

1 

376 

DAPBOCL  S 

1111 

= 

67 

64 

21  3 

1499 

CPSELFLG 

0 316 

= 

68 

CEC585 

37,3C55 

369 

1 

377 

DA  FRCFPT 

E6,  1755 

= 

138 

2 

14  18 

1446 

CBSLECT2 

4 74  7 

= 

88 

1 

13  97 

CEC66 

3 1 ,2433 

793 

3 

76  6 

794 

n A PDA  T A 1 

20 , 20U4 

293 

1 

793 

CPSL2FLG 

0315 

= 

68 

DEC  70 

04 , 2 40  1 

234 

1 

226 

DAPDATA2 

01,2226 

296 

2 

296 

DBVAL  1 

1 343 

= 

1496 

h 

1487 

1493 

CEFUNCT 

21,3231 

1464 

1 

1464 

DAFC.ATA3 

11 , 230  3 

296 

08VAL2 

C 11  4 

= 

14  96 

2 

1487 

1489 

DEG. 5 

15  ,2467 

953 

1 

951 

OAPOA  TP  1 

1 34  0 

107 

10 

294 

315 

CPVNL3 

■1115 

= 

1496 

3 

1467 

1490 

DFGCOM 

4C,2717 

42C 

1 

419 

DAPCAT2 

)1, 225’ 

296 

1 

296 

CCDL 

96,1635 

= 

1 37 

CEGCCM 

40,3130 

434 

1 

^33 

DAPPISF 

43 ,3  152 

293 

1 

262 

nCMCL 

30,3217 

9C6 

1 

912 

CFG  INSF 

40  ,3044 

433 

2 

433 

DAPIDLER 

16 , 2024 

1401 

2 

223 

14C3 

CCMTCCCL 

22 ,2654 

363 

2 

366 

465 

CFG  1NSF2 

4C  ,3C55 

433 

DAFLPUFT 

F6, 1754 

138 

DCOGA 

CC14 

= 

1194 

4 

1187 

1189 

CEGCUTSF 

40  ,2615 

4 19 

2 

4 16 

4 19 

DAPSl 

16,2000 

31 

A 

14't  1 

14  66 

CCCMF 

771C 

1C38 

2 

1C36 

DEGREE  1 

14,3403 

941 

1 

940 

DAPS? 

17, 2C0D 

= 

3 1 

4 

1394 

1450 

nccMEf  ST 

41  ,2441 

4 16 

2 

415 

CFCTAB 

40,2727 

42  1 

2 

^ 2C 

n APS3 

20, 2000 

= 

31 

6 

42 

1467 

OCTSTCYC 

41,2454 

4 16 

2 

431 

432 

CEGBO 

15  ,2465 

953 

2 

25  1 

95  1 

DAPS4 

21,2000 

= 

31 

4 

1462 

1498 

CCU'^CALC 

32,3103 

730 

1 

80  5 

CEG359 

14,34C4 

941 

1 

940 

DAPTF»P  1 

F6,  17’7 

138 

2 9 

1?1 

146C 

OOLMCPI 1 

3?  ,3262 

782 

1 

780 

C EC-60 

15,2471 

9 c 3 

C4PTT VP2 

'=6,17^'' 

= 

138 

12 

I ’2 

146  1 

CDUMGUOO 

32, 3164 

781 

1 

78P 

DEL 

E6 ,1745 

= 

133 

3 

1464 

1466 

DAPTFMP3 

E6,  1741 

= 

136 

6 

132 

1461 

DCV 

760  2 

1036 

1 

100  3 

CFLAYFX 

5235 

1112 

1 

1 1 1 1 
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SYNBCL 

PEF 

H 

PEFEPENCFS 

SYMBOL 

DEF 

H 

RE  FERENCE  S 

SYMBOL 

OFF 

H 

FEFERENCES 

oELAYjre 

JC,37Bt 

1367 

14 

2 09 

945 

PELVEET3 

E4,1765 

1 19 

15 

195 

773 

CEXCE  X 

0 142 

= 

9E 

7 

1249 

1254 

DELAYLCC 

132B 

107 

6 

22  3 

1368 

DELVIML 

E7,  1622 

143 

7 

317 

756 

DFXI 

0143 

= 

98 

1 

1253 

DELA  YNLM 

A752 

= 

37 

1 

1367 

CELVLVC 

E7,  1433 

14F 

20 

14E 

709 

PE  X 1 

C 1 4 3 

9E 

c 

98 

1254 

CFLCPLX 

E6,  16AO 

135 

6 

135 

14  11 

nCLVM! C 

F7,1575 

= 

142 

PFX2 

0144 

= 

98 

CELCCLY 

= 

1 35 

3 

1 3 7 

1^11 

CELVGV 

F4, 1622 

1 17 

317 

71C 

CFFNT 

40,3420 

447 

DELFDLZ 

Et,  UA2 

I 35 

3 

137 

1411 

CFLVREF 

E7 , 1526 

= 

148 

5 

148 

873 

CGEF 

2C  , 3 103 

1484 

2 

148C 

DELCCM.P 

22, 2E27 

360 

3 

S'6  5 

4 64 

DELVRED 

E 7 , 1 7 6 6 

= 

152 

6 

152 

812 

CGEITS 

25,3156 

556 

2 

556 

56C 

DFLOCCL 

Ft  , 1 640 

= 

1 37 

2 

366 

37) 

CFLVS 

F7, 1 733 

= 

152 

8 

152 

F95 

cgcheck 

25  , 3425 

561 

2 

558 

560 

OELncCUl 

■^6,  1641 

1 37 

1 

370 

DcLVSAB 

E7,1663 

= 

143 

4 

143 

758 

CC-CFFCK2 

25,3346 

56C 

2 

56  1 

CELEC  EU2 

P6, 1642 

= 

137 

1 

37 

D-LVSIN 

E7,  1655 

= 

143 

14 

143 

758 

CGcrp? 

32  ,2742 

607 

OELDE  P 

E5,l 757 

= 

1 26 

5 

125 

1175 

CELVSLV 

F7, 1433 

= 

140 

2 

199 

6 2 0 

DGCDDChK 

25,301C 

553 

1 

553 

DELDV 

E7,  1611 

142 

1 5 

142 

643 

DFLV7FS7 

27,2252 

758 

CICFLAC 

0020 

= 

67 

PFLEL 

E7 , 1575 

= 

142 

4 

66  7 

6 70 

DEL  VTPF 

E4,  1747 

119 

3 

199 

663 

DICFLen 

4736 

= 

67 

4 

218 

90C 

DELFLC 

D032 

= 

661 

3 

66  7 

6 70 

CEL  VTP  I 

F7 , 1575 

142 

6 

142 

663 

ClFEO-tC 

11,3475 

1232 

1 

12  2 8 

DELFRL  IN' 

30,3756 

= 

P18 

1 

9 1 1 

DELVX 

0324 

= 

99 

12 

327 

866 

PIFEC-H 

1 1 ,350  1 

1232 

1 

1228 

DELGYPLF 

3->  ,3265 

00  7 

1 

9,i7 

CELVY 

0 32  6 

= 

c c 

10 

330 

866 

C lFEO+2 

1 1 , 35  12 

1222 

1 

1228 

DEL  INDEP 

0014 

= 

11S5 

2 

1 1 74 

1175 

dflvz 

0 330 

= 

99 

9 

330 

866 

PIFFOCNT 

E3, 1500 

1 1 1 

2 5 

111 

1234 

OELLCCF 

■10, 3 741 

1367 

1 

1367 

DELX 

E5,  1642 

= 

126 

6 

126 

1170 

riFECCCN 

1 1,3655 

1234 

2 

1232 

DELLTB 

F7,1451 

140 

7 

195 

759 

OFF 

0036 

= 

1195 

1 

1174 

DIFEQTAB 

11,3306 

1226 

1 

1228 

DELM 

F5,  1550 

= 

129 

c 

3 5 7 

CFPRCRIT 

22,3657 

82? 

2 

793 

CIFECC 

1 1 ,3401 

1229 

1 

1232 

DEL'^AXl 

34,21''5 

635 

2 

64  3 

CFPREV 

E5,  1761 

= 

126 

3 

126 

1 1 74 

Cl FFA  IT 

E7  ,1577 

142 

5 

195 

651 

DELMl P 

37,2646 

366 

1 

387 

CFRCLCCF 

31,3564 

8 18 

1 

8 18 

r IN«CB  IT 

47  53 

= 

7 1 

DELCK 

12,2632 

1175 

1 

1174 

DFP,CQF+  1 

C 153 

= 

98 

CINOFIAG 

0073 

= 

7 1 

23 

227 

1234 

OELPFFCR 

12  74 

106 

5 

363 

1428 

C'^R.CCF-1 

0151 

= 

9£ 

DINDX 

00  6 3 

= 

138 

6 

1409 

DELCF  POP 

1275 

1.16 

3 

3 7C 

1441 

DERCCF-2 

015C 

= 

98 

C IRAPRES 

6111 

99  6 

2 

ICIC 

oelcfix 

--5,  152(1 

12? 

2 

1 7? 

E7E 

DEPCOF-3 

014  7 

= 

98 

Cl SCVLVC 

35  ,2375 

633 

2 

626 

648 

DELF’ERTR 

1276 

1 06 

3 

37  ) 

144  1 

CEPCCF-4 

'146 

98 

01 SGRVER 

15,2761 

959 

1 

958 

DELPFPL 

22,3541 

= 

37 

DERCOF-5 

0145 

= 

98 

CIS  INCAT 

21,2315 

893 

2 

89  1 

892 

OFLT 

‘^5,1644 

- 

126 

3 

126 

1168 

CERCOF-6 

0144 

= 

98 

PI SPCFNG 

36  ,2402 

730 

4 

723 

729 

DELTAC  SM 

E3,  1572 

112 

1 

589 

CFRCCF-7 

0 14  3 

98 

P ISPCCMN 

31,3451 

8C6 

1 

808 

DELTAF 

E 7 , 1664 

= 

151 

6 

151 

878 

DERCQF-8 

0142 

= 

98 

CrSPCEX 

1162 

104 

24 

149 

825 

DELTALEN' 

33,1644 

112 

1 

589 

C^RCCFN 

M52 

= 

98 

1 

819 

01 SPE  X IT 

31,3437 

8C7 

V. 

792 

814 

OFLTAC 

E7, 1 546 

1 46 

8 

146 

1 143 

DERPTR 

0141 

98 

3 

817 

818 

riSPGYRC 

15,3276 

966 

1 

963 

OELTATM 

E7,1426 

= 

1 40 

2 

513 

DERTA3LL 

31,3655 

8 19 

1 

817 

Cl SFLACE 

41,3072 

430 

2 

430 

OELTATCK 

04,3603 

1383 

1 

13  83 

DESASCNT 

000  4 

= 

236 

3 

236 

DI  SPLA YE 

3 5 , 36  C3 

682 

2 

661 

662 

DELTAX 

F5, 1664 

127 

12 

127 

1148 

CESCBITS 

23,2455 

816 

1 

255 

C ISPLAYS 

10,2000 

= 

29 

3 

124^ 

1372 

DELTFE 

E7 ,1611 

= 

142 

DESCOLNT 

1113 

1C3 

4 

511 

548 

Cl SPNCT 

36  ,3016 

738 

1 

737 

deltfec 

F7,  ieo‘= 

= 

14? 

4 

670 

CESGLCS 

26  ,3636 

595 

1 

C Q 

C TSPN5X 

37,3113 

7C3 

2 

703 

CELT  I WE 

12,2421 

1172 

3 

1166 

118? 

D^figbit 

4 74  2 

= 

85 

9 

532 

871 

Cl SFPATE 

20  ,2257 

1405 

1 

1405 

OELTTFAP 

£7,1425 

1 39 

1 

795 

CES  IGFLG 

0271 

= 

85 

1 

54  8 

01 SPR  SET 

21,3f44 

9CC 

2 

891 

893 

DELV 

0 3 24 

99 

c 

99 

959 

DESLCCF 

25,2611 

548 

5 

548 

596 

C ISTFM 

0 122 

= 

96 

^15 

PELVES  I 

E7,  1573 

142 

16 

142 

643 

0FSRF7 

1112 

103 

10 

103 

545 

Cl VICER 

16  ,23  74 

14  12 

2 

1412 

DELVE  TL 

E7 , 1 501 

= 

148 

3 

751 

752 

CESRBTRN 

25,2457 

543 

1 

542 

CKALT 

16,3445 

1427 

1 

1428 

DELVFFXl 

= 4,  1666 

1 17 

c 

195 

637 

D^frtrn 

25,2463 

543 

2 

543 

CKCE 

E6,  1411 

130 

2 

2 14 

150C 

CFLV'^E'FZ 

F4 ,1674 

1 1 7 

6 

195 

652 

PETENTCK 

16, 3071 

1422 

2 

1420 

1421 

DKKACSN 

E6  ,1435 

130 

1 

214 
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DKCMFGAN 

E6  , 14.14 

13(1 

2 

2 14 

1415 

CNTMFAST 

C6  , 267  1 

179 

1 

182 

DCSTOFE 

6365 

1CC6 

1 

995 

DKTR  AP 

- 6,  14'  3 

1 3” 

2 

213 

1415 

ONTRCCTC 

0 33  5 

= 

99 

9 

99 

989 

COSUBLST 

05,3664 

986 

1 

985 

CLSNC 

E5, 1634 

= 

1 23 

1 1 

12  3 

797 

n.NTM  1 

CC34 

= 

93 

1 

966 

CrSWITCF 

1 1 ,3434 

1230 

2 

1229 

123C 

CLANOX 

05,1634 

= 

123 

1 

317 

PNTM2 

0035 

= 

93 

1 

966 

DOT 

7334 

1C3C 

1 

1003 

CL  ANCY 

FB,  1636 

= 

123 

1 

3 1 7 

OCACCFLN 

20,3737 

1494 

1 

1490 

CCTERM 

40,3642 

460 

1 

460 

CL  ANT  Z 

= 5 , 164 -I 

= 

123 

1 

3 1 7 

CCALARM 

C J c c 

= 

13  74 

CGTIC  K 

22  ,3441 

716 

1 

716 

DLAY JCP 

.’C  ,20cr 

= 

28 

1 

1367 

CCAL  IGN 

15,3104 

963 

COT  INC 

0 136 

9 7 

7 

97 

1031 

CL  CAD 

6 5 5 

994 

1 

I'--  3 

COCKED 

20,3111 

14  64 

1 

1477 

CCT  IX  FR 

) 1,2425 

loec 

CLCAD* 

7736 

1090 

1 

993 

COCKT'^MP 

0 157 

= 

1486 

4 

1476 

1481 

OCTPEP 

22  ,3622 

721 

1 

721 

OLCAOroo 

77  3 5 

109C 

1 

1'  1 : 

DCCKT'^ST 

20 ,2777 

1481 

2 

148  1 

1494 

CnTRET 

0 137 

97 

8 

Cl 

K7C 

DLY2 

5212 

nil 

2 

11  1 1 

1367 

DGCM0A  SE 

37,3144 

7C4 

1 

707 

CCTSUE 

7 161 

1025 

3 

103  1 

OMENP  PI T 

4743 

= 

74 

CCCGRS 

14,3567 

945 

1 

945 

DCTSWFMX 

30,3753 

9 18 

1 

912 

dmenflg 

P 12  1 

74 

7 

579 

1149 

CCC  SM 

23,3236 

1149 

1 

1148 

CCT6RUPT 

17,2117 

1395 

1 

155 

CMcnc 

T335 

1 '30 

1 

1169 

cncsM 1 

23,3241 

1149 

1 

1146 

CCLBLK 

40  ,2575 

406 

2 

405 

406 

DMP 

7 r ■ 6 

1023 

22 

4'  1 

1256 

CCDA  1 

07,2074 

246 

1 

246 

COVLOAC 

6466 

10  1C 

1 

ICO  7 

DMFNSUB 

732  1 

1029 

1 

8 18 

OodELVZ 

37,3565 

865 

1 

866 

CrVLCiAC* 

6471 

10  10 

1 

ICO  7 

ORPN^EMF 

'T135 

= 

97 

2 

1"29 

CCCES 

25,2646 

5 5 C 

1 

548 

DOW.  . 

11,3714 

1236 

2 

1229 

1234 

DMPP 

7 5 7 7 

1036 

1 

10"3 

DCOFSEND 

25,3073 

554 

1 

554 

COW.. 1 

11,3742 

1236 

2 

1236 

DMFSUE 

7 112 

10  23 

2' 

l(i?5 

1256 

DOOLOAD 

6463 

1C  ir. 

1 

1007 

CCWNENT2 

1 , 3 5 5 5 

13  64 

3 

135  4 

J 3 ft  ^ 

0MPSUP2 

7131 

1023 

1 

l'>23 

OCCLrAC* 

6147 

998 

2 

1007 

ICIC 

DOWNFLAG 

5516 

1365 

103 

209 

1356 

DM  PI 

7575 

1036 

1 

ICC  3 

OCCNACR 

C5  ,3516 

9 84 

CCWNGTS 

20, 3712 

1494 

2 

148  1 

ONACRCPR 

)5,3523 

984 

1 

986 

nOCNCFAN 

P', 3564 

984 

CrWNTFLM 

05  ,2000 

= 

29 

2 

194 

983 

ONOUN'F 

'5,3721 

989 

1 

989 

CCDNFTR 

05,3610 

985 

1 

984 

CrWNTCRK 

E6  , 1 5 13 

13  3 

7 

13  3 

146C 

ONCUM  P 1 

15,37C6 

9RP 

2 

289 

9E9 

OQDCWMM 

05,3472 

983 

2 

154 

155 

CC1/N6T* 

23,3730 

1494 

2 

1490 

]4C  ] 

DNDUWP  1 

■5,3733 

989 

1 

989 

CCFSTART 

05,2472 

2 12 

1 

219 

DPl-22  ) 

27 ,37  60 

12  73 

1 

1268 

DN0UMF2 

.'5,3  735 

989 

1 

989 

OCFSTPTl 

05 ,2477 

212 

2 

218 

219 

CP- .0  1 

35,3650 

684 

■a 

6EC 

DNECACR 

0 336 

= 

987 

15 

983 

966 

DOI  NT 

1?,2C36 

237 

2 

237 

CFAGRFE 

7 260 

1028 

DM'=DUMP 

43,3062 

289 

2 

262 

289 

DCINT2 

13,2060 

237 

1 

237 

DPB- 14 

26,2414 

4 E6 

2 

483 

485 

CN  TMOFy 

1332 

= 

1 07 

4 

I"  7 

561 

001  T 

"1 ,224C 

788 

1 

789 

CP  E IT  14 

01,3500 

1123 

1 

1 123 

CNLACMM 

'4,2467 

236 

1 

232 

dolfm 

26, 246C 

579 

1 

579 

CFCAT  1 
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1 78 

1 

1 82 

PC  LYRE  T 

0141 

= 

97 

3 

10  2 6 

1027 

FCSUPCAT 

33,3127 

ill 

P I PFR  E R 

17, 3 3D 2 

1308 

1 

858 

ROLYTEPP 

F 6 , 1 7 4 1 

= 

1 32 

10 

1420 

1448 

FCSVP  AXY 

21  ,26  74 

898 

2 

£96 

PI PFREF2 

07,3277 

1308 

1 

13)8 

PCI  Y2 

725C 

1027 

1 

K27 

PCSl /2 

4736 

1C  91 

2 

1114 

PIPINCPX 

F5,  141 5 

= 

I 28 

t 

128 

380 

FCN 

’7,2251 

377 

1 

377 

pnsi/4 

12,3765 

1257 

PI Fjrep 

37,2166 

376 

1 

376 

P0N2 

37,2240 

377 

PrSlCFH 

33,2536 

870 

1 

869 

PI PSnCNF 

37,3447 

853 

1 

866 

FCN4 

37,2245 

377 

1 

377 

P0S2CHK 

33,254C 

87C 

1 

869 

P IPSR  TNIE 

37,3541 

= 

955 

2 

958 

959 

PCGDCC 

5642 

1373 

5 

244 

1224 

FCRiEPCE 

20,2153 

1398 

2 

1397 

1396 

PI  PTE P 

E4 ,1657 

= 

117 

7 

I 20 

887 

POOOOO 1 

5 716 

1374 

2 

1C71 

1124 

FCRFL 1 TE 

2 3 ,2000 

= 

32 

1 

1249 

P IP! I PE 

1233 

105 

26 

1 96 

1213 

FCCF I Z Z 

04 ,7261 

232 

1 

23  1 

ROVsFl  IT  1 

23,2C0C 

= 

32 

PI  FT  I PEI 

E7,  1560 

148 

1 i 

1 48 

1215 

PCCH 

04,2165 

230 

FCRRSEPS 

7220 

1026 

2 

818 

PI PLSF 

07,3265 

1308 

PrCFBIT 

473  5 

= 

7C 

PORBIT 

16,3132 

1423 

1 

1423 

PI  PUS  E 1 

07,3271 

1308 

1 

3 37 

PCCHFLAG 

CC55 

= 

7(1 

3 

230 

12  10 

PRATE 

E4,  1750 

= 

12  1 

9 

12  1 

647 

PITCH 

E4, 1 764 

= 

121 

2 

3 17 

8 3 3 

POOKLE  an 

05,2645 

215 

1 

231 

PPCTTAB 

01 ,2000 

239 

3 

1296 

1298 

PI TCHANG 

F4,1600 

= 

119 

7 

1 19 

490 

FCSALARM 

33,3655 

888 

2 

888 

889 

RREB J IMP 

5316 

1284 

P I T r HO  F F 

27, 3260 

775 

2 

774 

posalph 

21 ,3362 

1469 

2 

1469 

PR  EC  I E IT 

4744 

= 

71 

pitfall 

1 1 ,2302 

8 14 

2 

155 

POSCHECK 

21, 3674 

1499 

1 

1498 

PR  EC  I F LG 

0C64 

= 

71 

6 

237 

1210 

P I T T T PF 

T6  ,14D2 

130 

2 

315 

7 74 

FCSCCDE 

1241 

= 

953 

6 

3 17 

955 

PP  ECSET 

23,2403 

697 

4 

625 

666 

PJFTCTR 

E6, 1767 

138 

4 

138 

14  18 

PCSOEL 

12,262c 

1175 

1 

1174 

PPECCT 

7 157 

1025 

2 

1030 

10  3 2 

P JETS  LFC 

16,3362 

1426 

5 

1421 

1429 

FCSCELX 

12,2246 

1169 

1 

116E 

PREDSFAL 

40,3452 

448 

1 

418 

PL  AN  FT 

15,2472 

9 54 

7 

9 35 

962 

PCSORIVE 

21 ,3566 

1473 

2 

1463 

1473 

FPEGU  ICE 

31,2353 

79  1 

1 

79  7 

PLANT  I N 

24,2000 

= 

32 

1 

1133 

PC  SEC 

A2,3414 

42  5 

2 

42  5 

FPEPPl 

04,2435 

235 

2 

2 29 

223 

PLANTINl 

26,2000 

= 

33 

2 

1132 

1138 

PCS  FNCT  L 

21, 3221 

1464 

1 

1464 

PRFMON  1 

1 1,2323 

814 

1 

615 
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SYPECL 

OFF 

H 

FEFEPEMCFS 

SYMBOL 

DEF 

H 

REFERENCE 

c 

SYNEOL 

CEF 

1- 

REFERENCES 

PRFMON2 

1 1 , 2 ?2A 

814 

1 

615 

PRI  C34 

7725 

1C89 

1 

1091 

PURRS4 

10,2716 

1352 

2 

1351 

1352 

PPFNV  ESY 

AA’7 

466 

1 

466 

PR  I C 3 5 

7 726 

109i 

1 

1113 

PLSF 

TO  ,3247 

1069 

1 

1005 

PREFC 

25,3564 

6 ON 

1 

599 

PR IC36 

7 72  7 

1C9C 

1 

564 

PLSHLCC 

0 166 

99 

3 8 

252 

1 101 

PRFREAC 

37,3410 

852 

1 

7 29 

PRI C37 

7730 

1090 

8 

233 

1394 

FUSHUF 

6220 

ICCO 

1 

996 

PRERRCRS 

43,3267 

1276 

3 

127  7 

PR  IT4 

4 74 r 

= 

1C91 

4 

275 

49  1 

PUTACC 

41 ,2334 

412 

3 

412 

PRESI NE 

Of  , 3526 

1074 

2 

U>74 

FPIC5 

5017 

1089 

10 

230 

12CL 

PUTCOM 

4 1 ,3  101 

431 

8 

427 

429 

PPFST  ANC 

37,3654 

132  5 

1 

1325 

PRTC6 

5C20 

1089 

4 

538 

1419 

FUTCCR2 

41,3161 

432 

4 

43  1 

4 2 4 

PREST  CPF 

6424 

in08 

1 

l'--8 

PR  107 

5021 

1C  69 

7 

276 

717 

PLTCC  SF2 

41  ,3213 

432 

1 

432 

PRPTI PCK 

16,2667 

1418 

2 

1417 

PRL  IN  IT 

33,2200 

8 50 

2 

84  1 

PUTCFCSF 

4 1,  3200 

4 32 

2 

43  1 

432 

PRineCRT 

1^,2576 

1350 

2 

1348 

135F 

PROCEPr 

10,3^12 

1360 

1 

1356 

FUTCFCCN 

41  ,3134 

43  1 

1 

432 

PRICCHNG 

5146 

1097 

19 

276 

1359 

FRCCFFOE 

C 6,  2075 

159 

PLTNCPR 

41,3143 

431 

1 

43  1 

PRIOCH2 

Cl, 3C73 

1104 

1 

1 C97 

FRCCKEY 

40,3506 

451 

1 

159 

PUTSFNCF 

41,3212 

432 

1 

432 

PRIPCEIT 

4 736 

= 

72 

1 

13'"'= 

RRGCKFY  1 

40,3514 

451 

FLTXY 

41,2720 

428 

PRT  TCP  LC 

fK'7  5 

= 

72 

FfiCCTNCN 

06,2242 

165 

1 

165 

PLITXYZ 

4 1,2636 

42  7 

PRinrSP 

1 ■ ■ , 2 5 1 ' 

1348 

2 

5'  7 

5C  9 

PRCCLCT 

21,3516 

1472 

PVALVEST 

1273 

1C6 

7 

192 

212 

PR lOCSPR 

10,2505 

1348 

2 

51  7 

1372 

PROGLARM 

56  14 

137  1 

2 

1371 

FWPCNT 

0140 

= 

98 

2 

8 18 

PR  lOPNT 

5575 

1371 

2 

13  72 

1374 

PPCGRAV 

15  ,2652 

958 

1 

956 

PWRPTR 

0 117 

= 

96 

4 

6 17 

61  F 

PRICLARP 

10,3563 

1372 

7 

498 

868 

PROG  2C 

24.2CCC 

494 

2 

235 

494 

FOOHCHK 

13,3352 

12  10 

2 

1209 

12  1C 

PRI CCCT 

1C  ,3532 

1363 

2 

1 346 

1353 

P = C,G2vl  A 

24, 204C 

497 

3 

495 

497 

PC5PC6 

37,2CCC 

= 

36 

1 

1325 

PRIOPLAY 

K , 261  7 

1350 

2 

1346 

13A9 

PPCG2  1 

24,3505 

655 

1 

235 

P0  6 

37,3652 

1325 

1 

235 

PR  inp  ITY 

0 167 

99 

34 

222 

1351 

PROG  2 5 

24.2CQC 

= 

494 

1 

235 

PICHK 

33,3664 

888 

1 

888 

PRIOTT  PE 

1 164 

104 

2 

1349 

1359 

FFCG25 

24 ,2400 

504 

1 

235 

P 12 

3C  , 2CCC 

= 

34 

1 

831 

PR  m 1 

4 74  2 

= 

1091 

PRCG  5 2 

1 ■=  ,2C5C 

920 

1 

234 

F12A 

23,2010 

= 

3 2 

PR:  Cl 

4737 

= 

109  1 

5 

2E5 

774 

PPOJ 

0022 

= 

151 

P12ADPES 

3C  ,2314 

834 

1 

832 

pp  in  n 

5022 

1C8S 

PRC JRAX 

31 ,3734 

821 

1 

806 

P121GN 

36,2525 

7 32 

1 

723 

pRi’^ia 

4644 

990 

3 

212 

753 

PRC jw?  N 

31 ,3735 

821 

1 

80  6 

P12INIT 

3F1  ,2251 

833 

2 

826 

62  1 

PRI013 

5023 

1089 

3 

738 

1345 

FRCK 

30,2553 

64  1 

2 

641 

P 1 2LM 

30 ,2C61 

831 

1 

235 

PRIOIR 

5 j 2 4 

10  8 9 

3 

5C5 

1293 

FPCNVeiT 

4745 

= 

73 

F12LMB 

30,2122 

831 

PR  ICl  5 

502  5 

10  89 

C 

182 

136  1 

PRCNVFLG 

C 104 

= 

72 

1 

1356 

F 1 2RET 

30  , 2 2 1 6 

833 

1 

843 

pRini 6 

5 026 

1089 

6 

182 

733 

FRSHRTRF 

4415 

464 

4 

42  1 

423 

P12SPQT 

36,2150 

= 

725 

1 

723 

PR  K1  7 

5027 

r’89 

C 

727 

646 

PBT2CACR 

Cl  ,3772 

1298 

1 

1 295 

P 1 2T  A E 1 F 

36 , 20  24 

723 

1 

834 

PRIC2 

4741 

= 

l'-91 

PSEU0055 

E7,  1614 

= 

150 

3 

150 

788 

P2CHK 

33  ,3672 

888 

1 

888 

PR  1020 

4736 

= 

1!‘91 

£ 

269 

853 

PSIV 

E4  , 1453 

= 

115 

3 

1 15 

1232 

P2CFLGCN 

35,2366 

632 

4 

624 

666 

PR IC2  1 

5031 

1089 

4 

329 

852 

PSKI PADR 

16,3627 

1431 

F20LF  NA 

24,2111 

498 

3 

496 

5 1 1 

PRIC22 

7 713 

1089 

6 

291 

871 

FSTFI81T 

4741 

= 

64 

2 

669 

677 

P2CLF  NB 

24,2117 

496 

6 

496 

499 

PRI023 

7714 

1089 

2 

2 55 

888 

FSTHIGAT 

0251 

= 

83 

F20LERR  1 

24,2163 

499 

1 

5 1 5 

PRIC2A 

7715 

10  89 

1 

554 

PTBAO 

0 5 , 3C5  2 

218 

3 

217 

P20LENE2 

24,2166 

499 

1 

499 

PRI02  5 

7716 

lOfiP 

4 

492 

857 

FT  I C-  INC 

F7, 140? 

139 

1 

666 

P20LFMB  ■ 

2<,217C 

499 

2 

499 

50C 

P R I n 2 6 

7717 

1089 

10 

369 

6C8 

mCACSM 

13  ,2706 

1202 

1 

120  7 

F2nLENE4 

24,2215 

50C 

1 

499 

PR  I T2  7 

7720 

16,89 

5 

193 

14P  1 

PTOALEM 

13,2761 

1203 

2 

298 

1207 

P20LERe5 

24  ,2135 

499 

1 

507 

PR  103 

50  15 

1(  89 

13 

252 

1091 

PLLSEF  LG 

U303 

= 

87 

4 

285 

7 64 

P2CLFM86 

24,2153 

499 

2 

499 

PPIP30 

4355 

= 

K'9  1 

12 

1 75 

136  1 

PLL  CRIML 

10,3706 

1390 

1 

381 

F20LF  687 

24,2130 

498 

PRIP31 

7721 

lo89 

5 

337 

1431 

FULSFM 

14,3222 

938 

P2CLE6C 

24,2217 

5CC 

3 

507 

5C9 

PPI032 

7 723 

U'89 

4 

867 

1 357 

FLLSRS 

4 73  5 

= 

87 

3 

730 

1434 

F20LFMC  1 

24,2244 

5C0 

3 

240 

5C1 

PRIC33 

7724 

1"‘89 

1 

1349 

PURG^NCY 

16,3467 

1428 

4 

1420 

1425 

F20LE  6C2 

24,2261 

501 

1 

500 
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, INCLUDING  GEFTNITICN,  FEALTP,  PAGE 

CF 

DEF, 

A OF 
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SYMBOL 

OEF 

H 

PEFEREICFS 

SYMBOL 

CEF 

h 

FEFFPENCES 

SYMBOL 

CEF 

H 

REFERENCES 

P2 ILF  MC3 

29,2211 

50*1 

3 

999 

5 1 1 

P32/P  72B 

35,2136 

6 2 5 

I 

626 

F91=J5I1 

36  ,33  1 1 

798 

1 

798 

P 20LF  MC  A 

29,2216 

500 

1 

5C2 

F32/P72C 

35,2157 

6 26 

1 

699 

P9  1 IN 

36,3319 

79B 

1 

796 

P20I  ^ MO 

29,2269 

501 

1 

5C0 

F32/P72D 

35,2163 

6 26 

1 

626 

F91LM 

36  ,3276 

798 

1 

2 = 9 

P2G:LFMC1 

29,2270 

501 

2 

501 

F32/ P72F 

3 = , 2165 

626 

1 

626 

P9 IMA  NL 

=6,3221 

797 

P20L  PMD2 

Z‘-,22n 

501 

1 

5C1 

F32/F72F 

35,2173 

6 26 

1 

626 

P9 INDPM 

=6,3316 

79S 

P2TL'^MF 

29,2231 

500 

P32STRT 

=5,2037 

6 29 

1 

629 

F9 ISPCT 

36,2153 

726 

2 

729 

725 

P2GLFMRT 

29,2232 

5 00 

6 

998 

522 

F33 

35 , 2223 

6 3U 

1 

235 

P9 ITABLF 

= 6,2C  55 

729 

2 

791 

756 

P20L  OM  ! 

29,2063 

956 

2 

99F 

5 18 

P33/P73A 

35,2226 

63'= 

2 

6 30 

631 

F92ACRES 

36,3191 

79  1 

1 

750 

P20LMH1 

29,2291 

5 00 

P33/P73B 

35,2290 

630 

1 

6 = 1 

P92IGN 

36  ,2595 

732 

9 

729 

7 = 2 

P20PBG 

''9,233  1 

233 

1 

232 

F=3AP73C 

35,2307 

631 

1 

6=0 

F92LM 

=6,3919 

75C 

1 

2 = 9 

P20$ 

29, 2 )00 

= 

32 

8 

999 

655 

P33/P730 

35,2313 

6 = 1 

1 

631 

F92SFCT 

36  ,2  150 

= 

725 

1 

729 

P2CP  1 

25,2000 

= 

32 

3 

528 

5 70 

F33/ P73E 

35,2321 

63  1 

1 

631 

F92STAGE 

36,3929 

750 

1 

729 

P20S2 

25,2000 

= 

3? 

F33/P73F 

=5,2332 

631 

1 

631 

F92TAEir 

36,2063 

729 

1 

791 

P2  0P3 

26,2000 

= 

33 

1 

= 79 

P39 

3 5 , 295  5 

661 

1 

235 

F978Cr 

36,3510 

752 

1 

752 

P2''S9 

32,2000 

= 

39 

1 

995 

F39/ P79A 

35,2960 

661 

2 

66  1 

6 6 2 

P9  7B0CY 

36,3517 

752 

2 

751 

752 

P21 

F6,  17-.'3 

136 

F39/P798 

35  ,2  502 

661 

1 

66  1 

F97LM 

■36,3992 

751 

1 

2 = 9 

P21 ALT 

=7,1715 

= 

199 

2 

318 

657 

P39/P79C 

35,2  509 

66  1 

1 

663 

P5CS 

1 5 ,2000 

31 

25C 

957 

P21BASER 

= 7,  1675 

= 

199 

3 

199 

656 

F39/F79C 

35  ,2595 

662 

1 

662 

P50S  1 

19 , 2000 

= 

3 1 

2 

95 

926 

P21PASEV 

F7,  17C3 

= 

199 

3 

199 

656 

P39/P79E 

35,2550 

662 

1 

662 

F5  1 

19,3921 

9 9 3 

a 

239 

999 

P21GCNT 

29,5559 

656 

1 

655 

F35 

35,2635 

666 

1 

239 

P5  18 

19,395= 

993 

1 

99  = 

P2  lOSP 

29, 3921 

656 

1 

656 

F35/P75A 

=5,2699 

666 

1 

666 

F5  1C 

19,3969 

99  = 

1 

999 

P21FLAG 

’)')J9 

65 

2 

655 

656 

F25/P75B 

35,2651 

666 

1 

666 

F510 

19,3502 

999 

1 

993 

P21FL8IY 

9791 

= 

65 

1 

218 

P9  '/RET 

1 191 

109 

9 

738 

797 

P5  IE 

19,3522 

999 

1 

999 

P2  IGAM 

F7,  17  13 

= 

199 

■a 

199 

656 

P90A/P 

=5,3711 

790 

1 

791 

F5  IG 

19,3599 

999 

1 

999 

P210PIG 

1 162 

= 

1 99 

2 

656 

P90A/PMC 

3 5, 37  = = 

791 

1 

791 

P52A 

1 5 ,2060 

921 

2 

921 

P2  IPPCG  1 

29  , 3 5 2C 

655 

1 

657 

P9OA0PFS 

36,3137 

791 

1 

796 

P52B 

15,2062 

921 

1 

921 

P21 FPGG2 

29,3532 

655 

1 

65  7 

P90ALM 

=6,3125 

790 

2 

796 

750 

P52D 

15,2193 

92  = 

2 

92  = 

925 

P21PPTN 

29,3666 

657 

1 

655 

F9TAUTG 

35,3707 

790 

2 

725 

828 

P52E 

15,2102 

921 

P21TIME 

F 7 , 1 7 6 2 

= 

19  7 

7 

199 

657 

P9QTGN 

36,251C 

731 

1 

729 

F52F 

15,2169 

923 

1 

92  1 

P21Vi~l 

E7,1711 

- 

1 99 

9 

199 

656 

P90  IN 

36,3209 

797 

1 

75  1 

F52H 

15,2153 

923 

1 

92  1 

P21VSAVE 

2 9 ,35  75 

6 56 

1 

6 56 

P9  >LM 

36,3153 

796 

1 

239 

P 5 2L  S 

15,2220 

9 2 5 

1 

922 

P25FL  AG 

0006 

= 

66 

a 

2E8 

778 

P9CFHS 1 

36,3292 

798 

2 

798 

752 

F52CUT 

15, 2166 

923 

1 

929 

P25FL  BIT 

9793 

= 

66 

2 

229 

509 

P90S 

36, 200C 

= 

36 

6 

38 

796 

P52T 

15  ,2110 

921 

2 

92  1 

P25LFW  1 

29,2919 

509 

3 

29C 

505 

P90S JLNK 

= 6 ,2372 

729 

2 

729 

P52V 

15, 21=0 

92  1 

P251 FM2 

29.2937 

505 

) 

50  5 

P90SPC7 

36,2150 

725 

3 

723 

725 

F52Vs 

15,2137 

923 

1 

92  1 

P25LMV,T1 

29,2933 

505 

1 

505 

F90SXT9 

36, 3217 

797 

2 

797 

799 

P57 

15,3277 

967 

1 

239 

P3xnpP7X 

35,3613 

683 

1 

6 8C 

P90S  1 

27  ,2000 

= 

33 

9 

38 

757 

P57A 

15,33=6 

96  7 

P30 

3 5,200'-) 

617 

1 

235 

P9092 

35 ,20CC 

= 

a r 

1 

790 

F57AA 

15  ,3390 

967 

1 

967 

P3CFXTT 

= = , 177  = 

= 

127 

1 

127 

F90S3 

35  ,2000 

3 

35 

1 

7 = 3 

P57C 

15,3363 

968 

2 

96E 

P30N33 

35, 20C9 

617 

P90TABLE 

36,2090 

723 

1 

791 

F57r 

1 5 ,3365 

96P 

1 

96  e 

P30S 

35,2000 

= 

36 

1 

617 

P9  7 ZOOM 

=5,3677 

733 

1 

7 = 3 

P57JLMP 

1 5 ,3599 

972 

2 

969 

P SOS  1 

39, 20CC 

39 

1 

619 

F90ZCCMA 

35  ,3709 

739 

1 

733 

P57CPT 

15,3=03 

967 

2 

967 

PSOZFcc 

35, 2929 

6 39 

10 

6 29 

66  1 

P91AQRES 

36, 3 19C 

7^1 

1 

798 

P57CPTO 

15,356) 

973 

2 

972 

P32 

35,2039 

629 

1 

235 

F918LANK 

36,2265 

727 

1 

727 

F57CPI  1 

1 5 ,360  1 

9 73 

1 

972 

P32/P  72A 

35,2060 

629 

1 

629 

P9  IF  JET 

36 ,3307 

798 

F57CFT2 

15,3617 

9 79 

1 

972 
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SYMBOL 

OF'' 

H 

FEFEPENGES 

SYMECL 

OFF 

H 

REFERENCES 

SYMBOL 

OFF 

H 

REFERENCES 

P570PT3 

1 5, 3620 

979 

1 

9 12 

e+1 

6 792 

1 0 17 

7 

158 

1 3 64 

P57'’0ST 

19,3171 

969 

3 

963 

969 

Q + LhOOO 

9693 

S90 

1 

592 

R 

E7 ,1520 

= 

198 

29 

198 

875 

P63AORES 

32, 325A 

782 

1 

77.3 

C + 2 

6799 

= 

1017 

5 

523 

1369 

R ( CSM  ) 

E 3 , 1 7 1 7 

= 

12  1 

1 

6C  1 

675 

P630ISPS 

31 ,3950 

P IB 

1 

792 

Q-RATE 

16,2599 

1916 

2 

1916 

P 

23  ,37  12 

1253 

2 

1259 

P63IGN 

36,2969 

731 

1 

725 

D-RHCCTR 

0092 

= 

52 

3 

1923 

1929 

R-CTHFR 

£3,1717 

1 12 

5 

121 

322 

P63^GN1 

36, 2E2G 

731 

Q ,RCRGTS 

17,2136 

1932 

1 

1932 

R-RAT  6 

16,2602 

19  17 

2 

19  16 

P63LM 

32,2777 

778 

1 

2 39 

OACCOn 

F6,  151C 

= 

133 

6 

1901 

1981 

P-PHCCTR 

0099 

= 

92 

3 

1923 

1929 

P63SPOT 

36,2  153 

- 

725 

1 

729 

CAXI  S 

E7 , 1717 

= 

152 

3 

633 

699 

R-TG-RP 

29  , 36  7 7 

1 139 

h 

789 

1225 

P63SP0T2 

32,3216 

781 

1 

781 

qCOLWLSR 

F 6 , 1 69  7 

= 

137 

3 

137 

911 

RACCDCT 

£6,1512 

= 

133 

9 

1901 

1^66 

P63SPET3 

32,3236 

782 

1 

782 

qchan 

1002 

= 

c 3 

2 

1E65 

RACTCADP 

05  ,3060 

2 19 

1 

218 

P63SPC7A 

3 2,  32  5P 

782 

1 

782 

Cri  ff 

F6 ,1950 

= 

133 

3 

1962 

1967 

RACTl 

E9,  1702 

1 17 

1 1 

lie 

699 

P63TAELF 

36, 2100 

729 

2 

79  1 

782 

qerrcalc 

17,2655 

199  1 

2 

190  3 

1932 

RACT2 

E9 ,1710 

117 

9 

118 

65C 

P63zrrv 

35 , 3672 

733 

CFRRC  ALL 

16,3693 

193  1 

1 

193  1 

RACT3 

E7,1535 

192 

2C 

625 

697 

P6AG ' ED 

3 1 , 3970 

BOB 

1 

808 

C'^PRCP 

F6 ,1 950 

= 

131 

5 

133 

199? 

PACARANG 

26,3361 

59C 

2 

589 

565 

PBADB 

31,3727 

B21 

1 

796 

CG  TMBITS 

5C07 

= 

19  15 

1 

1916 

PADAREAD 

25,3157 

557 

2 

15  5 

P6A0I 5PS 

3 1 ,395  T 

80  8 

2 

792 

8D8 

CGTMT  IMR 

F6 ,1632 

135 

9 

135 

1910 

RADARFF 

9000 

= 

26 

1 

522 

P65ST  ART 

31,2557 

795 

1 

791 

OLAST 

E6 ,1955 

131 

5 

1919 

1937 

RADARLFT 

25,2000 

= 

32 

■3 

9 1 

6 1 5 

PBSVERT 

31,3517 

P09 

QMA  J 

E5,  1 796 

= 

125 

17 

12  5 

9 75 

R A DC  A D P 

13J3 

= 

106 

9 

223 

59  3 

P65VERTA 

32,3271 

810 

1 

8G9 

CM  N 

E5 ,1795 

= 

125 

17 

125 

963 

RADDEL 

1270 

1C6 

2 

563 

P66L0C 

32, 2000 

= 

39 

1 

81  i 

CMINFxn 

15,2755 

c cq 

1 

961 

RADIN 

25  ,3332 

559 

1 

559 

P66NPI.? 

3 1 ,2‘=22 

7 99 

CQK 

26,2611 

581 

1 

581 

RADLl TES 

25,3572 

6 1 5 

2 

558 

562 

P66VFRT 

31,3522 

Bin 

1 

8C9 

CRLACe 

E5  ,1917 

128 

7 

128 

382 

RA  6MCCES 

0110 

= 

65 

1 16 

17^ 

6 7 1 

PA6VERTA 

32,3277 

810 

1 

81  " 

QPL  ACES 

E5,  192C 

128 

3 

126 

361 

RADNDCF 

25  ,3513 

565 

2 

539 

565 

P67N'm,  •? 

31,2926 

793 

GPRET 

0052 

= 

93 

19 

299 

1233 

PACSAMP 

25  ,2CC3 

992 

2 

276 

992 

P67VERT 

31,3529 

810 

1 

8C9 

0RAT6DIF 

F6 , 1936 

= 

131 

2 

1937 

RADSK  AL 

1351 

ice 

1 

677 

P70 

21 ,2067 

F29 

1 

239 

QPAXT  S 

16, ’630 

1931 

9 

19  19 

1926 

RADSTALL 

07  ,3  706 

13  19 

17 

265 

888 

P70A 

21, 2070 

829 

2 

292 

829 

SRBI  T 

9791 

132 

9 

1923 

1938 

RADSTART 

17 , 2000 

563 

■a 

^56 

563 

P70CACR 

09, 2902 

239 

1 

239 

CRCNTP 

E6,  175C 

= 

133 

c 

1962 

1979 

RACTINE 

1267 

1C5 

2 

563 

P7CIN1T 

32,3571 

826 

CRCCNTPL 

17, 2232 

1939 

1 

1933 

RAMIN 

F 5,  1562 

= 

123 

3 

123 

898 

P70NOW7 

21, 2056 

829 

crndxfp 

0066 

= 

1968 

9 

1969 

1970 

RANGCCNV 

32,2003 

9 1 

1 

579 

P707  1 I T 

9737 

= 

80 

QRT  IME 

17, 2599 

1936 

2 

1938 

RANGE 

E9 ,1600 

116 

10 

116 

705 

P7C7 lELG 

0211 

= 

80 

9 

826 

893 

CRLPT 

0112 

02 

13 

156 

19  16 

RANGFRQ 

26,2519 

56C 

■a 

56C 

587 

P71 

2 1,2)72 

829 

QS  A VED 

E7 , 1969 

191 

2 

68C 

681 

RANC-EEGl 

26,2529 

580 

1 

5 80 

P71A 

21 ,2073 

829 

2 

292 

829 

qtemf 

E7,  1632 

193 

C 

619 

759 

RANGEDSP 

E5  , 16  16 

123 

3 

123 

800 

P7  INOW? 

21, 2093 

B23 

CTEVPI 

E7,1665 

193 

6 

193 

755 

RANGFVAR 

F3,  1770 

1 13 

1 

581 

P71PFT 

32,3702 

828 

1 

826 

OTSM95 

23,3535 

1297 

1 

1291 

RANGPCCT 

F7 ,1760 

= 

197 

3 

197 

579 

P 72 

35 , 2036 

629 

1 

239 

CUACGU  ID 

31,3101 

802 

RA  PFG 

F 5 , 1936 

r: 

122 

1 

122 

P73 

35, 2225 

630 

1 

239 

QUARTER 

9737 

= 

1051 

9 

1073 

10  7 8 

PARC 

0C20 

= 

1269 

1 

1269 

P7A 

35,2957 

661 

1 

239 

QL ICTR  IG 

23,3617 

1251 

C 

6G9 

1251 

RAPREC 

67 ,1977 

192 

2 

667 

670 

P 75 

35,269  1 

666 

1 

239 

CUIKDSF 

06,2139 

161 

1 

156 

RA  SFL AG 

C 106 

62 

6 

121C 

1211 

P76 

13,2207 

709 

1 

2 39 

QUIKFAZ5 

33,3519 

863 

1 1 

856 

882 

RASTEEPl 

27,2731 

769 

1 

769 

P76LrC 

13,2000 

= 

30 

1 

7.i9 

CUIKCFF 

06,2165 

16  1 

1 

161 

RATFB  lA  S 

22,3133 

368 

1 

366 

P 76SUP  I 

13, 2390 

711 

1 

71  G 

CLIKRLFT 

06,2199 

161 

1 

161 

RATFDAMP 

16,3223 

1929 

9 

1922 

1923 

QLIT8IT 

= 

61 

RATECE 1 

9767 

= 

15G0 

1 

1999 

0 

0 3 0 2 

= 

92 

936 

93 

1999 

CUITFLAG 

0221 

= 

8 1 

9 

299 

1209 

R6TEDI SP 

93,2167 

266 

1 

262 
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SYNPCI 

OFF 

H 

FEFERENCES 

SYMBOL 

OEF 

H 

RFFERENCF 

c 

SYNBCL 

DEF 

F 

FEFERENCES 

RATFDCNF 

16,3139 

1923 

1 

1923 

RFCTCNCR 

39,3370 

835 

1 

832 

REDSPTEM 

32,2017 

2C8 

2 

2ce 

RATFl NCX 

132  2 

107 

Q 

2 1’ 

3 6 5 

ROOTM 

F 7, 17  50 

= 

197 

3 

197 

582 

PFFLASF 

1 ■>  ,2960 

1397 

■a 

727 

8QE 

RATFL  I"! 

9766 

= 

1500 

1 

1999 

PDCTWSAV 

E7,  1796 

= 

19? 

9 

196 

5 79 

REFLASHP 

1C  , 2 9 6 3 

1397 

1 

798 

RATFL  1M2 

21,3697 

199E 

2 

15  O’? 

RDCTV 

F7 , 1616 

192 

9 

193 

639 

REFMF 

15,3971 

571 

3 

7E  5 

572 

RATFLCrP 

16,3695 

1960 

2 

19  18 

196C 

RDRET 

F7,  1675 

= 

196 

3 

196 

5 90 

REFSMP  IT 

9737 

= 

70 

7 

207 

1322 

RATERPPR 

16,3222 

1929 

1 

19  29 

RCPLGC  S 

25, 2065 

993 

1 

993 

RFFSMFLG 

OC57 

= 

70 

7 

680 

969 

RATES 

30, 2510 

B9C 

1 

P9C 

BDRPTB8 

9063 

155 

1 

159 

RFFSMRAT 

E3, 1733 

1 12 

5 3 

195 

5 7 1 

RATESP 

15  ,2327 

5? 

2 

^78 

RCRUSECK 

93,2679 

28  1 

c 

265 

277 

REGCOARE 

15,2156 

923 

1 

929 

R ATFSTDP 

31,  ’922 

B'J7 

2 

ED  7 

820 

RDSF 

E5,1939 

= 

1 28 

REGODSP 

10,2966 

1396 

3 

728 

£C£ 

RATESTRT 

o 

c 

2 19 

1 

2n 

READACCS 

37,3937 

8 53 

1 

866 

REGCDSFP 

10,2971 

1398 

R ATEVAP 

F3,1772 

113 

1 

582 

REACCrUD 

23,2322 

522 

1 

5 2F 

RFGSLFEF 

07,3369 

13  10 

1 

1310 

RAT"^ 

OOUO 

= 

1238 

3 0 

39C 

1215 

REAOCCLK 

22 ,2903 

358 

2 

352 

983 

PEGUP 

6236 

IQCC 

a 

ICCC 

RAT-^1 

3 116 

- 

1238 

11 

21  '■ 

780 

READLO 

9G  , 3CC3 

922 

9 

921 

923 

RFTNTBIT 

9795 

= 

82 

a 

1211 

137A 

R8PFG 

F5,l9r2 

= 

122 

2 

1 22 

820 

RE  A CL  Cl 

90  ,3019 

922 

1 

922 

PE  INTFLG 

C236 

= 

82 

5 

7 1 1 

13E2 

RCe-  1 3 

05,2025 

52 

1 

978 

REAORBIT 

9793 

= 

71 

3 

220 

608 

RF JALM 

07, 2967 

257 

1 

257 

RCOUFA  T( 

1279 

= 

86 

REACRDOT 

22, 2909 

5 73 

1 

C c 

REJECT 

07  ,2972 

257 

1 

257 

RCDUFB  IT 

9 79  5 

= 

86 

6 

185 

56  7 

rfadrflg 

0063 

= 

71 

1 

6 10 

RFJECT2 

07,2505 

257 

1 

2 5 7 

RCDLIU  e IT 

9737 

- 

85 

c 

999 

539 

REAOV 

33,3971 

F82 

1 

882 

RELDSF 

9957 

9 6 6 

10 

228 

825 

rcdutflg 

'■'2  66 

= 

85 

READV  E IT 

9797 

= 

F9 

1 

882 

RELOSFCN 

9279 

9 63 

3 

399 

96  6 

PCND'RM 

0092 

= 

126 

3 

117' 

1171 

Rf ADVEL 

■?257 

= 

89 

1 

882 

RELDSPl 

9502 

967 

2 

990 

952 

RCr 

F7 , 1 630 

153 

c 

1 53 

899 

RFCALTST 

90,3612 

960 

2 

929 

95C 

RELCSF2 

99  73 

967 

2 

967 

RCS 

17,2191 

1932 

9 

1939 

1990 

RECAL  1 

90  ,3615 

960 

1 

960 

RFL  INTO 

IC,3232 

1357 

2 

1353 

1357 

PCSFL  ACS 

1262 

105 

c c 

212 

1973 

RECAL2 

90,3626 

9 60 

2 

960 

961 

PELINLS 

26,2223 

977 

1 

29C 

Rr.SM'"N 

06,3169 

102 

1 

192 

RECAL3 

90,3690 

960 

RELCAC  SV 

1 1 ,365  1 

1239 

1 

1233 

RCSMONE  X 

5270 

= 

101 

2 

192 

193 

RFC  RAT  I C 

13 ,3790 

1238 

1 

1229 

RELRFT 

0199 

= 

5 7 

9 

^66 

96  7 

RCSMCN IT 

:)6,3  169 

= 

102 

2 

160 

RECTE  S3 

11,3392 

1229 

3 

1228 

1230 

RFITAE 

9066 

156 

9 

158 

995 

RCSMONT 

' 6 ,2"60 

20 

1 

191 

RECT  IFY 

13,3673 

1231 

8 

1198 

1230 

RFLTAB  1 1 

9 101 

156 

2 

157 

1091 

RCV 

F3, 1539 

= 

1 1 1 

2E 

1 1 1 

123  1 

RFCTOLT 

13  ,3231 

1207 

2 

120  7 

1208 

FEMAPK 

07,2577 

260 

•a 

257 

255 

RCVrSR 

E3 ,1606 

112 

1 

589 

RED-OVER 

31,3976 

808 

1 

ec8 

REMDl ST 

92  ,2000 

96 

1 

989 

RCVLFM 

E3,  1660 

1 12 

2 

5C2 

589 

RECES-CK 

31  ,3  500 

808 

1 

808 

REMODB  IT 

9736 

= 

E5 

6 

5 3 A 

t c c 

RCBACEND 

25,3595 

567 

9 

598 

567 

REOES  IG 

31,26(9 

797 

1 

791 

PEROCE 

2 5 ,22  )2 

533 

2 

596 

6CC 

RDCDLS 

19 ,3905 

091 

1 

093 

RECESRCN 

11,2326 

E 19 

1 

819 

RERODFLG 

0265 

= 

£5 

ROE 

13,3796 

1238 

1 

1225 

RFDES  1 

31,2735 

798 

1 

79  8 

RENDEND 

26,3176 

5E6 

1 

583 

RDES 

1313 

= 

106 

9 

l-,6 

536 

RFOFLAG 

0193 

= 

76 

5 

778 

808 

RENCE2 

2 2 ,2000 

- 

32 

1 

1 199 

RDESGAIM 

25 ,3C75 

559 

2 

552 

PEOFLE  IT 

9796 

= 

76 

2 

797 

8C8 

RFNOEZVL 

0002 

= 

236 

13 

236 

RDESIRFC 

E 5 , 1 7 5 5 

= 

126 

3 

126 

1 190 

REDO 

37  ,2C02 

3 79 

1 

29  1 

RENCNCC 

09 , 2269 

232 

2 

231 

RDG 

F5,1902 

= 

8 20 

2 

80  1 

802 

REDOCTR 

U320 

99 

3 

195 

2 16 

PFNDRAC 

25,3277 

559 

1 

558 

RDGIMS 

39,3632 

887 

1 

885 

REFCRANC 

26,2159 

976 

1 

976 

RENDVCO 

09,2230 

23  1 

1 

231 

RDIFF 

o 1 f"  M n r 

F6, 1952 

= 

133 

rfocmann 

26,2131 

9 75 

RENDWE  IT 

9753 

= 

75 

1 

29  1 

1239 

KIH  rNL  F 

9C , 3023 

92  2 

1 

922 

Rfd  CMA  SK 

10, 3505 

13  6 2 

2 

1397 

RENCNELG 

0 131 

= 

75 

13 

237 

ROM 

13,3799 

1238 

REOCPR  1C 

10,2593 

1399 

1 

1362 

RENEWRK 

07,2502 

257 

1 

2 5 7 

PCCT 

F7, I 973 

= 

120 

c 

833 

898 

RF002.  1 7 

26,2391 

728 

1 

29C 

REFETE 

35 ,3107 

669 

1 

669 

ROOTBI AS 

25,2001 

91 

1 

550 

PEDD9.2 

36,2399 

7 29 

2 

29  1 

75  1 

RFPIP  1 

37,3559 

865 

1 

866 

RDOTCCNV 

32,2001 

91 

1 

579 

RFOCS. 5 

37,3951 

853 

1 

292 

REF  IP3 

37,3562 

865 

1 

866 

RDOTO 

F9 ,1672 

= 

1 20 

c 

1 ?o 

839 

RE006 .7 

26, 3359 

799 

1 

293 

REPIP9 

37  ,3566 

865 

9 

866 
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SYPPCL 

DEF 

M 

REFERENCE 

S 

SYNBCI 

DEF 

H 

RFFEPENCES 

SYMBOL 

CEF 

h 

REFERENCES 

REFCSeiT 

A 741 

= 

85 

8 

1 88 

600 

RFVN  1645 

35,2026 

618 

1 

6 18 

RNRAD 

CC46 

= 

92 

C 

557 

559 

REPnSCNT 

F7,  1423 

140 

4 

1 4'j 

5 12 

REV  83 

37,3155 

7G4 

1 

706 

PM 

F7,  1544 

= 

148 

7 

146 

1215 

PEFrS''CN 

0 270 

- 

85 

RFAILCNT 

E 4 , 1 5 7 5 

= 

12C 

3 

277 

493 

PCACBACK 

25,2377 

539 

4 

539 

566 

REPOSRPT 

25,2155 

532 

1 

536 

PF  A ILS 

40,3734 

473 

1 

472 

ROCCOMR 

3 2 , 3 3C4 

8 1C 

1 

810 

REPPSTM 

E7, 1424 

= 

140 

c 

140 

5 13 

RFAI LS2 

41 ,3741 

471 

1 

47U 

RCCCCUNT 

E7 , 1746 

= 

152 

5 

794 

616 

REF40ALP 

36  ,3127 

74T 

2 

724 

74'' 

RGFX  IT 

E7,  1665 

= 

143 

RCCFLAG 

CC22 

= 

67 

1 

793 

RFOAOD 

4 1 ,2G64 

4CF 

1 

4"18 

RG  IHB  ITS 

5020 

1419 

1 

1419 

ROCFLBIT 

4740 

= 

6 7 

2 

216 

794 

RFCCfN 

41,2312 

412 

2 

4 I 2 

RGIPTIMR 

E6,  1634 

= 

135 

5 

14C2 

1462 

RCCSCA  LE 

E5 ,1537 

= 

123 

2 

123 

793 

REQDA  T X 

41  ,23CB 

412 

3 

4 2 7 

428 

PC-CCCENC 

25,3540 

567 

6 

534 

567 

RCDSCAL  1 

E 7,  17  56 

= 

152 

3 

152 

810 

reopatv 

4 1,23'  7 

412 

3 

427 

429 

RGU 

E5,  1626 

= 

123 

8 

123 

803 

RCCTASK 

32,3264 

8 10 

1 

e 1C 

RFCCAT  2 

41,2311 

412 

3 

4':e 

429 

RGVGCALC 

31,2773 

eot 

5 

79  1 

799 

PGCTRAF 

23  ,2000 

= 

32 

1 

8 16 

RFQ'^XLCC 

4 1 ,220  7 

4 10 

RHC ACT  IV 

17,2377 

1436 

1 

1436 

PDF 

14,2006 

45 

1 

928 

REGEX  1 

41,3501 

4 5;i 

1 

45'" 

RHCMCVEO 

16,3226 

1424 

1 

1422 

RCL LEVER 

27,3247 

774 

1 

775 

PE  gym 

41  ,346T 

449 

1 

449 

RHC SCALE 

4745 

= 

88 

1 

295 

ROLLTIRF 

E6 ,1401 

130 

4 

297 

774 

REQRFT 

1C12 

101 

1 7 

22  3 

458 

RHCSCFLC- 

T313 

87 

RONE 

E4,  1606 

116 

16 

1 16 

1267 

REQUESTC 

4 1,3  5'!5 

45i. 

1 

450 

R IGHT 

CO,  2236 

1046 

1 

! 04  8 

RCC 

'4  ,2141 

229 

RERFACAC 

37,3611 

866 

3 

242 

R IGHT- 

00,2332 

1C48 

1 

1045 

RCCAD 

04,2367 

234 

1 

229 

REPFPCS 

33,3632 

R88 

1 

239 

RTGHTP 

CO, 2031 

1039 

1 

1047 

RCCTCYCL 

21,3627 

1474 

3 

147  2 

R'^F'^CAIC 

17,2675 

1^41 

R IGHT5 

4 322 

462 

2 

4 30 

43  1 

RCCTHA  LF 

21  ,3623 

1474 

1 

1472 

RFRROR 

F6 ,1 452 

= 

131 

K 

133 

1442 

R IGNX 

F5, 1474 

= 

122 

2 

122 

78C 

ROCTL  COP 

3 1 ,36C3 

£18 

2 

8 19 

RFR6'< 

26, 2243 

477 

1 

477 

R TGNZ 

F5,1476 

122 

2 

122 

780 

rcctml 

00  2T 

1193 

3 

117  1 

1 1£9 

RESAPF!  E 

25,3264 

558 

1 

561 

R IN  IT 

F4,  1722 

1 19 

10 

6 73 

759 

ROCTP  S 

0126 

= 

98 

5 

817 

819 

RESFTRPT 

11,2242 

815 

2 

815 

RLAST 

F6 ,1456 

131 

5 

1415 

1437 

ROCTPS+1 

0 127 

= 

98 

PESFTX2 

12,3  120 

1183 

1 

1181 

R LR 

F4 , 1 6C4 

= 

119 

16 

489 

490 

RDCTPSPS 

31  ,3532 

8 17 

1 

801 

RES'=T22 

■'4,2252 

232 

2 

231 

R L N S R C H 

E7,  1675 

= 

145 

6 

145 

595 

RGCTSTDP 

3 1 , 364  7 

819 

3 

819 

RESRTB7 

43,2351 

272 

1 

272 

RLXUN 1 T 

C014 

= 

596 

RDFECHK 

43,3541 

1280 

1 

1277 

RESIGN 

35,3133 

6 7T 

1 

6 7'. 

RLS 

E4,  1422 

114 

15 

197 

12C3 

PCT-TCLV 

17,3200 

1447 

4 

1432 

148  7 

RESO 

33, 2P37 

44 

1 

873 

RM 

47,1  756 

= 

147 

6 

147 

6C9 

ROTATE 

34,3052 

6 46 

2 

645 

REST 

lO  , 3246 

1358 

1 

135  5 

RMAG 

E7  , 1714 

= 

144 

5 

144 

770 

RCTEPFl 

F6  , 1737 

= 

132 

3 

1447 

RESTART 

■)  1 ,2'I'H:) 

= 

28 

4 

239 

1297 

RMAGl 

0014 

= 

125F 

4 

126  1 

127C 

RCTFPF2 

E6  ,1740 

= 

132 

4 

1447 

RE  start? 

31,2532 

794 

2 

794 

RNAX 

E4 ,14  14 

114 

1 

59 .» 

ROTFLAG 

0220 

= 

£ 1 

C 

826 

£44 

RESTARTS 

Tl,3527 

129T 

1 

219 

PMC 

12,2C2 I 

= 

37 

1 

1209 

PCTFL8 IT 

4746 

81 

RE  STORDB 

2C'  ,2115 

1397 

8 

289 

1399 

RMM 

12,2017 

37 

ROTIMOE  X 

F 6, 1744 

= 

132 

10 

1419 

1448 

RESTREG 

0 366 

ri(. 

4 

2 1 2 

13  54 

RRCDI  N'I7 

05,3363 

224 

1 

220 

RCTCRCUE 

16,3722 

146  1 

1 

146C 

RESTSLEP 

IT  ,3252 

1358 

1 

1358 

RMOC  INV 

25,2244 

534 

7 

534 

545 

RCTSFN  SE 

E6 ,1 740 

= 

134 

9 

1451 

1459 

RESUL  TCT 

E5  , 1 537 

= 

128 

C 

376 

380 

RN 

1217 

105 

16 

196 

12  12 

R0T18C 

26,2354 

485 

1 

48  5 

R ESUMP 

5270 

1121 

26 

16  ! 

14C3 

RNO/TST 

42,1543 

437 

3 

436 

437 

RCLNC 

00 ,2  116 

114  1 

1 

1005 

RET JACP 

E6,1477 

132 

4 

1435 

1444 

RNCCCN 

42,3302 

423 

2 

425 

RCLM0SL8 

7 141 

1C24 

4 

1036 

1047 

RETNMDPF 

20, 2456 

14  1'’ 

7 

14v  5 

14C9 

RNCREFCR 

07,3167 

13  05 

3 

175 

1325 

PP 

E5,  1624 

= 

123 

Cl 

826 

84£ 

RETNDN 

16,2264 

165 

1 

166 

RNDVZBI T 

4 74  5 

66 

8 

186 

595 

RP-TC-R 

26,3716 

1132 

8 

779 

1204 

R'^TROOT 

J132 

= 

98 

3 

817 

819 

RNOV  ZFLG 

0310 

= 

66 

7 

288 

1325 

PPAC 

23,2337 

6 95 

4 

696 

1273 

PETUPN'TJ 

17,3521 

1454 

7 

1453 

14  57 

RNC^CATA 

C26C 

= 

84 

Rp  ACT  EN 

E4,  1602 

= 

1 16 

6 

116 

72  1 

R'^VCNT 

6245 

1000 

c 

294 

109  1 

RNGEDB  IT 

4 7 5C 

84 

2 

£7  7 

886 

RPACl 

23  ,2337 

= 

12  73 

REVFRS 

35,3136 

67C 

1 

6 7C 

RNGSCB IT 

4742 

= 

74 

2 

575 

657 

PPASS 1 

E7,  1477 

142 

4 

142 

645 

REVERSAL 

2 1,  36'U 

1473 

1 

1473 

RNGSCFLG 

G12C 

74 

4 

56C 

887 

RFASS2 

E7,  1521 

142 

7 

142 

65C 

HEALTF  key:  NFCMiLLY  DEFINEC  UNLESS  flagGEC  «S  FCLLOPiS: 


UN  UNCEFINFD  = DFEIN^n  BY  ECUALS  J DEFINEC  EY  JCKER  CP  FPASE  ANYWHERE  PC  MLITIPLY  DEFINEC 

BD  BADLY  DEFINED  CD  OFFIMTiCN  ASSPCIATCC  WITH  CONFLICT  XX  MSCEUANFCLS  TRCUELE 


GAP:  ASSEPSLE  REVISION  116  OF  AGC  PRCGRA«  LLPINARY  BY  NASA  20211L2-07L 


19:09  AUG.  11,1969 


PAGE  1537 


SYPBOL  T5BLF  LISTING,  INCLUCING  CEFIMITION,  FFALTF,  PAGE  GF 


SYMBOL 

OEF 

H 

REFERENCE 

5 

SYMPFl 

DEE 

1- 

RPASS3 

E7, 1551 

192 

1 1 

636 

697 

RRL^ADIN 

25 , 20CC 

= 

R '■>  A S S 3 6 

99,1606 

= 

118 

5 

118 

7C1 

RRL  IMCFK 

9523 

P.PCGMF  1 

39, 3975 

897 

1 

6 3 9 

RRLI MNP 

25,2551 

P PCCMF2 

39 ,3501 

897 

1 

892 

P,PL  IMCK 

9560 

P PCRT IMF 

E7,  1927 

13? 

1 

869 

RRLCSCSP 

90,2017 

R FCRT  GSW 

F7, 1930 

1 3? 

1 

870 

RRLOSVEC 

1 I'TC 

= 

RPEP 

1016 

= 

12  69 

3 

72  1 

1269 

PRNB 

23,2091 

RPPRFC 

E7,  1521 

= 

192 

2 

667 

670 

RRN3SI T 

9796 

RFCFl  /G 

o 177 

= 

78 

6 

12sl6 

123'T 

RPMBMPAC 

23,2C65 

RPQFLBTT 

9 73  5 

= 

78 

RRN  8SW 

'1)11 

= 

RPOV 

E9,  1509 

= 

11  5 

e 

1 1 5 

1220 

RRNB  1 

23  ,2C59 

RPREXIT 

> )50 

= 

119C 

o 

1132 

1 1 39 

RROLT 

25,2217 

RPRPXXXX 

29,3715 

1139 

1 

1132 

RRCLT  L IP 

25  ,2396 

RPSV 

59,  1521 

= 

115 

c 

1 15 

1222 

0RCLT2 

25,2321 

RPTOR  A 

26,3733 

1 1 32 

1 

1 132 

prrange 

25,3119 

PPTOP  F 

26,3725 

1132 

1 

1133 

PPRDCT 

25,3112 

ROW 

E9,  1513 

= 

1 15 

7 

1 1 5 

1222 

RRRET 

1312 

RR-AZ 

E9 , 1 600 

= 

11? 

5 

1 19 

316 

RRRS  E IT 

9751 

RR-EL  EV 

E9,  1602 

= 

119 

2 

1 

316 

RRR  SFLAG 

0300 

= 

RRANGI.F9 

13,2133 

323 

1 

59  1 

RRSFAFT 

F7,  1735 

= 

RRANGCLT 

9C,  2695 

9 19 

1 

916 

RRSCNLY 

25,2255 

RRATF 

F 9,  160  2 

= 

116 

6 

116 

70  5 

RRSPGAIN 

25,2316 

RRAT^c IF 

F6 ,1 937 

= 

131 

1 

1937 

RRSFTFCP 

90,2671 

RRAUTCFK 

06 , 3006 

] 83 

2 

160 

RETARGET 

1100 

= 

RRBORSTT 

^7 , 1 7 9 ' J 

= 

197 

C 

19  7 

576 

RRTONLY 

29,2252 

RPCOUCHK 

C6,3C37 

185 

2 

183 

RRTRK  F 

9570 

RRCF^^CK 

9576 

526 

RRTRUN 

E7,1733 

RRDA7  A ET 

975  ■) 

= 

86 

1 

526 

RRTURNON 

25  , 2073 

RRDATAFL 

02  7 7 

= 

86 

RR  ZFRC 

25,2359 

RPCESCLN 

25,3015 

553 

1 

553 

RRZERCK 

92,2136 

RRDFSFKP 

93,2277 

270 

1 

262 

FRZERCSE 

26,2102 

RRCFSK2 

93,  2 2 ‘=6 

269 

1 

269 

R5Z2 

25 ,29C1 

RRCESNE 

25 ,25'’6 

595 

2 

269 

513 

RR  lAX  IS 

25,2257 

rrdffnbk 

93,2230 

269 

1 

267 

RP1AX2 

25,2265 

RRCrSSN 

25,2909 

591' 

3 

911 

5 99 

RR29GAIN 

32,2776 

rrdotflt 

91,2662 

92'i 

1 

918 

RSAMPCT 

E 9 , 1 7 7 7 

RREC  T 

E3,  1 2 

= 

1 1 1 

15 

1 11 

1231 

R S8BC 

E3 ,1932 

RRECTCSP 

E3, 1559 

1 1 1 

1 1 

1 1 1 

12C9 

R SCALE 

32,2177 

PRFCTHIS 

E3 , 1626 

= 

112 

9 

298 

1201 

RSFLGBTS 

05 , 3C69 

RRFCTI.FM 

F3,  1626 

112 

2 

1 1 2 

12C3 

PSFHERF 

13,3792 

PPFCTCTF 

E3 ,1559 

= 

111 

1 

298 

RSTACK 

E9  , 1 600 

= 

RRGIMCA 

C6,3C,  7 1 

187 

1 

1 65 

PSTCFGTS 

21,3515 

RR  IVUC  IF 

93,2205 

26P 

1 

268 

RSLBC 

1 100 

= 

RRINOEX 

1319 

106 

3 

535 

536 

RSU8E 

19,2009 

RR  INI T 

C6 , 2 569 

1 79 

1 

1 79 

RSLBEN 

19,2000 
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REFERENCES 

symbol 

OFF 

H 

REFERENCES 

1 

992 

PSL8L 

E7 ,1630 

= 

199 

9 

199 

997 

9 

188 

599 

RSUBM 

19 ,2CC2 

95 

1 

928 

2 

595 

RTARG 

E7,  1993 

199 

9 

19  1 

76  9 

2 

525 

596 

RTARG 1 

C 7 , 1 9 7 1 

= 

195 

1 1 

686 

69C 

2 

300 

3C  1 

RTB 

C 1,29  5 1 

1GE2 

1 

1C82 

RT8/BF  I Z 

7 1 ,29  5.7 

1082 

1 

1CC9 

3 

c ^ c 

599 

RTPCOOES 

1C  ,2CCC 

= 

29 

1 

1387 

RTEPM 

OC  22 

= 

1258 

a 

1267 

1269 

1 

300 

RTHETA 

E9 , 16'79 

116 

10 

116 

706 

5 

59  1 

569 

RTIG 

e 7 , 1 69  1 

193 

9 

193 

762 

1 

325 

RTNAG 

E7, 1722 

= 

199 

c 

19  9 

77C 

3 

536 

607 

RTNL 

E9  ,1  720 

118 

9 

636 

693 

1 

537 

RTNAPSE 

E 5,  17  10 

= 

126 

■a 

1192 

1 

538 

ptnfclc 

F7,1617 

= 

15C 

9 

150 

789 

9 

993 

6C9 

RTNLANB 

E 5 , 1 7 IC 

126 

8 

126 

1189 

5 

993 

608 

PTNFPN 

E 5 , 1 7 5 3 

126 

a 

126 

1179 

5 

1C6 

5 36 

RTNSAVEP 

0195 

= 

98 

3 

1253 

1259 

) 

573 

RTN'TR 

E5,171C 

= 

126 

1 

1190 

RT  NTT 

£5, 17  10 

= 

126 

3 

1176 

197 

5E9 

RTCRP  A 

29  ,3721 

1139 

1 

1139 

3 

532 

539 

RTORPB 

29,3710 

1139 

1 

1139 

1 

536 

RTPN 

F7 , 1965 

1 9 1 

7 

653 

6 8 3 

2 

9 19 

92C 

RTPNCACR 

01,3566 

1293 

5 

1293 

1298 

19 

1 J3 

677 

RTRNMU 

10,2022 

693 

1 

693 

5 

532 

600 

PTSRl  /ML 

E9 , 1 7 16 

118 

9 

118 

693 

2 

615 

RTSTBASE 

E9,  ! 775 

12C 

3 

278 

992 

3 

197 

5 86 

PTSTCEX 

£9,1773 

120 

6 

276 

993 

1 

189 

RTSTLCC 

E 9 ,17  76 

1 20 

7 

277 

993 

1 

265 

RTSTMAX 

E9 , 1779 

12C 

2 

278 

993 

1 

265 

RTXl 

E 5, 17 76 

= 

125 

13 

125 

1215 

2 

528 

5 3 9 

RT  X2 

E 5 , 1 7 7 7 

= 

125 

17 

620 

1215 

1 

539 

RUFLAW 1 

17,3663 

1958 

1 

195  1 

1 

535 

RLFLA  K12 

1 7 ,3671 

1958 

2 

19  58 

1 

c -a  c 

RUFLAK2 

17,3717 

195E 

1 

1951 

2 

606 

RUFLAK3 

17,3725 

1959 

1 

1952 

7 

277 

992 

RUFRATE 

1 7 ,3776 

1959 

2 

1956 

2 

196 

2 16 

RUFSETUP 

17,3795 

1959 

9 

1958 

1959 

1 

210 

RL'NIT 

E7,1793 

152 

8 

152 

89  1 

1 

2 17 

RLIPOATEO 

33,3251 

879 

2 

1229 

1230 

PUFTAGN 

0332 

c c 

6 

99 

112  1 

10 

277 

992 

PLFTPFGl 

0070 

95 

66 

156 

1398 

2 

1966 

PLPTR  EG2 

CC71 

95 

26 

163 

19  7C 

3 

996 

RLFTREG3 

0072 

95 

19 

373 

197C 

1 

928 

RUPTREG9 

0073 

95 

7 

95 

1328 

2 

928 

BUPTSTOR 

0063 

= 

c c 

JOKER  CP  ERASE  AMYKHERE  NO  PLLTIPLY  CEFINEC 

XX  MSCFLLANECUS  TRCUELE 


OEF  , 

32 

52A 

5A5 

525 

300 

575 

325 

66 

325 

66 

325 

537 

538 

537 

c c c 

555 

1C6 

86 

86 

1A7 

535 

536 

A2I 

103 

5 3 5 

5 26 

IA7 

528 

5 39 

265 

529 

53  9 

535 

536 

607 

120 

1 10 

21'' 

219 

123R 

1 19 

1972 

1C3 

95 

95 

C BY 
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SYP6CL 

OFF 

H 

FETFRENFS 

S 

SYPFCI. 

CEF 

F 

RFFERENCES 

SYNBCL 

DEF 

H 

FEFERENCES 

PUPT lOPE 

4065 

1 55 

1 

155 

P 2 

E5 , 1 71 7 

= 126 

3 

1176 

P24LEN2 

24,3217 

5 17 

1 

518 

ruth 

16,3120 

1422 

1 

1422 

R2T1 

4320 

462 

7 

4G4 

1091 

R24LFP3 

24  ,3235 

518 

1 

517 

PUTN'XTAB 

42,3134 

318 

1 

3''5 

P2VEC 

E5, 1662 

= 126 

10 

126 

1165 

P24LFW4 

24,3251 

5 1 8 

1 

518 

RUTPXTRH 

D153 

98 

2 

3 ''  5 

430 

R2  1-5C3 

24,2161 

511 

1 

511 

P29 

33,2045 

599 

2 

600 

RVAPMIN 

E3, 1 774 

1 13 

1 

5 80 

R2 ID  IS  P 
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TF  7 

53 ,1760 

11  3 

vsuec 

F4,  1513 

E 3, 1 52C 

1 1 1, 

■'OELTAV 

5 3,1  76  ;; 

607 

LCSVni/4 

E4  ,1515 

F3 , 1526 

1 1 1 

TMLV 

F3  , 1766 

1 1 3 

MLC  S V 

E4,  1516 

E 3 , 1 534 

1 1 1 

RCV 

E3  ,1  766 

607 

SAVECCUT 

E4,1517 

F3, 1542 

1 1 1 

V V 

03,1770 

113 

RANGE  VAR 

E4  ,1517 

E3 ,1550 

111 

TC 

53,1772 

113 

RATEV  AR 

E 4 , 15  21 

E3,  1552 

1 1 1 

XKF  F 

53,1774 

113 

RVARPI N 

E4 ,152  1 

E3, 1552 

126 

XPRCV 

03,1775 

113 

WARP!  M 

F4  , 1527 

E3, 1554 

1 11 

RRECTCSM 

03,1776 

113 

TCCE 

F4,  1531 

F 3 , 1 5 54 

111 

FREC TOTH 

E3  ,1777 

113 

END-E  3 

F4,l 537 

F3 , 1562 

111 

VR  FGTCSM 

E4 , 1400 

114 

AMEMGR  Y 

E4,  10R7 

F 3 , 1 5 7 C 

112 

T-CTHFR 

E4  ,1  4'V, 

114 

WRFNPFCS 

E4, I 537 

E 3, 1570 

1 12 

tftcsm 

04, 14C0 

IIF 

TPANS«  1 

£4,1540 

F3 ,1570 

1 12 

TFTrTFFP 

04,14<  1 

114 

WRENCVEL 

£4,1541 

E3,  1572 

112 

DElTACSm 

T1 

U4 

viShaft 

F4 ,1542 

E3,1600 

1 12 

NUveSM 

E4 , 14C3 

114 

In  TRLN 

E4,  1543 

E3 ,16C6 

1 12 

PC  VO  Sw 

04 ,14  14 

1 14 

RMAX 

E4,  1545 

E 3 , 16  14 

1 1 2 

VC  VC  SM 

F 4 , 14  C5 

1 14 

VMA  X 

f 4 , 1 5 53 

E3 , 1622 

112 

TCCSM 

F4,  14  '6 

114 

WSUPOPOS 

E4  , 156  1 

E3 ,1624 

112 

XKFPCSM 

F4 , 1407 

114 

WSUPOVEL 

F4, 1567 

F3, 1626 

112 

RRFCTHIS 

E 4 , 14  T' 

1 14 

SHAFTVAR 

E4 ,1567 

E3  ,1626 

112 

PPECTLFM 

04,1411 

1 1 4 

TRUMVAR 

E4,  1574 

E3  , 1634 

112 

VPFCTLEM 

04,1412 

114 

504LM 

E4 ,1575 

E3 , 1 642 

112 

T o j L EM 

E4 , 142j 

114 

AGSK 

E4,  1576 

F3,  1642 

1 12 

TETThis 

F4 , 1422 

114 

RLS 

F4, 16C0 

E3, 1644 

112 

DFLTALEM 

04 ,1422 

1 1 E 

ALFCK 

04,1600 

E3, 1652 

112 

NUVLFM 

04,1433 

114 

PPOCY 

F4,  1600 

E3,166C 

112 

RCVLFP 

04,1431 

115 

A|  FHAV 

E4, 1600 

F3,  1666 

1 12 

VCVI  EM 

E4,14^7 

115 

BOTAV 

E4,16CC 

E 3 ,16  74 

112 

YCLEM 

E4,1445 

115 

Ph  IV 

E4, 1600 

F3,  1676 

112 

XKFPLEM 

14,1453 

11  0 

F5I  V 

F4 ,1600 

E3 , 1730 

112 

X789 

E4, 1461 

115 

FV 

54, 16C.J 

SYMRCL 

CEF 

FACE 

SY  NBCL 

CPF 

PAGE 

SYMECL 

ALPEAM 

E4  , I6C2 

1 16 

RFADTEM 

E4 , 1672 

12c 

FEEANNB 

5ETAP 

E4 , 1602 

116 

RRAT  E 

E4, 1672 

120 

RCOTD 

TAL. 

E4  , 16C2 

1 16 

ENVEL 

54,1674 

117 

CELVEET2 

CT/2 

E4 , 1602 

1 19 

BETASB 

E4,  1674 

12c 

YCCTC 

E 

E4 , 1602 

1 19 

FF-ELEV 

F4,  1676 

120 

ZCQTC 

GMCICC 

54,1602 

119 

YAEANG 

E4,  1700 

12C 

/F/NAC 

IR6TURN 

F4,  1604 

1 16 

RTEETA 

54,  1702 

117 

RACTl 

NCRPGAM 

E4  , 1604 

116 

TSTAPT82 

E4, 1702 

118 

CVLCS 

RPOV 

04,  1604 

1 16 

ElnBI  A S 

F4,17C2 

120 

LAXI  S 

BASETHV 

54  , 1604 

1 19 

RLE 

E4,  1710 

117 

PACT  2 

KFPPTN 

54 , 16C6 

116 

RCNE 

F4 ,1710 

118 

ULCS 

CPICEX 

54  , 1606 

1 IE 

RPAS  S 36 

E4,171C 

12c 

YCCT 

RCVV 

E4 ,1614 

1 16 

VCNE 

F4,1712 

12  ' 

ZCOT 

BASETIME 

E4 ,1614 

1 18 

LNF36 

F4  ,1714 

12c 

GEFF 

CRIG 

E4 ,1615 

1 18 

AGSBLFEF 

E 4 , 1 7 1 6 

lie 

EAPC 

STATEXI  T 

E4  ,1622 

1 17 

CELveV 

54,1716 

118 

NCMTp  1 

EAPOX 

F4 , 163C 

1 17 

EC  1 

F4,1716 

118 

RTSPl/KJ 

BASECTV 

E4  , 1630 

1 17 

GSAV 

F4,  1716 

12  1 

G(CSM  ) 

HPERX 

54  , 163C 

117 

HE  1 

E4 ,1720 

118 

efer 

RFSV 

E4  , 163C 

117 

ME  I 

F4,  172C 

1 le 

RTNL 

XK5FNEN 

54 ,1630 

1 17 

NFS 

E4.1722 

1 19 

RINIT 

VECTAB 

F4  , 163C 

1 17 

VZBEAMNB 

E4 , 1724 

121 

HN 

VAC  X 

F4 , 1636 

1 17 

E02 

E4,  173C 

119 

V IN  IT 

8ASECTP 

E4  ,1636 

117 

VYBEAMNB 

E4,1732 

121 

ZLANC/ 

Ve?Fl AGS 

F4  , 1636 

1 17 

YNBSAV 

E4 ,1734 

12c 

LPXCCLCL 

TEE 

E4  , 1644 

1 17 

VXEEAMME 

F 4,  173  4 

12c 

Y 

VAC  Y 

F4  , 1644 

1 17 

ZNBSAV 

E4.1735 

120 

LFYGCLCl 

-TPEP 

54,1652 

117 

LRVT  IMF 

54,1736 

119 

vifrine 

V,AC  1 

F4 , 1652 

117 

T1TCT2 

E4, 1736 

120 

LRZCCLCL 

XM6PTP 

E4  , 1652 

1 IE 

+ NGA 

54,1736 

12  1 

CFCCT 

YN'BFIP 

E4 , 1654 

1 17 

LPXCCU 

E4 , 1737 

120 

LRVTINDL 

ZNBFI  P 

^^4 , 16  54 

1 17 

T2TCT3 

F4,  174C 

121 

CYCFT 

vnN  E ' 

F4  , 1655 

117 

LRYCDU 

E4 ,1742 

121 

CZDCT 

BASETHF 

54  ,1656 

117 

ELEV 

54,  1744 

119 

FCA  IX 

V5C  TABND 

E4  , 1656 

117 

LRZCOL 

E4 ,1744 

121 

FGCNS 

PEA  ILCNT 

F4,  1657 

117 

P IPT5W 

E4,  1745 

119 

FCA  I Y 

EPSILCNT 

E4 , 1660 

117 

UF  1 

E4, 1746 

119 

fCAlZ 

EPERMINJ 

"4 , 166R 

1 18 

LNPP 

54, 1746 

121 

YCCNS 

RANGE 

54 , 1662 

120 

AT 

54  , 174  7 

119 

CELVTFF 

NNPC5 

E4  , 1662 

12c 

VECR  I Z 

54 ,1750 

121 

PRATE 

AGSBUEF 

E4  , 1664 

120 

ANGTERM 

54,1751 

119 

LNPCS 

ALPEASB 

E 4 , 16  64 

120 

VE 

F4,  1752 

12  1 

YRA  TE 

PITCHANG 

E4 , 1666 

117 

DELVEETl 

E4 ,1754 

121 

ATY 

RR-A  Z 

54  , 1666 

1 20 

TTC 

54,1756 

121 

ATR 

PSTACK 

F4 , 1670 

12  • 

TBLP 

F4  , 1757 

119 

LEVEL 

PAGE 

115 

115 

115 

115 

115 

1 1 5 

115 

11  5 

115 

116 

115 

115 

115 

116 

116 

116 

115 

116 

115 

115 

115 

115 

115 

116 

1 16 

116 

115 

116 

115 

115 

115 

115 

115 

116 

115 

120 

1 16 

116 

116 

116 

118 

119 

119 

119 

119 
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OFF 

PAGE 

SYPBCL 

OFF 

PAC 

SYMBCL 

DEF 

PAGE 

symbpl 

CEF 

PAGE 

SYMBCL 

CEF 

PAGE 

SYMBCL 

E4,1760 

121 

ATP 

F 5 , 14  36 

122 

RAPPG 

F 5 , 14  7 6 

122 

P 1 G N Z 

F5  , 1550 

129 

CE  LM 

E5 , 1664 

124 

XCC 

E4.1762 

121 

VAN 

F5 ,1436 

128 

CDUT IMFF 

F5,  1476 

129 

ANGY 

E5,  1552 

123 

K IFARM 

E5  , 1664 

124 

XNB 

E4,  176^ 

121 

PITCH 

=5,1436 

129 

NANGI 

F5, 15C0 

122 

KIGNX/E4 

F5  , 1554 

123 

J2FARM 

E5,  1664 

127 

DELTA) 

FA, 1 765 

119 

CELVEFT3 

F 5 , 1 4 40 

12F 

CCUCANG 

E5,  15QC 

129 

ANGX 

65 , 1556 

123 

K2FAR»< 

E5  ,1664 

127 

Tfil  FA 

E4 , 1773 

127 

RTSTOF  X 

E 5 ,1441) 

12  8 

tfmfacc 

85,1502 

122 

K IGNY/B8 

= 5 , 156C 

123 

TFETCRIT 

£5,1667 

127 

TEMPLAR 

FA , 177A 

120 

RTSTHA  X 

=5,1X40 

129 

TCRCNOX 

E5 ,1502 

12  9 

DRI  FTC 

E5 , 1560 

129 

NFLAT  1 

F5,  167C 

126 

TCES  IRED 

FA, 1775 

1 2't 

RTST8ASF 

E5 , 144') 

129 

WANGT 

65,1504 

122 

KIGNV/B4 

F 5 , 1562 

123 

RAMIN 

E5  ,1672 

124 

YCC 

F A, 17  76 

120 

RTSTLCr 

F5  ,1441 

12  8 

CDLRFACF 

E5 ,1504 

129 

DRIFT  I 

F5 , 1562 

129 

GFCCCMPS 

E5,  1672 

124 

VN8 

EA,1777 

12-7 

PSAMOPT 

F5,  1441 

128 

T=-MP 

65,1566 

122 

LCNCRIT 

E5 ,1563 

129 

ERCCMF 

E5,1672 

126 

GEOMSGN 

F 5 , 1 A r r, 

120 

END-FA 

F5 ,1442 

12  3 

CCURFACI 

E5,1507 

122 

FinhCRIT 

D5  , 1564 

123 

VLIM 

E5,1673 

126 

LN 

F5 , lAf n 

122 

TLANO 

F 5,  1442 

128 

NC6I1' 

E5,151J 

122 

V2FG 

E5  , 1566 

123 

AETRCCT 

E5, 170C 

124 

ZDC 

F5  ,1AOO 

12? 

W 

F 5 , 1 4 4 2 

129 

DR  IFTT 

E5  , 1 5 10 

129 

VLALN 

= = , 157C 

123 

rc  STFETl 

E5 ,1700 

124 

2NB 

E 5 , 1 A C C 

128 

AZT  PLTH 

E 5 , 1 443 

12  8 

CCLL  IMIT 

=5,1512 

129 

ACCWC 

E5  , 157  1 

129 

ZEPONOX 

E 5 , 17  C 1 

126 

\TARGTAG 

F5, 1A02 

122 

RBRFG 

F5,  1443 

128 

CHAN 

F5  , 15  16 

122 

TAL'VFPT 

F5 ,1572 

123 

CCSTFD-T2 

E 5, 170 2 

126 

VTARGFT 

E5  ,1AC2 

128 

LATITIJOF 

F5,1444 

122 

VAP  = G 

E5, 152U 

122 

CFLQFl X 

E5  , 1572 

129 

ISFCXT 

E5  , 1706 

124 

GACC 

IAC2 

8 20 

POG 

F5 ,1444 

128 

LCSl 

E5 ,15  20 

129 

PCS  NV 

F5,  1573 

129 

ASECXT 

E5,  17C6 

124 

LANCLAT 

E5,140A 

128 

FRVFCTnR 

=5, 1444 

129 

ALXIS 

F5,  1522 

122 

LRALPHA 

E5 ,1574 

123 

CG 

E5, 1706 

124 

STARAC 

F 5 , lA  1C 

122 

VBRFG 

F 5 ,1445 

129 

CNFXl 

E5,  1522 

129 

CP  IPAY 

F5,  1574 

129 

FFPFDLA  V 

E5,17C6 

124 

LEAFTF 

E5, 1 Ain 

82  ) 

VDG 

F 5 , 1446 

129 

ALK 

F5 ,1523 

123 

LPBFTAl 

F5 ,1574 

848 

ASCSAVE 

F 5 , 1706 

12  5 

CLLTRIX 

F5 ,1412 

128 

LENGTPOT 

'■5,  145? 

122 

AAPPG 

E5,  1524 

123 

LPALPHA2 

E 5 , 1576 

129 

CVFLCNCK 

F5 ,1706 

125 

XSC  I 

F5,  1413 

128 

LCSVFC 

F5,  1452 

128 

LCS2 

F5 ,1525 

123 

LPBFTA2 

E5 , 16  16 

123 

CUTOFPLN 

E5,  17C6 

127 

MAPI  AMCE 

E 5 , 1 A 1 A 

128 

NCXCTR 

E5,  14^2 

129 

THFTAN 

E5,1526 

123 

L P V M A X 

= 5 , 1616 

123 

RANGEDS  P 

E5,1710 

124 

LANCLCNG 

FE,1A15 

128 

FIPINPFX 

= 5 ,146') 

122 

VAFFG* 

F 5, 1526 

129 

CP  IPAZ 

E5  , 162C 

123 

JPAR  M 

E5,171C 

126 

FTNAFSE 

E 5,  lA  16 

122 

ARP  FG 

E 5 ,1460 

128 

CALCDIR 

E5,1527 

123 

1 PVF 

E5  , 1620 

123 

R6CVSAVE 

F5,  171C 

126 

RTNLAMB 

■ F 5 , 1 A 16 

128 

prSITQN 

F5  , 1460 

129 

F ILOFLV 

=5,1530 

123 

LRWVZ 

E5 ,1620 

123 

ve  IAS 

E5,1710 

126 

FTNTR 

F 5,1416 

821 

AOG 

=5,1461 

128 

CDUFLAG 

F5, 153',) 

129 

ALTIM 

= 5,  1622 

123 

KPAR.M 

B5,171C 

126 

RTNTT 

E5,  14  17 

128 

GPLAC6 

F 5,  1462 

122 

AAPFG* 

E5 ,1531 

123 

L fi  W V Y 

E5 ,1624 

123 

RF 

E5, 1711 

126 

L2 

F5 ,1420 

128 

CFLACES 

F=,1462 

128 

GYTOBETQ 

F5,  1531 

129  . 

, ALTIMS 

=5,1626 

123 

RG  L 

E5  ,1711 

127 

GFF2SVG 

E5, 1421 

128 

SOLTHDR 

F5,1462 

12  9 

INTVEC 

E5 ,1532 

123 

LPWVX 

= 5 , 1634 

123 

CL  AND 

E5,  1712 

124 

1 ANCA  LT 

E5,  1A2A 

122 

V8R  FG7 

F5 , 1462 

129 

VLALNS 

E5,1532 

129 

ALDK 

E5 ,1634 

123 

C LANCX 

F5,  1712 

127 

CMEGAM  1 

F 5 , 1424 

821 

VCG2TTF 

=5,1463 

128 

CFTNREG 

£5,1533 

123 

LRWVFZ 

E5  , 1636 

123 

DLANDY 

F5,1714 

124 

GCLT 

F5, 1426 

122 

A BP  FG* 

E 5 , 14  64 

122 

JARFG* 

F5 , 1534 

12.3 

LPWVFY 

F5 , 1640 

123 

CLANCZ 

E5,  1714 

124 

LSLN 

F5, 1426 

821 

AFG2TTF 

F5 , 1464 

128 

SAVE 

65,1534 

128 

MASKRFG 

E5  , 1642 

122 

ENCW 

E5, 1714 

125 

YSC  I 

E 5 , 1 A 3C 

122 

J BR  FG* 

F 5 ,146  4 

129 

W F L A T C 

E5 , 1535 

123 

LRWVFX 

F 5 , 164  2 

124 

X S M 

E 5 , 1 7 1 4 

125 

ZSCI 

F5, 1430 

128 

TEMPT  IMF 

E 5, 1466 

122 

GAI NAPPR 

F5  ,1 536 

123 

1 R N V F F 

E5  , 1642 

126 

CELX 

F5,  1717 

126 

MAGVEC  2 

F5  ,1430 

821 

JDG2TTF 

65 , 1467 

128 

SFCCNST 1 

E5,  1536 

128 

CDUND  X 

= 5 , 1642 

127 

ZI 

E5 ,1717 

126 

R2 

E 5,  1432 

122 

GAINBPAK 

F 5 , L 4 7 0 

122 

TCGFAFFR 

65 ,1537 

123 

RCCSCALE 

E5  , 1644 

124 

-CCSB 

F£,  172C 

127 

CMEGAM2 

F5 , 1*32 

128 

TM  ark 

=5,1470 

128 

TIMER 

E5,  1537 

12F 

RESLLTCT 

E5  , 1644 

126 

CELT 

=5,172 1 

126 

L'Rl 

E 5 , 1434 

122 

TCGF8RAK 

F5 ,1470 

129 

INTY 

E5, 1540 

123 

TAUROD 

F5  , 1646 

124 

SI  NB 

F5  , 1722 

124 

LMCCN 

E 5 , 14  34 

12  8 

n DLT  IMF  1 

F 5 , 1 4 7 1 

122 

TCGIAPPR 

=5,1542 

123 

L A G 7 T A U 

E 5 ,164  6 

126 

URFECT 

E5 , 1726 

127 

C MFG  A M 3 

F5, 1434 

128 

GENPL 

F5  , 1472 

122 

V IGN 

E 5 , 15  4 2 

128 

CCUNTPL 

F 5 , 165C 

124 

YSM 

E5,1727 

126 

SNTP 

F 5 , 1 434 

12F 

RDSP 

F5  , 1472 

128 

CATAFL 

F5 , 1543 

128 

CCUANG 

= 5,  1654 

126 

RVEC 

E5  , 173C 

124 

STAR 

F5, 1434 

129 

AINLA 

E 5 , 1 4 7 2 

129 

ANGZ 

=5,1544 

123 

MNFCPCF 

E5  , 1654 

126 

R IVFC 

E5 , 1730 

125 

SAX 

F5 , 1434 

1 29 

WANGO 

F5, 1474 

122 

R IGNX 

F5, 1546 

123 

MAXFORCE 

=5,1656 

124 

Z SM 

£5,1731 

126 

CSTF 

F 5,  1435 

122 

TCGI BRAK 

F 5 , 1 4 74 

12  9 

I NTZ 

F5 ,1550 

123 

JIFAPM 

F5,  1662 

126 

R2VFC 

F5,  1733 

126 

1-CSTF 
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SYMBOL 

DEF 

PAGE 

SYMBCL 

FEE 

PAGE 

SVNBCL 

DEF 

PAGE 

SYYECL 

E 5,  17  3ft 

127 

HOLDVi 

E 6 , 1 ft  1 ' 

13': 

LYKACSN 

Eft ,lft56 

131 

FLAST 

Eft , 1532 

1 36 

IJACCR 

Eft,  166  1 

137 

CELCCCLl 

Eft, 1735 

126 

CSTF-RHn 

Eft,  1ft  11 

13t. 

OKOR 

Eft, lft57 

131 

TCQR 

Eft  ,1533 

136 

IJACCU 

Eft, 1662 

135 

CELCCLZ 

Fft,  1736 

12ft 

GCTP 

E6  ,lftl2 

130 

IGAACSC 

Eft  , IftftO 

131 

GLOPM  IN 

Eft , 1536 

136 

1 JAGGY 

Eft, 1662 

137 

CELCCEL2 

Eft,  1737 

12ft 

QGG 

Eft  , IM? 

13C 

IGNAT  SR 

Eft,  Iftftl 

131 

riDCPMN 

Eft  , 1535 

136 

SK  IPU 

Eft,  1663 

135 

CYEGAFC 

Eft  , 1 737 

126 

P 

F 6 , 1 ft  1 ft 

13' 

Mil 

Eft  , Iftft  2 

131 

SA VFHANO 

Eft  , 153ft 

136 

SK  IFY 

Eft  ,1666 

135 

ENEGACC 

Eft,  174] 

12ft 

IGC 

■■ft  , 1ft  15 

13- 

Y21 

Eft,  Iftftft 

131 

P ERR  CP 

Eft,  1537 

136 

AOSO 

Eft, 1665 

135 

CNEGAFC 

Eft, 17ft  1 

126 

R lA 

Tft,  Iftlft 

1 3 T 

M 5 1 

E ft  , 1 ft  ft  5 

131 

NXTftAOP 

Fft , 1561 

136 

AC  SR 

Eft,  166  6 

135 

MTS 

Eft  , 1 7ft3 

1 2ft 

WGC 

Eft  , 1ft 17 

130 

M22 

Eft,  Iftftft 

131 

TftNE  XT 

Fft  , 1563 

136 

ACSU 

Eft  ,1666 

137 

ECCUV, 
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28 

FF-TAG6 

C4  , 2 70F' 

28 

4767 

1 50" 

PA7EDBI 

60t'l 

741 

7 

1^,2000 

28 

47  7 1 

3-5 

MI  XCON 

6G  10 

2 10 

V'’-'F25 

04  ,2  000 

28 

4771 

1276 

CNTRC  CF 

6077 

1298 

OCT  177 

■x.,200” 

28 

47  71 

1321 

BIT  S4  86 

6112 

1 !91 

VIFAP* 

'7  4 ,21 00 

28 

477  1 

1423 

4 - r YC 

6 115 

1276 

5-4 

C4  ,2000 

28 

4771 

1436 

4 'CYCL 

6245 

1 191 

SIX 

■74 , 200. J 

28 

47  74 

1325 

nc  T 6 2 

6245 

12  75 

S + 6 

■0  4 ,2li4-.l 

449 

4775 

1)91 

PCT  120 

6250 

567 

BIN3 

04,302' 

37 

4 7 76 

!■  91 

GC  7140 

6 2 50 

1 091 

LFW2 

04 , 30  2 3 

1 177 

4776 

14  36 

6 'OH  5 

625  j 

r 9 1 

THPFF 

04  ,3027 

1177 

4777 

382 

1 secx 

6 25  ■ 

1 275 

S + 3 

C A , 3 3 6 2 

1 379 

4 7 7 7 

756 

5Fcni 

625  ! 

1 379 

LF73 

04  ,3501 

1381 

-071 
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SYMeCL 

CEF 

PAGE 

SYMBOL 

DEF 

PAGE 

SYMECL 

CCT3('0r2 

04,3543 

1382 

LFFAFT3 

05,2407 

194 

AGSL  1ST 

0+2 

04,3672 

1384 

UPCUT 

05,2407 

194 

LPCNL  1ST 

7CC 

04 , 3673 

138  1 

LPGUT4 

G5,24C7 

2C5 

LMAGSICL 

CCTICOCI 

05  ,2000 

29 

ABCRTSl 

1)5,37  71 

1237 

2/3 

B IT  12,  14 

05 , 2CCC 

29 

ASENT3 

C6  ,20CC 

29 

EARThLCC 

25/32 

05 ,2000 

29 

CCWNTFLM 

06,2000 

29 

IMUCCMP 

B 12T14 

G5 , 2CC0 

29 

EPEEMl 

06 ,2000 

29 

MCCG  IM 

lOG'MPUPT 

05 , 20CC 

29 

FPANCRE  S 

C6 , 200c 

29 

PCSMCM 

PSIC!'- 

05  ,2000 

29 

CPE 1TAL3 

06,2000 

29 

T4RLP 

20MRLPT 

05,2066 

195 

LMCRBMCl 

C6 ,2703 

181 

ICCLFA  IL 

-45CEGSP 

05  ,2127 

197 

1 MOST  601 

06,2703 

18  1 

IMLFA  11 

PINNA  SK 

05  ,2127 

199 

LMFENCn  1 

06,3140 

188 

ENCRRMONI 

-BIT12 

05,2127 

203 

LMLSALC  1 

F6 ,314C 

189 

CAPT45 

MNE12 

'75,2136 

197 

LMCSTA02 

06,3164 

192 

RCSMQMT 

S-  3 

05,2136 

199 

LMPEND02 

06  ,3250 

193 

5FAILTAE 

S-2 

05,2136 

20  1 

LMCSASr? 

C6 ,3260 

192 

6FAI L7AE 

MMS2 

.;5 ,2136 

203 

IMS  A 102 

07 , 2000 

29 

ACTMAPK  1 

MIN  LSI 

05,2136 

205 

LMAGSIL2 

C7,2CCC 

29 

ASENT2 

NEGl 

05  ,2145 

197 

LMCSTA03 

C7,2C0C 

29 

MCDESE 

5-1 

05  ,2  145 

199 

1 MRFND03 

07,2667 

844 

SETXFLAG 

niAYJOB 

05,2145 

20  1 

LMCSASC3 

C7  ,32C2 

1321 

IMLFIN20 

LCACDAPl 

•J5 ,2145 

203 

LMLSAL03 

07,3704 

1320 

CFTSTALL 

RESTART 

05,2145 

205 

LMAGSI03 

1C  ,2000 

29 

CI5FLAYS 

FFDTTAE 

05,2154 

197 

LMCSTA04 

1C  ,2001 

2 9 

FLEShlCC 

CADF7AE 

05  ,2154 

2'00 

LMFEND04 

10,2000 

29 

PFASETAE 

2 .2  SPOT 

C5,2154 

20  1 

LMrSASC4 

1C, 2000 

29 

PTECCCES 

3.2SFCT 

05,2154 

203 

LMLS  AL04 

1C, 200c 

29 

SLC7ML 

6.2  SPOT 

' 5 ,2154 

205 

LMAGS104 

10,2330 

1362 

GCXCSF 

V5.IN48 

'>5,2157 

197 

LMCSTAC5 

1C  ,2334 

1362 

GCXCSFF 

SW/ 

>5,2157 

2 00 

LMFENCGiE 

10,2350 

1362 

GCXOSFR 

ACTMARK  2 

05,2157 

201 

LMCSAS05 

1C  ,2353 

1362 

GCXCSF FR 

CCMCSl 

05, 2157 

203 

LMLSAL05 

1C  ,305  1 

1362 

GQAG IN 

E/PPFG 

'.75 ,2157 

205 

IMAGS 105 

IT  ,3071 

1262 

GCPLAY 

KEYRLP7 

05 , 2 17C 

20  1 

LMFSASC6 

11,200c 

29 

F2CFS4U 

PINEALL4 

15 ,2170 

203 

LMLSAL06 

1 1,2C0C 

29 

INTVEL 

R02 

05 ,2172 

194 

NC  NDMS7 

1 1 ,2000 

29 

GPP  ]T/l 

P36LW 

■5,2172 

197 

LMCSTADL 

12  ,20CC 

29 

CCNICS 

LFDATE2 

05  ,2224 

2 00 

1MRENC06 

12,2000 

30 

INTPRET2 

VFRB37 

' 5 ,2224 

2C2 

LMCSAS09 

12  ,2000 

30 

CPE  ITALl 

MCnpCUT  E 

.75 , 2224 

2)3 

LMLSAL.06 

12,20CC 

37 

LOLNI 7Z 

LCD  FI /4 

05  ,2226 

2'T3 

LMSAL09 

12,2002 

37 

LCUN  IIY 

BEF  1 9 

u5 ,2232 

199 

LMPENCDL 

12,20C4 

37 

LCCPPALF 

EEE22 

'5  ,2276 

203 

LMLS  AL07 

12 , 2004 

37 

LCLM7X 

LPPART2 

■5,2303 

2C1 

LMCSASCL 

12  ,2'T04 

1093 

FALFCf 

IJFSTCPF 

05,2357 

2C3 

LMLSALDL 

12,2CC4 

1 128 

CFl/2 
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CEF 

PAGE 

SYMBOL 

OEF 

PAGE 

SYMBOL 

DEF 

PAGF 

SYMBOL 

CFF 

FAGF 

SYNBCL 

CEE 

PAGE 

SYM8CL 

12  ,20CA 

! 160 

IBl 

17,3136 

1636 

16M  S 

23,2515 

37 

NR  IN62 

30 , 2000 

36 

FLCGSLB 

36,2107 

76  1 

SEPVCACF 

1 7 ,2006 

37 

LC6  7FROS 

20,2000 

31 

0APS3 

23,2  5 15 

37 

THISAXIS 

30,2000 

36 

LCNSUPER 

36,2150 

72  5 

F12SPCT 

12,20(6 

1 793 

Zi^RGCP 

20,2000 

31 

LOACCAP 

23,2517 

37 

HIUNI TY 

3C  ,2CQC 

36 

F12 

36 ,2150 

725 

F62SFCT 

12,20C6 

1 129 

2DZER0 

21  ,?CCO 

31 

0AFS6 

23,2521 

37 

FIOFHAL  F 

30, 2000 

36 

VB67A 

36,2153 

725 

P63  SPOT 

12  ,2006 

1177 

KEPZERO 

21,200'' 

3 1 

P 10 

23,2521 

37 

FIUNITX 

3f  ,3007 

8 50 

T2A 

36,3003 

737 

V99RECYC 

12 ,20T6 

1237 

DPZERC 

21  ,2000 

31 

Pll 

23,2521 

596 

C0S60DEG 

30,3756 

9 IF 

DAZMAX 

37,20CC 

36 

I NLSL  PEP 

12,2017 

37 

R'AM 

22,2000 

32 

KALC'^ONl 

23,2521 

1092 

OFHALE 

30 ,3756 

9 18 

CELERL  IM 

3 7, 2O(J0 

36 

IMU2 

1 2 , ^ 'U  7 

1193 

LDFCSMAX 

22  ,2i  ' 

32 

KALC«0N2 

23,2523 

37 

HI6ZFRCS 

31  ,2CCC 

36 

FTFRCT 

37  ,2000 

36 

IMU6 

1 2 , 20  2 1 

^7 

PME 

22,2Cr-' 

32 

LANCCNST 

23  ,2523 

596 

ZERC/SP 

3 1 , 2000 

36 

F2COSX31 

37,2000 

36 

FC5FC6 

12,3765 

1237 

OQUARTFp 

22,2000 

3? 

RENOE  Z 

23,2523 

1169 

ZERCC 

31  ,2000 

36 

VE67 

37,2000 

36 

R31 

12,3765 

1237 

PCSl/6 

22,2000 

32 

R30LEC 

23,2523 

1273 

TFFZr-ROS 

31,3662 

807 

FNCLL JOB 

37,2000 

36 

SERYl 

13, 20C0 

3C 

AB7FLGS 

22,2000 

32 

SFRV2 

26,2000 

32 

PLANTIN 

32 ,2000 

36 

ABORTS 

3 7, 3 56  1 

c 

PIP5R  INE 

13,2000 

3u 

TNTINIIT 

22  ,2766 

36^ 

LOG  SKIRT 

26,2000 

32 

P20  S 

32  ,2000 

36 

F2CPS*32 

60,2000 

36 

P INEALL  1 

13,20CC 

3G 

LATLCNG 

22  ,3561 

37 

OFLFSFL 

26,2000 

696 

PROG22 

32,2000 

36 

LR':22 

60  ,2QCC 

36 

FINSUFEP 

13,2'.  TO 

30 

L FMGFCM 

22,3561 

718 

SPLRFT 

2 5 ,.2  000 

32 

FLANTT  N3 

3 2 ,2'TOO 

36 

P2rS6 

60,2000 

36 

R3UCC 

13  ,200f 

30 

CRBIT  AL2 

22 ,37'T7 

859 

CUTGO  AV  E 

25,2000 

32 

P20S1 

32 ,2000 

36 

P66LCC 

60,2000 

36 

S EL  FSUFP 

n,  20CC 

3C 

P76LCC 

23,2000 

32 

apcferi 

2 5 ,2000 

32 

F 2U  S 2 

32, 2000 

36 

R67 

60,3356 

665 

ENDEC  VN 

13,^662 

37 

ATOPOTH 

23,2000 

32 

A SENT? 

25,2QCO 

32 

PADAPLFT 

32  ,2000 

36 

SF  FV 

60,3550 

652 

ENCRELCS 

13,2735 

37 

AICFIHIS 

2 3 ,2  000 

32 

EXTVBl 

25,2000 

32 

RRLEAOIN 

33 ,2000 

36 

A SENT  6 

60,3577 

659 

FNCESL81 

13,275( 

37 

MOVAIHI.S 

23  ,?crt 

32 

T NFL  TGHT 

25  ,2000 

3? 

F29S1 

33  ,2000 

36 

R29/SERV 

60,3577 

1286 

DSPMM JCB 

13,3066 

37 

OTHPREC 

2?  ,20nf. 

32 

I N'TPRET  1 

26,2  OQ 

3 3 

BAFiLANGS 

33  ,2000 

36 

SEPV  ICES 

60,3737 

673 

ENCP  INS  1 

13,3'  6C 

37 

IHI SPRFC 

23  ,2000 

32 

MFASTNC 

26,2300 

33 

MANUVFR 

33,3105 

850 

KCC  S 

61  ,2000 

36 

FINBALL2 

16,2000 

31 

ASENT6 

23,2CCO 

3? 

«F  A S I NC  1 

2 6 ,2  000 

33 

MANUVEPl 

33  ,3656 

882 

FNCVCAT 

61,2622 

618 

ENDRTCtT 

16  ,2000 

31 

F50S1 

23,2000 

32 

NCRML  T Z 

26,2000 

3 3 

PLANT! N 1 

36 , 2000 

3A 

ASCFILT 

61,3236 

633 

ENCPUT  IN 

16,2':C0 

31 

STAPTAR 

23  ,?CCP 

32 

PCWFLITF 

26  ,2000 

3 

PLANT  IN2 

36,2000 

36 

ASENT e 

61,3763 

67  1 

ENCFI N 52 

16,2500 

923 

S50 

23,2000 

32 

POIvFLIT  1 

26,2000 

33 

P20S3 

36  ,2000 

36 

CSI/OCHl 

62,2000 

36 

F INEALL3 

14,2603 

930 

P56 

23  ,2000 

32 

F12A 

27,2300 

33 

ASENT  1 

36 ,2000 

36 

F2CPS*36 

62,2000 

36 

SBANC 

16,3250 

938 

P 56 

23,2000 

32 

RCDTPAP 

27,2000. 

33 

F60S1 

36,2000 

36 

P30S  1 

62,3606 

638 

ENDFMSS 

15,20C0 

31 

EPFFM 

23,2000 

32 

R6  1 

27,2CC0 

33 

SEPY3 

36  ,2000 

36 

R12STUFF 

63,2000 

36 

EXTVEPBS 

15,2CCC 

31 

P505 

2 3 ,2000 

3? 

R62 

27,2000 

33 

TCF-FF 

36 , 2000 

36 

SERV6 

63,2000 

36 

SELFCFEC 

15,2665 

251 

DPl/12 

23,2103 

687 

R62CI SP 

2 7 ,20C0 

33 

TCE-FFl 

35 ,21' 00 

35 

CS  I/CCH 

63,2002 

668 

PINTEST 

1 5 ,3  667 

977 

LUNPDS 

23,2337 

1273 

PPADl 

27,2000 

3 3 

VEC.  PT 

35,2000 

35 

P3CS 

63  ,2227 

269 

CPTCCAPV 

16,20CC 

31 

DAPSl 

23,2513 

37 

HIDF1Z6 

27  ,3753 

1272 

TCOANZIG 

35  , 2000 

3 5 

P6CS2 

63,2357 

272 

V5CN66 

16,3576 

1630 

INDXYZ 

23,2513 

501 

CNEB-2 

3C  ,20CC 

36 

ASENT 

35  ,2000 

35 

F60S3 

63,3062 

289 

V76 

1 7 ,2CCC 

31 

C13PANK 

23  ,2513 

1273 

TFF  1/6 

30,2000 

36 

ASENIT5 

3f  ,2000 

26 

P60S 

63  ,3115 

291 

GCSFCSLM 

1 7, 20C0 

31 

DAP  S2 

23,2515 

37 

HI LNITZ 

3C  ,2000 

36 

FCOUkv 

36 ,2057 

756 

AC  AD  N 8 5 

63,3761 

1378 

CKMDMCRE 

17,2710 

1662 

ATTSTFRP 
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MEMORY  TYPE  £ AVAILABIIITY  OISPLAY 


nnoo 

TO 

0057 

ocec 

■j  >61 

TC 

1377 

E3,  HOC 

TC 

E5  , 1661 

E5 ,16A2 

TC 

F5  ,1777 

E6,HCC 

TO 

E6 , 177 1 

E6 , 1172 

TC 

F6  , 1777 

E7,HCr 

TC 

E7 ,1766 

E7, 17^5 

TO 

F 7, 1 777 

AfCC 

TO 

5767 

577C 

TO 

5777 

NTC 

TC 

7763 

7 76  A 

TO 

7777 

CO  H 'OO 

TC 

1 ,3777 

02  i2or0 

TC 

03,3777 

0A,2>'Cf 

TC 

06,3756 

OA  ,3755 

TC 

06  ,3777 

C5,2rcr. 

TO 

05,3776 

05,3777 

06,2000 

TC 

>6,3776 

06, 3775 

TO 

C 6 ,3777 

07,2>00 

TO 

07,3766 

07,3767 

TC 

C 7 ,3777 

1C, 2000 

TO 

1 1 , 3776 

1 1 ,3777 

12 ,2  ‘CC 

TO 

12,3775 

12,3776 

TO 

12,3777 

13  ,2f  OO 

TC 

13  ,3766 

13,3765 

TO 

13,3777 

H,2O00 

TD 

15,3762 

15,3763 

TO 

1 5 ,3777 

16, 20CC 

TO 

2 1 , 3773 

2 1 ,377A 

TO 

21  ,3777 

22,2000 

TO 

22,3775 

22,3776 

TC 

22,^777 

23,2000 

TD 

23,3773 

23,3776 

TO 

2 3 , -X  7 7 7 

26,2000 

TD 

25,3761 

25,3762 

TO 

25,1777 

SPECIAL  CR  NrNF>I5Y'=M  MEMGRY 

AVAILABLE  ERASABLE  MEMCRY 
RESERVED  ERASABLE  MPWCRY 

PESERIFD  SIaTICHAEIE  ERASABLE  MEMCFY 
AVAILABLE  SWITCFAELE  ERASABLE  MEMORY 
RESERVED  SWTCHABLE  ERASAELE  MEMCRY 
AVAILABLE  SI-ITCFAELE  ERASABLE  MEMCRY 
RESERVED  SWITCFABLE  ERASABLE  MEMORY 
available  SVITCHAELE  erasable  MEMCFY 

RESERVED  FIXED  MEMCRY 
AVAILABLE  FIXED  MEMORY 
RESERVED  FIXED  MEMORY 
AVAILABLE  FIXFO  fcEMCFY 

reserved  SWTTCHABLE  fixed  MEMCRY 

SPECIAL  CR  MCNEXISTEN'T  MEMORY 

RESERVED  SWITCHABLE  FIXfc  MEMCRY 
AVAILABLE  SWITCFAELE  FIXED  MEMORY 
RFSFPVED  SWTTCHABLE  FIXED  MEMCRY 
AVAILABLE  SWITCFABLR  FIXED  MEMCRY 
RESERVED  SWITCHABLE  FIXED  MEMORY 
AVAILABLE  S'*nCHABLE  FIXED  MEMCRY 
RESERVED  SWITCHABLE  FIX'^D  MEMORY 

avatlablc  switchaelf  fixed  memory 
RFSFRVED  SWITthABLE  fixed  me^cRY 
available  SWITCFAELE  FIXED  MEMORY 
RESFRVFD  SWITCHABLF  FIXED  MEMCRY 
AVATLABIF  SWITCHABLE  FIXED  MEMCRY 
RFFERVED  SWITCHABLE  FIXED  MEMCRY 
AVAILABIE  SWITCHABLE  ETXEC  MEMCRY 
RESERVED  SWITCHABLE  FIXFO  MEMORY 
AVAILAPLF  SWITCFAELE  FIXED  MEMCRY 
RESERVED  SWITCHABLE  FIXED  MEMCRY 
AVAILABLE  SWITCFAELE  FIXED  MEMORY 
RESERVED  SWITCHABLE  FIXED  MEMCRY 
available  SWITCHABLE  FIXED  MEMORY 
RESERVED  SWITCHABLE  fixed  MEMCRY 
AVAILABLE  SWITCHABLE  FIXED  MEMCRY 
RESERVED  SWITCHABLE  FIXED  MEMORY 
AVAILABLE  SWITCHAELE  FIXED  MEMORY 


26  ,2000 

TC 

27,3776 

27,3775 

TO 

27,3777 

3C,20C0 

TC 

30 , 3766 

30,3765 

TC 

30,3777 

3 1, 20C0 

TO 

31, 3763 

31  ,3766 

TC 

31 ,3777 

32,2000 

TC 

32,3766 

32 , 3767 

TC 

32,3777 

3 3 , 20  C C 

TC 

33,3766 

33,3765 

TO 

33, 3777 

36,20Cr 

TC 

36, 3652 

36,3653 

TC 

36,3777 

35 , 2000 

TC 

35,3760 

35,3761 

TC 

35 , 3777 

3 6 , 200C 

TC 

36,3773 

36,3776 

TC 

36, 3777 

37,20‘.'0 

TC 

37,3773 

37,3776 

TC 

37,3777 

60,2000 

TC 

60, 3760 

60,3761 

TC 

60,3777 

6 1, 2000 

TO 

61,3765 

6 1 ,3766 

TC 

61 ,3777 

62, 20CC 

TC 

-^  2 , 3 7 72 

62,3773 

TC 

62,3777 

63 ,20CC 

TD 

63, 3776 

63,3775 

TO 

63, 3777 

66,20'' 

TC 

57,3777 

60,2000 

TC 

67,3777 

70,20or 

Tr 

73,3777 

RESERVED  SWITCHABLE  FIXED  MEMORY 
AVAILABLE  SWITCHAELE  FIXED  MEMCRY 
RESERVED  SWITCHABLE  FIXED  MEMORY 
AVAILABLE  SWITCHAELE  FIXED  MEMCRY 
RESERVED  SWITCHABLE  FIXED  MEMCRY 
AVAILABLE  SWITCHABLE  FIXED  MEMCRY 
RESERVED  SWITCHABLE  FIXED  MEMCRY 
AVAILABLE  SWITCHABLE  FIXED  MEMCFY 
reserved  SWITCHABLE  FIXED  MEMCFY 
AVAILABLE  SWITCHABIE  FlxEC  MEMCRY 
RESERVED  SWITCHABLE  FIXED  MEMORY 
available  SWITCHABLE  FIXED  MEMCRY 
reserved  SWITCHABLE  FIXED  MEMCRY 
AVAILABLE  SWITCHABLE  FIXED  MEMORY 
RESERVED  SWITCHABLE  FIXEC  MEMCRY 
AVAILABLE  SWITCHABLE  FIXED  MEMCRY 
RESERVED  SWITCHABLE  FIXEC  MEMORY 
available  SWITCHABLE  FIXEC  MEMCFY 
RESERVED  SWITCHABLE  FIXED  MEMORY 
AVAILABLE  SWITCHABLE  FIXEC  MEMCRY 
RESERVED  SWITCHABLE  FIXED  MEMCFY 
AVAILABLE  SWITCHABLE  FIXED  MEMCRY 
RESERVED  SWITCHABLE  FIXED  MEMCFY 
AVAILABLE  SWTTCHABLE  FIXED  MEMCRY 
RESERVED  SWITCHAELE  FIXEC  MEMCRY 
AVAILABLE  SWITCHABLE  FIXEC  ^'E^'CRY 

SPECIAL  CR  MCMEXISTENT  MEMCRY 

AVAILABLE  SWITCHAELE  FIXED  MEMCRY 

SPECIAL  DR  NONEXISTENT  ^E^CPY 
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ROUTINE : 

COUNT 

DATA 

FOR 

RCLTI NE' 

S LAST 

REACH 

:TCTAL 

CUNUL 

RFF 

1 

LAST 

TO 

28  : 

C 

C 

C 

BANKSUN 

REF 

1 

LAST 

28 

TO 

38  : 

63 

63 

63 

00 /delay 

PEF 

1 

LAST 

L367 

TF 

1369: 

32 

32 

96 

00/IMTFR 

PEF 

1 

LA  ST 

103  E 

TO 

1C79  : 

974 

974 

10  6 9 

01/EXFC 

REF 

1 

LAST 

1098 

TO 

11'  8: 

280 

2 8C 

1349 

01/INTER 

RFF 

1 

LAST 

1079 

TF 

1087: 

157 

157 

150  6 

0 1/RSRCU 

RFF 

3 

LA  ST 

1297 

TC 

1299  : 

c c 

16  8 

1674 

01 /RSIAB 

REF 

1 

LAST 

239 

TO 

244: 

135 

135 

1809 

01/R03 

REF 

2 

LAST 

296 

TF 

298  : 

92 

94 

190  3 

01/WAIT 

RFF 

2 

LAST 

1123 

Til 

1125: 

44 

189 

2f.92 

02/ALAPR 

RFF 

2 

LAST 

1372 

TG 

1374: 

79 

10  8 

220C 

02 /RANK 

RFF 

1 

LAST 

990 

TF 

994  : 

76 

76 

2276 

02 /CAFT6 

PEF 

1 

LAST 

139A 

TP 

1395  : 

1 8 

18 

2294 

02/DSPLA 

REF 

1 

LAST 

1 3AA 

TF 

1344  : 

16 

16 

2310 

02/EXEC 

RFF 

2 

LAST 

1 108 

TP 

1 1 1 1 : 

6 

65 

2375 

02  /EXTVE 

REF 

1 

LAST 

1370 

TF 

1371  : 

4 

4 

2379 

02/FCCMS 

RFF 

1 

LA  ST 

1087 

TF 

1C89  : 

64 

64 

2443 

02/flag 

RFF 

1 

LAST 

1366 

TP 

1367: 

32 

32 

24  76 

02/IMCCE 

RFF 

1 

LAST 

1299 

TO 

1 300  : 

5 

5 

2480 

02/IMTFP 

RFF 

1 

LA  ST 

109A 

TF 

1C95: 

32 

32 

2612 

02  /PHASE 

RFF 

1 

LAST 

1288 

TO 

129'): 

71 

7 1 

26  83 

02/°IN 

REF 

6 

LAST 

A6  6 

TO 

46  9 : 

17 

246 

2829 

02/P  i7 

REF 

1 

LAST 

382 

TP 

384: 

18 

1 8 

2847 

02  /PRSLP 

REF 

I 

LAST 

522 

TC 

528: 

68 

68 

2916 

02/RSPnU 

REF 

2 

LAST 

1296 

TF 

1297  : 

10 

17 

2932 

02  /RUPTS 

RFF 

1 

LAST 

15A 

TP 

156: 

54 

54 

2 986 

02/TRAN 

RFF 

1 

LAST 

1369 

TF 

1370: 

15 

15 

300  1 

02/TARPT 

RFF 

1 

LA  ST 

166 

Tp 

157: 

12 

12 

3C13 

02  /WAIT 

REF 

2 

LAST 

1121 

TF 

1123  : 

24 

78 

3C9  1 

03/0A  P 

REF 

1 

LAST 

1949 

TO 

1451  : 

2 

2 

309  3 

03/FCCNS 

REF 

1 

LAST 

1089 

TO 

1 .1 9 2 : 

32 

3 2 

3126 

03/INTER 

REF 

3 

LAST 

1006 

TF 

1)39  : 

732 

952 

4077 

03/K  ILL 

RFF 

1 

LAST 

743 

TF 

743: 

8 

6 

4f85 

03/PHASF 

RFF 

1 

LAST 

1292 

TF 

1293  : 

4 

4 

4C89 

03/P0C 

REF 

1 

LAST 

225 

TP 

225  : 

8 

8 

4097 

03/F20 

REF 

1 

LAST 

596 

TP 

598  : 

c; 

c 

4102 

03/PAC 

REF 

1 

LAST 

40 

TF 

40  : 

i 

1 

4 10  3 

03/R2A 

REF 

1 

LAST 

518 

TF 

513: 

9 

c 

4112 

OA/CCMC 

REF 

3 

LAST 

1178 

TP 

1181: 

65 

1 10 

4 2 2 2 

OA/INTIN 

RFF 

1 

LAST 

1216 

TF 

1218: 

54 

54 

4276 

21112-Cll 


1S:C9  ALG.  11  ,1S6S 


RAGE  1E7A 


ROUTINE: 

CCUNT 

CATA 

FOR  RCUTINE’S 

LAST 

REACH: 

TOTAL: 

CLNLL 

04  /KFVLP 

FEE 

1 

LAST 

1328 

TC 

1344: 

68 

68 

4344 

C4  /LT-LG 

F EF 

1 

LAST 

45 

TC 

45: 

4 

4 

434  8 

04 /MARK 

PEF 

1 

LAST 

24  9 

TC 

250  : 

32 

32 

4380 

04 /FIN 

REF 

2 

LAST 

4 6 6 

TG 

466  : 

7 

16 

^39  6 

04  / POO 

REF 

1 

LAST 

225 

TC 

236: 

316 

3 16 

4712 

04/P07 

REF 

2 

LAST 

373 

TO 

374: 

5 

32 

4744 

04/F27 

REF 

1 

LAST 

1379 

TC 

1387: 

248 

2^8 

'992 

C4/P57 

RFF 

1 

LA  ST 

975 

TC 

977: 

12 

12 

6004 

04/002 

REF 

1 

LAST 

1322 

TC 

1325: 

17 

17 

6C21 

04/R36 

RFF 

1 

LAST 

701 

TC 

703: 

93 

93 

6114 

r 5 /ASFNT 

PFF 

I 

LA  ST 

845 

TC 

845: 

2 

2 

5116 

05  /CLIST 

REF 

1 

LAST 

194 

TC 

207: 

2 4 2 

24  2 

C ? C 0 

05  /DPRCG 

REF 

1 

LAST 

983 

TC 

990: 

183 

183 

664  1 

05/EPHEM 

REF 

2 

LAST 

979 

TC 

9 83  : 

C 

62 

6 6 9 3 

05/P70 

REF 

1 

LAST 

824 

TO 

826: 

66 

66 

6 6 49 

05  /START 

REF 

2 

LA  ST 

212 

TC 

225  : 

473 

474 

6123 

06/ICCMP 

PEF 

1 

LAST 

327 

TC 

340: 

282 

282 

640  6 

06/LLRCT 

REF 

1 

LAST 

1139 

TC 

1141 : 

9 

9 

64  14 

06 /M IDG 

REF 

] 

LAST 

692 

TO 

693  : 

3C 

3C 

6444 

06  /T4FCS 

PEF 

1 

LAST 

192 

TC 

194: 

69 

69 

(613 

C6/T4RPT 

RFF 

2 

LAST 

157 

TC 

192  : 

6 18 

628 

7 14  1 

07/ASENT 

REF 

1 

LAST 

844 

TC 

845: 

15 

16 

7156 

07/1 MFCE 

REF 

1 

LA  ST 

1300 

TC 

1322: 

568 

668 

7714 

C7  /MARK 

PFF 

2 

LAST 

261 

TC 

261 ; 

286 

407 

8121 

07 /R59 

REF 

1 

LAST 

26  1 

TC 

262: 

32 

32 

8 163 

l-.l/DSPLA 

RFF 

3 

LAST 

1372 

TC 

1372  : 

9 

678 

883  1 

1')/MIDG 

PEF 

1 

LA  ST 

693 

TC 

695  : 

24 

24 

8 8 6 6 

■ 10/FHASE 

REF 

2 

LAST 

1290 

TC 

1292: 

66 

76 

893C 

10/P()WFL 

PEF 

1 

LAST 

1255 

TC 

126  1: 

115 

115 

9046 

10/ RT  8 

FEF 

1 

LAST 

1387 

TC 

1 394: 

130 

130 

9176 

11  /F20FS 

PEF 

1 

LAST 

814 

TC 

816: 

66 

66 

924  1 

11 / IN  I TV 

REF 

1 

LAST 

686 

TC 

692: 

194 

194 

9435 

11 /CPPIT 

RFF 

1 

LAST 

1218 

TC 

1239: 

830 

8 30 

1C266 

12/CCMC 

REF 

3 

LAST 

1181 

TC 

1200: 

5C2 

986 

11261 

12/  ICCNS 

PEF 

1 

LAST 

1093 

10 

1C94: 

19 

19 

1 1 2 7 C 

I3/AI.APM 

RFF 

1 

LAST 

1374 

TC 

1378: 

10 

10 

1 128C 

13  /GEOM 

PEF 

1 

LAST 

321 

TC 

325  : 

7 9 

79 

11359 

13/lNTIN 

FEF 

4 

LAST 

1212 

TO 

12  16: 

134 

6C3 

1 1962 

13  /LT-LG 

ref 

1 

LAST 

1125 

TC 

1 132  : 

155 

155 

12  117 

13/PRBIT 

REF 

1 

LAST 

46 

TC 

46: 

20 

20 

12  137 
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RnijYiNF  : 

COUNT  1 

data 

for 

ROUTINE* 

S LAST 

REACH; 

ITCTAL: 

:CUPUL 

ROUTINE: 

COUNT  1 

CATA 

FOR  ROUTINE'S 

LAST 

reach; 

:T0TAL: 

CLML 

1B/P76 

RFF 

1 

LAST 

709 

TO 

713: 

96 

9 6 

1223  5 

22  /SERV 

REF 

1 

LAST 

858 

TC 

860: 

2A 

2A 

19  26  1 

1 A /A  SENT 

RFF 

1 

LAST 

PAS 

TF 

8A7  : 

57 

5 7 

12292 

22/SR30S 

PEE 

1 

LAST 

72C 

10 

723  : 

62 

62 

19323 

lA/INFLT 

RFF 

1 

LAST 

9A  1 

TC 

9A2  : 

0 

0 

12292 

23  /EX7VB 

REF 

1 

1 AST 

27  1 

TC 

271: 

33 

1935  6 

lA/lCS 

°F.F 

2 

LAST 

926 

TO 

930: 

67 

75 

1236  7 

23/F2DPS 

REF 

1 

LA  ST 

816 

TC 

816; 

6 

6 

19362 

1A/P5 1 

RFF 

1 

LAST 

SA2 

TF 

9A6  : 

127 

127 

12A9A 

23/GECM 

REF 

1 

LA  ST 

325 

TC 

327  : 

3 A 

2 4 

1 93  9 6 

1 A/R50 

RFF 

1 

LAST 

9AC 

TO 

9A  1 : 

6A 

6A 

12  5 5 8 

23  /I CCNS 

REF 

1 

LAST 

10  9 2 

TC 

1093: 

16 

16 

19A12 

1A/R51 

REF 

1 

LAST 

93A 

TF 

938  : 

135 

13E 

12693 

23  / INCOR 

PFF 

2 

LAST 

11A5 

TC 

1 1 A 9 : 

196 

33A 

197A6 

1A/R52 

REF 

1 

LAST 

SAG 

TO 

9 50  : 

6 8 

6 8 

12761 

23 / INF  IT 

REF 

1 

1 AST 

1239 

T G 

12A9: 

1 E A 

1 8 A 

1993C 

1 A/R54 

REF 

1 

LAST 

939 

TO 

9A0: 

A 1 

A 1 

12802 

23  /PERAP 

PFF 

1 

LAST 

695 

TC 

701  : 

78 

78 

2COC8 

1A/05E 

REF 

1 

LAST 

938 

TC 

939; 

26 

26 

1282R 

23/POWFL 

REF 

1 

LAST 

12A9 

TO 

1 255  : 

152 

152 

2C160 

1A/R56 

REF 

1 

LAST 

93C 

TP 

93A  : 

132 

132 

1 296C 

23  /R6 1 

REF 

1 

LAST 

5 19 

TC 

522: 

1A5 

1A5 

2C3C5 

1 A / ' T A R S 

REF 

1 

LAST 

A7 

TO 

51: 

223 

223 

13  183 

23  /R62 

REF 

1 

LAST 

A67 

TC 

A88  : 

1 1 

11 

2C316 

1A/S52.  1 

REF 

1 

LAST 

9A6 

TO 

9A7  : 

25 

25 

13208 

23/SEPV 

PFF 

1 

LAST 

861 

TO 

862: 

2A 

2A 

2C3AC 

1 A/S52.3 

REF 

1 

LAST 

9A7 

TO 

9A8: 

16 

16 

1 3 2 2 A 

2A  /LPS20 

REF 

1 

LAST 

569 

TC 

57C: 

A6 

A6 

20386 

1 5/EPHFY 

RFF 

1 

LAST 

977 

TC 

979  : 

73 

73 

13297 

2A/LUR0T 

REF 

1 

LAST 

1133 

TC 

1 136: 

63 

63 

2CAA9 

1 5/P5  1 

REF 

1 

LAST 

95A 

TC 

957: 

65 

65 

13362 

2A  /P20 

REF 

2 

LAST 

A97 

TC 

503; 

226 

256 

2C7C5 

1 5 /P52 

RFF 

1 

LAST 

920 

TC 

928: 

1 = 7 

157 

13519 

2A/P21 

REF 

1 

LAST 

655 

TC 

661  : 

122 

122 

2C827 

15/D57 

P FF 

2 

LAST 

SbC 

TC 

975  : 

A35 

556 

IA075 

2A/P22 

PER 

2 

LAST 

5C9 

TC 

510: 

C 

c 

2C832 

1S/R59 

REF 

2 

LAST 

9 SC 

TO 

95A  ; 

1A9 

189 

1A26A 

2A  /F25 

PFF 

1 

LAST 

5!1A 

TC 

506: 

37 

37 

2C869 

1 6/nAP 

RFF 

1 

LAST 

1A60 

TO 

1A62: 

60 

60 

1A32A 

2A/R21 

PFF 

1 

LAST 

5 10 

TC 

515: 

161 

161 

21030 

16/CAPTP 

REF 

1 

LAST 

lAOC 

TC 

lAOA  : 

139 

139 

1AA63 

2A/R22 

FFF 

1 

LAST 

506 

TC 

509: 

1A7 

1A7 

2)177 

16/DAFF 

REF 

1 

LAST 

lA  1 1 

TO 

1A32; 

79A 

7SA 

1 5 2 5 7 

2A  /R23 

REF 

1 

LAST 

515 

TC 

517  : 

A1 

A 1 

2 12  18 

1 7/OAPQR 

RFF 

1 

LAST 

1A32 

TC 

IAA9  : 

62A 

62A 

15881 

2A/R2A 

PEE 

2 

LAST 

5 IE 

TG 

519; 

16 

38 

2 1256 

1 Y/nAFTJ 

RFF 

1 

LAST 

1A5I 

TO 

1A60: 

315 

315 

16196 

■ 2A/P29 

REF 

2 

LAST 

608 

TC 

611: 

69 

87 

21343 

1 7/DAFT6 

REF 

2 

LAST 

1395 

TO 

1396: 

5 

39 

1623  5 

25/1PS20 

PEF 

1 

LAST 

570 

TC 

573: 

12 

12 

21355 

20/DAFAC 

RFF 

A 

LAST 

1AP7 

TO 

1A98  : 

355 

720 

16955 

25/LUPCT 

REF 

1 

LAST 

1136 

TC 

1138: 

68 

68 

2 1A23 

20/CAF  IF 

ref 

1 

LAST 

1396 

TO 

! AGO; 

7 A 

7 A 

1 7 f,  2 9 

25  /PLEAD 

REF 

1 

LAST 

49  2 

TC 

A9A: 

5 6 

56 

2 1A79 

20/NEEDL 

REF 

1 

LAST 

lAUA 

TO 

lAl  1 : 

156 

156 

17  185 

25/PRLPT 

RFF 

3 

LAST 

615 

TC 

617: 

33 

273 

21752 

20/Rn3 

REF 

1 

LAST 

293 

TC 

295  ; 

73 

73 

1 7258 

25/PSUB 

REF 

2 

LAST 

565 

TC 

569; 

60 

62A 

2 2 3 7 6 

21  ADAFAC 

REF 

1 

LAST 

1A76 

TO 

IA76; 

8 

8 

17  266 

26/BALL 

REF 

1 

LAST 

A79 

TC 

A83: 

50 

5'1 

22A26 

2WDAFBL 

REF 

1 

LAST 

lASE 

TF 

1A58  ; 

82 

82 

173A8 

26/LRS2A 

REF 

1 

LAST 

59  1 

TC 

596: 

172 

172 

2 2 59  6 

2 1 / n A FGT 

RFF 

1 

LAST 

1 A62 

TO 

1 A 7 6 : 

368 

388 

17  73  6 

26  /LSR22 

REF 

1 

LAST 

579 

TC 

591: 

5 3 2 

532 

2313C 

2 1 /P7C 

REF 

2 

LAST 

82  9 

TC 

329: 

16 

30 

1776  6 

26  /LUROT 

RFF 

■3 

LAST 

1138 

TC 

1139: 

26 

65 

23195 

21/RlO 

REF 

2 

LA  ST 

891 

TI^ 

903  : 

A67 

A73 

1 8239 

26/R06 

REF 

1 

LA  ST 

A75 

TO 

A79: 

1C3 

1C3 

23298 

21/Fll 

REF 

1 

LAST 

823 

TO 

82A  : 

A9 

A9 

1628  8 

26  /P63 

REF 

1 

LAST 

3A0 

TC 

352: 

65 

65 

22363 

21/SERV 

REF 

1 

LAST 

867 

TC 

868  : 

16 

16 

1830A 

27/ASENT 

REF 

2 

LA  ST 

8A9 

TO 

85C: 

21 

36 

23399 

22/F2CPS 

REF 

1 

LAST 

822 

TO 

823  : 

10 

10 

1831  A 

27/KllL 

FFF 

1 

LAST 

7A3 

TO 

7A6: 

38 

38 

23A37 

22  /I NGCR 

PFF 

1 

LAST 

1 IAS 

TO 

1166; 

50 

50 

18  36  A 

27/P12 

RFF 

1 

LAST 

AA 

TC 

AA  : 

A 

A 

23AA  1 

22/KAir 

RFF 

1 

LA  ST 

352 

TO 

371  : 

670 

67C 

1903A 

27/PAO 

RFF 

2 

LAST 

7A6 

TG 

7A8; 

63 

93 

23  53A 

22/R30 

REF 

2 

LAST 

713 

TP 

720  : 

199 

20  3 

19  2 3 7 

27  /P7C 

FEF 

1 

LAST 

39 

TC 

39; 

8 

8 

2 3 5 A 2 
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RCL'^INE: 

COUNT 

CATA 

FCR 

RCUTTNE'S 

I.AST 

REACF: 

TOTAL 

:CUMUL 

ROUTINE: 

CCLNT  1 

DATA 

FCR  1 

scutine*  S 

LAST 

REACH: 

TCTAL  : 

CURUL 

27/StRV 

REF 

1 

LAST 

860 

Tf 

861  : 

31 

31 

23573 

34/P6567 

PEF 

I 

LAST 

764 

70 

786  : 

42 

42 

2939C 

27/S4C.1 

RFF 

1 

LAST 

756 

TP 

762  : 

101 

1C  1 

23  67  ^ 

34  /SEPV 

FEF 

2 

LAST 

887 

TC 

887: 

14 

47 

2 9 4 3 •( 

27/S40.2 

REF 

1 

LAST 

762 

TF) 

763  : 

28 

28 

23702 

34  /S30S 

REF 

1 

LAST 

6 19 

TC 

624: 

47 

47 

29484 

27/SAC. 6 

REF 

1 

LAST 

7 7A 

TF 

777  : 

4 ) 

40 

23742 

35/F30 

REF 

1 

LAST 

617 

TO 

619: 

28 

28 

29  5 12 

27/S4C.8 

REF 

1 

LAST 

762 

TF 

766: 

5 7 

5 7 

23799 

35/P3272 

PEF 

1 

LAST 

624 

TC 

630: 

1 19 

1 19 

2963  1 

27/S4C. 9 

REF 

2 

LAST 

769 

TF 

77A  : 

200 

202 

2400  1 

35/P3373 

REF 

1 

LA  ST 

63C 

TO 

635: 

140 

140 

29771 

27/SAl.  1 

REF 

1 

LAST 

777 

TO 

778: 

4 

4 

24C05 

35/F3474 

FEF 

1 

LAST 

661 

TC 

666: 

112 

1 12 

2SEE3 

27/TFF 

RFF 

2 

LAST 

1261 

TO 

1275: 

266 

268 

24273 

35/P3575 

PEF 

2 

LAST 

666 

TC 

686  : 

529 

543 

30426 

27/VFCFT 

RFF 

1 

LAST 

A83 

TC 

487  : 

136 

136 

24409 

35/F40 

FEF 

2 

LAST 

740 

TC 

741: 

23 

48 

3C474 

27/A  '.13 

PFF 

1 

LA  ST 

766 

TP 

769: 

103 

103 

24  5 1 2 

36 /P40 

REF 

6 

LAST 

752 

TC 

758: 

163 

782 

31256 

30/ASFM 

REF 

2 

LAST 

838 

TF 

844: 

312 

3 14 

24G26 

36/P41 

REF 

1 

LA  ST 

748 

TC 

750  : 

78 

78 

31334 

30/FX7VB 

REF 

1 

LAST 

61? 

TF 

615: 

47 

47 

24873 

36/P42 

FEF 

1 

LAST 

750 

TC 

751: 

22 

2 2 

3 1356 

3n/FCCLh 

REF 

1 

LAST 

90  3 

TP 

9 20: 

44  1 

44  1 

25  2 14 

36/P47 

PEF 

1 

LA  ST 

751 

TC 

752  : 

52 

52 

3140  6 

3C/P12 

REF 

1 

LAST 

83  1 

TF 

834  : 

156 

156 

2547C 

37/P05 

REF 

1 

LAST 

1326 

TC 

1328  : 

3 2 

32 

3 144C 

31/EXTVR 

REF 

1 

LAST 

611 

TU 

613: 

93 

93 

25562 

37  /P06 

REF 

1 

LAST 

1325 

TC 

1326: 

47 

47 

3 1487 

3 1 /F2DFS 

REF 

A 

LAST 

816 

TF 

822  : 

135 

687 

26  2 50 

37  /P07 

RFF 

3 

LAST 

384 

TC 

399  : 

267 

587 

32074 

31/R  1 2 

REF 

1 

LAST 

793 

TO 

795  : 

78 

76 

26328 

37/P31 

FEF 

1 

LAST 

703 

TC 

709: 

1E9 

1E9 

32263 

31/THCCT 

REF 

2 

LAST 

786 

TF: 

791: 

130 

125 

26463 

37/SERV 

FEF 

2 

LAST 

864 

TC 

867: 

76 

162 

32425 

32/F20PS 

RFF 

2 

LAST 

810 

TF 

8 14  : 

179 

180 

26643 

40/EXTVB 

REF 

1 

LAST 

3CC 

TC 

3C5: 

63 

63 

3248E 

32/LRS22 

RFF 

2 

LA  ST 

573 

TO 

579  ; 

1 2 3 

13  7 

2678C 

40/PIN 

REF 

10 

LAST 

472 

TO 

475: 

57 

928 

334  1 6 

32/P20 

REF 

1 

LAST 

A95 

T F 

497: 

103 

10  3 

26883 

40/R31 

PEF 

1 

LAST 

703 

TC 

703: 

15 

15 

3^431 

32/P63 

REF 

1 

LAST 

778 

TF 

784  : 

181 

181 

27064 

41/PIN 

FEF 

8 

LAST 

469 

TO 

472: 

E2 

995 

34426 

32/P70 

REF 

2 

LAST 

829 

TP 

83  1 : 

24 

138 

27202 

42  /EXT\,b 

REF 

2 

LAST 

288 

TC 

289: 

23 

38 

34464 

32/R2  9 

RFF 

1 

LAST 

603 

TF 

608  : 

151 

151 

27353 

4? /NOUNS 

REF 

1 

LAST 

305 

TC 

321: 

597 

597 

35061 

32/RA7 

REF 

1 

LA  ST 

207 

TO 

212: 

138 

138 

27491 

42 /PIN 

FEF 

2 

LAST 

436 

TC 

439: 

92 

236 

3^299 

32/S'^RV 

REF 

1 

LAST 

86  1 

Tt: 

861: 

3 

■3 

2 7 494 

42  /R05 

FEF 

2 

LAST 

488 

TC 

492  : 

1 14 

1 16 

354  1 5 

33/ASENT 

REF 

1 

LAST 

85C 

TO 

852  : 

44 

44 

27538 

42/R33 

PEF 

1 

LAST 

276 

TQ 

277: 

27 

2 7 

35442 

33/R29 

REF 

1 

LAST 

596 

TO 

6A2: 

97 

97 

27635 

43/EXTVP 

FEF 

6 

LAST 

298 

TC 

300 : 

60 

505 

3 5947 

33/SFRV 

REF 

8 

LAST 

887 

TP 

891  ; 

88 

913 

28  54  E 

43/PHASE 

REF 

1 

LAST 

1284 

TC 

1284: 

14 

14 

3596  1 

3A/ASEMT 

REF 

3 

LAST 

8A7 

TF 

849  : 

77 

127 

2867  5 

43 /P27 

REF 

1 

LAST 

1378 

TO 

1379: 

21 

21 

3 59E2 

3A/CS  I 

REF 

1 

LAST 

635 

TO 

653  : 

650 

65C 

29  3 2 5 

43  /R0477 

FEF 

1 

LAST 

277 

TC 

281: 

178 

178 

36  160 

3A/PI 2 

RFF 

1 

LAST 

83A 

TF 

3 36  : 

23 

23 

2 9 348 

43/SELF 

REF 

1 

LAST 

1275 

TO 

1284: 

314 

314 

36474 

GAP:  ASSPNBLE  RtVIStOA  116  CF  AGC  FRCGRA«  LUMINARY  BY  NASA  20J1112-C71 


1G:CG  ALG.  11,1969 


FACE  1577 


PARAGRAPFS  GFNEPATED  FOR  THIS  ASSEMBLY*,  ADDRESS  LIMITS  ANC  THE  MANUFACTURING  LGCATICN  C CPE  ARE  SHOWN  FCP  EACH 


4000 

TO 

4377 

PARAGPAPF 

H 

010 

ROPE 

MODLLE 

1 , 

SI  DC 

A , 

SEA  SE 

LINE 

SET 

5 

(WIRES 

65-  80  ) 

44CC 

7C 

4777 

PARAGRAPH 

if 

Oil 

PCPE 

MCCULF 

1 , 

SICE 

B, 

SENSE 

LINE 

SET 

c 

( H IRES 

65-  ec) 

5"00 

TO 

5377 

PARAGRAPH 

H 

012 

ROPE 

MODLLE 

1 , 

SIDE- 

A, 

SENSE 

LINE 

SET 

6 

(WIRES 

81-  96  ) 

54DG 

TG 

5777 

FAPAGFAPH 

n 

013 

RCPC 

MODULE 

1 , 

SIDE 

e. 

SENSE 

LINE 

SET 

6 

(HIRES 

81-  96  ) 

60CC 

TC 

6377 

PARAGRAPH 

if 

014 

PCPE 

MCCULF 

1 , 

S I CE 

A, 

SFNSE 

L INE 

SET 

7 

(WIRES 

97-112) 

6400 

TC 

6777 

PARAGRAPH 

a 

015 

RCPE 

MODLLE 

1 , 

SICE 

B , 

SENSE 

LIN'F 

SET 

7 

(WIRES 

97-112  ) 

7rco 

TC 

7377 

PARAGRAPH 

if 

016 

PCPE 

MCCULF 

1 , 

SICE 

A, 

SENSE 

LINE 

SET 

E 

(WIRES 

113-126) 

74CC 

TO 

7777 

PARAGRAPH 

if 

017 

PCPE 

MTCLLC 

1 , 

SICE 

e. 

SENSE 

LINE 

SET 

8 

(WIPES 

113-126  ) 

CO  ,?  too 

TO 

00,2377 

paragraph 

H 

0 20 

RCPE 

MOCLLF 

1 , 

SIDE 

A f 

SENSE 

LINE 

SET 

1 

(WIPES 

1-  16  ) 

0C,24CG 

TC 

no  , 2777 

PARAGRAPH 

If 

021 

PCPE 

MOCULE 

1 . 

SIDE 

B, 

SENSE 

L INE 

SET 

1 

(WIRES 

1-  16  ) 

00,30UP 

TC 

00,3377 

PARAGRAPH 

if 

022 

RCPE 

MCCLLE 

1 , 

SI  CE 

A, 

SENSE 

LINE 

SET 

2 

(WIRES 

17-  32) 

on  ,34(00 

T C 

■1.)  ,37  77 

PARAC’APH 

ft 

023 

Rnp  F 

MOCL'LC 

1 , 

SIDE 

B , 

SEN  SE 

LINE 

SET 

2 

( WIPES 

17-  32) 

01, 2000 

TC 

01,2377 

PARAGRAPH 

024 

RCPE 

MCCULF 

1 , 

S I Cf 

A, 

SENSE 

L INE 

SET 

■3 

(WIRES 

3 3-  4 6 ) 

01 ,2400 

TC 

U,2777 

PARAGRAPH 

ft 

0 2 5 

POPE 

MOCLLF 

1 , 

SI  DC 

B , 

SEN  SF 

LINE 

SET 

3 

(WIPES 

33-  48  ) 

01,3  l(F 

TC 

01  ,33  77 

paragpaph 

ff 

0 26 

RCPE 

MOCULF 

1, 

SICE 

A, 

SENSE 

LINE 

SET 

4 

(WIRES 

49-  64) 

01 ,34CC 

TC 

01,3777 

PARAGRAPH 

ft 

C27 

RCPF 

MCCLLE 

1 , 

SICE 

F , 

SENSE 

LINE 

SET 

4 

(W  IRES 

49-  64) 

O4,2M00 

TC 

04,2377 

PARAGRAPH 

>f 

■3  4 

ROPC 

MOCLLF 

1 , 

SIDF 

A, 

SEN  SE 

LINE 

SET 

c 

(WIRES 

129-144  ) 

04, 240<^ 

TC 

04,2777 

paragraph 

if 

■041 

RCPE 

MCCULF 

1 , 

SI  CF 

e. 

SFNSE 

L INE 

SET 

c 

( W IRES 

129-144) 

04,3  too 

TC 

>4,3377 

PAPAC-RAPH 

if 

042 

RCPE 

MCCLLE 

1 , 

SICE 

A , 

SEN  SE 

LINE 

SET 

10 

(WIPES 

145-160  ) 

04 , 34GG 

TC 

paragraph 

« 

143 

PCPE 

MOCULE 

1 , 

S TCl: 

B , 

SENSE 

LINE 

SET 

I' 

(WIRES 

14  5-160 

05, 2ncf 

TC 

15,2377 

PARAGRAPH 

if 

0 44 

RCPE 

MCCLLE 

1 , 

SICE 

A , 

SENSE 

LINE 

SET 

1 1 

(WIRES 

161-176  ) 

05.24CC 

TC 

05, 2777 

DAP  AGP  A PH 

if 

04  5 

RCPE 

MODLLH 

1 , 

SIDE 

B, 

SENSE 

LINE 

SET 

11 

(WIPES 

161-176 ) 

C5,3GCC 

TC 

05,3377 

pafagraph 

H 

0 46 

PCPE 

MCCULE 

1 , 

SICE 

A, 

SENSE 

LINE 

SET 

12 

(WIRES 

177-192 ) 

05 , 3400 

TC 

05,3777 

PAPA  GRA  PH 

If 

('4  7 

RCPE 

MOCULE 

1 , 

SICE 

P, 

SENSE 

LINE 

SET 

12 

(W  IRES 

177-192  ) 

06  ,2i'  >0 

TC 

36  ,2377 

paragraph 

if 

05  ) 

RCPE 

MODULE 

2 , 

SIDE 

A , 

SENSE 

LINE 

SET 

1 

(WIRES 

1-  16  ) 

06 , 3400 

TC 

paragraph 

H 

051 

PCPE 

MCCULE 

2 , 

S ICE 

P, 

SENS? 

L INE 

SET 

1 

( W IRES 

1-  16  I 

06,3000 

TC 

06,3377 

paragraph 

ti 

052 

RCPE 

MCDLLf 

2 , 

SI  CF 

A , 

SENSE 

LINE 

SET 

2 

(WIRES 

17-  32) 

06,340C 

"7  ^ r\  n 

TC 

06,3777 

paragraph 

H 

0 53 

PCPE 

MO  CULT. 

2 , 

SICE 

B, 

SENSE 

LINE 

SET 

2 

(WIPES 

17-  32) 

07  I 20'^0 

TC 

07, 2377 

PARAGRAPH 

ft 

0 54 

R c PC 

MCCULE 

2 , 

SITE 

A , 

SENSE 

L INF 

S ET 

"2 

( W IR  ES 

33—  46) 

07,2400 

TC 

>7  ,2777 

FAPAGFAPH 

fi 

055 

ROPE 

MODULE 

2 , 

SIDE 

B , 

SFNSE 

LINE 

SET 

3 

(WIRES 

33-  46  ) 

07 ,3ccr 

TC 

07 ,33  77 

PARAGPAPH 

ff 

056 

RCPE 

MOCULF 

2 , 

SICE 

A, 

SENSE 

LINE 

SET 

4 

(WIRES 

49-  64) 

07, 3400 

TO 

•■'7,  3777 

PARAGRAPH 

fi 

05  7 

RCPE 

MCCLLE 

2 , 

SICE 

E, 

SENSE 

L INE 

SET 

4 

(WIRES 

49-  64) 

1C, 2000 

TC 

10,2377 

PARAGRAPH 

if 

060 

RCPE 

MOCULE 

2, 

SIDE 

A, 

SENSE 

LINE 

SET 

5 

(WIPES 

65-  80 

10, 2400 

TC 

1 C , 2 7 7 7 

PARAGRAPH 

if 

061 

PCPE 

MCCULE 

2 , 

Sice 

P, 

SFNSE 

L INE 

SET 

(WIRES 

6 5-  8 0 

10,3000 

TC 

10,3377 

paragraph 

H 

T62 

RCPE 

MCCULE 

2 , 

SIDE 

A, 

SFNSE 

LINE 

SFT 

6 

(WIRES 

81-  96 ) 

10 ,3400 

TC 

10,3777 

daragraph 

ti 

063 

RCPE 

MOCLLF 

2 , 

SICE 

8, 

SENSE 

LINE 

SET 

6 

(WIRES 

61-  96) 

11,2000 

TC 

11,2377 

PARAGRAPH 

» 

064 

RCPE 

MCCULE 

2 , 

SIDE 

A, 

SENSE 

LINE 

SET 

7 

(WIRES 

97-11 2 ) 

11  ,2400 

TC 

11,2777 

PARAGRAPH 

ft 

065 

ROPE 

MODULE 

2 , 

SI  DC 

B , 

SEN  SE 

LINE 

SET 

7 

(WIPES 

97-112  ) 

1 1,3000 

TC 

11,3377 

PARAGRAPH 

ft 

C66 

RCPE 

MCCULE 

2 , 

SICE 

A, 

SENSE 

L INE 

SET 

E 

( W IRES 

113-126) 

1 1 ,3400 

TC 

11,3777 

PARAGRAPH 

ft 

067 

RCPE 

MODULE 

2 , 

SICE 

e. 

SFNSE 

LINE 

SET 

8 

( W IP.  ES 

113-126) 

1 C f/.  i i-IU 

T C 

12 ,2377 

F/'RflGPAPh 

if 

070 

RCPF 

M (3  D U 1 

2 , 

SI  CF 

A , 

SEN  SE 

L I NE 

SFT 

c 

( WIRES 

1 29- 14  4) 

12,2400 

TO 

12,2777 

PARAGRAPH 

U 

071 

PCPE 

MCCULE 

2 , 

SICE 

P, 

SENSE 

LINE 

SFT 

9 

(WIRES 

129-144 ) 

12,3000 

TC 

12,3377 

PARAGRAPH 

ft 

0 72 

ROPE 

MODLLE 

2 , 

SI  CF 

A , 

SE  N SE 

LINE 

SET 

10 

(WIPES 

145-160  ) 

GAP:  ASSEf'BLE  REVISION  116  OF  AGC  PROGRAM  LLRINARV  BY  FASA  20211  12-C71  19:'i9  AUG.  11,1969 

paragraphs  geafratfc  ftp  this  assembly;  acdress  limits  and  the  manufacturing  location  CCCE  are  shchn  fcp  each 


12, 3AOC 

TO 

12,3777 

PARAGRAJPH 

U 

073 

PCPF 

HCCULE 

2 , 

SICE 

e. 

SENSE 

L INE 

SET 

10 

(WIRES 

14  5-  16C  ) 

13 ,2U90 

TC 

13,2377 

paragraph 

U 

074 

RCPE 

MOCLLE 

2 , 

SIDE 

A , 

'■FN  'E 

LINE 

SET 

11 

(WIRES 

161-176  ) 

13,2A0C 

TF 

13  ,2777 

PARAGRAPH 

# 

0 75 

PCPP 

MODULE 

2, 

S ICE 

B , 

SENSE 

LINE 

SET 

1 1 

( WIRES 

161-176) 

13 , 3000 

TC 

13,3377 

paragraph 

C76 

RCPF 

MODULE 

2 , 

SI  CE 

A, 

SENSE 

LINE 

SET 

12 

( W IRES 

177-192  ) 

13  ,340(^ 

TC 

13,3777 

PARAGRAPH 

V 

T77 

RCPE 

MQDULL 

2 , 

SIDE 

B, 

SEN  SE 

LINE 

SET 

12 

(WIRES 

177-192  ) 

lA,20Cr 

IF 

14,2377 

PARAGRAPH 

a 

ICO 

RC'^F 

MCCULF 

3 , 

SICE 

A, 

SEN'S  P 

L INF 

SET 

1 

(WIRES 

1-  16) 

14 ,2AT0 

Ti- 

14,2777 

PARAGRAPH 

K 1 

RCPF 

MODLLE 

3 , 

SICE 

P , 

SENSE 

LINE 

SET 

1 

(WIRES 

1-  16  ) 

1 4 , 3300 

TC 

14,3377 

PARAGRAPH 

H 

102 

RCPE 

MODULE 

3 , 

SICE 

A, 

SENSE 

LINE 

SET 

2 

(WIRES 

17-  32) 

14,3400 

TC 

14,3777 

PARAGRAPH 

H 

1C3 

RCPF 

voruLE 

3 , 

SICF 

e. 

SEN  SE 

L IN  E 

SET 

2 

(WIRES 

17-  32) 

15 , 2000 

TC 

15,2377 

PARAGRAPH 

u 

104 

ROPE 

MOOLLE 

3 , 

SIDE 

A, 

SE  N SE 

LINE 

SET 

3 

(WIPES 

33-  4E  ) 

15,24CC 

3F 

1 5,2  777 

PAP  'GRACH 

n 

105 

PCPE 

MOCULF 

3, 

SICE 

B, 

SENSE 

LINE 

SET 

:i 

(WIRES 

33-  4E) 

15, 30CO 

TF 

15,3377 

PARAGRAPH 

# 

1C6 

RCPE 

MCDLLE 

3 , 

SI  CE 

A , 

S'  NSE 

LINE 

SET 

4 

(WIRES 

49-  6^) 

15,34CC 

IF 

15,3777 

pafagraph 

H 

1;  7 

ROPE 

MOCLLE 

3 , 

SI  OF 

B, 

SENSE 

LINE 

SET 

4 

(WIPES 

49-  64) 

16,  2'.CC 

TF 

1 6,237  7 

PARAGRAPH 

n 

1 10 

RCPE 

MCCULE 

3 , 

S I CF 

A, 

SENSE 

L INE 

SET 

c 

(WIRES 

65-  EC) 

16,2400 

T 

16,2777 

PARAGRAPH 

« 

1 1 1 

RCPE 

VOCLLF 

3 , 

SI  CE 

B , 

SENSE 

LINE 

SET 

5 

(WIPES 

65-  80) 

16 , 330(1 

TF 

1 6 ,33  77 

PARAGRAPH 

H 

1 12 

RCPF 

MODULE 

3, 

SICC 

A, 

SENSE 

LINE 

SET 

6 

(WIPES 

£1-  96) 

16,  34''0 

TO 

16,3777 

PARAGPA  PH 

<t 

1 1 3 

RCPE 

MCCULF 

3, 

SI  CE 

FI, 

SENSE 

L INE 

SET 

6 

(WIPES 

ei-  96 ) 

17,2000 

TC 

17,2377 

paragraph 

(/ 

114 

RCPF 

MOOLI P 

3 , 

SI  OL 

A , 

SENSE 

LINE 

SET 

7 

(WIRES 

97-112  ) 

17,2400 

TC 

17,2777 

paragraph 

H 

115 

PCPE 

MODULE 

3, 

SICF 

B, 

SENSE 

LINE 

SET 

7 

(WIRES 

97-112) 

17, 30C0 

TF 

1 7, 3377 

PARAGRAPH 

H 

116 

RCPE 

MCCLLE 

3 , 

SICE 

A, 

SENSE 

LINE 

SET 

6 

( W TR  ES 

1 13-12E  ) 

17,3400 

TC 

17,3777 

paragraph 

n 

1 17 

RCPE 

MOOLLE 

3, 

SI  OF 

B , 

SENSE 

LINE 

SET 

8 

(WIPES 

113-12E  ) 

2C  , 20C0 

TC 

20,2377 

PARAGRAPH 

n 

12  J 

RCPE 

MCCULE 

3, 

SICE 

A, 

sense 

L INE 

SET 

c 

( W IRES 

129-144 ) 

2 ),24T0 

TC 

20, 2777 

PARAGRAPH 

V 

121 

RCPE 

NCDLLE 

3 , 

SI  CE 

F , 

SENSE 

LINE 

SET 

9 

(WIRES 

129-144  ) 

20 , 3 ion 

TC 

2C  ,3377 

PARAGRAPH 

122 

PCPF 

MODULE 

3, 

s I cr 

A , 

SENSE 

LINE 

SET 

1C 

(WIRES 

145-16C  ) 

20,3400 

TC 

20,3777 

PARAGRA  PH 

# 

123 

PCPE 

MOFULE 

3 , 

SICE 

P, 

SENSE 

L INE 

SET 

in 

(WIPES 

1^5-160 

2 1,20  00 

TC 

21,2377 

PARAGRAPH 

a 

124 

ROPE 

MOCLLE 

3 , 

SIDE 

A , 

SENSE 

LINE 

SET 

11 

(WIPES 

161-176 ) 

2 1 ,2400 

TF 

21  ,2777 

PARAGRAPH 

H 

125 

RCPE 

MOGUL  L 

3, 

SICE 

B, 

SFNSE 

LINE 

SET 

1 1 

(WIRES 

161-176) 

2 1, 30C0 

TF 

21,3377 

PARAGRAPH 

H 

126 

RCPE 

MCOLLF 

3 , 

SI  CE 

A, 

SENSE 

LINE 

SET 

12 

(W  IRES 

177-192 ) 

21 ,3400 

TC 

21  ,3777 

PARAGRAl H 

H 

127 

ROPE 

MOCLLE 

3, 

FIDE 

B , 

S^NSE 

LINE 

SET 

12 

(WIRES 

177-192  ) 

22, 2TCC 

TC 

22,2377 

PARAGRAPH 

n 

130 

PCPE 

MCCULE 

4 , 

SI  CE 

A, 

SFNSE 

L INE 

SET 

1 

(WIRES 

1-  16) 

22,2400 

TC 

22,2777 

paragraph 

n 

131 

RCPE 

MOCLLE 

4 , 

SICE 

E, 

SENSE 

L INE 

SET 

1 

(WIPES 

1-  16  ) 

2 2,3f  JO 

TC 

22  ,3377 

PARAGRAPH 

H 

132 

RCPE 

MOCULE 

4, 

SICE 

A, 

SENSE 

LINE 

SET 

2 

(WIRES 

17-  32) 

22,34CC 

TO 

22,3777 

PARAGRAPH 

# 

1 33 

RCPF 

MCCULF 

4 , 

SICE 

e, 

SENSE 

L INE 

SET 

2 

(WIRES 

17-  32) 

23,2o00 

TC 

23,2377 

paragraph 

n 

134 

RCPF 

MOCLLE 

4 , 

SIDE 

A, 

SEN  SE 

LINE 

SET 

3 

(WIRES 

33-  46  ) 

23,2400 

TC 

2 3 ,2  777 

PARAGRAPH 

n 

135 

PCPC 

MOCULE 

4, 

SICE 

B, 

SENSE 

LINE 

SET 

zt 

(WIRES 

3 3-  4 £ ) 

23,3G0C 

TC 

23,3377 

PARAGRAPH 

H 

136 

RCPE 

MOOLLE 

4 , 

SICE 

A, 

SENSE 

LINE 

SET 

4 

(W  IRES 

49-  64) 

23  ,3400 

TC 

23 ,3777 

PARAGRAPH 

Y 

137 

ROPE 

MOOLLE 

4, 

SI  CE 

B , 

SEN  SE 

LINE 

SET 

4 

(WIRES 

49-  64  ) 

24,20CC 

TC 

24,2377 

PARAGRAPH 

n 

140 

RCPF- 

MCCULF 

4 , 

SICE 

A, 

SENSE 

L INE 

SET 

c 

( W IRES 

65-  EC) 

24 ,2400 

T C 

24,2777 

PARAGRAPH 

V 

1 4 1 

RCPE 

MOCLLE 

4 , 

FIDE 

E . 

SENSE 

L INE 

SET 

5 

(WIPES 

65-  80) 

24,3000 

3T 

24,3377 

PARAGRAPH 

# 

142 

RCPE 

MOCULE 

4 , 

SICF' 

A, 

SENSE 

LINE 

SET 

6 

(WIPES 

El-  96  ) 

24, 3400 

TC 

24,3777 

PARAGRAPH 

n 

143 

RCPE 

MOCULF 

4 , 

SI  CE 

P, 

sense 

L INE 

SET 

6 

(WIRES 

81-  96) 

25,2000 

TC 

25,2377 

PARAGRAPH 

n 

144 

RCPE 

MOOLLE 

4 , 

SI  CE 

A, 

SENSE 

LINE 

SET 

7 

(WIPES 

97-112  ) 

25,24Cr 

TC 

25,2777 

PARAGRAPH 

u 

145 

RCPE 

MOCULF 

4 , 

S ICC 

B, 

SENSE 

LINE 

SET 

7 

(WIPES 

97-112) 

25, ’3(0 

TO 

25,3377 

PARAGRAPH 

H 

146 

RCPE 

MOOLLE 

4 , 

SI  CE 

A, 

SENSE 

LINE 

SET 

6 

(WIRES 

113-12E  ) 

25,3400 

TC 

25,3777 

PARAGRAPH 

tf 

147 

ROPE 

MOOLLE 

4 , 

SIDE 

B, 

SENSE 

LINE 

SET 

e 

(WIRES 

1 13-12  E ) 

PAGE  1516 


G4P:  4SSEPHLP  RFVISIPN  116  OF  AGO  FRCGRAv  LUMNARY  BY  ^ASA  20211  12-C71 


19:09  AUG.  11,1969 


PAGE  1 


PARAGRAPHS  GENFRATED  FOP  THIS  ASSEMBLY;  ACCPESS  LIMITS  AN C THE  MANUFACTURING  LOCATION  CEDE  ARE  SHCHN  FCP  EACH 


26, 2CCC 

TC 

26,2377 

PARAGRAPH 

1 5C 

RCPE 

RCCLLF 

4 , 

SI  Cf- 

A, 

SFRSE 

LINE 

SET 

c 

(WIPES 

129-144  ) 

26,2400 

TC 

26,2777 

PARAGRAPH 

1# 

151 

ROPE 

MiTCLLF 

4, 

SIDL 

B , 

SEN  SE 

LINE 

SET 

9 

(WIRES 

129-144  ) 

26 , 3fcr 

TC 

26,3377 

PARAGRAPH 

1 52 

RCPE 

PCCULC 

4 , 

SICE 

A , 

SENSE 

LINE 

SET 

1C 

( W IR  E S 

1 4 5-  1 6 C ) 

26,340f 

TC 

26,3777 

PARAGRAPH 

« 

1 53 

RCPE 

«OCC  LE 

4 , 

ST  CF 

F, 

SENSE 

LINE 

SET 

11 

(WIPES 

145-16,'.  ) 

27,20  V-- 

TC 

27 ,2377 

FAPAGP  AFH 

1 54 

RCPE 

MOCULE 

4 , 

SICE 

A, 

SENSE 

LINE 

SET 

1 1 

(WIRES 

161-1761 

27, 240C 

TC 

27,2777 

PARAGRAPH 

155 

RCPE 

NCCULE 

4, 

SICE 

E, 

SENSE 

L INE 

SET 

11 

(WIPES 

161-176) 

27 , 3000 

TC 

27,3377 

PARAGRAPP 

A 

156 

RCPE 

MODLLC 

4 , 

SI  cr 

A , 

SENSE 

LINE 

SET 

12 

(WIRES 

177-192  ) 

27,3400 

TC 

27,3777 

PARAGRAPH 

157 

RCPE 

MOCULF 

4, 

SICE 

B, 

SENSE 

LINE 

SET 

12 

( WIP  F S 

177-192  j 

30, 2OC0 

TC 

30,2377 

PARAGRAPH 

A 

1 60 

RGPF 

MCDLLF 

5 , 

SI  Cl. 

A, 

SENSE 

L INE 

SET 

1 

(WIRES 

1-  16  ) 

30,24  )0 

TC 

3 ) ,2777 

paragraph 

A 

161 

ROPE 

MOOLLE 

C 

--  » 

SICE 

B , 

SENSE 

L INE 

SET 

1 

(WIPES 

1-  16  ) 

3C,30G^ 

TC 

2C,3377 

paragraph 

A 

162 

RCPE 

RCCULf 

5 , 

SI  CF 

A, 

SENSE 

L IME 

SET 

2 

( W IRES 

17-  32) 

30,3400 

TC 

30,3777 

PARAGRAPH 

A 

163 

RCPF 

POGUE 

a 

' ♦ 

SICE 

P, 

SENSE 

LINE 

SET 

2 

(WIRES 

17-  32) 

3 1,20 on 

TC 

31  ,23  7 ? 

paragraph 

A 

164 

RCPE 

MOCULE 

c 

- » 

S ICE 

A, 

SENSE 

LINE 

SFT 

3 

(WIRES 

33-  4E) 

31, 2400 

Tr 

31,2777 

PARAGRAPH 

A 

165 

RCFE 

MCCULE 

5 , 

SI  CE 

E, 

SENSE 

L INE 

SET 

3 

(WIPES 

33-  4E) 

31,3010 

TC 

31,3377 

paragraph 

A 

166 

RCPf 

MOCULE 

5 , 

SI  DE 

A, 

SENSE 

LINE 

SET 

4 

(WIRES 

49-  64  ) 

31,3400 

TC 

31  ,3777 

paragraph 

A 

167 

RCPE 

MOCULE 

5, 

SICE 

B, 

SENSE 

LINE 

SET 

4 

(WIRES 

49-  64) 

3 2, 2F"-.r 

TC 

32,2377 

PARAGRAPH 

A 

1 70 

RCPE 

PCDLLE 

5 , 

SICE 

A , 

SENSE 

L INE 

SET 

c 

(W  IRES 

65-  80) 

32  ,24  F 

TC 

32,2777 

PARAGRAPH 

A 

1 7 1 

ROPE 

MOCLLF 

5 , 

sicr 

E, 

SENSE 

LINE 

SET 

5 

(WIPES 

65-  8F  ) 

32,3000 

TC 

32,3377 

PARAGRAPH 

A 

1 72 

rcfr 

PCCULE 

5 , 

SICE 

4, 

SENSE 

LINE 

SET 

6 

( W IRES 

El-  9 6) 

32,3400 

TC 

32,3777 

PARAGRAPH 

A 

173 

RCPE 

MODULE 

C 

SI  CE 

6, 

SENSE 

LINE 

SET 

6 

(WIPES 

81-  96 ) 

33,2nOO 

TC 

33,2377 

PARAGRAPH 

A 

174 

RCPF 

MOCULE 

5 , 

SICE 

A, 

SENSE 

LINE 

S^T 

7 

( WIRES 

97-112) 

33,2400 

TO 

32,2777 

PARAGRAPH 

A 

1 75 

RCPF 

PCLULE 

5, 

SICE 

e. 

SENSE 

L INE 

SET 

7 

(WIPES 

97-112) 

33,3000 

TC 

3 3, 3377 

PARAGRAPH 

A 

1 7 6 

ROPF 

MODULE 

^ » 

Sl  CH 

A, 

SENSE 

LINE 

SFT 

B 

(WIRES 

113-128  ) 

33,34C0 

TC 

33  ,3777 

paragraph 

A 

177 

RCPE 

MOCULE 

5. 

SICE 

e. 

SENSE 

LINE 

SET 

e 

(WIPES 

1 1 3-  1 2 E ) 

34, 2000 

TC 

34,2377 

PARAGRAPH 

A 

200 

prpF 

MOCU  IF ' 

5 , 

SICE 

A, 

SENSE 

LINE 

SFT 

9 

(WIRES 

129-144 ) 

34,2400 

TC 

34,2777 

paragraph 

A 

20  1 

ROPE 

MOCLLF 

C 

- » 

SI  DF 

B, 

SENSE 

LINE 

SET 

9 

(WIRES 

129-144  ) 

34,3000 

TC 

34,3377 

PARAGRAPH 

A 

2 02 

PCFF 

PCCULE 

5, 

SICE 

A, 

SENSE 

L INE 

SET 

1C 

( W IRES 

145-160 

34,3400 

TC 

34,3777 

PARAGRAPH 

tf 

203 

RCPE 

MCDLLE 

C 

- t 

SICE 

t, 

SENSE 

LINE 

SET 

10 

(WIRES 

145-160  ) 

35 , 2'JOn 

TC 

35  ,2377 

PARAGRAPH 

A 

204 

RCFE 

MOCULE 

c 

- » 

SICE 

A , 

SENSE 

LINE 

SET 

11 

(WIRES 

161-176  ) 

35,2400 

TC 

35,2777 

PARAGRAPH 

A 

205 

RCFF 

POCULE 

5 , 

ST  CE 

P, 

SENSE 

L INE 

SET 

1 1 

(WIRES 

161-176) 

35 ,3i  00 

TC 

35,3377 

PARAGRAPH 

A 

2 0 6 

RCPF 

MODULE 

5 , 

SI  OF 

A , 

SEN  SE 

LINE 

SET 

12 

(WIPES 

177-192  ) 

35,3400 

TC 

3 5 ,3  777 

paragraph 

A 

207 

RCPF 

MOCULE 

5 , 

SIDE 

B, 

SENSE 

LINE 

SET 

1 2 

(WIRES 

177-192) 

36,2000 

TC 

36,2377 

PAPAGRA  PH 

A 

210 

RCPE 

MCDLLE 

6 , 

SI  Ct 

A, 

SENSE 

LINE 

SET 

1 

(WIRES 

1-  16  ) 

36 ,24  }0 

TC 

’6  ,2777 

paragraph 

A 

211 

ROPE 

MOCLLF 

6 , 

SIDE 

B, 

SEN  SE 

LINE 

SET 

1 

(WIRES 

1-  16  ) 

36,3000 

TC 

36,3377 

paragraph 

A 

212 

RfFP 

PCCULE 

6 , 

SICE 

A , 

SENSE 

L INE 

SET 

2 

( W IRES 

17-  32) 

36,3410 

TC 

36 , 3777 

paragraph 

A 

213 

RCPE 

PCCLLE 

6 , 

Cl  rr- 

e, 

SENSE 

LINE 

SFT 

2 

(WIRES 

17-  32) 

37,2i>10 

TC 

37,2377 

PARAGRAPH 

A 

214 

PCPF 

MOCULE 

6 , 

S ICC 

A, 

SENSF 

LINE 

SET 

3 

(WIRES 

33-  4 E ) 

37, 2400 

TC 

37,2777 

PARAGRAPH 

A 

215 

RCFE 

PCCULE 

6, 

SICE 

E, 

SENSE 

L INE 

SET 

■3 

(WIRES 

33-  4E) 

37,3>i00 

TC 

37,3377 

PARAGRAPH 

A 

216 

ROPE 

MOCULF 

6 , 

SIDE 

A, 

SEN  SF 

LINE 

SET 

4 

(WIRES 

49-  64) 

37,3400 

TC 

37,3777 

PARAGRAPH 

A 

217 

RCPE 

MOCULE 

6 , 

SIDE 

B, 

SENSE 

LINE 

SET 

4 

(WIRES 

49-  64) 

40,21 10 

TC 

40,2377 

PARAGRAPH 

A 

220 

RCPF 

PCCLIE 

6 , 

SICE 

A, 

SENSF 

LINE 

SET 

p 

(WIRES 

65-  80) 

40 ,2400 

T C 

41  ,2777 

paragraph 

A 

2 2 1 

ROPE 

MODULE 

6 , 

SI  OF 

B , 

SEN  SE 

LINE 

SET 

5 

(WIRES 

65-  80  ) 

40,3000 

TC 

40,3377 

PARAGRAPH 

A 

222 

RCPF 

PCCULf 

6 , 

SICE 

A, 

SENSE 

L INE 

SFT 

6 

( W IR  ES 

8 1-  96) 

40,3410 

TC 

40,3777 

PARAGRAPH 

A 

223 

RCPE 

PCCLLE 

6 , 

SI  CE 

e. 

SENSE 

LINE 

SET 

6 

(WIRES 

81-  96 ) 

4 1 , 2i10f. 

T r 

41  ,23  77 

PARAGRAPH 

A 

224 

RCFE 

MOCULE 

6 , 

SICE 

A, 

SENSE 

LINE 

SET 

7 

(WIRES 

97-112) 

GAP:  ASSPf'PLE  REVISION  116  CF  AGC  FRCGRAM  LUMINARY  BY  NASA  2C21112-P71  1S:C9  ALG.  11,1‘569 

PARAGRAPHS  GENERATED  FCR  THIS  ASSEMBLY;  ADDRESS  LIMITS  ANC  THE  MANUFACTURING  LOCATICN  CODE  ARE  SHGWN  FCR  EACH 


FACE  15EC 


41 ,24T0 
4i.3oao 

TG 

TC 

41,2777 
41 ,3377 

PARAGRAPH 

FAPAGRAFH 

n 

2 2 3 
226 

RCPF 

RCPE 

MCDLLF 

MOCULE 

6 , 
f , 

SIC 

SICE- 

E , 
A, 

SENSE 

SENSE 

LINE 

LINE 

SET 

SET 

7 

e 

(NIRES 
( NIRES 

97-112 ) 
113-12E) 

41, 34 JO 

TO 

41,3777 

PARAGRAPH 

# 

227 

POPE 

MODULE 

6 , 

SICE 

B, 

SENSE 

LINE 

SET 

8 

(WIRES 

113-12 E) 

42,2000 

TO 

42,2377 

PARAGRAPH 

n 

230 

ROPE 

MODLLE 

6 , 

SIDE 

A, 

SENSE 

LINE 

SET 

c 

(WIPES 

129-144  I 

42,24CC 

TC 

42 ,2777 

PARAGRAPH 

n 

231 

RCPE 

MOCULE 

6, 

SIDE 

B, 

SENSE 

LINE 

SET 

c 

(WIRES 

129-144  ) 

42,3000 

TC 

42,3377 

PARAGRAPH 

H 

232 

RCPE 

MODLLE 

6 , 

ST  CE 

A, 

SENSE 

LINE 

SET 

10 

(WIPES 

145-160  ) 

42  ,3400 

TC 

42 ,3777 

PARAGRAPH 

233 

ROPE 

MODLLE 

6, 

SIDE 

0 , 

SEN  SE 

LINE 

SET 

1C. 

(WIRES 

145-160  ) 

43, 20Cr 

1C 

43,2377 

paragraph 

234 

PCPF 

MOCULE 

6 , 

SICE 

A, 

SENSE 

LINE 

SET 

1 1 

(WIRES 

16  1-17  6) 

43,2400 

TC 

43,2777 

PARAGRAPH 

u 

235 

RCPE 

MODLLE 

6 , 

SIDF 

E, 

SENSE 

LINE 

SET 

11 

I WIPES 

161-176  1 

43,3000 

TC 

43,3377 

. paragraph 

236 

PCPr 

MOCULE 

6 , 

SICE 

A, 

SENSE 

LINE 

SET 

12 

(WIRES 

177-1  92  ) 

43,3400 

TO 

43,3777 

PARAGRAPH 

« 

237 

RCPE 

MCDULE 

6, 

SICE 

E, 

SENSE 

L INE 

SET 

12 

(WIRES 

177-192) 

GAP:  ASSEMBLE  REVISION  116  OF  AGC  PRCGRAR  LLMNflRY  BY  NASA  20211  12-071 


19:09  AUt.  11,1969 


PAGE  ISEl 


OCTAL  LISTING  PCR  PAPAGRAPF  U 01 i,  WITH  PARITY  BIT  IN  BINARY  AT  Tl-E  RIGHT  CF  EACH  NGPD,  "3"  CFNCTES  UNUSED  FIXED  PERCPY 


ALL  VALID  WORDS  ARE  BASIC  INSTRUCIICNS  EXCEPT  THCSE  NARKED  "I"  ( I N TE F P P ET I V F CPEPATCR  WCPDS)  CP  "C"  (CGNSTANTS) 


AOCO 

000!)  9 

0 

?9'>59 

1 

56006 

1 

126  65 

1 

5 20  1 1 

0 

CCCC6 

1 

39056 

0 

52006 

0 

AGIO 

52ni 

') 

00  CO  6 

1 

31269 

0 

5200b 

0 

520  1 1 

0 

39C57 

1 

560C6 

1 

13^10 

0 

90  20 

5201  1 

0 

39f  69 

1 

56CC6 

1 

12000 

1 

520  1 1 

0 

3 90  60 

0 

560C6 

1 

1 3 2 5 6 

1 

90^0 

5201  1 

0 

3906  1 

1 

560C6 

1 

12332 

0 

52011 

0 

39C60 

0 

56006 

1 

13301 

1 

9(’9C 

520  1 1 

0 

39C62 

1 

56006 

1 

13972 

1 

520  1 1 

') 

39063 

0 

56CC6 

1 

13157 

C 

9060 

5 201  1 

0 ■ 

39065 

56006 

1 

12302 

c 

C : 

121  C3 

0 

C : 

02  1 17 

1 

r : 

361C6 

C 

C:  02103 

1 

9C6D 

r ! 

: loion 

1 

C: 

16  If!? 

0 

r : 

12100 

0 

C: 

521C7 

c 

C ; 

19  106 

c 

C : 

221C7 

1 

C : 

09025 

1 

C:  10C03 

0 

9<:.7C 

C : 

19031 

0 

r : 

2 )C  33 

c 

C : 

290  1 7 

1 

C : 

30036 

1 

C : 

39039 

1 

C: 

90023 

1 

C: 

99035 

1 

C:  5CC37 

c 

9100 

C : 

59000 

n 

C: 

6')f:’;  1 

1 

00CC9 

r 

0000  6 

1 

GOOC^ 

0 

59CC1 

1 

00006 

1 

06CC9 

0 

9110 

00006 

1 

19115 

1 

00006 

1 

00009 

0 

590C  1 

1 

^A733 

c 

60GC  1 

c 

CCCC6 

1 

912'J 

19103 

0 

00006 

1 

0CCC3 

1 

fC0C2 

0 

39199 

1 

71021 

1 

00006 

1 

19131 

1 

9130 

09132 

0 

31  !'17 

0 

59023 

1 

3CC23 

c 

096  16 

1 

C : 

6239  1 

c 

39755 

1 

55C12 

1 

9190 

31021 

0 

C92  55 

1 

09  193 

0 

05155 

0 

C : 

37600 

0 

C9  369 

1 

91C9C 

c 

55C12 

1 

91  50 

09616 

1 

r : 

6239  1 

0 

j 9 6 3 5 

C : 

62CC2 

1 

220C7 

0 

59123 

0 

39736 

1 

71C20 

0 

91  6C 

6101  1 

n 

mOO'l 

!J 

1000  2 

1} 

39753 

1 

600C2 

0 

5 50  36 

1 

23C2  1 

c 

092C9 

0 

9170 

3920  1 

0 

560C6 

1 

OOCC6 

1 

C9007 

1 

550  37 

!) 

392C  1 

l1 

000  C 6 

1 

6 1 C 0 7 

1 

92  00 

12000 

■'1 

C: 

62101 

0 

53037 

0 

C 5165 

c 

39735 

1 

55C20 

0 

00002 

0 

22C02 

0 

92  10 

C922C 

0 

09229 

1 

300C1 

0 

750  12 

0 

60009 

0 

55091 

1 

05133 

c 

C5155 

c 

9220 

1 109  1 

1 

C9227 

1 

00002 

0 

C9227 

1 

11092 

1 

09227 

1 

00002 

0 

05629 

1 

923C 

C : 

31206 

1 

39201 

0 

00006 

1 

C 1CC7 

1 

3929  2 

1 

5 5C  12 

1 

9936C 

1 

5 9 7 7 6 

0 

929C 

09635 

0 

C : 

615C9 

1 

C : 

QCC92 

1 

39201 

0 

00006 

1 

0 1007 

1 

392  59 

c 

550  12 

1 

9250 

9936!) 

I 

59776 

c 

Q 9 6 3 5 

0 

C : 

6 1^76 

(: 

f.  ; 

COCA  1 

1 

797  57 

1 

59123 

0 

39736 

1 

926C 

7 1C2P 

0 

61011 

c 

10000 

0 

ooao  2 

0 

290C2 

c 

1D123 

0 

192  7C 

1 

CCCC2 

c 

9270 

22002 

0 

393C2 

1 

56CC6 

1 

C0006 

1 

09007 

1 

52131 

0 

39201 

c 

CCC06 

1 

9300 

01007 

1 

03  5 50 

1 

C : 

60  101 

1 

550  16 

c 

59CC3 

0 

79357 

0 

65CC7 

c 

59195 

0 

9310 

0OC02 

n 

31016 

1 

19  309 

0 

54003 

0 

79357 

0 

65007 

0 

0 C C 

c 

C;  CCC16 

c 

9320 

C: 

000  1 1 

1 

r : 

Oo>i09 

c 

5AC20 

1 

900  2C 

1 

9002C 

1 

900  20 

1 

90020 

1 

56020 

0 

933C 

00002 

0 

59022 

0 

91022 

0 

900  2 2 

0 

90022 

0 

9CC22 

c 

56022 

1 

0CC02 

0 

9390 

60000 

1 

6.0000 

1 

6CCC0 

1 

600CO 

1 

60000 

1 

00CC2 

0 

C: 

00037 

0 

C;  0179C 

c 

93  50 

C: 

7 6000 

0 

05072 

1 

05203 

n 

C526  1 

1 

051C  5 

c 

C : 

300C0 

1 

C : 

03777 

c 

C:  00377 

1 

9360 

C : 

00023 

0 

C : 

Q00  21 

1 

C : 

■)  002  5 

0 

C : 

ono  12 

1 

39795 

c 

CCCC6 

1 

050  1 1 

1 

CCCC2 

c 

9370 

9979'^ 

1 

OOOC6 

1 

03C  1 1 

1 

COOC2 

(1 

39797 

1 

00006 

1 

0 501  1 

1 

CCCC2 

c 

GAP:  ASSEN8LF  PFVISION  116  CF  AGC  FRCGRAP  LLF<INAPV  BY  ^A  SA  20211  12-071 


19:09  AUG.  11,1969 


PAGE  15E2 


OCTAI  LISTIAG  FCR  PARAGRAFF  it  Oil,  WITF  PARITY  BIT  IN  BINARY  AT  THF  RIGHT  GF  EACH  FCPC,  "3"  CENCTES  UNUSED  FIXED  PEPCFY 
ALL  VALin  NOPOS  ARE  BASIC  INSTRUCTICNS  EXCEPT  THCSE  PARKED  "I"  ( I NT EP PP ET 1 V E OPERATOR  NORDS)  CR  "C"  (CCNSTANTS) 


4400 

00006 

1 

30025 

0 

52C  14 

C 

C00C2 

0 

000C6 

1 

30156 

0 

20156 

1 

60  154 

1 

44  1C 

26154 

0 

541)  37 

1 

1 1002 

0 

54162 

0 

000C2 

0 

54  135 

1 

lOOCO 

C 

30135 

0 

442C 

17313 

0 

14417 

f 

44755 

c 

54154 

0 

54155 

1 

54156 

1 

OOCC2 

C 

3 4 74  6 

C 

4430 

TOO')  6 

1 

05f  1 1 

1 

0v70C2 

c 

44746 

1 

00CG6 

1 

C3C11 

1 

00002 

0 

44444 

0 

444G 

60C02 

0 

60C04 

0 

04635 

0 

C: 

1063  1 

1 

G: 

020C3 

0 

22CC7 

c 

54123 

C 

34  7 3 6 

1 

44  50 

7102C 

0 

61011 

D 

ICCCO 

0 

14455 

c 

14164 

1 

24002 

0 

14437 

1 

56CC2 

0 

44  60 

54144 

1 

44736 

0 

•)  )004 

0 

71C2C 

c 

5502C 

0 

1 1C42 

1 

0447C 

c 

C4473 

0 

447C 

34755 

1 

57C42 

c 

05  137 

1 

COOQ3 

1 

44747 

0 

00006 

1 

03C  1 1 

1 

34  755 

1 

4500 

5 501  1 

1 

00  144 

0 

56CC2 

r 

54144 

1 

11042 

1 

04507 

1 

04473 

0 

3 4 7 5 5 

1 

451C 

5501  1 

1 

03144 

0 

0 )0  ')6 

1 

645  15 

1 

14516 

c 

400C0 

0 

50CC2 

c 

6CC00 

1 

4 5 20 

00006 

1 

66744 

c 

1 6742 

1 

C0006 

1 

5000  2 

a 

5 0000 

1 

300C  1 

c 

24CC2 

C 

4530 

52062 

1 

220f;2 

0 

34  74J 

0 

701 1C 

c 

ICCCG 

0 

14550 

1 

30061 

0 

045  12 
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C 

4620 
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1 

24CC2 

c 

54C01 

1 

22004 

G) 

75012 

0 

560C2 

0 

52134 

c 

5CC02 

c 

4630 

02000 

0 
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1 

56004 

0 

56134 

1 

C0133 

0 

56CC2 

0 

50000 

1 

30000 

1 

464C 

54rC4 

1 

75G12 

0 

56002 

0 

50002' 

F) 

1 2000 

1 

35012 

1 

70133 

1 

6C  134 

1 

4650 

0000  2 

<1 

54135 

1 

56CC4 

p 

CC006 

1 

04QC7 

1 

56135 

0 

75012 

0 

56C01 

0 

466C 

C0G04 

0 

00006 

1 

01007 

1 

50001 

0 

320CC 

0 

56135 

0 
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1 

C1007 

1 
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1 
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1 

3C135 
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0 
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1 
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1 
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5400  1 
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c 

52P73 
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0 

0200U 

0 

56073 

0 

471C 

5 6004 

0 

56D73 

( 

0007  2 

1 

54164 

0 

34744 

1 

54G23 

1 

30CC6 

1 

54165 

1 

47  20 

500  12 

0 

30CGf 

1 

54CC4 

1 

75C12 

0 

560C2 

0 

56164 

1 

14643 

0 

CCCC6 

1 

4730 

01007 

1 

00002 

() 

G : 

3 7777 

1 

C: 

37  7 7 7 

1 

C: 

5777  7 

1 
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4Cf  CO 

c 

C : 

200CC 

c 

C : 
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0 

4740 

C: 

C4C0C 

p 
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020CC 

r 
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cirno 

0 

C : 
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0 
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00200 

0 

C; 

OOlCO 

0 
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c 
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c 
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0 

C: 
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C: 
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p 
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C: 
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0 
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0 
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r 

C: 

00017 

1 
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1 

C : 
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1 

C: 
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00045 

C 
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VALID 

v,nRCS  are 

BASIC 

INSTPLCTI CNS 

EXCFPT  These 

PARKED  "1" 

( 1 NTFRPRET I VF 

OPERATOR 

NOROS 1 

CR  "C  (CCNS7ANTS) 
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f! 
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1 
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C : 
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0 

r : 
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C: 

01777 
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C: 
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C: 

024CC 
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C 

C : 
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1 

502C 
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C6COO 

1 

C : 

C7CCC 

0 

r : 
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1 

C: 

13000 

Ll 

C : 

140CC 

1 

C: 
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0 

C:  16CCC 

c 

C : 

17CCC 

1 
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r : 

17770 
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r : 

21C00 

1 

6 47  36 

1 

55C75 

C 
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Q 
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C 
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1 

55075 

0 
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15051 

1 

57075 

1 
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1 

64734 

0 

400CC 

0 

6 1C75 

1 

55C75 

c 

15C51 

1 

5M50 
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1 
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1 

7 1 C 7 5 

0 

55076 

0 

00006 

1 

75CjC5 

0 

67742 

1 

0CCC6 

1 

5060 

71076 

0 

67722 

1 

00006 

1 

71C75 

c 

200C  1 

1 

5 5C  75 

0 

00002 

0 

5000C 

1 

507C 

AA73A 

1 

C0CC2 

n 

00004 

0 

65164 

1 

54063 

0 

OOOC6 

1 

50CC2 

c 

3CCC  1 

c 
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52'766 

0 

35163 

0 

56CC4 

r 

54C61 

1 

12626 

0 

00004 

0 

54063 

r 

00C06 

1 

51  1C 

50'I02 

0 

3000  1 

0 

52C66 

0 

35163 

0 

560C4 

0 

126C2 

0 

56CC2 

C 

67  751 

0 

5120 

56002 

0 

15112 

1 

22CC2 

c 

35163 

n 

56006 

1 

12  7C7 

1 

40  16  4 

c 

54CC  1 

1 

5130 

35163 

0 

54006 

(. 

12  706 

r 

5A164 

C 

35163 

0 

540C4 

1 

12  777 

0 

00004 

0 

51A0 

54C65 

0 

44752 

1 

26002 

1 

35163 

0 

56CC4 

0 

13C24 

c 

00CC4 

C 

54C63 

c 

5150 

35163 

0 
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1 
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c 

13073 
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0 
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c 
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0 

r : 00014 

1 

01363 

0 

31472 

1 

0(10  0 6 

1 

01C06 

0 

00CC2 

c 
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1 
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r 

00006 

1 
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OCTAL  LISTING  FOP  PARAGRAPF  A )14,  WITH  PARITY  BIT  IN  BINARY  AT  THE  RIGHT  CF  FACH  WCPC,  "S"  CENCTES  UNUSED  FIXED  PEPICRY 


. VALID 

WORDS  APE 

BASIC 

INSTRUCTIONS 

EXCEPT  THOSE 

MARKED  "I" 

( INTERPRETIVE 

OPERATCR 

: WCRO 

S) 

CR  "C 

" ( C C N 

STANTS ) 

6000 

C : 

00464 

1 

3 4 7 6 4 

C 

54CC1 

1 

40000 

0 

52  760 

1 

04635 

0 

C : 

1002  4 

0 

C t OC  C X 4 

1 

6^110 

C : 

0'l'i3  1 

6 

46021 

0 

00004 

0 

70I1C 

0 

541K 

0 

44752 

1 

00006 

1 

03012 

1 

‘02C 

CC002 

c 

C : 

4100'J 

1 

37727 
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56004 
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120  2 2 

1 

CCCC6 

1 

3 6 C 3 1 

C 

15165 

1 

60  30 

C: 

03041 

1 

C : 

661C7 
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36C41 

1 

CCCC4 

r 

220CC 

1 

50002 

3 

30000 

1 

22C06 

1 

604C 

122O0 

0 

C : 

56063 

1 

J0003 

1 

C00C6 

1 

22164 

1 

300  C 6 

1 

54  165 

1 

74735 

0 

60  5C 

54115 

0 

54C  2 3 

1 

16C73 

1 

22006 

1 

16U45 

1 

000C6 

1 

50116 

1 

3CCC1 

C 

6060 

52155 

I 

34755 

1 

54  156 

1 

54  163 

1 

30  165 

0 

54CC6 

0 

10023 

1 

16  102 

0 

6070 

10067 

1 

15  126 

0 

24164 

1 

50  164 

1 

300CC 

1 

ICCCC 

r 

16365 

c 

C:  00177 
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6100 

5402? 

1 

76C7  7 

c 

54C2C 

1 

1002C 

I 

16252 

0 

16  7 46 

0 

74753 

c 

ICCCC 

C 

61  10 

16151 

0 

50164 

1 

4000  1 

1 

lOOOC 

c 

1622C 

0 

C: 

77773 

1 

24164 

1 

54116 

0 

612C 

66254 

1 

lOCCC 

0 

67746 

0 

16130 

1 

30  120 

1 

2 6116 

0 

50C2C 

c 

7 6 2 7 6 

c 

6130 

00006 

1 

6614  1 

•' 

750  1 2 

r 

6 5012 

1 

56116 

1 

6'.U  15 

1 

540C4 

1 

sec  20 

0 

6140 

762  76 

0 

74357 

6 

65007 

0 

56116 

1 

54CC3 

0 

5CC20 

c 

76276 

c 

37  736 

1 

6150 

54020 

1 

3012C 

1 

54  130 

1 

24164 

1 

50164 

1 

40000 

0 

lOCCC 

c 

24  13C 

c 

6160 

16  16  1 

0 
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u 
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1 

CC0C6 

1 
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c 

30115 

1 

26116 

0 

50130 

0 

6 170 

40T46 

1 

26116 

0 

77747 

0 
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1 

162C  7 

0 

77745 

1 

000C6 

1 

16  2 11 

1 

6200 

36116 

1 
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1 
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c 

64  74  1 

1 

54116 

0 

5002) 

') 

36276 

1 

30  12c 

1 

6210 

16215 

n 

35007 

0 

56  1 16 

I 

54CC3 

c 

743  5 7 

0 

26  1 16 

0 

5002C 

c 

36276 

1 

622C 

3436C 

0 

7C02C 

1 

6622  5 

1 

10000 

0 

16236 

1 

C: 

77767 

1 

66115 

1 

ICCCC 

c 

6230 

50000 

1 

46247 

1 

16  240 

c 

5C163 

c 

46245 

0 

1624  ) 
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50163 

0 

46247 

1 

624C 

26166 

1 

541  16 

0 

50020 

0 

76276 
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0 
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1 
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1 
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0 
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1 
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1 
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0 
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1 

50164 

1 

30CCC 

1 
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1 
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0 

54004 

1 
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1 
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1 
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1 
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1 
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1 
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5TT.0C 

1 

12CCG 

1 

10163 

1 

120  17 

1 

12017 

1 

12121 

0 
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C0122 
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165  1C 
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6300 

17074 

1 

1 766'' 

1 

17404 

1 

167C6 

1 

16473 

0 

16055 

0 

17627 

1 

16504 

1 

63  1C 

16623 

1 

16526 

1 

17337 

0 

16562 

1 

1663  1 

1 

1 7 3 4 2 

1 

17621 

1 

17577 

1 

6320 

17602 

0 

176C6 

1 

17624 

1 

16754 
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16752 

0 

17041 

1 

17334 

c 

17463 

c 

6330 

17430 

I 70  10 

r 

17C65 

1 

17CCC 

] 

16334 

1 

17575 

c 

17616 
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12345 

0 

6 3 40 

12352 

0 

12355 

1 

12361 

0 

12365 

1 

1237  3 

0 

124C7 

1 

124  16 

1 

124C1 

1 

63  50 

12412 

0 

1247C 

1 

12  4 7 5 

1 

1245C 

0 

1251C 

0 

12517 
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12460 

0 

30165 

c 
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54004 

1 

24164 

1 

50  164 

1 

40000 

0 

6 7 7 5 2 

c 
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1 
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1 
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0 
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1 
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1 
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1 
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C 
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6ACC 

16064 

1 

C6422 

0 

160  64 

1 

06425 

1 

16463 

1 
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1 

16  147 

1 

C6A25 

1 

6A1C 
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1 
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1 
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1 
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1 

34766 

1 
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1 
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1 
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1 
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40046 

1 

16424 

1 
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1 

40047 

0 

26  116 

C 

A0116 
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64772 

1 

ICCOC 

0 

6A30 

30  120 

1 

16436 

1 

35CC7 

C 

56116 

1 
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0 

74357 

6 

26116 

0 

CCC06 

1 
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30155 

50116 

1 

52001 

1 
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1 
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c 

C0CC2 

0 

00006 

1 

30  160 

0 

645C 

50  1 16 

1 

52TC3 

n 

00006 

1 

30162 

1 

50116 

1 

520C5 

0 

GOOC2 

c 

3C156 

c 

6460 

50116 

1 

54C,’2 

1 

QC002 

0 

37  73  5 

1 

5402C 

1 

16111 

1 

34735 

1 

54C2C 

1 

6470 

16111 

1 

361  12 

0 

16  150 

1 

5C116 

1 

3CCC  2 

c 

54156 

1 

00CC6 

1 

50116 

1 

65C0 

3CC0I 

( 

5215^ 

1 

3 4 7 5 3 

1 

16063 

0 

22007 

0 

50  1 16 

1 

300CC 

1 
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c 

65  10 

00006 

1 
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1 
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0 
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1 
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1 
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1 
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1 

52  160 

1 
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1 
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1 
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1 
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0 
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0 

16C63 

0 

CCCC6 

1 

50  1 16 

1 

6530 

3000  1 

0 

“^2155 
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50166 

c 

5200  1 

1 

50163 

1 

36247 

0 

26  166 

1 

1016  3 
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6540 

16555 

0 

16553 

0 

54  163 
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54156 

1 

52  16C 

1 

50166 

c 

517  7 5 

0 

52162 

0 
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50166 

0 

51777 

1 

16064 

1 

54156 

1 

16.J6  4 

1 

54  163 

1 

56156 

c 

5C166 

c 

6560 

53777 

0 
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1 

OOOC6 

1 

5T  116 

1 

3000  1 

0 

52155 

1 

50166 

0 

52001 

I 

65  7C 

50163 

0 

36247 

0 

26166 

1 

10163 

1 

166  13 

1 

16514 

C 

000C6 

1 

50116 

1 

6600 
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1 
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1 
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c 
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0 
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1 
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1 
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0 
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(' 
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1 
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1 
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1 
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1 
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1 
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0 
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5C166 

0 

53777 

r 

1652J 

1 

24  164 

1 
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1 

3CCC0 

1 

50116 

1 

54CCC 

c 

6630 

16064 

1 

24164 

1 

50  164 

1 
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1 

50116 

1 

60O00 

1 

54004 

1 
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c 
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1 
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0 

54  117 

1 
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c 
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1 
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c 
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1 

5C120 

1 
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1 
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0 
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1 
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1 
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0 

30165 

0 
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c 
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0 
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54004 

1 
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0 

64  74  1 

1 
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f 

16045 

1 

30117 

c 

66254 

1 

lOCOQ 

0 
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1 
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1 
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Cl 
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1 
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1 

54  117 

1 
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1 
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0 

74357 

r 
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1 
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1' 
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1 
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1 

50164 

1 

3CCC1 

c 
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1 

60OO0 

1 
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1 
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r\ 
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1 
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0 
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1 
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1 
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1 
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1 
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0 
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c 
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c 
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0 
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0 

30165 

0 

54006 

c 
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1 
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c 

34735 

1 

16755 

1 

34355 

0 

26116 

0 

00CC6 

1 

50  116 

1 

6760 
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1 

20160 

1 

00006 

1 

16765 

1 

C7C17 

0 
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1 

50116 

1 
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1 
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0 
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1 
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1 
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0 
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1 
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OPERATOR 
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7000 

COCO  6 1 

5C116  1 

30J01  0 

20155 

1 

C00C6 

1 

16064 

1 

07022  C 

16C64 

1 

70  in 

one  0 6 1 

50115  1 

40CC1  1 

17CC3 

1 

54001 

1 

34756 

1 

17021  1 

54CC  1 

1 

7020 

362 5C  0 

56001  0 

50090  1 

44734 

1 

54  1 3C 

1 

CCCC6 

1 

240CC  1 

5CCC1 

0 

7C30 

26155  1 

5 4.'  '-7  1 

34755  1 

60130 

0 

5000  1 

9 

26154 

0 

54007  1 

CCCC2 

C 

70A0 

17155  n 

10006  1 

50116  1 

30CC3 

1 

52  1 6C 

1 

C0CC6 

1 

40901  1 

20  160 

1 

7C5C 

onoo  6 1 

17053  1 

07017  0 

'J000  6 

1 

50116 

1 

3GCC5 

1 

52  162  C 

00CC6 

1 

7060 

40(’'ll  1 

20162  0 

0CC06  1 

1706  5 

1 

07014 

0 

00U06 

1 

50116  1 

3GCC  1 

c 

7070 

52155  1 

OC>On6  1 

40001  1 

17CC3 

1 

G00C6 

1 

50116 

1 

30002  0 

20156 

1 

71C0 

50116  1 

60000  1 

60154  1 

54154 

(1 

16064 

1 

170C6 

1 

500C2  C 

3CCCC 

1 

71  10 

240U2  0 

541 16  0 

50116  1 

30C01 

0 

54156 

1 

34755 

1 

56155  0 

54135 

1 

712C 

0n006  1 

70156  1 

56156  0 

G0006 

1 

70154 

0 

20  1 56 

1 

50116  1 

30000 

1 

7130 

56135  0 

;vHjC6  1 

7C135  1 

20156 

1 

56154 

1 

00006 

1 

70  13  5 1 

2C155 

1 

71  AO 

00002  0 

34755  1 

54163  1 

56156 

c 

600CC 

1 

540C1 

1 

00002  0 

60  155 

0 

7 150 

54155  1 

00CC2  C 

60154  1 

54154 

0 

OOOC  2 

0 

54121 

1 

OOCC2  C 

34  7 52 

c 

7 160 

54136  1 

oncc6  1 

22137  1 

C71 12 

1 

52  16C 

1 

52155 

1 

52131  0 

30156 

c 

71  7C 

54132  U 

30136  0 

26116  C 

C71  12 

1 

5215  6 

1 

20  132 

0 

60154  1 

60130 

0 

7200 

54130  1 

172C3  0 

54121  1 

52162 

0 

52  155 

1 

30136 

0 

26116  C 

C71  12 

1 

7210 

52132  0 

20156  1 

6C154  1 

6C1  30 

c 

54  15  4 

0 

CC137 

1 

07022  0 

00  137 

1 

7220 

00006  1 

2214  1 'I 

54117  1 

2214  ) 

1 

1723  5 

0 

5CCC2 

c 

30CCC  1 

54  140 

0 

7230 

60000  1 

60Cl2  C 

54117  1 

64756 

1 

54141 

1 

36276 

1 

54116  0 

00CC6 

1 

72  40 

50117  n 

30004  0 

52155  1 

52123 

0 

1 72  5C 

0 

54140 

0 

44752  1 

26117 

1 

725C 

07112  1 

GP006  1 

50117  n 

30002 

0 

20  15  5 

1 

10149 

0 

17245  1 

CC141 

c 

7260 

34755  1 

5*156  1 

22CC2  r 

C 6 7 2 6 

1 

1 72  7C 

1 

17310 

7 

44733  C 

17  27  1 

0 

7270 

34733  1 

54002  1 

90006  1 

240CC 

1 

60156 

0 

54  156 

1 

34755  1 

60CC2 

0 

73C0 

60 1550 

54155  1 

34755  1 

60002 

0 

60  154 

1 

54154 

0 

54155  1 

OOCOl 

c 

73  in 

54156  1 

17305  1 

54135  1 

OOOC6 

1 

70156 

1 

54156 

1 

34755  1 

56155 

0 

7320 

17131  1 

5*135  1 

0.1006  1 

70  155 

1 

52155 

1 

CC0C6 

1 

70135  1 

3CCC1 

c 

7330 

26154  0 

00016  1 

30155  C 

rooc2 

0 

07157 

0 

34755 

1 

16063  0 

34  752 

c 

7340 

54140  0 

17345  0 

44363  1 

5414C 

r 

3624  5 

1 

54  136 

1 

07535  C 

07161 

0 

7 3 5C 

00006  1 

30123  1 

52155  1 

52134 

0 

000P6 

1 

30125 

1 

5216C  1 

CCCC6 

1 

7360 

30127  0 

52162  0 

3C140  1 

26116 

c 

C716  1 

0 

52123 

9 

52155  1 

52125 

0 

737G 

52160  1 

52127  1 

52162  0 

30140 

1 

26  116 

0 

C7  161 

c 

52134  C 

52155 

1 
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52162 

0 

52125 

G 

52  160 

1 

160  6 4 

1 

10  16  3 

1 

1 7433 

c 

17433 

C 

C7  112 

1 

74  I'T 

07143 

5216C 

1 

52  155 

1 

5216C 

1 

07112 

1 

07143 

'1 

52  162 

0 

52  155 

1 

7420 

5216? 

0 

07112 

1 

0 7 143 

0 

52155 

1 

52162 

0 

52160 

1 

52155 

1 

16C64 

1 

743C 

C7157 

0 

44751 

1 

76  116 

0 

C0006 

1 

30155 

0 

52  160 

1 

07112 

1 

C7143 

c 

744C 

34752 

0 

26116 

C 

00006 

1 

3C16C 

r 

52155 

1 

52162 

0 

07112 

1 

07  143 

0 

745C 

34752 

0 

261  16 

0 

52  160 

1 

5 215  5 

1 

5216C 

1 

C7  1 12 

1 

07143 

0 

52155 

1 

7460 

52162 

0 

52155 

1 

1 6 524 

C 

00006 

1 

30162 

1 

52155 

1 

52123 

c 

C7  1 12 

1 

7470 

00O-.I6 

1 

40]  6 7 

I 

52  155 

1 

52125 

c 

07112 

1 

34752 

c 

26116 

c 

00006 

1 

75C0 

4C162 

0 

^2155 

1 

52162 

0 

07112 

1 

onoc6 

1 

30123 

1 

52155 

1 

52127 

1 

75  10 

07112 

1 

34752 

0 

26  116 

c 

C0006 

1 

40123 

0 

52155 

1 

20162 

0 

0CCC6 

1 

752C 

17522 

1 

07014 

0 

07  112 

1 

52125 

0 

5216C 

1 

52155 

1 

2C16C 

1 

0CC06 

1 

75?C 

I 7 532 

0 

07P  17 

07112 

1 

52127 

1 

17003 

1 

000C6 

1 

30155 

c 

52  123 

C 

7 5 40 

T0006 

1 

30160 

0 

52125 

c 

CCCC6 

1 

3016  2 

1 

52127 

1 

00002 

0 

10000 

0 

755C 

17  554 

0 

0000  2 

0 

1 7564 

0 

00002 

0 

560C  1 

0 

6 4 7 36 

1 

64736 

1 

54CCC 

c 

7560 

17562 

0 

240C  1 

r 

56CC1 

0 

CO002 

0 

5600  1 

0 

64735 

1 

67752 

0 

54CCC 

c 

7570 

17572 

1 

24C,)1 

’ \ 

56001 

0 

4C00C 

c 

CCCC2 

0 

C7112 

1 

16064 

1 

07112 

1 

76C0 

07142 

1 

16C64 

1 

00006 

1 

501L6 

1 

30  TO  1 

176  12 

1 

OOOC6 

1 

5C  116 

1 

7610 

300  11 

(' 

521“ 

I 

52  13  1 

c 

34  755 

1 

54C04 

1 

12353 

1 

30116 

1 

54  166 

1 

762C 

16066 

0 

34755 

1 

54004 

1 

12172 

0 

360  7 7 

1 

54CC4 

1 

12214 

c 

10163 

1 

76  3C 

1764  1 

1 

1 76  41 

1 

COOC6 

1 

50116 

1 

3000  1 

) 

52131 

0 

34  7 55 

1 

54CC4 

1 

76  4 T 

12654 

ft 

00006 

1 

50116 

1 

300C3 

1 

5216C 

1 

OOCC6 

1 

50116 

1 

30005 

1 

765C 

5216? 

0 

44753 

c 

54163 

1 

00006 

1 

50  1 1 6 

1 

3CCC1 

0 

52  3 5 5 

1 

17  635 

1 

7660 

50116 

1 

lOOO'l 

0 

16C64 

1 

1 76  6'5 

1 

17673 

) 

501 16 

1 

1000  1 

1 

16C64 

1 

767C 

16064 

1 

17673 

■0 

160  6 4 

1 

C00C6 

1 

40155 

1 

52155 

1 

10163 

1 

17710 

1 

7700 

L771C 

1 

00006 

1 

40  16C 

1 

5216C 

1 

00006 

1 

40162 

0 

52162 

c 

16C64 

1 

7 7 10 

4 1 156 

1 

54156 

1 

16C64 

1 
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22CCC 

1 

C : 

2300C 

0 

C: 

24CC0 

1 

C: 

25000 

0 
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26C00 

0 

772G 

C : 

2 70  TO 

1 

r, : 

31  i;,:) 

n 

C: 

31 103 

1 
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O')  00  4 

0 

100  6 7 

1 

130  1 7 

C 

coot  3 

1 

13217 

1 

34752 

0 

01, 30?C 

0000  6 

1 

C5C  1 1 

1 

52165 

1 

12713 

1 

5406  1 

1 

34755 

1 

54064 

1 

32635 

c 

01 , 3F-30 

5436  2 

1 

5'Vi6  4 

r 

IF  167 

C 

1303  6 

c 

C : ODD  14 

1 

130  45 

1 

33034 

0 

26064 

1 

01,3GA0 

10062 

1 

130  3) 

0 

44753 

'' 

54064 

1 

15  160 

1 

4C0  65 

0 

50C64 

0 

60  164 

1 

01 , 31150 

00006 

1 

130  53 

C 

13336 

G 

50064 

0 

40  16  7 

0 

540163 

0 

50C  64 

c 

5 4 16  7 

c 

01  ,3060 

44350 

1 

70  06  5 

n 

64741 

1 

56065 

1 

74  350 

1 

50064 

0 

60165 

0 

54066 

0 

01,3F7C 

100  6 4 

1 

12c62 

C 

L2652 

■j 

54164 

0 

34755 

1 

5 4 1 3 T 

1 

35CC4 

0 

7C167 

c 

01,3130 

60063 

1 

54167 

, 

4CO00 

n 

13010 

1 

000C4 

0 

44755 

'1 

54131 

0 

56  167 

1 

01,3110 

750. )4 

1 

540<il 

1 

45  164 

0 

6000  1 

0 

0000  6 

1 

63121 

0 

lOOCl 

1 

5C000 

1 

01,3120 

5400C 

r. 

1 

C3172 

c 

05675 

0 

13125 

0 

1)2  17 

1 

03172 

c 

C 5 6 7 5 

c 

01  ,3130 

13131 

0 

1 12  3 3 

1 

-3172 

c 

C:  676  1C 

1 

13135 

1 

10247 

1 

03172 

0 

05675 

0 

Ol.TlAf  1?1AI  1 11263  1 03172  0 05675  0 131A5  0 102T7  1 03172  C C5675  C 


01,3150 

1315! 

n 

1)3  13 

1 

031  72 

0 

0 5 6 7 5 

0 

13155 

1 

10131 

"1 

U5675 

0 

C 5 6 7 5 

C 

01  ,3  160. 

13162 

0 

132-7 

, . 

10  13'J 

1 

13165 

1 

1276  5 

0 

5GCC0 

1 

27  77  7 

0 

63  133 

0 

01,3170 

54067 

i 

127C5 

0! 

54132 

0 

60  131 

1 

loorto 

U 

40132 

0 

132C  2 

c 

132CC 

1 

•0  1,32  T'l 

5.)-;n? 

0 

O')002 

n 

54131 

t 

CC006 

1 

22130 

0 

50  1 3.1 

0 

00002 

0 

44  75  5 

C 

01,3210 

54067 

1 

')0>o0  3 

1 

44752 

1 

00006 

1 

0301  1 

1 

inC67 

1 

13C  12 

c. 

34752 

Q 

0 1,  32  20 

13226 

( ' 

3136  1 

1 

54CC1 

1 

33225 

1 

15166 

1 

C:  66102 

1 

00006 

1 

C5C  11 

1 

01 ,3230 

52  165 

1 

1516  5 

1 

54062 

1 

30002 

0 

QOOC6 

1 

63524 

1 

40026 

1 

64744 

1 

0 1 , 32 

10000 

661  12 

0 

4'700.J 

u 

63371 

1 

600  C 2 

0 

10001 

0 

614CC 

1 

13311 

C 

01,3250 

13251 

f* 

0 

4;)i}Q2 

1 

64  736 

1 

64736 

1 

56026 

0 

64735 

1 

600C2 

0 

00006 

1 

0 1 , ■’2  6 C 

22007 

574m 

1 

57  401 

0 

5 7 4 C 2 

0 

5 74C3 

1 

5 74  C 4 

0 

5 74  C 5 

1 

57406 

1 

01,3270 

57407 

0 

3 006  3 

1 

50CC2 

0 

13274 

1 

5341  1 

0 

534  13 

1 

534  15 

1 

5341  7 

c 

01 ,3300 

5342  1 

53423 

1 

53425 

1 

53427 

e 

5343  1 

1 

6 5236 

0 

00006 

1 

152  15 

0 

01,33in 

13364 

1 

lOL'O'O 

0 

614U1 

( , 

13317 

0 

64753 

1 . 

C33  75 

c 

C : 

OOOC  1 

Q 

lOCOO 

0 

0 1, 3320 

6 14  )2 

13325 

1 

64753 

1 

0 33  75 

0 

C: 

10002 

0 

inooo 

•) 

614C3 

1 

1 3 3 2 3 

c 

01  ,3330 

64  75  3 

1 

03375 

0 

C:  10003 

1 

10000 

0 

6 1 4C4 

C 

13341 

n 

64  7 53 

1 

03375 

0 

0 1, 334C 

C : 

00CO4 

10'  ' 0 

0 

6 1405 

1 

13347 

0 

64753 

1 

03375 

0 

C : 

000C5 

1 

ICCCC 

c 

01 ,3350 

61406 

1 

133  55 

if 

64753 

1 

033  7 5 

0 

C : 

000  C 6 

1 

1 'OOI 

61407 

Q 

13  363 

0 

01,3360 

64753 

] 

03375 

0 

0;  00007 

0 

ICOCC 

0 

0 3 3 7 2 

1 

1 33  66 

e 

64753 

1 

03275 

0 

01,3370 

C: 

COO  10 

n 

c:  402 n 

c 

52062 

1 

C5706 

c 

C ; 

31203 

1 

5 4G64 

1 

50CC2 

C 

20CCC 

1 
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OCTAL  LISTING  FOP  PARAC-RAPF  M 127,  WITH  PARJ^v  BIT  IN  BINARY  AT  THE  RIGHT  CF  EACH  WCRC,  "2"  CENCTFS  UNUSED  FIXED  MEMORY 


ALL  VALID 

kOPDS  ARE 

BASIC 

INSTRUCTITN'S 

EXCEPT  THESE 

MARKED 

( INTERPRETIVE 

OPERATOR 

WORD  S 

) CR 

"C 

" (CCNSTANTS) 

01,3A00 

5A0O2 

1 

3A753 

1 

6CC6A 

0 

50C02 

0 

27377 

1 

40064 

1 

50002 

0 

1 3 26  1 

C 

01  ,BA10 

00006 

1 

OA'IO  7 

I 

5A016 

1 

00006 

1 

22C  1 2 

1 

34734 

0 

57407 

0 

57406 

1 

0 1, 3A2C 

57A05 

1 

5 7A  A 

C 

57A03 

1 

57A02 

0 

5740  1 

0 

5 7400 

1 

64733 

1 

26C26 

1 

01 ,3A20 

5A332 

1 

AA755 

r 

5A332 

1 

00006 

1 

45237 

0 

53431 

1 

53427 

0 

53425 

1 

01 , BAAC 

53A23 

1 

53A2  1 

0 

53A  17 

0 

534  1 5 

1 

534  1 3 

1 

5 3 4 1 1 

c 

56CC1 

c 

0CC06 

1 

01, 3A5C 

01C07 

1 

560C1 

r 

52006 

0 

234  3 5 

1 

34752 

0 

2600  2 

1 

55434 

1 

3 1152 

0 

01  ,3A60 

100)0 

0 

13A67 

1 ■ 

13A6A 

r 

13522 

0 

31153 

1 

C0CC6 

1 

63522 

1 

00C06 

1 

01 ,3A7C 

A2501 

1 

21153 

0 

11153 

0 

13512 

0 

13475 

0 

1 34  7 6 

0 

11152 

1 

13512 

c 

01,3500 

C : 

OOOOO 

1 

C:  20CC0 

n 

3A  736 

1 

271^3 

0 

052C3 

0 

C : 

U35  17 

1* 

C; 

02063 

0 

33  52  1 

1 

01  ,3  5 10 

53A35 

0 

52006 

0 

3A736 

1 

C5203 

r 

C: 

03467 

1 

C : 

C2C63 

0 

13507 

1 

53147 

0 

0 1, 3520 

52006 

0 

C : 05261 

1 

53435 

0 

13525 

1 

52062 

1 

057  16 

1 

C : 

212C4 

1 

3C161 

1 

01 , 3530 

60000 

1 

5A  1 5 5 

1 

3 3 7 7 1 

c 

541  57 

0 

33566 

1 

54707 

3 

30154 

1 

75007 

1 

01 ,35AC 

100  )0 

0 

13552 

1 

1015A 

i) 

10000 

0 

13652 

1 

3 50  24 

1 

C51  C5 

c 

C : 

03040 

0 

01,3550 

C : 

20  10  3 

1 

03  566 

1 

750C7 

1 

10000 

0 

13623 

1 

000C6 

1 

50155 

0 

31^37 

c 

01 ,3560 

52706 

1 

30  1 5A 

1 

74757 

1 

6 77  5 1 

c 

lOOCC 

0 

13735 

1 

04631 

1 

1 357  1 

0 

01,357C 

13636 

c 

33775 

1 

54704 

0 

50  15  5 

0 

3 1053 

0 

ICCCO 

c 

240CC 

1 

13602 

1 

01 , 3600 

15A36 

1 

13621 

0 

AOOOO 

0 

5A001 

1 

50155 

0 

410  52 

0 

0000  6 

1 

60C25 

c 

01,3610 

10000 

0 

A 100" 

0 

6773A 

r 

6A753 

1 

6ncr  1 

c 

ICCCO 

c 

34  755 

1 

13621 

0 

01, 362C 

1 3621 

0 

6A7  53 

1 

007C4 

1 

33566 

1 

54157 

0 

33772 

0 

54707 

c 

30154 

1 

01,7630 

76077 

n 

5 A 1 5 A 

0 

C00C6 

1 

5C1  55 

f 

3 14  37 

0 

527C6 

1 

50155 

0 

3 1053 

0 

01 ,36AC 

5A70A 

(< 

00006 

1 

63646 

0 

3377A 

0 

567C4 

1 

C07C4 

1 

33776 

1 

5 6 70  4 

1 

01,3650 

AOOOO 

0 

Or.7CA 

1 

5AC2C 

1 

1002C 

1 

13655 

0 

13753 

1 

33566 

1 

5 4 7 C 7 

c 

01 ,3660 

31 15A 

1 

5 AO  21 

0 

60021 

1 

50155 

0 

62Cr  2 

0 

54156 

1 

00006 

1 

50  156 

0 

01, 367 C 

3 2032 

1 

227C6 

c 

nooo 

0 

2A000 

1 . 

13747 

1 

24000 

1 

547C5 

1 

3 3 77  5 

1 

01,3700 

54  7'l  A 

0 

30  706 

7A  7A2 

0 

lOOCC 

c 

13742 

1 

50156 

0 

32000 

0 

15  4 4 5 

c 

01,3710 

53153 

0 

00036 

1 

40025 

1 

21153 

u 

0000  6 

1 

31151 

c 

21153 

0 

11152 

1 

01, 372D 

13730 

1 

13  72  3 

c 

13616 

1 

11153 

0 

13730 

1 

13726 

c 

136  16 

1 

1 3 6 2 1 

c 

01  ,3731, 

33773 

1 

5A70A 

0 

00006 

1 

31153 

1 

C07C4 

1 

33775 

1 

54704 

0 

50155 

0 

01,37AC 

A 1053 

1 

15AA5 

0 

40  706 

1 

5A706 

1 

50  156 

0 

32CG0 

c 

13575 

1 

5 6 7 C5 

c 

01,3750 

50156 

0 

32000 

0 

136AC 

1 

30157 

1 

547G7 

0 

50155 

rj 

3200  2 

1 

60  154 

1 

01,37  60 

601 5A 

1 

60  15A 

1 

54  156 

1 

13666 

c 

362  5C 

c 

26  156 

1 

33566 

1 

54707 

0 

01, 3770 

1 3666 

0 

G:  C376A 

1 

C:  03542 

1 

C:  L5277 

0 

C: 

05105 

'1 

C: 

05203 

0 

C: 

05072 

1 

CK  SM 

6C4C0 

0 
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1S;Q9  AUG.  11  ,1S6S 


PAGE  15S7 


OCTAL  LISTING 

FCR  PARAGRAPI- 

# '140, 

N ITH 

PARITY  1 

3IT 

I N 

BINARY 

AT 

THE 

RIGHT  GF 

EACH 

HCRC,  " 

a" 

CENCTES  UNUSED 

F I X EC  MEPCRV 

ALL  VALID 

NCRCS  ARE 

PAS  IC 

INSTRllCTTCAS 

EXCEPT  those 

P.6RKEC  "I" 

( INTFRPRETIVT 

OPFRATCR  HCRO 

$) 

CP  "C 

" (CCNSTANTS) 

OA,20CC 

C 

; C03U2 

0 

r : 

: 177‘^S 

C 

C 

: C0C65 

1 

C 

: 01265 

1 

G 

: 22437 

1 

c 

: 16067 

1 

C : 

15625 

1 

C : 

2 1C  *2 

1 

riA  ,2'iin 

r 

: 30276 

1 

r : 

; OA773 

c 

: 250CA 

1 

C 

: C67C2 

1 

C 

: 16471 

1 

c 

: C1352 

1 

C : 

21412 

0 

C: 

20500 

C 

OA ,2’2C 

r 

: 25*77 

1 

r ; 

; C3367 

0 

c 

: 27533 

1 

C 

; 07571 

0 

05516 

C 

c 

: CC311 

1 

055  16 

C 

C : 

CC214 

1 

04,2^'30 

05A76 

1 

32037 

1 

04616 

1 

C 

: 20  47  7 

1 

12031 

0 

12031 

0 

12031 

0 

C: 

11343 

C 

0A,2OA0 

54774 

1 

34355 

0 

5A366 

0 

312  7 7 

1 

7A7A6 

1 

lOCCO 

r 

12065 

1 

40774 

1 

DA, 20£C 

62A01 

0 

0000  6 

1 

I237A 

1 

6A753 

1 

0000  6 

1 

123  73 

0 

307  7 4 

c 

CCCC6 

1 

04,20  6'! 

12117 

1 

AOU7  6 

1 

7 47  53 

c 

lC=iCC 

c 

12072 

1 

05567 

0 

C: 

01520 

1 

04457 

0 

GA  ,2'J7C 

04635 

0 

C ; 

; 21051 

0 

32466 

1 

54  1 55 

1 

50155 

0 

3 2 4 3 5 

1 

76C77 

c 

40COO 

c 

04,2100 

6077A 

(i 

locnio 

0 

1 C 1 55 

1 

12073 

0 

1232A 

1 

30155 

0 

5477  3 

0 

40  1C3 

1 

04,2110 

74746 

1 

lOOT.'l 

0 

12  132 

I 

0551  6 

c 

C 

: 00162 

0 

15155 

1 

40074 

0 

74745 

1 

OA, 2120 

lOCOO 

0 

12123 

1 

12  130 

0 

A007A 

0 

74743 

1 

10000 

0 

3237C 

1 

6 4 7 4 7 

1 

04,21 30 

62371 

0 

05357 

c 

3 A 7 5 5 

1 

OOOC6 

1 

Olor  7 

1 

32367 

1 

54  3 74 

0 

0 5 3 5 3 

1 

0 A , 2 1 A C 

c 

: 000 14 

1 

060*2 

1 

T 

I 7 7 6 2 A 

1 

c 

: 27  A 1 2 

c 

I 

; 77776 

1 

0 5 5 1 6 

c 

C : 

G0124 

c 

05  516 

c 

0A,21EC 

r 

: 00055 

1 

34735 

1 

5A1C7 

0 

C5516 

0 

c 

: 00063 

1 

055  16 

c 

C: 

00056 

1 

C5516 

c 

OA,216G 

c 

: 00141 

r\ 

05516 

c 

c 

: 00311 

1 

1G7  7A 

1 

123  12 

1 

04457 

0 

35017 

1 

55055 

1 

OA ,21 7C 

060  1 1 

1 

A4753 

c 

70076 

1 

54076 

1 

347  56 

1 

54GC1 

1 

400  CO 

c 

5 2 7 5 4 

c 

04,2200 

42^72 

1 

70C7A 

c 

5AC7A 

0 

24  7 5 5 

1 

54333 

0 

55321 

1 

04674 

0 

C : 

7 5 5 6 1 

1 

04,22  1.0 

0467A 

0 

C: 

AO  20  5 

1 

AA775 

1 

5 507  1 

1 

7007  5 

1 

54C75 

1 

04674 

0 

C: 

12650 

1 

OA, 222C 

1077A 

1 

12230 

0 

UA67A 

0 

c 

: 126A5 

(1 

30774 

0 

5 50  10 

n 

04635 

0 

C : 

12  7 66 

c 

0A,2230 

4101 0 

0 

6233U 

fi 

00006 

1 

1 22  52 

1 

40774 

1 

6233') 

0 

00006 

1 

12  252 

1 

0A,22AC 

67751 

0 

non '>6 

1 

1226A 

1 

64756 

1 

00006 

1 

12264 

1 

32326 

1 

7CC74 

0 

0A,2250 

1 >0  )'i 

0 

I226L 

1 

A2372 

1 

7C07A 

0 

54074 

J 

060  11 

1 

U00C6 

1 

3 4 7 5 5 

1 

04,2260 

52754 

■*, 

32366 

0 

5 A 3 7 A 

0 

1 2226 

1 

41CK 

c 

6 6 G C 7 

0 

00006 

1 

12  2 5 6 

G 

0A,227C 

6A756 

1 

OOOC6 

1 

12256 

0 

32326 

1 

70074 

c 

60  7 74 

c 

4000C 

c 

6 2 33  1 

1 

04,?3C0 

00006 

1 

12  306 

1 

62  327 

0 

00006 

1 

123L6 

1 

12256 

0 

40075 

1 

74  775 

1 

04, 231C 

26075 

1 

12222 

0 

32  326 

1 

7CG7A 

c 

lOCCC 

0 

1 23  20 

0 

05516 

c 

C : 

00C07 

0 

OA,  2 3 2G, 

50773 

1 

22467 

Q 

OOOOA 

,l 

122  0 A 

1 

043  64 

1 

12067 

0 

C: 

C05CC 

1 

C : 

CC3C5 

1 

04,2S30 

r 

: 00076 

*, 

r : 

ni2A 

0 

OOOOA 

50773 

1 

3243  5 

1 

55057 

0 

54020 

1 

30C20 

c 

OA  ,23AC 

77730 

() 

55061 

0 

5A063 

;i 

310  57 

1 

OOOC6 

1 

7 4 7*4 

0 

74757 

1 

5 40  Cl 

1 

0A,  23  5'l 

50773 

1 

32A0A 

c 

55C6C 

1 

74350 

1 

260C1 

1 

3 1060 

,) 

750  12 

c 

6 4 7 4 1 

1 

04  ,2360 

1 5116 

1 

31057 

1 

76')77 

0 

053  14 

1 

C4457 

0 

05155 

0 

C : 

10335 

0 

C : 

10144 

1 

OA, 237C 

r 

: 37667 

1 

C : 

AOT  72 

0 

c 

: 00700 

0 

36  2 50 

0 

54702 

1 

00006 

1 

324C3 

1 

6Cf  02 

c 
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OCTAL  LISTING  FOR  PARAGRAPh  « 141,  WITH  PARITY  BIT  IN  BINARY  AT  THE  RIGHT  CF  EACH  hCRC,  "S"  CENCT'^S  UNUSFD  FIXEC  HEMORY 


ALL  VALID 

kORCS  ARE 

eASK 

INSTRIICTICN'S 

EXCEPT  THOSE 

marked  "I" 

( interpretive 

operaicp 

NCPOS)  CP 

"C 

" (CCNSIANTS) 

04,2400 

52C06 

0 

C : 

C01G6 

0 

C : 

0206  ( 

1 

L : 

4206  ! 

C : 

2620  ! 

U 

L : 

1264  1 

1 

C : 

72457 

1 

c ; 

7 2 225 

1 

04,2410 

r ; 

72136 

1 

C: 

71271 

.'i 

C: 

6 4 7 7 7 

1 

C; 

332  77 

c 

C : 

3 20  50 

0 

C : 

31421 

1 

C: 

75442 

1 

C : 

754  14 

1 

04,2420 

r.  : 

75276 

0 

C : 

75153 

1 

C: 

72635 

1 

C : 

72455 

0 

C : 

72223 

1 

C : 

7 2C34 

0 

C : 

72CCC 

1 

C : 

50400 

0 

04, 2430 

C : 

50000 
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1 
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0 
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1 
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1 
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0 
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0 

l: 
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1 
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1 
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1 
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0 
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0 

C: 
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0 
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0 
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c 

C : 
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n 
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1 
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1 

C6CC1 

0 
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c 
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n 
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0 
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1 
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1 
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1 
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c 
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1 
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1 
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I 
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{ 
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0 
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1 
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1 
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1 
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c 
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0 

3 3 7 76 

c 

C66  16 

1 

C : 

20677 

1 

16,376C 

0600  1 

0 

1376  2 

r 

13735 

1 

CO0C6 

1 

31365 

1 

51120 

1 

52C  1 1 

c 

06C62 

1 

16,3750 

I : 

776  2 6 

1 

C : 

1)5  20 

1 

I : 

65026 

1 

C : 

215  7 6 

1 

C : 

32672 

1 

T : 

53521 

1 

C : 

01  736 

0 

C : 

03773 

1 

1 6,376C 

I : 

77776 

1 

C6616 

i 

C : 

54123 

o 

37767 

1 

70726 

c 

C0CC6 

1 

137C  1 

0 

C6C62 

1 

16,3770 

I : 

77650 

1 

C ; 

C366E 

1 

C : 

C5253 

c 

C : 

00  SO  6 

1 

C : 

01527 

1 

C : 

03775 

1 

C : 

03776 

1 

CK  SM 

56A37 

c 
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OCTAL  LISTING  FCP  PARAGRAFF  h IjA,  WITH  PARITY  BIT  IN  BINARY  AT  THE  RIGHT  CF  FACH  NCFC,  "3"  CENCTES  UNLSEC  FIXEC  NENCFY 


ALL  VALID 

FORDS  APE 

BASIC. 

INSTRUCTICNS 

EXCEPT  Ti-CSE 

NARK  EC  "I" 

(INTERPRETIVE 

OPERATOR 

FCPD 

S 1 

CR  "C 

" (CCNSTANTS) 

IS.POCO 

I : 

77773 

1 

C: 

OOCO  1 

0 

C: 

0C766 

L 

I : 

47133 

C 

C: 

■J')7)02 

Cl 

C : 

215  7 7 

1 

C; 

0003  1 

0 

I : 

7 7 6 54 

C 

15,2C1C 

C : 

16171 

1 

I : 

71406 

') 

I : 

73525 

1 

I: 

6 536  1 

C 

r : 

C0C23 

0 

I; 

5 2 3 6 1 

1 

C : 

0CC15 

C 

I : 

47256 

C 

15, 20ZC 

C : 

03765 

0 

I ; 

41456 

r 

I : 

47133 

0 

C : 

G'I004 

0 

C : 

21577 

1 

C: 

COC  33 

1 

I : 

4322  5 

C 

C : 

CCf  31 

c 

15,2030 

C : 

320A7 

0 

T : 

77605 

1 

r ; 

324  66 

1 

C : 

CC033 

1 

I : 

743  56 

1 

I : 

65372 

1 

C : 

000  3 3 

1 

I : 

74346 

c 

1 5,2C AC 

C : 

03765 

0 

I : 

53372 

1 

I : 

45056 

0 

C : 

4 7666 

1 

C: 

3 40  3 1 

1 

C : 

16276 

C 

C : 

37777 

1 

C : 

3 7 7 7 5 

c 

15,2050 

0A6  16 

1 

r : 

11236 

r 

34  750 

1 

771076 

1 

lUOCC 

0 

020  60 

0 

36250 

C 

C2C6  1 

1 

1 5,2060 

34753 

1 

55144 

1 

34  7 53 

1 

C46  16 

1 

C: 

20  7 1 A 

1 

C6CC1 

0 

12073 

r 

02C62 

1 

15,207C 

0 5 3 5 3 

1 

C : 

C0C14 

1 

05  155 

0 

31144 

1 

76250 

1 

50000 

1 

C2C77 

c 

12  1C5 

c 

15,21C0 

12153 

Cl 

12111 

1 

06042 

1 

I : 

776  5C 

1 

C : 

32164 

0 

00006 

1 

31401 

0 

12  112 

0 

15 ,21  1 C 

00006 

1 

34755 

1 

53045 

0 

32170 

0 

046  16 

1 

C : 

2C477 

1 

C6CC1 

c 

02  121 

1 

15,2) 2C 

02  113 

0 

53045 

C 

C3006 

1 

62125 

0 

12127 

0 

CC006 

1 

30C25 

0 

5377  5 

1 

15 ,2) 3U 

31144 

1 

74752 

1 

ncco 

c 

02137 

c 

C6C42 

1 

I : 

77650 

1 

C : 

32220 

0 

06C42 

1 

15,21AC 

T : 

45145 

0 

C : 

C2775 

C 

r ; 

31651 

1 

I : 

77624 

1 

C: 

3162C 

1 

I: 

77776 

1 

35C  1C 

c 

C4616 

1 

15,2150 

C: 

2'i477 

1 

060C  1 

0 

12  17  1 

0 

C6042 

1 

I : 

77650 

1 

C : 

32143 

0 

060  4 2 

1 

1 : 

77624 

1 

15,216C 

C : 

31321 

0 

I : 

43014 

0 

C: 

0 1462 

0 

C: 

C 1 2 7 3 

c 

I : 

776  24 

1 

C : 

3 KC  7 

1 

I : 

77776 

1 

06CC1 

0 

15, 2 1 7C 

C: 

01442 

1 

322  17 

1 

C46  16 

1 

c ; 

20624 

0 

16  00  1 

1 

12156 

0 

0604  2 

1 

I : 

6 4 3 75 

1 

15,2200 

r : 

n3607 

0 

C: 

01734 

0 

I : 

77  6 5 6 

1 

C : 

2666  5 

c 

C : 

0 3 6 15 

c 

I : 

53521 

1 

C : 

01734 

0 

C : 

26673 

1 

15,22ir 

C : 

03623 

0 

I : 

53521 

1 

C: 

31734 

0 

C : 

36701 

1 

C: 

31156 

1 

I : 

7 7 6 5C 

1 

C : 

32166 

1 

C : 

one  13 

0 

15,2220 

I : 

43C14 

0 

C : 

01463 

1 

C : 

CC662 

c 

I : 

77201 

1 

C : 

inoo  1 

J 

C: 

02023 

1 

I : 

41525 

c 

C: 

02775 

c 

15,2230 

C : 

364  11 

1 

C: 

55716 

1 

I : 

77742 

0 

C : 

16032 

1 

C : 

C27  7 5 

c 

I ; 

77624 

1 

C : 

30440 

1 

I : 

53575 

c 

1 5, 22AG 

C : 

0 2032 

1 

C : 

3 76C7 

1 

C : 

10775 

t • 

I : 

77650 

1 

C: 

32143 

0 

40077 

0 

7473  7 

1 

ICCCC 

c 

15,2250 

12455 

n 

32463 

1 

046  16 

1 

C : 

2C477 

1 

060C1 

0 

12257 

1 

1224  5 

1 

47747 

c 

1 5 ,22  6f 

70734 

0 

0000  6 

1 

76245 

0 

56CC  1 

0 

517  5 7 

0 

C C c c 

c 

5C12C 

1 

54046 

1 

15,2270 

0000  6 

1 

124  = 5 

0 

4C0C0 

0 

62557 

1 

00006 

1 

624  55 

1 

06C42 

1 

I : 

643  73 

1 

15,2300 

r : 

371347 

1 

C: 

11734 

c 

I : 

45056 

c 

C: 

476  5C 

1 

C : 

C27  3 1 

c 

I ; 

7 77  76 

1 

34753 

1 

5 5 24  1 

0 

15,P31C 

3 57  1 6 

c 

54CC3 

0 

51241 

1 

31403 

1 

5400  1 

1 

35C  14 

1 

54CC  3 

0 

34737 

c 

15,2320 

5600  1 

0 

5 5 74  5 

1 

50  120 

1 

5201  1 

t 

06042 

1 

I : 

77624 

1 

C : 

10520 

1 

1 : 

50  3 7 5 

c 

15,2330 

C : 

02  731 

0 

C: 

03765 

0 

I : 

65552 

C 

D : 

C003  1 

r 

I : 

51C25 

1 

C : 

32466 

1 

C : 

3242C 

c 

I: 

45345 

1 

15,23AC 

C : 

00031 

(1 

C ; 

324  7-:' 

0 

I : 

71240 

1 

C: 

32413 

0 

C : 

007)3  1 

u 

l: 

42405 

0 

C : 

13762 

c 

C : 

24C31 

c 

1 5 , 23  5P 

C : 

03765 

0 

I : 

534  3 5 

0 

r : 

24005 

1 

1 : 

4 72L6 

r 

C : 

03  76  5 

0 

I : 

7 76  76 

c 

1 : 

63256 

c 

C : 

0 3 7 6 5 

c 

1 5,236C 

1 : 

53435 

(J 

C : 

02  73  1 

0 

I : 

50206 

c 

C: 

000  0 1 

0 

I : 

65552 

0 

C : 

24C  33 

1 

I : 

77641 

1 

1 : 

71244 

0 

15,2370 

C : 

32375 

1 

C : 

327  47 

c 

I : 

77625 

c 

C : 

00033 

1 

C : 

0003  3 

1 

1: 

70535 

c 

C : 

02746 

0 

I : 

41415 

1 
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nCTAI  LISTING  FOR  PARAGPAFF  # WITH  PARITY  BIT  IN  BINARY  AT  THE  RIGHT  CF  EACH  WCPC,  CENCIES  CNL.SED  FIXEC  NENCFY 


ALL  VALID 

VOROS  ARE 

BASIC 

INSTRUCTICNS 

EXCEPT  TFCSE 

YARKEC  "I" 

( I NTERFRET IV  F 

OPERATOR 

WCPDE 

) CR 

"C 

" (C.CNS 

TANTS  ) 

15,2AC0 

C: 

000  3 2 

1 

I : 

77634 

C 

C : 

21615 

C 

C : 

15236 

1 

C : 

00031 

0 

1 : 

776  15 

0 

I : 

77634 

0 

C : 

21615 

0 

1 5, 2A  Il- 

C  : 

1124  ' 

0 

l: 

77776 

1 

12437 

1 

I : 

77776 

1 

3475  5 

1 

55235 

0 

55237 

1 

12437 

1 

ls,  2R2C 

I : 

77776 

1 

25241 

1 

41241 

n 

64757 

0 

Ti:i00  6 

1 

624  27 

1 

123  1C 

r 

C 5 5 6 7 

c 

15,2430 

C: 

IT  40  4 

1 

2 50 '6 

1 

G46  16 

1 

C : 

204  7 7 

1 

16(701 

1 

12455 

0 

12245 

1 

32464 

0 

15,244C 

04616 

1 

C : 

2:i477 

1 

16001 

1 

12445 

1 

12245 

1 

34  7 5 7 

c 

7124  1 

C 

00C06 

1 

15,2450 

74745 

1 

47747 

c 

70734 

C 

60001 

n 

54734 

0 

04616 

1 

C: 

160C0 

0 

C46  1 6 

1 

15,2464 

C ; 

177  14 

1 

0571  1 

1 

13037 

1 

C : 

C0306 

1 

C : 

C 1 5 1 7 

G 

C : 

02525 

1 

C : 

12525 

0 

c; 

00026 

0 

15,247C 

r : 

30  131 

1 

G : 

12525 

c 

C : 

03562 

0 

I ; 

77420 

1 

C: 

02736 

1 

47747 

c 

707  34 

c 

CCCC6 

1 

15 , 2 5 00 

76245 

n 

560,"  1 

51757 

r 

C C c c 

r 

ICOCIC 

0 

12521 

1 

32560 

c 

046  16 

1 

15,2510 

C : 

20477 

1 

02  5' >6 

>25  14 

0 

C2  5C  6 

c 

0604  2 

1 

I : 

^^575 

c 

C : 

027C7 

c 

I : 

77650 

1 

15,2520 

C: 

02736 

1 

40000 

G 

62  5 57 

1 

00006 

1 

62535 

0 

51757 

c 

31755 

1 

5C  12c 

1 

15,2530 

54046 

1 

76<i4  2 

1 

1 : 

52  173 

C : 

30347 

1 

C : 

027  3 6 

1 

C6C42 

1 

I : 

45145 

0 

C: 

03562 

0 

1 5 ,2  54C 

C ; 

30  500 

1 

I : 

77340 

0 

C : 

02757 

0 

C ; 

02707 

c 

C: 

240C,  1 

0 

C: 

C2715 

c 

C : 

267C7 

C 

C : 

COCCI 

c 

15,2550 

r : 

0 2 715 

0 

I : 

70143 

M 

C : 

02  7 56 

1 

C : 

00154 

1 

T : 

52173 

0 

C : 

02343 

1 

C : 

L2736 

1 

C : 

00343 

c 

1 5 ,2560 

r : 

0 1 530 

0 

32762 

0 

54321 

0 

400CC 

c 

54322 

0 

32  7 63 

1 

54323 

1 

06C42 

1 

15,2570 

I : 

45014 

a 

C ; 

C166  2 

1 

C : 

32666 

0 

I : 

663  70 

0 

C : 

000  2 2 

1 

C : 

000  31 

Q 

C: 

OOOC6 

1 

I : 

77  744 

c 

15,2600 

r : 

T'VT5T 

1 

I : 

45173 

C : 

54C00 

f 

C : 

47675 

c 

C : 

06  70  7 

1 

I : 

77775 

1 

C : 

'(2731 

0 

I: 

73744 

1 

15,261C 

C : 

0OLI47 

1 

C : 

75041 

1 

I : 

71152 

1 

C: 

00047 

1 

I : 

63047 

1 

C : 

540C0 

0 

C : 

CGCC2 

c 

C : 

06665 

1 

15,2620 

I : 

451T' 

I 

C : 

326G  1 

1 

C : 

47255 

1 

I : 

74575 

c 

C : 

027  15 

0 

C: 

36723 

1 

C: 

32666 

c 

I : 

74  57  5 

c 

1 5,2630 

C : 

'2715 

I : 

534  5 5 

C: 

02723 

0 

C : 

C276  1 

c 

I : 

7764  1 

1 

C : 

02231 

Q 

I : 

65552 

0 

C : 

0 10  4 5 

1 

1 5 , 2 6 ^ C 

I : 

77776 

1 

05  516 

r 

C : 

;iooi4 

1 

32761 

0 

04616 

1 

r : 

20477 

1 

06GC  1 

c 

1 26  52 

c 

15,2650 

0 5 5 14 

n 

C : 

G Tfi  14 

1 

0 5 2 5 3 

1 

C : 

C4024 

c 

16  742 

1 

I : 

77775 

1 

C: 

C'27  6 1 

0 

C; 

0223  1 

c 

15,2660 

I : 

77776 

1 

34751 

0 

70074 

0 

lOOCC 

r 

1256  1 

c 

1 3 5 3 6 

r 

I : 

7722C 

1 

C : 

02745 

0 

15,267c 

r : 

24007 

0 

C : 

027^.7 

r\ 

1 : 

777  76 

1 

05353 

1 

C : 

040  2 4 

0 

06042 

1 

I ; 

77624 

1 

C : 

3 1557 

1 

1 5 ,2704 

r : 

77776 

1 

32760 

1 

557  36 

c 

3 7 7 2 1 

1 

55074 

1 

04616 

1 

C: 

15707 

0 

0 5 3 5 3 

1 

15,2710 

C ; 

04024 

n 

046-16 

1 

C : 

77541 

1 

0604  2 

1 

I : 

77776 

1 

3 50C0 

1 

05  173 

1 

C : 

0 2 7 21 

1 

15,2720 

0 515  5 

(1 

C46  74 

c 

r ; 

77541 

1 

35C2  3 

0 

•351  L 5 

3 

C : 

0273  > 

1 

C : 

32065 

c 

0 5 26  1 

1 

15,2730 

T4616 

1 

C : 

15271 

1 

25736 

1 

C6042 

1 

T : 

533  7 5 

0 

C ; 

00325 

0 

C : 

02707 

0 

C : 

02707 

0 

15,2740 

T ; 

50135 

0 

C : 

02737 

c 

G : 

32714 

1 

I : 

53575 

0 

C: 

02707 

0 

C: 

3 6 7 3 1 

1 

C : 

4754  1 

1 

1 ; 

1 7 6 24 

1 

15,2750 

C: 

476  73 

0 

C.: 

12715 

0 

I : 

7 7 776 

1 

C5353 

1 

C : 

04'-'24 

0 

06042 

1 

I ; 

77650 

1 

C: 

02745 

0 

15,2760 

C : 

77753 

n 

C : 

01  40  4 

C: 

07357 

1 

C: 

06211 

0 

T : 

7122C 

1 

C: 

C2745 

0 

C: 

90322 

1 

I : 

65325 

0 

15,2770 

r • 

00324 

1 

C : 

CT323 

c 

I : 

77666 

1 

C : 

24766 

0 

C: 

24705 

1 

I : 

776  24 

1 

C: 

47666 

1 

C : 

26  707 

c 
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OCTAL  listing  EHR  PARAGRAPE  « IcE,  WITH  PARITV  BIT  IN  BINARY  AT  THE  RIGHT  CF  EACH  WCPC,  "3”  CENCTES  UNUSEC  FIXEC  MEMORY 


ALL  valid 

WORD' 

; ARE 

BA  SIC 

INSTRUCT  TENS 

EXCEPT  THOSE 

MARKEC  " I" 

( INTERPRETIVE 

OPERAIOP 

WORDS) 

CR  "C 

•'  (CON 

S7AMS  ) 

15,30C0 

C : 

2A0O3 

1 

I : 

77626 

1 

r ; 

6 7 6 7 5 

0 

C : 

367  15 

1 

f : 

6756  1 

1 

l: 

7 76  26 

1 

r ; 

200  30 

C 

l: 

7 7 7 7 5 

1 

15  ,3010 

r : 

0266  5 

0 

C: 

26007 

0 

C: 

02673 

1 

C : 

360  1 5 

1 

r ; 

67663 

1 

1 : 

77626 

1 

C : 

67251 

1 

I : 

77776 

1 

15, 3C2C 

33027 

1 

06616 

1 

C : 

17315 

0 

C6616 

1 

C: 

177  10 

1 

057C1 

1 

127  5 5 

C 

C ; 

C 273  7 

C 

15,30  30 

36755 

1 

13033 

0 

36  7 5 3 

1 

55757 

1 

05353 

1 

C : 

06026 

n 

12265 

1 

31757 

c 

1 5 ,3CAC 

00006 

1 

1 3f  5 2 

I 

153  53 

1 

C: 

C6026 

! ) 

06062 

1 

I : 

5 5 155 

c 

C : 

C3562 

c 

C : 

32672 

1 

1 5, ’05C 

C : 

37255 

1 

C : 

3306  6 

r 

06062 

1 

I : 

77775 

1 

C : 

02715 

0 

C: 

0 2 7 6 1 

0 

I : 

65165 

f 

C : 

0356  2 

r 

1 5 ,3C60 

C : 

32672 

1 

C: 

03267 

n 

T ; 

7 7 7 7 6 

1 

13032 

1 

I : 

77  13  1 

1 

C : 

C0C52 

c 

C : 

00006 

1 

C: 

00C16 

1 

15,3C7C 

1 : 

66373 

1 

C : 

76516 

1 

C : 

H607 

0 

I : 

77656 

1 

G: 

12723 

1 

T : 

7 7 7 7 3 

1 

C : 

75CC2 

1 

C : 

1CC22 

1 

15,3100 

I : 

63106 

0 

C: 

3 3010 

C 

C : 

C63  15 

1 

C : 

33111 

0 

I : 

77626 

1 

C : 

3125  1 

1 

I : 

776  16 

1 

C : 

CC356 

C 

15,31  10 

C: 

33171 

0 

I : 

77626 

1 

C : 

67663 

1 

I : 

7 7 6 2 6 

1 

C : 

6725  1 

1 

T : 

7 7 776 

1 

36752 

c 

70106 

0 

15, 31 2f 

ICOOG 

0 

13130 

1 

33276 

1 

06616 

1 

r ; 

20677 

1 

06CC  1 

0 

13  13C 

1 

13172 

1 

15,3130 

7606? 

1 

I : 

60  175 

0 

r : 

C 2760 

C 

G : 

33136 

1 

C : 

0275C 

1 

I : 

60161 

1 

C: 

30602 

0 

C: 

33237 

1 

15,31Af 

1 ; 

52131 

0 

C : 

02766 

0 

C: 

33166 

o 

C: 

330  17 

1 

I : 

77776 

1 

0 5 3 5 3 

1 

G : 

C6C26 

f. 

06C62 

1 

15,3150 
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11433 

0 

27421 

C 

C2310 

1 

5542  1 

0 

3 1750 

1 

55433 

0 

2543  3 

1 

16,251'' 

31745 

tt 

27421 

f 

02  3 10 

1 

5 542  1 

0 

11431 

1 

125  17 

1 

12544 

1 

6 1752 

0 

16,252r 

00006 

1 

62  544 

c 

2 2007 

0 

23431 

0 

34  7 5 5 

1 

CCCT6 

1 

11434 

1 

55737 

1 

16,2530 

274  22 

0 

C231C 

1 

55422 

0 

31751’ 

1 

57434 

0 

617  51 

0 

57737 

r 

CCC06 

1 

16 ,25X0 

74756 

0 

00006 

1 

11737 

1 

2753  7 

c 

2543X 

0 

31746 

c 

61545 

1 

27422 

0 

16,255C 

02  310 

1 

55x,22 

G 

11432 

1 

12555 

1 

12602 

0 

6 1752 

0 

00006 

1 

6 2 6C2 

1 

16,2560 

2200  7 

0 

23432 

(1 

3 4 7 5 5 

1 

C0006 

1 

11435 

c 

55740 

1 

27423 

1 

023  10 

1 

16,2570 

55423 

1 

31750 

1 

57435 

1 

61751 

0 

57  74C 

0 

0CCC6 

1 

74756 

c 

00006 

1 

16,2670 

11740 

1 

2754  1 

1 

25435 

1 

31747 

1 

61546. 

1 

27423 

1 

023  10 

1 

5 5 4 2 3 

1 

16,2610 

40  11  1 

1 

74744 

r; 

10000 

0 

126  2 X 

1 

5 54  2 4 

0 

55425 

1 

55545 

0 

55546 

c 

16,2620 

5 5 5^7 

n 

5554  1 

1 

12667 

0 

C:  00074 

1 

3151C 

1 

C00C6 

1 

74766 

c 

2154C 

c 

16,2630 

3 1537 

I 

55424 

0 

OOOC6 

1 

73622 

0 

55545 

0 

31512 

0 

0000  6 

1 

7 4 7 6 6 

c 

16,264C 

21542 

1 

31541 

0 

55425 

1 

C00C6 

1 

7362  2 

0 

5 5 546 

c 

12667 

0 

34747 

1 

16,26  50 

71262 

1 

lijOCO 

f 

03742 

c 

5201  1 

0 

53754 

1 

32666 

0 

56017 

1 

22C  12 

1 

16 ,2660 

53756 

0 

326  6 5 

520  16 

1 

5376C 

c 

1 527  5 

0 

C:  02667 

1 

13645 

1 

11632 

0 

16,2670 

127  1 1 

1 

1271  4 

c 

11634 

0 

127  12 

0 

1272X 

0 

C00C6 

1 

27767 

1 

OOOC6 

1 

1 6 , 2700 

27770 

1 

OOOC6 

1 

27  7 7 1 

( 

3474C 

c 

71262 

1 

00006 

1 

12734 

1 

02  74  0 

c 

16,2710 

55632 

(1 

12672 

1 

55634 

0 

12675 

c 

555C  1 

0 

55510 

c 

45007 

1 

00006 

1 

16,2720 

C3C12 

1 

34735 

1 

55632 

0 

12672 

1 

55503 

1 

555  12 

1 

45C2C 

1 

CCCC6 

1 

16,2730 

03012 

1 

34735 

1 

5 5 6 3 4 

0 

12675 

0 

41262 

1 

74740 

1 

27262 

1 

13630 

0 

1 6 ,274C 

00006 

1 

U003  1 

0 

4ono-') 

0 

736  17 

0 

OOOC6 

1 

13C  14 

0 

COOC6 

1 

74745 

1 

16,2750 

5000C 

1 

3 3 5 7 6 

c 

55  744 

c 

36245 

1 

03555 

1 

46245 

0 

61743 

c 

00f06 

1 

16,2760 

130  13 

1 

44756 

c 

61744 

1 

00006 

1 

63002 

0 

41743 

1 

64751 

0 

00006 

1 

16,277C 

63G13 

0 

C5567 

(. 

r : O20'U 

1 

34753 

1 

2326  2 

0 

CCCT6 

1 

06CC  1 

c 

5 5 2 62 

1 
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ALl  VALID 
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EAS  IC 

INSTRUCT  IFNS 

EXCEPT  TFOSE 

MARKED  "I" 

( intepprfti ve 

GPFRA  ICF 

^ NCPDS)  CP 

"C  (CONSTANTS) 

16, 30CC 

34755 

1 

13114  0 

34753 

1 

23262 

0 

00006 

1 

060C1 

0 

5 5262 

1 

74  753 

C 

16,3010 

64751 

r» 

77744  0 

1 27  53 

C 

31741 

1 

55472 

0 

34737 

0 

00006 

1 

02C31 

1 

16,3C2r 

00036 

1 

13027  0 

30  111 

0 

74  7 4 3 

1 

lOOCC 

0 

13467 

c 

13C  71 

C 

34735 

1 

16,3030 

70111 

1 

00006  1 

13C71 

0 

34755 

1 

55464 

1 

30032 

0 

556  35 

1 

1146C 

c 

16,30^0 

13054 

1 

34751  0 

0QCC6 

1 

0203  1 

1 

C00C6 

1 

13064 

1 

34750 

1 

00006 

1 

16, 3(  EC 

02031 

1 

00LC6  1 

13062 

1 

13446 

0 

0000  6 

1 

CCC31 

c 

400CO 

r 

75  741 

1 

16,3060 

55460 

0 

13446  0 

44363 

1 

130  6 5 

c 

34363 

0 

55524 

1 

34753 

1 

5 5 4 60 

c 

1 6 , 30  70 

13354 

1 

OOo;:6  1 

O'1031 

0 

*'544  ^ 

1 

7 4 7 3 5 

Q 

CC006 

1 

13226 

C 

34740 

0 

16, 31CC 

70  111 

1 

00116  1 

13467 

0 

34743 

0 

71262 

1 

00006 

1 

1312U 

C 

34  737 

c 

16,3110 

00006 

1 

■7  20  31  1 

00006 

1 

13223 

c 

45014 

0 

7 1262 

1 

55262 

1 

1 3 2 2 3 

0 

16,3120 

31262 

0 

74742  0 

00006 

I 

13125 

0 

1322  3 

0 

31262 

c 

7474  1 

c 

0OC06 

1 

16,3130 

13134 

0 

13223  C 

C : 74777 

r 

C : 00056 

1 

4474C 

1 

00004 

0 

70111 

1 

54  111 

1 

16 ,31 40 

34737 

0 

00006  1 

02031 

1 

C00C6 

1 

1315C 

1 

30032 

0 

55635 

1 

03152 

1 

16,31EC 

04674 

0 

C:  40154  C 

0'000  3 

1 

13467 

0 

554  6 4 

1 

34  740 

c 

26111 

1 

3 4 7 5 5 

1 

16,3160 

5 5 446 

1 

55447  0 

5 5 4 50 

0 

5 54  5 1 

1 

55452 

1 

55453 

0 

55454 

1 

= 54  5 5 

0 

16,^1 7C 

55456 

0 

54042  0 

54044 

0 

33132 

1 

71262 

1 

5 5 2 6 2 

1 

41262 

1 

74743 

1 

16, ^20C 

2 7262 

1 

03204  1 

00003 

1 

13446 

0 

22044 

1 

30042 

1 

534  6 3 

c 

347  5 5 

1 

16,32  10 

54043 

1 

54^:42  0 

54044 

c 

r0C04 

c 

0000  6 

1 

23265 

1 

06022 

1 

33623 

0 

16,3220 

00006 

1 

05013  0 

01265 

1 

34755 

1 

54043 

1 

1 3 2 3 2 

Q 

3474C 

c 

70111 

1 

16, 3230 

00006 

1 

13154  C 

3CC32 

0 

55635 

1 

1:7043 

1 

13  24:1 

) 

1324G 

0 

13240 

c 

16,3240 

60000 

1 

60000  1 

63  133 

0 

C00C6 

1 

70043 

1 

30CCI 

0 

00006 

1 

71444 

0 

16, 32E0 
16,3260 

57454 

55427 

L 

401 '70  0 

61454 

0 

55737 

1 

03204 

1 

00003 

1 

41454 

1 

6 1421 
63273 

1 

0 

11737  1 

1 3 2 6 5 

1 

132  73 

c 

13265 

1 

614  76 

0 

00006 

1 

1 

16,3270 

34771 

1 

55445  1 

03304 

0 

31262 

0 

74  74  2 

c 

OOOC6 

1 

133CC 

c 

03304 

0 

16,3300 

31446 

0 

55752  1 

554  64 

1 

C3473 

1 

3'10  3 2 

0 

55635 

1 

3475  5 

1 

5 5446 

1 

16,3310 

55447 

0 

55464  1 

11427 

0 

C3316 

c 

03316 

0 

03316 

0 

55737 

1 

61476 

0 

16,3320 

00006 

1 

63331  0 

31445 

0 

00006 

1 

633  3 1 

0 

41262 

1 

74742 

0 

2 72  62 

1 

16,3330 

13334 

1 

44742  C 

71262 

1 

= 5262 

1 

41427 

0 

00006 

1 

71551 

0 

2000  1 

1 

16,3340 

02310 

1 

00006  1 

77  721 

0 

5 5 5 2 4 

1 

31737 

c 

6 1475 

■) 

C0CC6 

1 

63352 

0 

16,3350 

36  24  5 

1 

13361  1 

31524 

0 

27524 

1 

34747 

1 

70101 

0 

10000 

0 

3 4 7 5 3 

1 

16,3360 

6475  1 

0 

55743  1 

34  7 5 3 

1 

54C01 

1 

11524 

1 

133  72 

0 

13446 

0 

1337  1 

0 

1 6 , 3 3 r 

13446 

0 

22007  0 

64753 

1 

55737 

1 

23744 

1 

C 3 5 35 

1 

46245 

c 

61743 

G 
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16 ,3ACf 

C0006 

1 

13403 

1 

44752 

1 

64751 

0 

5552  1 
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3 1741 
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05744 

C 

A1737 

1 

16,3A  in 

63616 

n 

COG  0 6 

1 

63630 

1 

63576 

0 

■)000  6 
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63422 

i 

27737 

1 

5 1744 

1 

16 ,3A2n 

33625 

n 

55524 

1 

31737 

{' 

22007 

0 

C0CC4 

0 

534  71 

0 

04674 

0 

C ; 

37143 

0 

16, 3A3C 

4 4 740 

1 

71262 

1 

55262 

1 

03435 

0 

1363C 

0 

301C1 

1 

540C  1 

1 

34747 

1 

16 ,3AAn 

):iO  16 

1 

06;).l  1 

0 

54  K 1 

C 

coons 

1 

Q0CC2 
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03435 

0 

05743 

1 

34755 

1 

16,3A5C 

55524 

1 

1363  J 

o 

30  3 33 

1 

00006 

1 

21636 

1 

CCCC6 

1 

714  14 

c 

57752 

0 

16,3460 

3J032 

C) 

03006 

1 

21635 

1 

61274 

1 

27752 

1 

57464 

0 

00CC2 

0 

03^52 

1 

16,3470 

41643 

0 

6 14  21 

1 

5 5 4 2 7 

c 

44  753 

r 

5 5 5C  5 

1 

30111 

0 

74737 

1 

000C6 

1 

16, T5CC 

13511 

fl 

C0CC4 

0 

04674 

0 

C: 

43730 

1 

3 1524 

c 

C00C6 

1 

13445 

c 

CCCC3 

1 

16,t510 

13354 

1 

34755 

1 

5550Q 

1 

C00C4 

0 

046  7 4 

0 

C : 

37304 

1 

00003 

1 

41741 

c 

16, 352C 

63534 

0 

00006 

1 

63354 

r> 

11524 

1 

13  5 2 6 

1 

13446 

c 

63533 

1 

CCC06 

1 

16,  35K 

6 3354 

0 

36  24  5 

1 

13361 

1 

C : 

77377 

1 

r : 

75  117 

1 

36245 

1 

557  42 

c 

51  743 

c 

16,3640 

33567 

0 

51744 

1 

73  5 60 

c 

55  74  1 

c 

71  26C 

0 

irono 

0 

13550 

0 

0OCO2 

c 

16,3FEC 

11742 

n 

13555 

c 

05567 

0 

C : 

02003 

0 

13446 

c 

5 5 7 4 3 

1 

13536 

c 

1 2 7 7 3 

1 

16,3660 

C : 

002  52 

1 

C : 

C 012  5 

1 

C : 

C0140 

1 

C : 

00006 

1 

C : 

0022C 

1 

C: 

00011 

1 

C; 

00151 

1 

C : 

CC  146 

1 

1 6 ,3670 

C : 

00  22  6 

1 

C: 

;>  0231 

1 

C : 

00  1 5 1 

1 

C : 

00132 

1 

C : 

C0245 

1 

C : 

003  7 7 

1 

C : 

77445 

1 

C : 

00004 

0 

16, 36CC 

C : 

■iOOQ2 

0 

C : 

C7776 

c 

C : 

00005 

1 

C : 

00011 

1 

C: 

00-I12 

1 

C: 

07776 

0 

C ; 

000C3 

1 

C : 

CCCIC 

c 

16,3610 

r ; 

000  17 

n 

C ; 

■niib 

c 

C: 

j 7 7 7 6 

r 

C : 

C7776 

( 

C : 

07776 

0 

C : 

C7776 

0 

C: 

00  3 60 

1 

C: 

07400 

1 

16,362C 

C : 

00266 

0 

C : 

74631 

0 

C: 

06315 

0 

C: 

00600 

1 

C : 

00632 

0 

C : 

77  7 5 1 

1 

C : 

00C26 

c 

C : 

02734 

0 

16, 3630 

41645 

n 

61423 

c 

C23  10 

1 

55437 

1 

41644 

1 

6 1422 

1 

023  10 

1 

5 5^36 

c 

16,3640 

0000  6 

1 

33644 

1 

52006 

0 

C : 

C2124 

1 

C : 

36  1C6 

c 

34752 

c 

55744 

0 

60000 

1 

16,365c 

S4C02 

I 

51744 

1 

11524 

1 

13655 

0 

1 367  P 

0 

63735 

0 

000C6 

1 

6 3 7 1 3 

1 

16,3660 

5 1744 

1 

11524 

1 

3 3 7 3 5 

c 

13665 

c 

43735 

1 

51744 

1 

27524 

1 

5 1744 

1 

1 6 , 3 6 7 C 

11524 

1 

43621 

0 

136  74 

0 

3362  1 

1 

COCCf 

1 

5 I7P4 

1 

71521 

1 

30C01 

0 

16, 37CC 

5 17  4 4 

1 

55737 

1 

O0CC6 

1 

74742 

0 

00006 

1 

6 3 7 3 6 

c 

500C2 

c 

2 7 5 1 3 

c 

16,3710 

11744 

.0 

13646 

1 

1 3 722 

1 

3475  5 

1 

5174X 

1 

57524 

c 

00006 

1 

74  760 

0 

16,372C 

300(11 

0 

13674 

0 

3174.) 

0 

61741 

1 

0000  6 

1 

71532 

c 

55747 

c 

41741 

0 

16, 3730 

61740 

0 

C0OC6 

1 

71531 

c 

55746 

1 

12316 

0 

C: 

77537 

0 

40000 

0 

2 4CC  2 

c 

16 ,374C 

137  16 

1 

C: 

.)740" 

1 

41501 

c 

C0006 

1 

715C7 

c 

23510 

1 

41503 

1 

00C06 

1 

16,  3 7 5C 

71511 

1 

23  512 

c 

11501 

0 

34742 

1 

13  756 

1 

34743 

c 

54C66 

c 

1 1 5C3 

1 

16,3760 

3474(1 

0 

1 3 7 6 3 

1 

34  741 

1 

26C66 

c 

43  741 

1 

00006 

1 

02012 

0 

60C66 

1 

16,377t 

00006 

1 

11012 

0 

44747 

0 

71262 

1 

5526  2 

1 

tCCC2 

c 

C : 

03776 

1 

CKSN 

24431 

1 

G4P 
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1 7 ,20CC 

54002 

1 

O00'i6 

1 

00004 

0 

54001 

1 

74346 

C 

4CC  CO 

c 

64746  C 

74346 

0 

17, 2 116 

5527G. 

1 

67751 

C 

00006 

1 

620C1 

1 

3000  2 

0 

00006 

1 

05013  C 

40C01 

I 

17  ,26  2''> 

53267 

1 

04  70  7 

0 

55266 

0 

3475C 

1 

30CC  6 

1 

C2CT3 

1 

000C6  1 

12C50 

1 

17,2030 

12031 

o 

G0006 

1 

01004 

0 

61267 

0 

64736 

1 

64736 

1 

56CC1  C 

32C  53 

C 

17 , 2 >40 

61270 

0 

0 )0  '6 

1 

6QC:  1 

0 

COH06 

1 

6205C 

0 

62054 

1 

00006  1 

62C30 

0 

17,2060 

22Q02 

n 

31266 

i 

5 2005 

n 

C:  CC44C 

1 

C : 7 7 7 5 F. 

1 

1CC31 

1 

OOOC2  C 

C5675 

0 

17, 206G 

0 5 6 7 5 

0 

3 4 7 3 3 

1 

22C07 

C 

53471 

U 

53467 

1 

23465 

1 

54C31  1 

67730 

1 

1 7,2070 

54700 

7 

120' 7 5 

34  7 3 3 

1 

54C31 

1 

12115 

1 

C0CC6 

1 

23265  1 

22070 

0 

17,21C0 

0 6022 

1 

i 

23265 

1 

22070 

0 

34  73  5 

1 

CCCC6 

1 

05C  13  C 

31466 

1 

17,2110 

67730 

1 

5400' 

c 

12  115 

1 

34733 

1 

55466 

n 

50001 

Cl 

15743  C 

22C  16 

c 

17 ,2120 

00006 

1 

22012 

1 

02055 

0 

1 52  7C 

C 

34  7 37 

C 

CGCC6 

1 

C2C31  1 

ICOOO 

0 

17, 2130 

12135 

0 

47111 

1 

7 47  40 

1 

CQ0C6 

1 

12136 

0 

02655 

0 

11631  0 

12636 

1 

17,2140 

12623 

34755 

1 

5 5 6 3 1 

c 

5343  7 

1 

032CC 

0 

53427 

0 

34745  0 

00C06 

1 

17,2160 

02  03  1 

1 

0(1006 

1 

L22O0 

n 

34744 

1 

0CCC6 

1 

C2C31 

1 

00CC6  1 

12201 

1 

17, 2160 

34746 

c 

7 1111 

1 

ICCCO 

0 

122  00 

0 

55473 

1 

5 54  74 

0 

40  11 1 1 

74  744 

c 

17,21  7Ci 

0000  6 

1 

12176 

1 

30  106 

0 

74  73  7 

1 

lOOCG 

0 

347  52 

0 

55500  1 

12  2 3 2 

1 

17, 22CC 

34  7 5? 

1 

64751 

c 

55  744 

0 

67750 

1 

555PC 

1 

3C111 

■ j 

747^1  C 

ICCCC 

c 

17,2210 

12352 

0 

301  1 1 

0 

74  7'i2 

iriCC 

c 

34753 

1 

64752 

0 

55743  1 

03225 

1 

1 7 ,222C 

11741 

0 

12224 

0 

05567 

c 

C:  02002 

1 

35764 

1 

7 17^1 

c 

55473  1 

45764 

c 

17, 2230 

71741 

0 

554  74 

c 

3 4 737 

f 

C0006 

1 

J20  3 1 

1 

IQOCO 

a 

1271C  1 

3 4 7 3 5 

1 

17,220.0 

70  111 

1 

ODOf  6 

1 

1 23  54 

croc  4 

c 

C4674 

0 r 

: 40154 

r 

34755  1 

55450 

c 

17,2250 

554  52 

1 

CTO  3 

1 

00006 

1 

OOJ31 

5 5 7 3 7 

1 

11461 

1 

123CC  1 

31137 

c 

17,2260 

7475? 

0 

OOr  06 

1 

12304 

c 

31737 

0 

74752 

1 

OOOC6 

1 

12310  0 

3 17  3 7 

c 

17  ,2270 

74747 

0 

.00006 

1 

12314 

1 

3 17  3 7 

c 

74746 

1 

0QGC6 

1 

12316  0 

13112 

1 

1 7, 23C0 

41737 

1 

72351 

c 

55  46  1 

1 

13112 

1 

33136 

0 

5 5 5 2 5 

C 

43136  I 

1 2 32C 

c 

17,2310 

43136 

1 

5552  5 

c 

33  136 

1 

1232C 

c 

33136 

0 

12317 

1 

43136  1 

C C C 2 

G 

17,232C 

55526 

0 

323  50 

0 

55477 

0 

34753 

1 

5546  1 

I 

5 5 5C5 

1 

30111  C 

74737 

1 

17,2330 

00006 

1 

12^41 

1 

5 1 5 C 5 

0 

11525 

c 

3477  6 

0 

12337 

0 

44776  1 

5 1 5 C 5 

c 

1 7 ,2340 

55525 

30111 

0 

74742 

0 

loonr 

c 

34  7 5 3 

1 

64752 

0 

55743  1 

12756 

0 

1 7 , 235C 

C:  02325 

1 

C ' 

1 L (.1 C 6 3 

1 

3475  1 

0 

12216 

1 

5 5633 

1 

4 4 7 5 3 

0 

55631  0 

3 4 73  5 

1 

17,2360 

71443 

1 

000  0 6 

1 

12377 

1 

34  74C 

c 

7.il  1 1 

1 

00006 

1 

12710  1 

44743 

1 

17,237C 

71262 

1 

55262 

1 

12  3 7 4 

1 

C:  CC056 

1 

34  75  5 

1 

5 54  62 

1 

55463  0 

11462 

1 
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octal  listing  for  paragraph  « 11^,  WITH  PARITY  61"^  IN  BINARY  AT  THE  RIGHT  CF  EACH  WORD,  "5"  DENOTES  LNLSED  FIXED  RERCRY 
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17.2ACC 

124  )3  0 

124i(3 

0 

12403 

0 

6CCC0 

1 

60000 

1 

6 2 3 73 

1 

00CG6 

1 

71462 

1 

17, 2A  IC 

300O1  0 

DC0C6 

1 

71444 

0 

57455 

1 

40000 

•3 

6 1455 

1 

55741 

0 

11X63 

0 

1 7 ,2420 

12423  1 

12423 

1 

12423 

i 

60000 

1 

erocc 

1 

623  73 

1 

00006 

1 

71463 

0 

17,2436 

30001  (’ 

DOOC6 

1 

71444 

n 

57456 

1 

400CC 

0 

61456 

1 

55742 

C 

41455 

C 

17,2440 

61422  1 

55436 

r 

41456 

0 

61423 

0 

55437 

1 

53437 

1 

03200 

0 

53x27 

c 

1 7 , 24  5 C 

11741  0 

02454 

11 

024  54 

0 

C24  54 

c 

61476 

0 

CCCC6 

1 

62460 

1 

12476 

1 

17, 246C 

11742  0 

624  64 

0 

■0  24  64 

0 

02464 

0 

61476 

0 

00006 

1 

6247C 

c 

12X76 

1 

1 7,2470 

31262  0 

74741 

• 

000  e 6 

1 

12475 

1 

1250C 

1 

127  1'7 

1 

34771 

1 

55457 

1 

17,25Gf 

00004  0 

■14674 

0 

C: 

40154 

n 

0000  3 

1 

34755 

1 

5 5 4 50 

0 

55451 

1 

55452 

1 

17, 2 5 10 

55453  0 

11426 

1 

12515 

c 

12515 

0 

12515 

0 

61476 

0 

00006 

1 

6 2 53  3 

c 

17 ,252C 

11427  0 

12524 

1 

1 2 524 

1 

12524 

1 

61476 

0 

C0CC6 

1 

62530 

0 

12544 

1 

17,2530 

34755  1 

55427 

12544 

1 

11427 

0 

■32  53  7 

1 

02537 

1 

C2537 

1 

61476 

c 

17,2540 

00006  1 

62553 

34  7 5 5 

1 

55426 

1 

31457 

0 

OOOC6 

1 

62553 

c 

41262 

1 

17,2550 

74741  n 

27262 

1 

02556 

0 

4474  1 

c 

71262 

1 

5 5 2 6 2 

1 

32622 

c 

55477 

0 

17, 2560 

34753  1 

^55'  5 

1 

34751 

0 

55743 

1 

51505 

0 

51535 

0 

12  5 6 7 

r 

3 4 7 5 1 

c 

1 7 ,2570 

51505 

555  3 5 

1 

13634 

1 

51  5C5 

t 

11426 

1 

34755 

1 

12600 

1 

34753 

1 

1 7, ?ecr 

51535 

63755 

c 

5-OHD‘D 

1 

41571 

1 

00006 

1 

515C5 

c 

71426 

1 

54C02 

1 

17,261C 

20)1,11  1 

60CC2 

c 

540C0 

f: 

12615 

0 

30002 

0 

51505 

0 

55525 

0 

1 2 7 5 6 

c 

17,2620 

34755  1 

12615 

0 

6 : 

0256  1 

1 

34736 

1 

70111 

1 

lOOCO 

0 

12141 

0 

11502 

c 

17, 2630 

12632  0 

12141 

0 

00  006 

1 

00U05 

1 

10000 

IJ 

1 264  1 

1 

OOOC6 

1 

326  54 

1 

17,2640 

52006  0 

11633 

1 

12644 

1 

12141 

0 

01004 

a 

04674 

0 

C:  43321 

0 

00C03 

1 

17,2650 

34755  1 

55633 

1 

12141 

0 

C;  03070 

0 

C:  421C6 

0 

30C23 

1 

0U0C6 

1 

21636 

1 

17,2660 

55737  1 

■7  00  6 6 

1 

71415 

I 

55752 

1 

30034 

0 

00006 

1 

21637 

0 

5 5 74C 

1 

17,2670 

00006  1 

714  17 

n 

61275 

0 

6 1752 

f 

574  5C 

1 

31737 

c 

00006 

1 

714  16 

1 

1 7 , 27CC 

55752  1 

31  74C 

c 

00006 

1 

71420 

1 

61276 

0 

61752 

c 

57452 

c 

CCCC2 

c 

17,2710 

31452  0 

22000 

1 

31450 

1 

C32CC 

0 

53752 

1 

33142 

0 

55477 

0 

34  7 53 

1 

17,2720 

555U5  1 

51505 

0 

51535 

0 

12724 

c 

3475  1 

c 

5 15C5 

c 

55535 

1 

13C34 

1 

17, 273C 

51505  ' 

31751 

r- 

55  752 

1 

51505 

0 

31426 

) 

554  27 

0 

30111 

c 

74  737 

1 

1 7 ,2740 

11)11)3  11 

12744 

02304 

t 

127  = 6 

r 

4:11  1 1 

1 

7 4 7 36 

0 

10000 

0 

5563  1 

0 

17,2750 

Q0C.')4  0 

046  74 

U 

C : 

43730 

1 

0000  3 

1 

34751 

0 

557x3 

1 

301C1 

1 

74737 

1 

17, 2760 

00006  1 

12772 

r 

40IC6 

1 

74737 

1 

>0  006 

1 

12772 

y 

30  1 1 1 

0 

7 4 7 4 4 

c 

1 7,2770 

000')  6 1 

13112 

1 

34752 

0 

54001 

1 

515C5 

0 

11525 

f 

130C3 

0 

13026 

1 
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17 ,3f'00 

131U2 

1 

13026 

1 

22007 

ft 

69  7 52 

1 

55737 

1 

3 15C5 

C 

60CC1 

C 

55  799 

0 

17,  3''  10 

317  37 

fi 

6 313  7 

1 

0000  6 

1 

63037 

(! 

13225 

1 

5 15C5 

D 

33139 

1 

59CC  1 

1 

17,3  i2D 

31791 

1 

" H'-'A 

J 

50001 

C 

f 5799 

C 

OOOC3 

1 

13100 

1 

51505 

0 

33  139 

1 

17,3030 

OOC04 

6 

50000 

1 

05793 

1 

00003 

1 

11505 

1 

0 1977 

1 

1327C 

0 

91737 

1 

17,3091 

63136 

0 

00006 

1 

62''  61 

c 

27737 

1 

51505 

J 

11525 

0 

33136 

0 

13C51 

1 

1 7,3050 

93  136 

1 

5 150  5 

A 

55525 

0 

1 1 50C 

1 

13C6C 

0 

CCCC6 

1 

00009 

0 

7 9 7 5 3 

0 

17, 3060 

55793 

1 

03225 

1 

51505 

0 

33139 

1 

OOOC^ 

0 

5597  1 

c 

31791 

1 

51971 

1 

17,3070 

05799 

0 

31737 

c 

559  7C 

1 

C31  93 

1 

000(1 3 

1 

39755 

1 

51505 

0 

1 

n,3icc 

96250 

1 

61793 

0 

000C6 

1 

63106 

c 

397  52 

0 

1 3 1 C 7 

c 

39753 

1 

51505 

0 

17,3110 

55522 

1 

13039 

1 

39755 

1 

55525 

0 

55526 

0 

297  5 1 

0 

OOOC9 

0 

5 75  35 

c 

17,3120 

')'i0:'i6 

1 

12123 

05797 

A 

39  7 51 

r 

57  53  6 

c 

C0G03 

1 

00006 

1 

13270 

0 

17,3130 

00009 

0 

0 5 760 

c 

10013 

1. 

13270 

0 

C: 

000C'( 

0 

C : 

C0C15 

c 

C : GOG  26 

0 

C : 

7791  7 

0 

17,3190 

C: 

00600 

1 

C: 

002  6 6 

c 

C ; 

C2  720 

c 

9197C 

1 

60031 

0 

00006 

1 

63163 

c 

2 3 9 6 5 

) 

17,3150 

53967 

1 

53971 

0 

5903  1 

1 

23965 

1 

cccr6 

1 

23265 

1 

06022 

1 

39735 

1 

17, 316C 

000)6 

1 

05D  13 

0 

11265 

1 

6 1 966 

1 

00006 

1 

63  179 

0 

23967 

0 

53^71 

c 

17,3170 

00006 

1 

61L  3 1 

5396  7 

1 

OOCQ2 

c 

9ocac 

0 

697  59 

0 

55970 

1 

00C0  2 

0 

17,32CC 

23  79'T 

0 

) V)06 

1 

71627 

1 

57790 

0 

1000  6 

1 

7163C 

1 

590C1 

1 

61790 

0 

17, 321C 

55737 

1 

13215 

r 

5000'! 

1 

99739 

1 

55737 

1 

91790 

1 

600C1 

0 

59C07 

1 

17  ,3220 

13223 

0 

500  no 

1 

99739 

1 

2 3 7 3 7 

c 

OOCC2 

0 

51799 

1 

33257 

1 

51793 

0 

17,323^- 

73263 

1 

55791 

0 

71257 

1 

100. 10 

0 

13236 

1 

C0CC2 

c 

3625C 

c 

5 5 793 

1 

17,3291 

51799 

1 

232  57 

1 

5 1793 

73263 

1 

5579  1 

1 

71257 

1 

O00C6 

1 

13235 

1 

17,325C 

11793 

I 

13237 

0 

51505 

0 

5 5 525 

c 

C 5 5 6 7 

0 

C : 

C2CC9 

1 

13026 

1 

C : 

001  10 

1 

17,  326'- 

C: 

00022 

1 

C : 

00209 

1 

C : 

110  91 

1 

C:  C0125 

1 

C : 

012  5 2 

1 

C : 

00196 

1 

C:  00231 

1 

C : 

rC37? 

1 

17,3270 

332  72 

0 

07757 

0 

C : 

03273 

1 

53759 

1 

52011 

0 

53756 

.1 

560  17 

1 

22C02 

0 

1 7,33Cr 

39735 

1 

5376-) 

0 

521 16 

1 

15272 

1 

Ot10C6 

I 

2 3795 

G 

515C5 

c 

33  755 

0 

17, 33  lO 

55796 

1 

31927 

1 

000C6 

1 

63320 

0 

31796 

0 

55799 

0 

33757 

1 

1 3 3 30 

c 

1 7,3320 

91752 

1 

55752 

1 

9 1927 

0 

55927 

c 

39  75  3 

1 

2 7796 

1 

55799 

0 

93757 

c 

17  , 3 320 

55790 

1 

31  752 

A 

10006 

1 

79797 

0 

lOOOC 

0 

137  17 

1 

1339C 

1 

1 3663 

c 

17,3390 

39737 

0 

OU'i06 

1 

7000  1 

1 

5 57  52 

1 

31927 

1 

00006 

1 

79750 

0 

00QC6 

1 

17,3350 

13352 

1 

13725 

0 

23927 

1 

31927 

1 

00006 

1 

700CO 

0 

000C6 

1 

79737 

1 

17,3360 

55737 

1 

11752 

1 

1 3365 

G 

13365 

0 

13365 

0 

63  760 

c 

000C6 

1 

5 1796 

c 

17,3370 

61611 

1 

1 IU2.6 

1 

6 3 3 7 7 

1 

39  7 52 

c 

27799 

c 

39  751 

Q 

13902 

0 

11500 

1 
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1 7 ,34r.O 

134Q2 

> ) 

1 3373 

1 

55743 

I 

PI  137 

1 

C00C6 

1 

51744 

1 

71567 

0 

51746 

C 

17, BA  1C 

61601 

1 

c,,no6 

1 

61752 

0 

5574  1 

0 

061QC6 

1 

63575 

0 

5 17P6 

C 

31573 

1 

17, BA20 

000  )6 

1 

71737 

1 

6 17  5 2 

0 

51746 

C 

61603 

1 

00006 

1 

6346  1 

1 

5 1505 

c 

17,3A3C 

41525 

n 

100  06 

1 

71740 

1 

00006 

1 

6345  5 

0 

11555 

1 

13447 

1 

41741 

0 

1 7, 3AAC 

51  746 

ij 

61  60  5 

r 

0OC06 

1 

63455 

0 

1356  1 

0 

3 1741 

1 

136  15 

1 

5 1746 

c 

17,345C 

4161 1 

0 

6 OiiOO 

1 

61741 

1 

CCCC  6 

1 

634  5 7 

1 

3 4 7 5 5 

1 

13521 

0 

03561 

c 

1 7 , ’A6C 

13  602 

1 

54001 

1 

1174-1 

1 

13467 

0 

056  7 5 

0 

4 4 7 5 2 

1 

277P4 

c 

3CCC1 

c 

17,3470 

'too  )6 

1 

51744 

1 

71576 

r 

20001 

1 

2000  1 

1 

53750 

0 

51744 

1 

3 1570 

1 

17,3600 

000  16 

1 

71427 

0 

55742 

c 

C0006 

1 

7 3 7 6 7 

C 

61747 

1 

6775  1 

c 

CC006 

1 

17, 3910 

63536 

1 

31  742 

1 

10106 

1 

73770 

0 

61747 

1 

6376  1 

1 

00006 

1 

63  546 

c 

17,3920 

34  741 

1 

o 1 * T6 

1 

7 1 140 

1 

515C5 

c 

55525 

0 

00006 

1 

515C5 

0 

71547 

1 

1 7,393C 

300'H 

•j 

'»  )(-, 

1 

63535 

1 

34751 

0 

55743 

1 

C 1 7 4 5 

c 

43766 

1 

61742 

1 

17,3540 

53750 

0 

OOr'6 

1 

11747 

c 

COOQ6 

1 

74736 

0 

13656 

c 

00006 

1 

3-1/2 

c 

17 ,3550 

21750 

0 

31742 

1 

63762 

i 

5 3 7 5 C 

C 

00CC6 

1 

11747 

0 

00006 

1 

74736 

c 

17,3560 

1 3521 

0 

41  740 

1 

55743 

1 

31427 

1 

0000  6 

1 

5 1744 

1 

71567 

c 

5 5 742 

f 

17,3570 

63773 

1 

O0C06 

1 

63  574 

1 

13520 

1 

0000  2 

0 

03561 

0 

31741 

1 

61555 

c 

n,36Pc 

00016 

1 

63615 

u 

41556 

1 

61742 

1 

00CT6 

1 

6 3 6 10 

0 

317  4 2 

1 

13521 

c 

17,  ■’610 

11427 

0 

34746 

r 

13521 

r 

05675 

0 

1352  1 

1 

00006 

1 

51746 

c 

616C5 

c 

17,3620 

10016 

1 

51744 

1 

71575 

200C1 

1 

200C1 

1 

5 37  50 

0 

31742 

1 

6 3 7 7 3 

1 

1 7,363C 

000  16 

1 

7')<l'i  1 

) 

00OO6 

1 

61747 

1 

000C6 

1 

6 5 5 21 

c 

31747 

1 

67751 

0 

17,3640 

000)6 

1 

6 36  5 1 

0 

33  763 

r 

5375C 

0 

00006 

1 

11747 

0 

61742 

1 

6 3 7 6 4 

1 

1 7,3550 

13521 

43765 

1 

5375  1 

0 

C0006 

1 

11747 

G 

61742 

1 

63775 

1 

00006 

i 

17,3660 

6 3 4 5 5 

r- 

63  7 74 

0 

13521 

0 

43776 

0 

27427 

0 

00006 

1 

637C7 

1 

03745 

1 

17,3670 

31427 

1 

000 ''16 

1 

5 1744 

1 

7 L 5 7 1 

1 

67744 

1 

00006 

1 

63700 

0 

13520 

1 

1 7 ,3  7CC 

00  106 

1 

13520 

1 

64740 

0 

2000  1 

1 

2000  1 

1 

200C  1 

1 

13656 

c 

03747 

0 

17,3710 

1 1 74'J 

1 

34753 

1 

13714 

1 

37752 

0 

27744 

0 

41427 

0 

1367  1 

0 

0 3 7 4 5 

1 

1 7,372f 

33776 

1 

61427 

1 

54CCO 

0 

1367  1 

c 

135  2C 
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OCTAL  LIFTING  FGR  PARAGRAPH  « 12'',  WITH  PARITY  BIT  IN  BINARY  AT  THE  RIGHT  CF  EACH  WORD,  ”3"  CENCTES  LMSEC  FI>EC  REMGRY 
ALL  VALIC  WORTS  ARE  BASIC  INSTRLCTTCNS  EXCEPT  THCSF  NARKEC  "I"  ( I AT EP PR ET  I V E CFFRATCP  WCRCS)  CR  "C"  (CONSTANTS) 
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1 
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0 
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0'J0C6 
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nCTAI  LISTING  FfP  PAPAGPAFF  # 121,  WITH  PARITY  31^  IN  BINARY  AT  THE  RIGHT  CF  EACH  WORD,  "D"  CENCTES  UNUSED  FIXED  NEPCFY 
ALL  VALin  WORDS  ARE  BASIC  INSTRUCTICNS  EXCEPT  THCSE  PARKEC  "I"  (INTERPRETIVE  OPERATOR  WCRDSl  CR  "C"  (CONSTANTS) 
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OCTAL  LISTING  FCR  PIPAGPAFF  A 122,  WITF  PARITY  BIT  IN)  BINARY  AT  THE  RIGHT  CF  EACH  NCRD,  "S  " CENCTES  UNLSFC  FIXEC  NEYCFY 


ALL  VALID 
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BASIC 

INSTPIJCTICNIS 

EXCEPT  TFCSE 

NARKFC  '>I'> 
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OCTAl  LISTING  FOP  PARAGRAPH  A 123,  WITH  PARITV  BIT  IN  BINARY  AT  THE  RIGHT  GF  EACH  V<CFC,  "i"  CENCTES  UNbSEC  FIXEC  MEMORY 
ALL  VALIO  FORI?':  ARF  BASIC  I N ST  Rt  I F T T F N S EXCEPT  THOSE  MARKEC  "I"  (INTERPRETIVE  OPERATOR  HORDS)  CR  "C " (CCNSTANTS) 


2 T, 3AOO 

7A7AC 

1 

6-1162 

1 

037C4 

1 
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1 

54  13C 

1 

34733 

1 
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C 

54  127 

1 
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1 

61533 

0 
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0 
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C 
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0 
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0 
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1 
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1 
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0 
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0 

64744 

1 
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1 
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1 
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1 
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C 
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1 
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r 
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r 

13737 

0 

13467 

0 
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1 

34133 

1 
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1 
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1 
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0 

13462 

c 
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0 
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c 
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1 

63457 

1 
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30115 

1 

50164 

1 

54146 

( 

60000 

1 

50163 

0 
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0 

13462 

0 
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1 

20,3460 
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0 
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3F  162 

1 

61533 
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6 1532 

0 

54157 

0 
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0 
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1 
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54134 

n 
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0 

30  164 

1 

54126 

0 

30  16  2 
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6 1533 

c 

647A3 

0 

54C00 

0 

20,3500 

13502 

1 

34733. 

1 

63770 

1 

54  157 

0 
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0 
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1 
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0 
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0 
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1 

54124 

1 
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0 
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0 
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c 
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1 
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1 
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r 
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0 
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0 
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0 
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0 
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0 
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1 
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1 

63747 

0 

03724 

0 

50163 

0 

54131 

0 
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0 

50163 

0 
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0 
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1 
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1 

71257 

1 
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1 
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1 
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c 

54126 

c 

30132 

1 

20,3550 
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0 
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1 
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1 
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1 
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1 
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1 
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1 
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0 
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1 

54133 

1 
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c 

60143 

1 

60151 

1 

54147 

1 

4014  5 

0 

60144 

0 

20,357'- 
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1 

541  50 

1 
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0 

10154 

c 
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1 
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G 

55547 

1 

34320 

1 

20,3600 

05545 

0 
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1 
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1 
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1 

52144 

1 

52136 

1 

521A6 

0 
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c 
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1 
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1 

34753 

1 
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r 
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1 
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0 

30122 

c 

55550 

1 
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34320 

1 

05545 

c 
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10123 

1 

C: 
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1 

52152 

0 
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1 

313A3 

1 
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c 

20,3630 

5556? 
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61555 

n 

5 5 5 6 4 
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55563 

1 

34755 

1 

55565 

1 

55566 

1 

11555 

1 
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13656 

0 

521  36 

1 
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0 

52140 

0 

53604 

0 
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1 

536C6 

1 

52144 

1 
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53622 

1 
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r 

53624 

55622 

1 
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1 
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0 
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1 

31343 

1 

55(01 

c 
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0 
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1 

1 
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c 
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1 
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0 

55623 

n 
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1 
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1 
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1 

55606 

1 
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0 
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0 
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1 
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1 
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1 
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1 
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0 
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1 
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1 
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0 
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0 
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fi 
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1 
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0 

55632 

1 
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c 
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c 
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0 
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0 
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1 
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1 
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1 
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1 

54160 

1 

44743 
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1 

20, 37AC 
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1 
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1 
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1 
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0 
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c 
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( 
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1 
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n 
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C 
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1 
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1 
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1 
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Q 
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1 
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1 
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0 
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0 
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0 
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1 

3CCC1 

c 
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0 
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C: 
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1 
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OCTAL  LISTING  FOP  PAPAGPAPt-  H 12A,  WITH  PARITY  BIT  IN  BINARY  AT  THE  RIGHT  CF  EACH  WCRC,  "a"  CENCTES  UNUSEC  FIXEC  NEMCPY 
ALL  VALIC  WCPCS  ARE  BASK  INSTRIJCTTCNS  EXCEPT  THGSF  MARKEC  "I"  (INTERPRETIVE  OPERATCR  WCPDF)  CR  "C"  (CCNSTANTS) 


21,20CP 

C : 

24402 
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6 
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1 
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I’lOO'-) 

(1 

15261 

0 

1 1055 

1 

120  15 

12  12  5 

1 

55  714 

C 

36010 

0 

05173 

1 

21,2020 

C : 

0 2006 

0 

34753 

1 

701J7 

0 
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1 
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1 
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1 
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6 
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0 
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0 
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1 
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n 
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! 
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1 
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0 

54002 

1 

CCCC4 

c 
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0 
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0 
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0 
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c 
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0 
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c 
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1 
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0 

7 4 7 4 2 

0 
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1 
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7 
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0 

05072 

1 
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1 
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1 
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1 

34755 

1 

52754 

6 
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1 

2 37  14 

1 

40025 

1 

53055 

1 

21,2150 
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1 

74741 

lOOOO 

0 

13044 

0 
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0 

74745 

1 
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1 
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1 
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1 

74745 

1 
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1 
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0 
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1 
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c 

21,21  TO 

^■10)6 

1 

7 1 70  6 

c 

56070 

0 

31744 

1 

3000  6 

1 

7 1 7 C 7 

1 
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1 
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1 
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0 
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1 

70070 

1 

20001 

1 
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1 
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0 
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1 
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1 
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0 

5 57  1 1 

c 
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0 
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1 
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62222 

1 
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c 

31711 

1 

64735 

1 
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0 
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c 
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1 
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1 
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0 
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1 
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1 

713CC 

1 
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1 

44752 

1 
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1 

03014 

1 
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11741 

0 
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1 
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1 
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0 
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0 
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c 

53742 

c 
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1 
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34742 

1 
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c 
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0 

31715 

0 
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1 
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1 
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1 

72CC2 

c 
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1 
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1 
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n 
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1 
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1 

71711 

c 
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1 

61713 

0 

21,2270 
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1 

34755 

1 

27712 

0 
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1 

64  7 5 3 

1 

6 17  13 

c 
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1 
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1 
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64733 

1 
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1 
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0 

11713 

1 
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1 
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1 
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1 

21,231C 

55713 

1 

11712 

0 

34735 

1 

61713 

c 

1222F 

c 

C006  6 

1 

237  14 

1 

34  746 

0 

21,2320 

0000  6 

1 

C2C3G 

(1 

ICCCO 

6 

13044 

0 

40075 

1 

74736 

0 

000C6 

1 

12365 

1 

21  ,2330 

4007  5 

1 

74736 

0 
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1 

44745 

1 

713C6 

1 

5 53CO 

1 

40074 

n 

74752 

1 

21,234C 
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1 

1 526  1 

- 

34744 

1 
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1 

0 50  12 

1 
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1 
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1 

5 5 70  3 

c 

21,2350 
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ft 

5 5677 

1 

3475C 

1 
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1 
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■12356 

0 

15261 

J 

34752 

(I 
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1 

21  ,2360 
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1 

4130:1 

1 

74744 

0 

2730C 

1 

1526  1 

G 
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1 

600  25 

0 

64736 

1 
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1 
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c 
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1 
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0 
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1 
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1 
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1 
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1 
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OCTAL  LISTING  FOR  PARAGRAPH  ti  125,  WITH  PARITY  BIT  lA  BINARY  AT  THE  RIGHT  CF  EACH  WCPC,  "S"  CENOTES  UNUSEC  FIXED  MEHORY 


ALL  V«LIP 

WPFCS  APE 

BASIC 

INSTRUCT  TOMS 

EXC5PT  THOSE 

MARKED  "I" 

(INTERPRETIVE 

OPERA  7CF 

VCPDS)  CR 

"C"  (CCNSIANTS) 

2l,2ACr 

00006 

1 

71  7 15 

1 

000  C 6 

1 

10065 

(j 

57706 

1 

0C0C6 

1 

31527 

ri 

20CC1 

1 

21 ,2A1C 

2000  1 

1 

27706 

C 

300  3 7 

C 

6115  7 

n 
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1 

72004 

0 

277C6 

0 
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1 

21.242P 

31240 

0 

20110  1 

1 

20001 

1 

00006 

1 

717  15 

1 

C0CC6 

1 

10C65 

c 

57707 

0 

21, 2430 

000116 

1 
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1 

20CC1 

1 

20001 

1 

27707 

1 

30040 

0 

61  16C 

1 

0CC06 

1 

2 1 ,2440 

72004 

0 

2770  7 

1 

00006 

1 

31242 

1 

200C  1 

1 

200f  1 

1 

00006 

1 

7 17  15 

1 

21,2450 

00006 

1 

i:'06  5 

0 

57710 

0 

00006 

1 

31533 

0 

20001 

1 

20QC  1 

1 

2 7 7 1 r 

1 

21 ,2460 

30041 

1 

6116  1 

r 

OOOC6 

1 

72CC4 

0 

2771C 

1 

34751 

0 

05224 

0 

40C74 

0 

21 ,247f 

74752 

1 

l''On-;j 

0 

12474 

0 

C 1 7 1 4 

1 

3173  3 

1 

6 1 7 C 6 

1 

5406  1 

1 

31735 

1 

21, 2500 

61707 

(\ 

54'-62 

1 

31737 

0 

61710 

0 

54063 

0 

300  6 1 

n 

rri0C6 

1 

7 1717 

c 

21,2510 

56070 

1- 

300  6 2 

C0QC6 

1 

71721 

0 

26C7C 

1 

30063 

1 

OOOC6 

1 

71723 

1 

21 ,252C 

26070 

1 

3 or  70 

Q 
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1 

57704 

0 

3006  1 

0 

OOCC6 

1 

71725 

1 

56C7C 

c 

21,2530 

30C62 

n 

OOnO  ^ 

1 

71  72  7 

c 

26070 

1 

30063 

1 

OOOC6 

1 

71731 

1 

26C7C 

1 

21,254C 

30070 

0 
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1 

57705 

1 

3 50  1 5 

c 

54CC3 

0 

3 14  17 

1 

54C63 

0 

31420 

0 

21,2550 

5406  4 

1 

35i  1 6 

c 

5 400  3 

0 

30064 

0 

00006 

1 

7 1704 

1 

56C7C 

C 

3GC63 

1 

21,2560 
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1 

71705 

0 

26C70 

1 

22CC3 

c 
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1 

700  70 

1 

20001 

1 

577C0 

1 

21,2570 

30C64 

0 

O'l0')6 

1 

71705 

0 

56U70 

0 

30CI6  3 

1 

C0rC6 

1 

717C4 

1 

40000 

0 

21,2600 

26070 

1 

320C3 

c 

C0CC6 

1 

70070 

1 

2000  1 

1 

57701 

0 

42005 

1 

54C66 

c 

21,2610 

34753 

1 

541.65 

0 

50065 

1 

117Cr 

f 

1262C 

0 

12721 

0 

12626 

0 

12721 

0 

21,2620 

5C065 

1 

41700 

c 

62005 

0 

0000  6 

1 

62634 

1 

12721 

0 

500  6 5 

1 

3 1 7 C C 

1 

21,2630 

62035 

1 1 

00C06 

1 

6 2 634 

1 

12721 

c 

5006  5 

1 

11676 

J 

12642 

1 

1 2 6 53 

1 

21,264C 

12647 

1 

12653 

1 

50065 

1 

3170C 

1 

0000  6 

1 
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C 

126  53 

1 

50C65 

1 

21,2650 

41700 

0 

OJO06 

1 

6P7C7 

c 

50065 

1 

11702 

1 

12665 

1 

12660 

1 

12  703 

0 

21  ,2660 

5006  5 

1 

31700 

1 

0000  6 

1 

627  1 1 

1 

12674 

1 

50065 

1 

317C0 

1 

00C06 

1 

21,^670 

62672 

h 

126  74 

1 

42005 

1 

130  15 

1 

50U65 

1 

4 16  7 6 

c 

62CC5 

c 

5CC65 

1 
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5607  2 

1 

34  753 

1 

13020 

1 
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1 

31  7CC 

1 
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1 

627  11 

1 

22C05 

c 

21 ,27  10 

13A15 

1 
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1 

31676 

1 
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e 

40CCC 

0 

50C65 

1 

56C7  2 

1 

44753 

0 

21,272C 
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1 

5CC6  5 

1 

11702 

1 

12752 

1 

12726 

1 

1 27  57 

1 

50065 

1 

41676 

c 

21,2730 

'7000  6 

1 

62733 

1 

1216  6 

(. 

50C65 

1 

417CC 

0 
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1 

63011 

1 

60066 

1 

2l,274C 

50065 

1 

61676 

1 
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1 

630  1 1 

1 

50065 

I 

6 1 7C0 

1 

000C6 

1 

50065 

1 

2 1,  275C 

6 167  6 

1 

13015 

1 

50C65 

1 

41700 

0 
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1 
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1 

12763 

0 
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1 
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31700 

1 
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1 
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1 
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1 
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c 

13C15 

1 
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1 
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1 
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1 
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I 
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0 
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1 
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1 
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OCTAL  LISTIMG  FOR  PARAGRAPH  « l?f,  V«ITH  PARITY  BIT  IN  BINARY  AT  THE  RIGHT  CF  EACH  WORE,  "S'*  CENOTES  UNUSED  FIXED  RERCPY 
ALL  VALID  ViPPCS  ARE  BASIC  INSTRUCTIONS  EXCEPT  THOSE  «ARKED  "I"  (INTERPRETIVE  OPERATCR  NCPDS)  CR  "C"  (CCNSTANTS) 


21,3CCC 

00006  1 

63C11 

1 
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1 

500  65 

1 

61700 

1 

50066 

1 

61676 

1 

4CCCC 

C 

21 ,3P10 

13015  1 
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1 
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c 

50Q65 

1 
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1 

5O065 

1 
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1 

34755 

1 

21,3C2f 
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1 
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1 
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1 
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0 
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1 
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C 
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1 
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5'Tr6  5 

1 
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0 
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1 
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0 
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1 
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1 
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34755 

1 
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1 
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1 
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0 

74752 

1 
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1 

13C6Q 

0 

21,3050 

34744  1 

713CG 

1 
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n 

34752 

c 

6474X 

1 

40CCQ 

c 

000C6 

1 

C3C  12 

1 
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72232 

0 

03124 

0 

34  745 

r 

C5464 

1 

05155 

0 

C : 

C1510 

1 

05504 

0 

C : 

00  126 

1 

24 , 31 4C 

007)4 

0 

C4674 

0 

r : 

40141 

1 

0000  3 

1 

3473  6 

1 

OOOC6 

1 

C5D  12 

1 

332C6 

c 

24,3150 

046  16 

1 

C: 

20624 

0 

03177 

c 

0315  5 

0 

C3202 

1 

00004 

0 

04523 

1 

C : 

OOC35 

1 

24  ,31 60 

73167 

1 

046  74 

0 

C : 

40  115 

0 

COCOS 

1 

C5516 

c 

C : 

00126 

1 

02163 

1 

0CC03 

1 

24,31 7C 

33205 

c 

04616 

1 

C ; 

21563 

1 

03177 
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0 

C : 

16032 

1 

C : 

00015 

0 

I : 

4 5014 

0 

C: 

0066  2 

0 

C: 

2 6 3 5 1 

1 

I : 

776C5 

1 

C : 

11676 

c 

24,3650 

r : 

03716 

1 

I: 

77776 

1 

33673 

0 

C4616 

1 

C : 

20477 

1 

0 6001 

a 

U60C1 

0 

06C42 

1 

24,3660 

I : 

43345 

1 

C : 

03763 

0 

C : 

11672 

1 

C: 

C1045 

1 

I : 

7 7636 

0 

C ; 

5 15  20 

1 

I : 

52034 

1 

C: 

21574 

1 

24, 367C 

C : 

51532 

1 

C : 

''’0003 

1 

C : 

25  1 40 

0 

C: 

01453 

1 

C : 

01442 

1 

f : 

00243 

1 

C : 

327G3 

1 

I : 

46C2C 

1 

24,3700 

C : 

00050 

1 

r : 

51721 

1 

I : 

7 7 6 24 

1 

C : 

51727 

1 

I : 

61375 

1 

C : 

02C13 

1 

C: 

0002  5 

0 

I : 

77  772 

0 

24,3710 

I : 

51235 

1 

C: 

OODOl 

C : 

OO'I  11 

0 

I : 

77721 

0 

C: 

000  2 5 

0 

I : 

6C372 

c 

C : 

00001 

c 

I : 

77650 

1 

24,3720 

C; 

000  5'' 

1 

I ; 

77624 

1 

C : 

55743 

1 

I : 

77624 

1 

C : 

1576  1 

0 

1 : 

7765  1 

1 

C: 

517  10 

c 

I : 

40220 

c 

24,3730 

r : 

00051 

C: 

000  1 1 

1 

I : 

77  770 

1 

C ; 

00005 

1 

I : 

65345 

0 

C : 

14017 

1 

C : 

14011 

1 

I : 

45006 

0 

24,3740  , 

C : 

53712 

') 

I : 

7!  4('6 

c 

C : 

14041 

1 

I : 

77756 

c 

C: 

140  4 3 

0 

r : 

140  15 

0 

I : 

41525 

c 

C : 

14C07 

c 

24,3750 

I : 

45170 

II 

r ; 

0CHi"4 

C : 

537  12 

0 

C 

14027 

1 

C : 

14013 

0 

I : 

4 1525 

0 

C: 

1 4005 

1 

I : 

4 5 170 

c 

24,3760 

C : 

OOO-'S 

1 

C: 

53712 

0 

I : 

7 14  U6 

0 

1 ; 

776C6 

[ 

c:  : 

000  2 5 

0 

I : 

7 6 4C5 

1 

r : 

0004  1 

1 

C : 

14C35 

1 

24,t77C 

T : 

76405 

1 

C: 

OOC4  3 

1; 

C : 

14037 

0 

I : 

41556 

1 

I : 

52076 

1 

C : 

53633 

1 

C: 

03776 

1 

CK  5M 

76  245 

0 
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OCTAL  IISTING  FOR  PARAGRAPH  S lAA,  WITH  PARITY  BIT  IN  BINARY  AT  THE  RIGHT  CF  EACH  WCPC,  "a"  CENCTES  UNUSEC  FIKEC  MEMORY 


ALL  VAI.TC 

WORDS  ARE 

BASIC 

INSTRUCTICNS 

EXCEPT  THOSE 

MARKEC  " I" 

( INTERPRETIVE 

OPERATOR 

WORD 

S)  CR 

"C 

" (CCN 

STANTS  ) 

25, 2000 

C : 

A7777 

0 

r:  COOOl 

G : 

U 1 1 5Q 

1 

U ( II 

0 

120U6 

1 

15261 

0 

05203 

0 

C : 

02CC3 

C 

25,2010 

C : 

52064 

1 

3771  6 

c 

C5072 

1 

C : 

0 2C23 

1 

C : 

52064 

1 

34736 

1 

00006 

1 

71776 

1 

25,2020 

61775 

0 

55773 

1 

15261 

0 

02060 

n 

04616 

1 

C: 

177C6 

C 

255  7 5 

1 

QCCC4 

C 

25,2030 

30101 

1 

747  4 1 

c 

10000 

0 

120  50 

1 

531  r 1 

1 

51776 

0 

53601 

0 

3C11C 

1 

25,2'-A0 

00006 

1 

060  33 

1 

74746 

1 

CC0C6 

1 

120  50 

1 

C 5 5 67 

c 

C : 

C0522 

1 

25575 

1 

25, 2C50 

41776 

1 

61774 

1 

OOC06 

1 

12056 

1 

31776 

0 

647  52 

n 

557  76 

1 

15  155 

1 

2 5 ,2060 

34753 

1 

54  133 

1 

51773 

(■ 

32665 

C 

14  6 2 2 

1 

C: 

53114 

0 

C : 

53112 

0 

C : 

53110 

1 

25,21 7C 

C ; 

5 3106 

(i 

C:  53104 

1 

C : 

53102 

1 

02102 

0 

0522  1 

0 

C : 

C0144 

0 

44753 

c 

7011C 

c 

25,2100 

54  110 

n 

1526  1 

0 

QCCC6 

1 

23312 

0 

34753 

1 

00006 

1 

0 50  12 

1 

f 522  1 

C 

25,211'" 

C : 

00002 

0 

34755 

1 

54035 

n 

54036 

c 

44  753 

0 

C0fC6 

1 

030  12 

1 

05221 

0 

25, 212C 

C : 

C175C 

1 

44737 

1 

701  10 

0 

54110 

0 

30U  3 5 

1 

045  12 

0 

C : 

57777 

1 

12132 

1 

25,2130 

34755 

1 

12133 

(; 

34  740 

(■ 

5611C 

1 

77744 

0 

26110 

0 

04564 

1 

01312 

c 

25,21AC 

■'2167 

0 

05221 

0 

C: 

'10r>'12 

0 

34740 

0 

701  IC 

0 

ncco 

c 

34735 

1 

02252 

0 

25. 2150 

34740 

0 

70  1 1 '■ 

0 

IQCOO 

0 

44736 

0 

02255 

1 

44741 

c 

701  10 

0 

54  110 

c 

25,2160 

74742 

(■ 

1 100  ;■ 

0 

12604 

0 

4 4 7 5 2 

1 

OOOC6 

1 

03C12 

1 

15261 

0 

34752 

c 

2 5,21  7C 

COC06 

1 

C2C12 

0 

10000 

0 

0000  2 

0 

54112 

1 

54113 

n 

3 4 7 5 2 

c 

CCCC6 

1 

25,2200 

0 5012 

1 

0t-C02 

c 

3 4 7 40 

c 

701 IC 

r 

10000 

0 

34725 

1 

02252 

c 

3 7 743 

c 

25,22  1C 

02255 

1 

40110 

n 

74740 

1 

lOOCC 

c 

32243 

0 

6 2 2 4 2 

1 

C22  52 

c 

4C110 

0 

25, 222C 

74740 

1 

10(00 

0 

34735 

1 

02252 

0 

40110 

0 

74740 

1 

lOClCC 

r 

44  736 

c 

25,2230 

02255 

1 

02244 

1 

44  736 

c 

701 1C 

f 

54  1 ir 

0 

34742 

1 

70110 

0 

00C06 

1 

25,22AG 

13540 

1 

02613 

1 

C : 

6 7070 

1 

C : 

61615 

1 

221 IG 

1 

34740 

c 

000C6 

1 

C6CC  1 

c 

25,225fl 

54110 

0 

C0f0  2 

c 

5 5 313 

0 

347  55 

1 

12257 

1 

553  13 

0 

347  5 3 

1 

5 5 3 14 

1 

25,2260 

0000  6 

1 

23312 

0 

12265 

0 

0522  1 

0 

C : 

COC62 

c 

40110 

'3 

77713 

1 

03006 

1 

25, 227C 

12155 

n 

31313 

1 

00006 

1 

51314 

0 

20035 

0 

5 406  1 

1 

000C6 

1 

7 23  1 6 

c 

25,23CO 

540U1 

1 

3U1  10 

1 

74752 

1 

56061 

L 

04512 

0 

C : 

7 76  44 

1 

10061 

1 

01312 

0 

25,2310 

11314 

1 

12313 

') 

56001 

0 

53355 

1 

0 23  17 

0 

12263 

C 

C : 

227  15 

1 

22C02 

0 

25, 232C 

34753 

1 

54062 

1 

50CC0 

1 

31354 

1 

5406  1 

1 

045  12 

0 

C: 

77177 

c 

12  346 

c 

25  ,2330 

3T061 

i ' 

5006  2 

n 

56112 

c 

4000C 

r 

60C6  1 

0 

64754 

0 

50062 

0 

54C53 

0 

25, 23AC 

10062 

1 

12321 

1 

35020 

0 

000  0 6 

1 

0 50  14 

1 

CCCCl 

0 

inC6  1 

1 

42326 

c 

25,2350 

12352 

n 

32326 

1 

54C61 

1 

12331 

c 

3240  3 

1 

70  1 10 

0 

10000 

0 

13513 

1 

25,23(C 

00004 

0 

44737 

1 

70  1 I'l 

0 

64737 

c 

54  1 If, 

0 

347  53 

1 

C52C3 

c 

C : 

C2401 

0 

25, 237C 

C : 

52F67 

1 

4 J n 0 

c 

74752 

1 

10000 

0 

12377 

1 

05567 

0 

C : 

00  5 1C 

f 

CCCC3 

1 
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OCTAL  LISTING  FOR  PAPAGRAPF  A IAS,  WITH  PARITY  BIT  IN  BINARY  AT  IFE  RIGHT  CF  FACE  NCFC,  "5"  CENCTES  UNUSEC  FIXEC  MEM.ORY 
ALL  VALID  FCFGS  ARE  EASIC  INSTPUCTICNS  EXCEPT  TFCSE  PARKED  "I"  (INTERPRETIVE  OPERATCP  FCRDS)  CP  "C  (CCNSTANTS) 


25, 2ACC 

19631 

r 

C21C2 

C 

13  53  1 

1 

C : 

02001 

1 

I : 

93J20 

1 

C:  01112 

1 

C: 

0027  1 

C 

I : 

7 7 6 2 9 

1 

25,2A10 

C : 

; 97591 

1 

I : 

951  75 

0 

C : 

3 1101 

0 

C: 

97673 

0 

1 : 

77629 

1 

C:  26133 

1 

I : 

77776 

1 

00009 

0 

25 ,2A?r 

■19523 

1 

C : 

Cl  1 C6 

1 

12925 

0 

25112 

1 

02993 

0 

901C9 

Q 

79799 

0 

CCCC6 

1 

25,24?0 

1 2967 

1 

C2972 

1 

9C1C9 

c 

797  99 

(I 

00006 

1 

12967 

1 

30079 

1 

7 9 79  5 

1 

25 , 2AA0 

lOCOO 

0 

02502 

1 

15  155 

1 

25112 

1 

90110 

0 

79792 

0 

261  10 

c 

7979  1 

0 

25,2950 

icoon 

0 

12957 

1 

02167 

0 

39752 

0 

15203 

0 

C:  02609 

1 

C : 

52067 

1 

31303 

c 

25,2960 

0000  6 

1 

12963 

0 515  5 

r 

00003 

1 

25112 

1 

31112 

1 

19690 

0 

39755 

1 

25,2A7C 

55303 

1 

12963 

0 

02299 

1 

09523 

1 

r : 

01  1 1C 

0 

12  5C2 

c 

02299 

1 

39736 

1 

25, 25CO 

26110 

(> 

12923 

1 

02299 

1 

25112 

1 

12967 

1 

C:  03079 

I 

09695 

1 

55112 

c 

25,2510 

15516 

0 

C: 

00091 

1 

325U5 

0 

55113 

1 

00009 

0 

02551 

1 

C : 

01  106 

1 

12539 

c 

25.252C 

0OO03 

1 

0006  6 

1 

31107 

0 

53753 

0 

C6C92 

1 

I:  77629 

1 

C : 

96'’9  1 

c 

C : 

CllCl 

c 

25,2530 

I : 

77919 

n 

C: 

0v(,7  1 

1 

0C0C9 

0 

12999 

0 

02299 

1 

325  51 

1 

C: 

01  106 

1 

12  599 

1 

25,25AC 

02299 

1 

39736 

1 

261  IJ 

0 

12  520 

c 

C2299 

1 

0 55  67 

c 

C : 

00502 

c 

C6C1  1 

1 

25, 2550 

■'.1 515  5 

0 

5<Ki02 

0 

30CCQ 

1 

29002 

0 

U0006 

1 

50000 

1 

3000  1 

0 

52C62 

1 

25,2560 

220(12 

n 

39790 

c 

701  10 

0 

lOOOC 

L 

19550 

1 

30061 

Q 

09512 

0 

C : 

66  16  1 

1 

25,257C 

0000! 

r 1 

3J0  62 

0 

00006 

1 

6260  1 

1 

6956  2 

1 

095  12 

c 

C : 

699  20 

c 

OCCOl 

0 

25,260C 

09560 

0 

626CT 

c 

12  575 

c 

C : 

035  12 

1 

901  1C 

0 

79736 

0 

10000 

0 

02  6 1 3 

1 

25,2610 

02202 

0 

0522  1 

D 

C : 

00062 

0 

3979  1 

1 

70116. 

c 

10000 

0 

12639 

0 

10110 

0 

25, 762C 

12623 

0 

12623 

n 

12690 

0 

90 1 1 0 

0 

79792 

0 

lOOCO 

0 

1353  1 

1 

11113 

1 

25,2630 

12637 

0 

92695 

0 

00006 

1 

63012 

1 

05516 

0 

C:  00271 

0 

13595 

1 

55113 

1 

25,26AC 

37717 

1 

05105 

n 

C : 

12  696 

1 

C; 

52067 

1 

126  11 

1 

C:  2CCC2 

1 

OOOC6 

1 

30C36 

1 

25,2650 

531'T7 

! 

06C92 

1 

I : 

77201 

1 

C : 

COOOl 

0 

C : 

■11 101 

'■) 

I:  79219 

0 

C : 

003  1 1 

1 

C : 

5267  1 

0 

2 5,2660 

C : 

01767 

(1 

I: 

63372 

1 

C : 

017  61 

c 

I : 

53361 

c 

C : 

131C1 

0 

l:  95056 

c 

C : 

97591 

1 

I: 

77629 

1 

25,267C 

C : 

97673 

0 

C : 

19091 

1 

C : 

01  ! 10 

0 

I : 

91939 

1 

C: 

2 1577 

1 

l:  65356 

1 

I : 

91596 

c 

I : 

652C5 

c 

25,2700 

C : 

ODOAl 

1 

r : 

00<  ■ 9 5 

I ; 

99205 

r 

C : 

0(1001 

n 

I : 

77626 

0 

C:  76667 

1 

I : 

97135 

0 

C : 

Cl  107 

0 

25,2710 

C : 

21577 

1 

I : 

71906 

0 

I : 

73525 

1 

I; 

91206 

c 

C: 

000 C 2 

1 

I : 65352 

c 

C : 

00005 

1 

I ; 

91325 

0 

25,2720 

C : 

C0007 

0 

C : 

0 i''■■U 

r 

I ; 

55552 

0 

I : 

77991 

0 

f : 

000  91 

1 

90159 

0 

O0CC6 

1 

73C75 

1 

25,2730 

55359 

' 1 

90  1 10 

0 

79  79C 

1 

C0C06 

1 

12737 

1 

311C7 

Q 

12790 

1 

91107 

1 

25,27AC 

Onoo  6 

! 

73675 

1 

55355 

1 

0609  2 

1 

I : 

91395 

0 

r:  00CC3 

1 

r : 

CCCC5 

1 

I : 

6 5 3 52 

c 

25,2750 

I : 

6 5 276 

1 

f : 

OOCCl 

0 

I : 

729C5 

c 

C: 

COOO  E 

1 

I : 

93066 

0 

C : 00  3 11 

1 

C: 

52761 

0 

1 : 

77629 

1 

25,2760 

C : 

97675 

■' 

I: 

77991 

0 

C : 

■11101 

n 

0000  6 

1 

9307  7 

0 

20155 

1 

1015  9 

0 

39755 

1 

25, 277C 

12772 

0 

39753 

1 

59155 

1 

10110 

0 

12777 

0 

12777 

0 

13027 

0 

1CI55 

1 
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OCTAL  LISTING  PfR  PARAGRAPH  H 1A6,  Wnh  PARITY  BIT  IN  BINARY  AT  THE  RIGHT  CF  EACH  VvCRC,  "S"  CENCTES  UNUSED  FIXED  PEMORV 


ALL  VALID 

ViCPCS  ARE 

FAS  IC 

INSTRUCT ICNS 

EXCEPT  THOSE 

park  EC  "I" 

I INTERPRETIVE 

OPERATCP 

NCRDS ) 

CR  "C 

" (CCNSTANTS) 

25, 30CC 

13010 

1 

60076 

C 

76/67 

0 

IQOOC 

0 

130  15 

1 

36736 

1 

0QCC6 

1 

C 5 C 1 2 

1 

25,3010 

3675  J 

1 

0 )0fl6 

1 

02033 

C 

IQCOC 

0 

130  2 7 

0 

66762 

0 

70110 

0 

00006 

c 

25, 3926 

56110 

'1 

055  16 

0 

C: 

•10061 

1 

66752 

1 

000C6 

1 

C3C  12 

1 

15155 

1 

30076 

0 

25,3030 

7771  5 

1 

00006 

1 

13C51 

1 

06062 

1 

I : 

76375 

0 

C: 

01101 

0 

C: 

01767 

r 

T : 

61572 

1 

25,3060 

I : 76375 

C' 

C : 

01761 

0 

C: 

13  101 

0 

I : 

53362 

0 

I : 

776  56 

1 

C : 

151C1 

Q 

C : 

0006  5 

0 

C : 

01767 

c 

25, 30 5C 

1 : 7 7 7 76 

1 

OULU  6 

u 

60110 

y 

7676  1 

0 

lOOOC 

0 

02317 

C 

30L  7 6 

c 

76  76C 

1 

25,3060 

0000  6 

1 

15  155 

1 

1 1656 

c 

03073 

0 

61603  2 

0 

C : 

52613 

1 

00003 

1 

10C67 

1 

2 5 , 3 C 7 C 

05122 

0 

06616 

1 

C: 

50732 

1 

556  5 6 

c 

C5155 

0 

C : 

2 1122 

0 

C: 

07777 

1 

C : 

33005 

1 

25,3100 

C : 00310 

0 

C : 

00000 

1 

C3122 

0 

C : 

00017 

1 

03123 

1 

C: 

00016 

0 

03  123 

1 

C : 

OCC  15 

c 

25,3110 

03123 

1 

C: 

00016 

1 

03  122 

c 

C : 

C0012 

1 

03122 

0 

C : 

00011 

1 

55  106 

1 

36756 

1 

25,312C 

5110  6 

n 

131  76 

0 

36  753 

1 

00006 

0 

551CA 

1 

C0CC6 

1 

76  75  1 

1 

531C5 

c 

25,3130 

o 

c 

c 

o 

0 

551  1C 

1 

66  7 53 

1 

5 507  7 

1 

331  56 

0 

00006 

1 

02033 

0 

55  112 

c 

25 ,3160 

63103 

1 

00006 

1 

03013 

0 

50002 

c 

300CC 

1 

C6676 

0 

r ; 

36CCC 

1 

00CC6 

1 

25, 3150 

30025 

0 

2 1 1 C 5 

c 

34755 

1 

54001 

1 

53101 

1 

12377 

1 

C : 

00230 

c 

CCCC6 

1 

25,3160 

06007 

1 

5 6016 

1 

00C06 

1 

22012 

1 

00006 

1 

31656 

0 

53272 

0 

36757 

0 

25,3170 

00006 

1 

02'U3 

1 

55332 

0 

00ni6 

1 

1320C 

1 

3CC^6 

c 

51332 

1 

55327 

1 

25, 3200 

11077 

1 

13223 

r 

13206 

1 

C5567 

c 

C : 

005  20 

0 

052  73 

1 

30  1C7 

1 

76  735 

c 

25,32  10 

0000  6 

1 
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0 

C: 

02355 

0 

1 : 

77736 

c 

30, 22 3 C 

C : 

26363 

0 

C : 

03259 

1 

1 : 

50256 

0 

C; 

03537 

0 

T : 

6555  2 

0 

I : 

7 7 6 7 6 

0 

C : 

C2365 

c 

I : 

77776 

1 

3 J,22A  ) 

05353 

1 

C : 

09'”29 

c 

0CT09 

0 

C96  79 

0 

C : 

90193 

0 

05516 

0 

C: 

002  12 

1 

09625 

0 

30,2250 

C : 

79  130 

0 

I: 

77795 

1 

C: 

16013 

1 

C: 

C369  1 

1 

C : 

03627 

0 

C ; 

1 7635 

1 

C : 

16017 

0 

C : 

16263 

1 

3 ) , 226C 

C : 

16C21 

n 

C : 

16271 

1 

C : 

39013 

1 

I : 

59276 

0 

C: 

202  19 

1 

r : 

02267 

c 

I : 

C 7 C -3  C 

c 

C : 

26rci 

1 

30,2270 

I : 

77702 

1 

C : 

02265 

1 

I : 

939  19 

1 

C : 

C 9 7 9 7 

1 

C ; 

60275 

1 

1 : 

93395 

1 

C: 

25751 

0 

C : 

02233 

0 

30,2300 

C : 

17631 

0 

C : 

06  5 24 

i 

C: 

03659 

n 

C: 

C3633 

1 

C: 

26  2 7 5 

0 

C : 

C 1563 

c 

I : 

69225 

1 

C : 

01555 

0 

30, 231C 

C: 

01739 

0 

I : 

77656 

1 

C : 

C3720 

1 

I : 

77616 

0 

C : 

■)2J29 

0 

T: 

51575 

1 

C: 

035  2 1 

1 

C : 

26  2C1 

1 

30,2320 

r : 

03726 

1 

T : 

72491 

0 

C: 

C 3 5 2 7 

1 

C : 

263  13 

1 

C : 

02726 

1 

I : 

76935 

1 

C : 

03537 

0 

C : 

02202 

0 

30,2330 

I : 

72991 

0 

C : 

C3527 

1 

C : 

36311 

1 

C : 

57312 

n 

l: 

7777  5 

1 

C: 

C2563 

1 

I : 

5029  1 

1 

C : 

271C6 

c 

30,2390 

C: 

03537 

0 

I : 

9731  5 

c 

C ; 

0 35  37 

c 

C : 

C3527 

1 

I : 

56236 

0 

f : 

02301 

1 

1 : 

93352 

1 

I : 

77  626 

0 

30,23  50 

C: 

75462 

0 

I : 

950  14 

0 

C : 

09792 

1 

C: 

60355 

1 

C: 

71529 

1 

I ; 

95395 

1 

C : 

02277 

1 

C: 

02213 

1 

30,236P 

r ; 

02393 

1 

I ; 

653  61 

c 

C : 

0 37  26 

1 

C : 

02275 

0 

I : 

77625 

0 

C: 

023  11 

0 

C: 

C239  1 

0 

I : 

6 52  61 

c 

30 ,23  7C 

C: 

0 2 303 

ri 

C : 

)22  73 

0 

I : 

77625 

1 

C : 

C 3 9 1 9 

t 

C : 

02337 

1 

I : 

5 3 261 

0 

C : 

03537 

0 

I : 

76955 

1 
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RAGE  lElE 


OCTAL  LISTING  RCR  PARAGRAPH  # 161,  WITH  PARITY  BIT  IN  BINARY  AT  THE  RIGHT  GF  EACH  WORD,  "a."  CENCTES  LNLSEP  FIXEC  MEMORY 


ALL  VAl  IC 

WORDS  ARE 

BA  S IC 

INSTRUCTIONS 

EXCFPT  THCSr 

MARKED  "I" 

( I NTERPPETIVE 

CFERATCR 

WCRCS)  GP 

"C 

" (CGNSIANTS) 

30  ,7400 

I : 

77626 

fi 

C: 

74131 

1 

I : 

4 1345 

V 

C : 

035  1 / 

1 

C : 

C 23  1 5 

1 

I : 

76561 

1 

C : 

03537 

0 

I : 

77645 

0 

30, 24  1C 

C : 

C3646 

0 

C: 

33646 

0 

I ; 

76521 

0 

G : 

()2146 

0 

C: 

275C2 

0 

C: 

036H6 

C 

I : 

43046 

1 

C : 

0 4 745 

C 

30,2420 

C: 

60427 

U 

I : 

77671 

1 

C : 

20001 

1 

C : 

37517 

0 

C : 

71475 

1 

I : 

776  50 

1 

C : 

60754 

1 

I: 

41^71 

c 

3 ) ,2430 

G ; 

02265 

1 

I : 

44342 

1 

C : 

17771 

0 

I : 

41205 

C 

C : 

0227  1 

1 

r : 

77625 

0 

C : 

02267 

0 

C: 

03517 

1 

30, 244C 

I : 

57461 

0 

C : 

20614 

0 

r : 

17454 

1 

C: 

03517 

1 

1 : 

45214 

1 

G : 

03710 

1 

C : 

604  52 

1 

C : 

21CC6 

1 

30,2450 

I : 

77640 

0 

C : 

30  3 4 7 

1 

T : 

7 7 74  5 

1 

C : 

P3517 

1 

I : 

50025 

0 

C : 

2 10  10 

0 

C: 

606  12 

1 

I : 

45345 

1 

30,246C 

C : 

02271 

1 

f : 

■135  17 

1 

I : 

45071 

0 

C: 

02271 

1 

C : 

610  2 3 

1 

I : 

41461 

1 

C : 

202C6 

1 

I : 

44265 

0 

30, 7470 

C : 

035  17 

1 

C : 

02271 

1 

I : 

43CC6 

c 

C ; 

04703 

1 

C : 

6050  3 

1 

I: 

45345 

1 

C: 

035  17 

1 

C : 

2 1C  12 

1 

30,2500 

T : 

43044 

f> 

C: 

60510 

■| 

C: 

04463 

1 

I ; 

7 7745 

1 

C : 

0652X 

1 

C : 

C2351 

1 

C : 

36353 

1 

C: 

60572 

1 

30,2510 

I : 

4 5 3 4 5 

1 

0 : 

0351  7 

1 

r : 

00  003 

1 

I : 

72406 

0 

I : 

5242  1 

1 

C : 

035  17 

1 

I : 

41325 

c 

C : 

C 3 5 1 7 

1 

3 ) , 2520 

C: 

03474 

0 

I ; 

4 5 2 15 

0 

r ; 

02301 

1 

C : 

03631 

0 

I : 

4132  5 

0 

C : 

02337 

1 

C: 

000C5 

1 

I : 

62^15 

c 

I : 

56271 

0 

C : 

T0o;i7 

0 

C: 

03517 

1 

C: 

C2351 

1 

1 : 

7 124C 

1 

C : 

6G5^1 

1 

G : 

C6  5 2 4 

1 

c ; 

36351 

0 

3 1,2540 

C : 

60553 

1 

T : 

5620  2 

1 

r ; 

02271 

1 

I : 

51025 

1 

G : 

26201 

0 

r : 

60553 

1 

I: 

41345 

0 

C : 

26  20  1 

C 

30 ,2550 

C : 

02271 

1 

I : 

77612 

1 

C : 

1 2 3 5 1 

1 

T ; 

7 7 745 

1 

G.  : 

035  1 7 

1 

I : 

432C5 

1 

C : 

02  3 11 

0 

C : 

02335 

0 

30,256C 

I : 

65225 

1 

0 : 

03633 

1 

C : 

02341 

0 

I : 

43205 

1 

C: 

00005 

1 

1 ; 

56  3 12 

1 

I : 

402  7 1 

1 

C : 

0 3 517 

1 

30,2570 

C : 

0000  5 

1 

0 : 

G 2 3 5 3 

c 

I : 

413  4 5 

n 

0 2 351 

1 

C : 

00003 

1 

I ; 

56325 

0 

C : 

02337 

1 

C : 

OCCC  1 

c 

30,2600 

I : 

45302 

1 

l: 

77626 

0 

G: 

61432 

0 

G.  : 

02353 

c 

I : 

652C5 

0 

I : 

6C465 

c 

C : 

0234  1 

c 

I : 

77625 

0 

3 J, 26  1C 

'C  : 

CQ(.  01 

0 

0 : 

12347 

(■ 

I : 

43  00  1 

1 

C : 

0 0001 

0 

C: 

0474  2 

1 

C: 

606  20 

0 

I : 

77624 

1 

C : 

71501 

c 

30,2620 

I : 

41345 

0 

C : 

271'  6 

•0 

C : 

0235  1 

1 

I : 

56215 

1 

C : 

02345 

1 

C : 

G2271 

1 

I : 

45352 

1 

C: 

02315 

1 

30 , 263C 

C : 

16357 

1 

0 : 

27116 

0 

I : 

43205 

1 

C; 

02353 

0 

G. : 

02347 

c 

1 : 

7 24  7 1 

0 

G : 

C2271 

1 

C : 

02355 

0 

3 1, 2640 

I : 

65361 

0 

C : 

■•;2  30  3 

0 

c ; 

023  57 

1 

I : 

53361 

u 

C : 

03  5 37 

0 

I; 

41572 

1 

I : 

65246 

1 

C : 

C2263 

1 

30 ,2657 

I : 

45316 

1 

C: 

O0'14  3 

0) 

I : 

41525 

0 

C : 

C2263 

1 

I : 

45316 

1 

G : 

OOC43 

0 

I ; 

71240 

1 

C : 

60663 

1 

30  , 26  6C 

C : 

00  r.  1 1 

1 

T : 

52166 

1 

C : 

6067  1 

1 

I : 

55345 

0 

G: 

0000  7 

c 

I: 

7 7 7 6 1 

1 

r : 

COCCI 

c 

C : 

14CC1 

c 

30,2670 

C: 

06524 

1 

I : 

77765 

c 

C : 

02343 

1 

C : 

C23  61 

1 

I : 

7776  1 

1 

C : 

03726 

1 

I : 

53372 

1 

C : 

OOCOl 

c 

30,?7CC 

C : 

03254 

1 

I : 

43001 

1 

r ; 

JOOOl 

0 

C: 

C 4 7 0 4 

c 

C : 

602  16 

1 

I : 

7 7 6 14 

1 

C : 

047C1 

c 

C : 

60763 

u 

30,  27K 

I : 

57575 

1 

0 : 

035  37 

c 

C : 

17262 

1 

C : 

03654 

0 

I : 

51025 

1 

C: 

01234 

0 

C: 

6073C 

c 

I : 

776  14 

1 

30,2720 

C : 

14711 

) 

C: 

57273 

0 

I : 

43014 

0 

C : 

C6666 

1 

C : 

C47C2 

0 

C : 

6'' 730 

0 

I: 

77614 

1 

C : 

01664 

1 

30,2730 

I : 

77776 

1 

30)05 

0 

74742 

0 

lOOoO 

t\ 

127  5 5 

0 

C6C42 

1 

I : 

77624 

1 

C : 

61C76 

1 

3 1, 27  40 

I : 

77776 

1 

3010  5 

0 

74742 

0 

10000 

r 

12  755 

0 

30104 

1 

74742 

c 

lOCOO 

c 

30,2750 

12755 

0 

330  20 

0 

04616 

1 

C : 

20444 

1 

I : 

77776 

1 

15155 

1 

I : 

77776 

1 

00C04 

0 

3 j,276C 

04674 

0 

0 : 

40166 

1 

12741 

0 

T ; 

45345 

1 

G: 

0230  1 

1 

C: 

02333 

a 

I : 

50025 

c 

C : 

2 6 2C5 

1 

3 1,2770 

G: 

16667 

1 

I: 

43014 

n 

C : 

0466  1 

1 

C : 

C4711 

1 

C : 

60710 

1 

I : 

43345 

1 

C ; 

01234 

0 

C: 

25747 

1 

G?  p: 


ASSEMBLE  RFVISin!\J  1 16  CF  AGC  PRCGRA’'  LLMINARV  BY  NASA  20211  12-071 


19:09  AUG.  11,1969 


PAGE  16 7 S 


OCTAI.  t 1ST  ING 

CfR  paragraph 

« 162, 

w ith 

PARITY  1 

BIT 

IN 

BINARY  i 

AT 

THE  1 

RIGHT  CF  FACH  UPRC, 

i" 

CENCTES  UNUSED 

FIXED 

RERCFY 

ALL  valid 

N6)RCS  ARE 

BASIC 

INJSTRIJCTI  CN'S 

EXCEPT  THtSP 

NARKEC  "I" 

(INTERPRETIVE 

OPERATOR  I^CPOS) 

CR  "C 

" (CONSTANTS) 

30,3000 

C: 

3765A 

1 

C: 

60710 

1 

I 

: 77616 

1 

C 

: C6631 

1 

C 

: 6U771 

0 

C : 000  62 

0 

C: 

00000 

1 

C : 

000  3 1 

0 

3 C , 3 ■;  1 c 

C : 

GOO  11 

1 

C: 

; 0)175 

1 

C 

: 3OO00 

1 

c 

: 000  6 5 

0 

c 

; 200Q0 

0 

C:  CCCIO 

r 

C : 

166G0 

0 

C : 

OCCOO 

1 

33,3020 

C: 

01A77 

1 

C : 

0 1516 

C 

r 

; 01661 

1 

I 

: 66301 

c 

G 

: 00163 

0 

C;  17771 

0 

I : 

77776 

1 

072  2 5 

C 

30,3030 

C : 

0000  6 

1 

C: 

■lOnn-' 

1 

C 

: 00002 

0 

G 

; 76777 

1 

C 

; 77175 

1 

C:  776C0 

0 

C : 

75616 

0 

C: 

77507 

0 

30 , 30AC 

C : 

6551  5 

0 

C : 

7 7761 

C 

C 

: 63567 

1 

C 

: 77052 

0 

C 

: 55373 

0 

C:  01167 

0 

C : 

3036  1 

c 

C : 

7 6 5 2C 

1 

3 0 , 3U  50 

C: 

75767 

0 

36755 

1 

56156 

1 

tOOQ6 

1 

3307C 

0 

52155 

1 

52132 

0 

30  162 

1 

30,306C 

07312 

n 

52156 

1 

52155 

1 

52132 

c 

20  1 5 5 

1 

C6CP2 

1 

I : 

63676 

0 

C ; 

00562 

1 

30, 3070 

C : 

3AA  16 

1 

1 : 

77775 

1 

C 

: C6522 

1 

C 

: 03270 

1 

C 

; 03262 

1 

l:  77616 

0 

I: 

77775 

1 

C: 

C3  25  6 

1 

30,3100 

1 : 

6612  1 1 

1 

G: 

61  lOO 

1 

r 

: 00623 

0 

I 

: 7762G 

1 

C 

: 03267 

0 

33766 

1 

56003 

1 

55666 

0 

30,31K 

30  1 11 

(I 

7673  7 

1 

lO'iO  ) 

0 

36753 

1 

5565C 

1 

3 6 7 P 3 

c 

55652 

0 

7C111 

1 

30,3120 

55651 

0 

00006 

c 

30C32 

c 

5677  1 

1 

30033 

1 

56765 

1 

300  3 6 

c 

56767 

c 

30,3130 

36762 

1 

00006 

1 

02030 

0 

IGOQC 

c 

1315  1 

0 

36736 

1 

00006 

1 

02031 

1 

30, 31  AO 

IC06J0 

0 

13151 

c 

55652 

0 

31635 

0 

5677  1 

1 

3 1636 

0 

56765 

1 

31637 

1 

30,3150 

56767 

0 

3 6062 

1 

I 

: 77636 

0 

C 

: 21727 

r 

c 

: 26001 

0 

C:  03262 

1 

I : 

67.736 

0 

C: 

21727 

0 

30,3160 

C : 

6761  7 

1 

6 : 

26015 

0 

C 

: 0U325 

0 

I 

: 53606 

1 

c 

: 61735 

1 

l:  65CC0 

0 

C : 

612C2 

c 

C : 

67673 

0 

30, 3170 

1 : 

77  776 

1 

316  71 

c 

22  157 

1 

C367C 

1 

5567  1 

1 

31673 

1 

22161 

1 

0 3 P 7 C 

1 

30,320<3 

55673 

0 

6)60  6 2 

1 

I 

: 66135 

1 

C 

: 03252 

1 

c 

: 6 12  1C 

0 

l:  65175 

0 

C: 

00015 

0 

G : 

61510 

1 

30, 3210 

T : 

77775 

1 

C : 

02162 

0 

r 

: 36015 

1 

c 

: 615  10 

1 

I 

: 57575 

1 

C:  C21P6 

0 

C : 

00015 

c 

I : 

67375 

c 

30, 3220 

r : 

00015 

0 

C : 

COOCl 

0 

I 

: 61656 

r 

I 

: 76635 

1 

c 

: 00001 

0 

C:  00015 

0 

I : 

6336  1 

0 

C : 

03276 

c 

3 1 ,3236 

I : 

51361 

1 

6 : 

03272 

6 

1 

: 53372 

1 

c 

: COOOl 

fi 

I 

: 77656 

1 

C:  COCGl 

0 

I : 

76635 

1 

f : 

00G15 

0 

30, 32AC 

C : 

00Q07 

0 

1 : 

67276 

1 

C 

: 00001 

0 

I 

; 77772 

Q 

c 

: 000  15 

0 

l:  77626 

1 

C : 

61520 

1 

I ; 

7 7 7 7 6 

1 

30,32  50 

30156 

0 

5600  1 

1 

33  760 

C 

P3716 

G 

56156 

0 

C0CC6 

1 

20156 

1 

0000  6 

1 

30,326C 

13262 

0 

13763 

0 

00006 

n 

22007 

0 

3675  2 

0 

561P2 

1 

300G1 

G 

C0C06 

1 

33, 3270 

700610 

0 

6635C 

c 

00006 

1 

63276 

1 

36  755 

1 

55651 

0 

50  162 

0 

30  156 

1 

361  ,3300 

50  162 

0 

56321 

0 

00  106 

1 

50162 

0 

2163  5 

1 

60CCO 

0 

50  162 

0 

55675 

0 

30,331G 

56001 

1 

1C162 

1 

13265 

1 

11652 

0 

13737 

c 

30  in 

1 

76765 

1 

CCCC6 

1 

37 ,33261 

13  737 

0 

236  77 

0 

51650 

0 

33756 

1 

03716 

0 

55677 

1 

31676 

1 

00CG6 

1 

30, 333C 

76,765 

0 

56001 

1 

51650 

0 

33756 

c 

037  IP 

0 

GCCG6 

1 

10765 

c 

57676 

1 

30, 33AC 

610006 

1 

70737 

c 

20001 

1 

60000 

0 

0000  6 

1 

2 1675 

0 

560C1 

1 

5 1650 

c 

3 1 ,3350 

33756 

1 

03716 

0 

c c ^ c 

0 

1165  1 

& 

61675 

0 

5 56  75 

0 

616  7 6 

0 

00006 

1 

30,^36C 

707  3 7 

0 

2000  1 

1 

27675 

o 

61675 

0 

55663 

0 

6 1676 

0 

C0CC6 

1 

7C737 

c 

30,3370 

200  3 1 

1 

27663 

0 

27663 

0 

61676 

0 

'J0006 

1 

7J767 

1 

20001 

1 

0CC06 

1 
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30,3400 

70745 

0 

5 5644 

1 

4 16  7 7 

1 

C0CC6 

1 

70741 

1 

27644 

1 

276.44 

1 

27644 

1 

30,34K 

31  676 

! 

00006 

1 

7074  1 

1 

200C1 

1 

CGCC6 

1 

7C745 

c 

55645 

0 

41677 

1 

30,3420 

00CO6 

1 

70747 

1 

27645 

0 

27645 

0 

27645 

0 

347  52 

0 

54142 

1 

5C142 

C 

30,3430 

31675 

1 
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0 
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0 
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B1 ,2n00 
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00222 

(1 

C; 
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C 

C : 
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C 
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0 
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0002  4 
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C 
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1 
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1 

C: 
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0 
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0 
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1 
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C : 

03707 

1 

C : 
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U 

1 54  72 

1 

I:  77745 

1 

C:  02201 

c 

31,2060 

I : 

72412 

0 

C: 

14(’."  1 

C 

C : 

022C3 

1 

C : 

14003 

1 

C : 

02205 

1 
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1 
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C: 
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1 
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1 
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1 
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0 
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0 
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0 
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1 
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1 
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1 
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0 
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1 
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1 
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n 
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1 
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1 
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1 
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1 
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c 
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c 

31,2200 
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n 
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0 
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1 
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0 
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1 
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0 
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1 
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0 
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1 
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0 
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0 
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0 
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4013  1 

0 
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1 
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c 
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c 
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1 
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0 
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0 
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1 
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1 
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1 
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c 
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1 
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0 
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1 
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0 
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f; 
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1 
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1 
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0 
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1 
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0 
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1 
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'J 

C ; 
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0 
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1 
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1 
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0 
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1 
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J 
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1 

1304  1 

0 

13C41 

0 

31 ,236C 
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0 
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0 

13240 

0 
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c 
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0 
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1 
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Bl, 2900 

C : 

OODOO 

1 

C : 

0013  4 

C 

I : 

7 7 7 76 

1 

34752 

0 

55647 

1 

12541 

1 

55647 

1 

12763 

C 

31,2410 

■15353 

1 

r ; 

0003  5 

1 

30  10  1 

1 

74744 

C 

00006 

1 

13442 

1 

05353 

1 

C : 

05C23 

0 

3 1, 242C 

C : 

2'iroo 

0 

00006 

1 

00030 

1 

74747 

0 
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0 

125C3 

1 

0532  1 

1 

C : 

CC  1C3 

c 

31,2430 

125  11 

1 

0371  7 

r 

053  1 1 

1 

C: 

001C2 

1 

00006 

1 

31474 

1 

53645 

0 

06C42 

1 

31,244'’ 

1 : 

: 41535 

1 

r : 

01457 

n 

I : 

41535 

1 

C; 

C 14  5 5 

1 

I : 

55535 

1 

C : 

0 1453 

1 

I : 

43161 

c 

C : 

25546 

1 

31,24EG 

r : 

00463 

0 

C : 

26621 

0 

C : 

01254 

0 

I ; 

77  676 

.) 

C : 

27764 

1 

C: 

06524 

1 

C: 

17767 

1 

C ; 

C 254C 

1 

31,2460 

r : 

17757 

1 

r : 

01234 

n 

r : 

5 3 760 

c 

I : 

17776 

1 

3475  5 

1 

5562C 

0 

55610 

0 

556  1 1 

1 

31,247C 

55647 

1 

34752 

r 

55621 

1 

55346 

n 

046  16 

1 

C: 

4C  166 

1 

05516 

c 

C : 

CO  3 1 1 

1 

31,2500 

05516 

0 

C : 

00143 

1 

13514 

c 

C531  1 

1 

C : 

0010  3 

0 

34755 

1 

55746 

1 

34  363 

c 

3 1 ,2510 

12470 

1 

4101  ) 

0 

62433 

1 

(10006 

1 

12  53  2 

c 

34737 

0 

00006 

1 

02C31 

1 

31,252C 

I'JOOn 

0 

12537 

c 

41010 

0 

62433 

1 

0OD06 

1 

1 2532 

0 

31746 

c 

CCCC6 

1 

31,2530 

12537 

0 

12431 

1 

30C75 

c 

7474C 

1 

00006 

1 

12437 

1 

13514 

c 

34755 

1 

31,254C 

55746 

1 

U00’>6 

1 

31625 

1 

53574 

1 

037  17 

0 

ccrc6 

1 

31561 

1 

53625 

0 

31,2550 

0000  6 

1 

31643 

1 

53  5 53 

1 

11623 

0 

12603 

1 

51346 

1 

12347 

1 

053  1 1 

1 

31  ,2560 

C : 

00  10  1 

1 

44752 

1 

5 5 647 

1 

C5516 

0 

C : 

003  I 1 

1 

126C3 

1 

05311 

1 

C : 

00  IOC 

0 

31, 2570 

31425 

0 

27552 

c 

0s)0J4 

0 

U6022 

1 

3474C 

0 

CCCC6 

1 

05C  13 

0 

33  72  7 

c 

3 1 , 2600 

55343 

0 

05516 

c 

C : 

00  143 

1 

C6042 

1 

I : 

45345 

1 

C : 

03625 

0 

C: 

03574 

1 

I: 

4 1X61 

1 

31,26K 

C : 

21214 

0 

I : 

47361 

0 

C : 

33635 

1 

C: 

C 232  5 

1 

1 : 

4 7C45 

0 

C: 

C 3 6 3 5 

1 

C : 

21727 

c 

I : 

76561 

1 

31, 262C 

C : 

02  3 33 

n 

C : 

17545 

0 

I : 

77776 

1 

52155 

1 

21553 

1 

03717 

0 

OOOC6 

1 

31553 

c 

31,2630 

53643 

a 

036  6 3 

1 

37  7 2 1 

1 

(5146 

1 

06042 

1 

T : 

53375 

0 

C: 

03545 

0 

C: 

02635 

0 

31 ,264f 

C : 

0 3635 

1 

I : 

77646 

0 

C : 

'>2  3 33 

0 

T ; 

77776 

1 

C371  7 

0 

3 5014 

1 

54CC3 

G 

34755 

1 

31,2650 

55634 

0 

55635 

1 

55636 

1 

55637 

0 

5564C 

0 

55641 

1 

350  16 

0 

54C03 

c 

31  ,2660 

347  3 6 

1 

05146 

1 

51346 

1 

123  53 

1 

301C2 

1 

74746 

1 

00006 

1 

12773 

1 

31, 26  7(1 

31666 

0 

00006 

1 

12773 

1 

00004 

0 

31446 

0 

5 5^54 

(3 

3144  5 

c 

55556 

1 

3 1 , 2700 

J3717 

0 

347  5 5 

1 

554  46 

1 

55445 

1 

55555 

1 

55557 

a 

3U  1 20 

1 

54  166 

1 

31 ,271C 

06042 

1 

I : 

52375 

1 

C; 

33635 

1 

r : 

03521 

1 

I : 

414  34 

1 

C: 

2 1727 

0 

I : 

76435 

1 

C : 

02  154 

0 

31, 272C 

T ; 

65361 

0 

r : 

03555 

1 

C : 

C3  5 57 

c 

I : 

52361 

1 

C; 

»2154 

0 

l: 

41455 

0 

I: 

45345 

1 

C ; 

OOCC  1 

0 

3 1 ,2730 

C : 

05660 

1 

I: 

71240 

1 

C: 

6 2 7 3 5 

1 

C : 

0 56  6C 

1 

C : 

oonc  1 

0 

I : 

45345 

1 

C : 

03635 

I 

C : 

03521 

1 

31,2740 

I : 

742  7 1 

r 

r : 

COOOI 

0 

I ; 

53455 

0 

r : 

0352  1 

1 

I; 

7656  1 

1 

C; 

C2333 

0 

C : 

0354  5 

c 

T : 

77776 

1 

31,2750 

•13717 

0 

C0CT6 

1 

3 1545 

1 

53635 

1 

00006 

1 

31547 

u 

53637 

0 

00C06 

1 

31 ,276C 

31551 

1 

5364  1 

1 

12773 

1 

C6042 

1 

I : 

643  75 

1 

C : 

C0C25 

7 

C : 

C1734 

c 

I : 

53362 

0 

31,2770 

r : 

0 3 2 5 4 

1 

C : 

C352  7 

1 

1 : 

7 7 776 

1 

06042 

1 

I : 

47375 

3 

C: 

03521 

1 

C: 

C2325 

1 

I : 

7CX55 

1 
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31 ,3CC0 

C : 

03527 

1 

C : 

02265 

1 

I : 

7 7 7 2 1 

t 

C : 

C2575 

1 

C: 

03627 

1 

l: 

5 5 5 2 5 

C 

C: 

065  2A 

1 

I ; 

52AA6 

0 

31  ,301C 

C : 

26263 

1 

r ; 

'.'352  1 

1 

I : 

A1A51 

1 

C : 

C3635 

1 

I : 

7652  1 

0 

C : 

C2575 

1 

C : 

02627 

0 

l: 

776A6 

0 

31 ,3C2C 

C : 

2661  ? 

P 

I : 

5023A 

1 

C : 

21727 

0 

C : 

021A6 

0 

I : 

7777  6 

1 

30120 

1 

5A  166 

1 

30  15A 

1 

31,3030 

60000 

1 

0A616 

1 

C : 

61657 

1 

6 3733 

C 

00006 

1 

73732 

0 

55667 

0 

5 1 3 A 6 

1 

31  ,30  AO 

12357 

0 

03656 

1 

I : 

7 77A3 

1 

C: 

C2A31 

0 

C: 

235  7 1 

C 

C : 

C2A27 

1 

C : 

17567 

C 

C: 

03633 

1 

31,3050 

I : 

A26U5 

1 

C : 

C5656 

1 

C : 

I2A25 

0 

C: 

23565 

0 

r ; 

02A07 

0 

I : 

A1225 

1 

C: 

02633 

0 

C : 

C 5 6 5A 

c 

31 ,3  )60 

C: 

13563 

1 

1 : 

77776 

1 

3A  7AA 

1 

55572 

1 

onoc6 

1 

316A3 

1 

52155 

1 

3A752 

c 

31 ,3C7T 

5AJ  11 

1 

33725 

1 

13532 

0 

513A6 

1 

1237  5 

0 

00CC6 

1 

30155 

c 

536A3 

0 

31,3100 

03663 

1 

A16A2 

1 

6 1A26 

0 

6A733 

1 

5A00  1 

1 

AOori 

1 

60'1C  1 

c 

2 2C0  7 

c 

31,3110 

0000  6 

1 

116A2 

1 

5A13'3 

1 

00006 

1 

7CC0C 

0 

5A131 

0 

60130 

0 

56131 

1 

31,312C 

60  12  1 

1 

5A1  5A 

C 

60  1 3 1 

1 

5U120 

1 

5A032 

1 

60131 

1 

50  1 2C 

1 

5AC3A 

1 

31,3130 

60130 

0 

6A733 

I 

60  131 

1 

6C131 

1 

5012C 

1 

5 AO  36 

•1 

3A755 

1 

5A  163 

1 

31 ,31  AC 

03656 

1 

I : 

65361 

0 

C: 

03627 

1 

C: 

CCC  2 5 

1 

I : 

6275  7 

c 

C : 

C2A11 

1 

C : 

C2AC3 

1 

I : 

70251 

c 

31,^150 

■ C : 

02627 

n 

C : 

036A3 

I : 

7A3A2 

1 

C : 

00  13  3 

1 

I : 

53255 

0 

I: 

7A3A1 

1 

C: 

036A3 

0 

C : 

C 56  56 

1 

31,3160 

I : 

73725 

0 

C: 

000  3 7 

'■J 

C : 

0 2 A 1 7 

1 

I : 

77655 

1 

1 : 

765C5 

c 

C : 

C2575 

1 

I : 

703  15 

1 

C : 

01236 

1 

3 1 , 3 1 7 C 

C : 

05652 

0 

I : 

A5AA5 

r 

C : 

7A523 

0 

I : 

776A6 

0 

C: 

17A6A 

1 

C: 

032  5A 

1 

I : 

65316 

c 

C : 

0 3 2 5 6 

c 

31,3200 

I : 

65316 

0 

C : 

C5650 

1 

I : 

63A  7 1 

c 

C : 

012AA 

1 

I ; 

A52  2 5 

7 

I : 

712AA 

0 

C: 

632  10 

1 

C: 

06  52A 

1 

3 1,3210 

1 : 

A3366 

0 

C: 

0326  0 

n 

I : 

AA2AA 

0 

C : 

632  1 6 

1 

C: 

C326C 

0 

C : 

C3260 

c 

I : 

77776 

1 

03717 

c 

31, 3220 

313A6 

1 

55621 

1 

25623 

1 

513A6 

1 

12363 

1 

5 13A6 

1 

21A23 

c 

616A2 

0 

31,3230 

00006 

1 

632AO 

1 

037  17 

c 

31621 

c 

6A753 

1 

553A6 

n 

3A755 

1 

55623 

0 

31 ,32AC 

3501  A 

1 

5AO03 

0 

JO006 

1 

513A6 

1 

52ACC 

1 

3 1A35 

1 

2ACC6 

1 

2ACC6 

1 

31, 325C 

616A2 

n 

56001 

0 

616A2 

r 

10000 

(1 

1000  1 

1 

133C6 

c 

13306 

0 

1326C 

1 

31  ,32  60 

13656 

1 

I: 

53575 

r 

C: 

03635 

1 

C: 

16575 

1 

C : 

C36A3 

0 

I : 

7A2C3 

0 

C : 

02A33 

1 

C; 

0 2 2 6 5 

1 

31, 3270 

I : 

77655 

1 

C : 

03635 

1 

T : 

A7Q51 

0 

r : 

03521 

1 

C: 

2 17  2 7 

0 

I : 

A7C35 

1 

C : 

0363  5 

1 

C : 

217  2 7 

c 

31,3300 

C: 

26603 

0 

C: 

0257  5 

1 

I : 

76A35 

1 

C : 

02603 

0 

C : 

02611 

) 

I : 

77776 

1 

51621 

0 

12  36  7 

c 

21,331'" 

060A2 

1 

I : 

A71  65 

1 

C: 

0325A 

1 

C: 

21727 

c 

I : 

7A36  1 

c 

C : 

03623 

1 

C,  : 

22CC1 

0 

C : 

0325A 

1 

31, 2320 

I : 

77776 

1 

1 1 6 A 7 

1 

12A06 

c 

11  6A6 

0 

13327 

■J 

05567 

0 

C: 

OlA  12 

1 

CA635 

c 

31,3330 

r : 

65103 

0 

060A2 

1 

T : 

77  775 

1 

C : 

C 3 5 3 7 

c 

C : 

03262 

1 

I : 

77776 

1 

13A11 

1 

06CA2 

1 

31,33A(1 

1 : 

52375 

1 

C : 

03635 

1 

C : 

03521 

1 

I : 

7763A 

0 

C: 

217  2 7 

c 

C: 

C 3 2 62 

1 

I : 

50235 

0 

C : 

C2  1A6 

c 

31,3350 

C: 

12613 

0 

I : 

77776 

1 

AO  1 5 A 

n 

6373A 

1 

6A733 

1 

5 A 1 3" 

1 

AO  130 

1 

26  130 

1 

31  ,3360 

A3  73  5 

1 

601  5A 

1 

6A733 

1 

5A131 

0 

A0131 

0 

26131 

0 

3A751 

0 

762A5 

0 

31,3370 

5A002 

1 

3501A 

1 

5A003 

<1 

30130 

0 

.10006 

1 

500C2 

0 

716  1C 

0 

2ACC6 

1 
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OCTAL  LISTING  FOR  PAPAGPAPF  H 167,  WITH  PARITY  BIT  IN  BINARY  AT  THE  RIGHT  CF  EACH  WCRC,  "2"  CENCTPS  UNUSED  FIXEC  MEMORY 
ALL  VALIC  WCRGS  ARE  PASIG  INSTRUCTIONS  EXCEPT  TFCSF  MARKEC  "T"  (INTERPRETIVE  QPERATCR  WCROSI  CP  "C"  (CCNSTANTS) 


31 , 3A0C 

50002 

o 

53662 

0 

onoc6 

1 

70131 

0 

5000  2 

0 

21662 

0 

100C2 

1 

1 336  7 

1 

31 ,341U 

24306 

1 

3'T(  76 

0 

74  74  1 

0 

00006 

1 

1342  2 

1 

3C121 

0 

00006 

1 

13432 

0 

31,3A2C 

05567 

0 

C: 

U 1 41  1 

0 

34737 

0 

0OU0  6 

1 

0203  1 

1 

OCCf  6 

1 

13437 

C 

C46  16 

1 

31, 3A3D 

C : 

40  166 

1 

1 343  7 

r. 

32144 

1 

06042 

1 

I : 

77624 

1 

C: 

61076 

1 

I:  77776 

1 

O0CO6 

1 

31 ,34A0 

34755 

1 

52756 

1 

40  104 

0 

74742 

C 

OUOC6 

1 

15155 

1 

51621 

0 

12371 

1 

31, 

33  736 

0 

C4616 

1 

C : 

20466 

1 

21666 

C 

0000  6 

1 

1 3 4 76 

0 

401C2 

c 

7 4 7 4 6 

1 

31,3460 

00006 

1 

13  503 

3 3 7 3 7 

1 

C4616 

1 

C : 

2046C 

1 

16001 

1 

134  70 

0 

13453 

1 

3l,347C 

34755 

1 

55446 

1 

55445 

1 

C55C4 

c 

C; 

00  14  3 

1 

15155 

1 

05516 

c 

C : 

00143 

1 

31, 350C 

33737 

1 

134  5 1 

c 

33740 

1 

04616 

1 

r : 

20460 

1 

16001 

1 

135  10 

1 

135  10 

1 

31  ,3510 

0000  4 

c, 

34616 

1 

C : 

40154 

0 

15  155 

1 

11647 

1 

13524 

0 

13522 

n 

06042 

1 

31,P52C 

I : 

77  6 50 

1 

C : 

65271 

J? 

04635 

0 

r:  65277 

0 

05352 

1 

C: 

Q00C3 

1 

C6C42 

1 

I ; 

52175 

C 

31  ,3530 

c : 

03527 

1 

r : 

65526 

r 

0C0C6 

1 

22122 

1 

54117 

1 

52160 

1 

33655 

1 

54141 

1 

3 1 ,35  40 

54161 

(A 

1016-3 

1 

54  162 

0 

3 4 7 5 5 

1 

54  16  3 

1 

CCCC6 

1 

30  1 55 

0 

52127 

1 

31, 3550 

5C  15  7 

1 

3 J00  5 

1 

073  12 

0 

04713 

0 

r ; 

01226 

0 

5 215  5 

1 

52125 

c 

CCCC6 

1 

31,3560 

50  1 1 7 

0 

3O004 

Cl 

52  155 

1 

2C1  6C 

c 

5414C 

0 

64753 

1 

07321 

0 

00006 

1 

31 ,3  5 7C 

5011  7 

0 

3.300  2 

0 

52155 

1 

5014  1 

0 

52004 

1 

4 4 7 5 2 

1 

26117 

1 

44752 

1 

26141 

1 

1 J 1 4 .1 

13  5 64 

1 

00006 

1 

30127 

.3 

52155 

1 

00006 

1 

3C  162 

1 

31,3610 

0722  1 

0 

00006 

1 

33127 

0 

52155 

1 

5213  1 

0 

000C6 

1 

30160 

0 

07220 

0 

31, 362C 

C4713 

r. 

C : 

003  53 

1 

•00006 

1 

4 .)  1 5 5 

1 

20127 

1 

C47  13 

0 

C : 01226 

c 

CCCC6 

1 

31 ,3630 

40125 

0 

20155 

1 

30  163 

0 

74  7 5C 

c 

inoco 

0 

00  132 

1 

24163 

0 

10  154 

0 

31 ,364f 

13603 

0 

13643 

1 

13647 

0 

10155 

1 

136C  3 

0 

1 3 6 4 7 

0 

13647 

c 

52127 

1 

31, 365G 

52  155 

1 

3316  3 

54156 

1 

50132 

1 

1000  2 

1 

C: 

00147 

0 

51346 

1 

424CC 

0 

31,3660 

5'123 

1 

54046 

1 

16C42 

a 

31642 

c 

OOOC6 

1 

74750 

0 

53476 

1 

350  14 

1 

31  ,3670 

54003 

0 

31470 

0 

24O06 

1 

24006 

1 

6 1642 

0 

C0CC6 

1 

73731 

c 

63  726 

1 

3 1 ,3700 

64735 

1 

54cf  1 

1 

40001 

1 

60CC1 

0 

63730 

0 

64733 

1 

55666  1 

1 

31,371'! 

27666 

1 

000  i2 

05642 

1 

C. : 

214C6 

c 

0 5 5 6 7 

c 

C ; 

014C6 

1 

13422  1 

35007 

0 

31, 372C 

5600  3 

1 

57002 

1 

55442 

0 

22')  .13 

1 

010  no 

1 

C: 

0 1565 

0 

C:  7763C  1 

C : 0G155 

c 

31,3730 

r : 

00  143 

1 

C : 

75340 

1 

C ; 

00264 

1 

C : 

COO  5 6 

1 

C:  01542 

0 

C : 

DIO  22 

0 

C:  01477  1 

C:  01500 

c 

31,3740 

C : 

01474 

1 

C : 

03  74  1 

0 

C: 

13742 

0 

CKSM 

44477 

0 

a 

a 

a 

a 

31,375C 

a 

a 

a 

3 

a 

a 

a 

a 

31  ,3760 

a 

5 

a 

a 

a 

a 

a 

a 

31  ,377'- 

9 

a 

5 

a 

5 

a 

a 

S 
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OCTAL  IISTING  for  PARAGRAPH  # 17C»  UIYH  PARITY  BIT  IN  BINARY  AT  TFF  RIGHT  CF  EACH  WORE,  "5"  FENCTFS  UNUSED  FIYED  MEMCPY 


ALL  VALIC 

HCRCS  ARF 

BASIC 

INSTRUCTIONS 

EXCEPT  THOSP 

marked  "I" 

( INTERPRETIVE 

CFERATCP 

: i«  C R D S ) C F 

"C 

» (CCNSTANTS) 

32,2000 

C : 

•300  A A 

1 

C : 

7PI23 

0 

r ; 

4 1702 

0 

C : 

13337 

1 

C: 

10776 

0 

34/37 

C 

7Q077 

C 

ICCCC 

C 

32,20  1.) 

02^’17 

0 

05567 

C 

C : 

00220 

1 

0 54  72 

C 

00006 

1 

300  14 

1 

5342  1 

0 

0CCC6 

1 

32,2020 

31A2  1 

1 

53051 

0 

32  172 

1 

04616 

1 

C : 

2032^ 

1 

T5472 

C 

02036 

C 

44746 

1 

32,2030 

6C15A 

1 

00006 

1 

12014 

1 

00006 

1 

31051 

1 

027  16 

1 

06C42 

1 

I ; 

7 7 6 14 

1 

32 , 2')A0 

r : 

31076 

1 

I : 

77A  lA 

0 

C : 

0 2076 

1 

32172 

1 

04616 

1 

C : 

20621 

0 

060  4 2 

1 

1 : 

77634 

0 

32,205C 

C : 

21576 

1 

C: 

34041 

1 

C: 

27  360 

1 

l: 

77624 

1 

C : 

64132 

0 

C : 

162C1 

0 

C : 

00015 

c 

C : 

34C41 

0 

32, 2060 

C: 

273AA 

1 

T : 

7762A 

1 

r : 

6A132 

C : 

162  07 

0 

C : 

00  3 1 5 

0 

I: 

56225 

1 

r ; 

•)20  21 

0 

C : 

24  175 

1 

32 ,2U7C 

C : 

02215 

0 

I: 

77776 

1 

34  7 53 

1 

5 4333 

C 

32176 

0 

04616 

1 

C : 

01736 

1 

31321 

0 

32,2100 

5A333 

0 

34744 

1 

70074 

n 

10000 

0 

02122 

1 

11301 

0 

12111 

c 

12115 

1 

32,2110 

12111 

0 

34363 

c 

046  16 

1 

C : 

01736 

1 

12105 

0 

04616 

1 

C; 

16706 

1 

046  16 

1 

32,212C 

C : 

17710 

1 

02122 

1 

05516 

0 

C : 

000  5 4 

0 

32172 

0 

C 4 6 1 6 

1 

c ; 

20342 

c 

15472 

1 

32, 2130 

15A72 

1 

05472 

0 

I : 

64375 

1 

C : 

0002  5 

0 

r : 

717  34 

0 

I: 

7256  1 

0 

C: 

242C2 

1 

I : 

53255 

c 

32,21A0 

C : 

2A20A 

1 

C: 

242  12 

O' 

I : 

776  24 

p 

C : 

2 1773 

1 

C : 

2402  5 

c 

C: 

C0017 

1 

I : 

74321 

1 

C : 

01734 

0 

32,21EF 

C : 

2A20U 

0 

I : 

53212 

0 

C : 

24204 

1 

I : 

47055 

1 

C : 

242  12 

0 

C: 

2 1773 

1 

I : 

7775C 

c 

C : 

00C24 

1 

32,2160 

I : 

72130 

0 

r : 

00155 

r 

C : 

C0C26 

c 

I : 

721  30 

0 

C : 

0016r 

0 

C : 

000  3.7 

1 

I : 

43530 

c 

C : 

00  162 

1 

32,2170 

C : 

00216 

1 

C: 

14400 

•,) 

C: 

01420 

0 

C : 

14420 

1 

C : 

G31  CC 

c 

C : 

CCOCiJ 

1 

C : 

037  20 

1 

C : 

15077 

0 

32, 22CC 

C : 

050A1 

1 

C : 

244  C 2 

1 

r : 

25724 

1 

C: 

OUOOO 

1 

C ; 

600  UC 

1 

f : 

OOOCO 

1 

C : 

600CC 

1 

C : 

COCCC 

1 

32,2210 

C: 

60000 

1 

r : 

oonno 

1 

C : 

37777 

1 

C : 

cooor 

1 

C : 

37777 

1 

C : 

07007 

1 

C: 

37777 

1 

1: 

77624 

1 

32,2220 

C : 

27A12 

c- 

I : 

77745 

1 

C: 

03442 

0 

C: 

03661 

0 

C: 

700  4 1 

1 

I : 

43C  14 

c 

C : 

01674 

G 

C : 

01673 

1 

32, 223C 

I : 

A301A 

0 

r : 

016  76 

1 

C : 

C1675 

1 

I : 

77624 

1 

C : 

27135 

1 

I: 

77624 

1 

C: 

11226 

1 

I : 

77775 

1 

32 ,22A0 

C : 

0 ) ) 17 

1 

c : 

17631 

n 

C: 

-300  15 

Y 

C : 

34041 

c 

C : 

274  12 

n 

I : 

43014 

0 

C : 

01474 

1 

C: 

01673 

1 

32,2PEC 

T : 

A301A 

0 

r : 

01676 

1 

C : 

02756 

1 

C: 

64257 

0 

I: 

43C  14 

0 

C: 

C 1476 

0 

C : 

01475 

C 

I : 

7 7 6 2 4 

1 

32,2260 

C : 

2713  5 

0 

I : 

7762A 

1 

C : 

112  2 6 

1 

I : 

7 7 7 7 5 

1 

C : 

CC02  5 

0 

C • 

25761 

0 

C : 

noo  1 7 

I 

C : 

0 1 1 C 1 

c 

32, 227G 

I : 

53A35 

0 

C : 

01761 

C: 

24025 

0 

C: 

G363  1 

c 

I : 

5 34  3 5 

0 

C : 

CCC25 

c 

C : 

27637 

c 

C : 

01101 

0 

32, 23CC 

I : 

5U256 

c 

C : 

'336  3 7 

0 

I : 

77752 

1 

C : 

02732 

0 

I : 

443  16 

7 

C; 

065  14 

1 

I: 

7 7 7 6 6 

c 

C : 

267  30 

1 

32 ,231f 

C : 

oi  1 H 

0 

C: 

25655 

0 

C: 

017  61 

r 

I : 

7 7676 

0 

C : 

Q274P 

1 

I : 

45014 

0 

C : 

73666 

1 

C : 

24732 

1 

32,232C 

T ; 

77676 

0 

C : 

C3645 

0 

1 ; 

77745 

1 

C : 

000  37 

0 

C : 

27662 

1 

C: 

C 3645 

0 

I : 

77646 

c 

C ; 

24C25 

c 

32,2330 

C: 

OOOOl 

n 

r : 

C3653 

1 

T ; 

5 3 435 

c 

C : 

036  31 

0 

1 : 

53435 

0 

C: 

03653 

1 

T : 

7656  1 

1 

C : 

0CC25 

c 

32 , 23AO 

■C  : 

37665 

0 

C: 

112  2 6 

1 

I : 

77624 

1 

C : 

274  12 

0 

1 : 

4434  5 

c 

C : 

03663 

1 

C : 

03661 

0 

C : 

255  17 

c 

32, 2350 

C: 

03653 

1 

r : 

! 1535 

r 

C : 

25503 

0 

C : 

03665 

1 

C: 

355  11 

1 

C: 

277C7 

1 

I : 

45  174 

1 

C : 

CCCC2 

c 

32,2360 

r ; 

26662 

1 

I : 

776.24 

1 

C : 

2742  1 

0 

I : 

77776 

1 

■146  16 

1 

r : 

50040 

u 

04645 

1 

5 5 7 3 7 

1 

32,2370 

0551b 

0 
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1 
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0 
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0 
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1 
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0 
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OCTAL  LISTING  FOR  PARAGRAPH  M 171,  WITH  FAPITY  BIT  IN  eiNARY  AT  THE  RIGHT  CF  EACH  WCRC,  "S"  CENCTES  UNLSEC  FI>EC  RENCRY 


ALL  VALTC 

WCRCS  ARE 

GAS  ir 

INSTRUCT  IONS 

EXCEPT  THOSE 

MARKED  "I" 

( 1 MER  FRETI  VE 

CFEPATCR 

WCRDS)  CR 

"C 

" (CCNSTANTS) 

32  ,2ACC 

70110 

0 

60CC1 

0 

54110 

0 

0000  3 

1 

046  16 

1 

C : 

5 3 112 

C 

C4616 

1 

C : 

17  70  6 

C 

32,2410 

12543 

0 

00OC4 

c 

53105 

0 

52  162 

0 

53  101 

1 

53747 

0 

00006 

1 

30f  34 

c 

32  ,2420 

52160 

1 

S-PiS? 

0 

54  156 

1 

00006 

1 

30025 

0 

52155 

1 

00006 

1 

30036 

1 

32,2430 

53107 

1 

00003 

1 

04616 

1 

C: 

53114 

0 

046  16 

1 

r: 

177C6 

0 

02537 

1 

CCCC4 

c 

32,2440 

00006 

1 

31331 

1 

5376  1 

1 

52162 

t 

53755 

0 

52160 

1 

53460 

0 

00006 

1 

32,24EC 

311U7 

0 

53753 

0 

30156 

C 

5546  1 

1 

0604  2 

1 

C : 

14C25 

c 

C : 

03747 

C 

I : 

57261 

0 

32, 2460 

C : 

20217 

1 

C : 

24(  2 

C : 

03751 

1 

I : 

471  35 

0 

C : 

'1  1U7 

0 

C : 

21577 

1 

C; 

03734 

1 

I : 

47135 

0 

32 ,2470 

C : 

0111' 

i 

C : 

21577 

1 

C : 

1 7 73  6 

G 

C ; 

C 1 101 

c 

I : 

6640  3 

0 

C : 

24CC4 

0 

C : 

37757 

0 

C : 

4604  1 

0 

32, 25CC 

C : 

177A1 

0 

C : 

C002  5 

n 

C : 

34041 

n 

C : 

51255 

1 

I : 

77776 

1 

3 1457 

c 

547  65 

1 

31A6C 

1 

32,2510 

54767 

0 

31461 

r 

5477  1 

1 

06142 

1 

I : 

45175 

0 

C : 

01101 

C: 

47653 

1 

1 : 

77  64  1 

1 

32,2520 

C: 

03  741 

r> 

I : 

65552 

C: 

1 ri45 

1 

I : 

5CR  25 

c 

C : 

2 4 5 4 7 

1 

C : 

645  32 

1 

I : 

77776 

1 

34752 

0 

32, 2530 

54  154 

0 

12535 

1 

I : 

77776 

1 

34755 

1. 

54154 

n 

31737 

Q 

04  6 4C 

1 

30101 

1 

32,2540 

74742 

0 

lOUtiO 

0 

12404 

1 

34  7 53 

1 

54  154 

0 

02535 

C 

C: 

002  10 

1 

C : 

2 1042 

1 

32,2550 

34753 

1 

55  1 )6 

0 

34756 

1 

10000 

0 

54002 

1 

111C6 

C 

12564 

0 

00C06 

1 

32,2560 

5000  2 

0 

31761 

f 

50002 

0 

21101 

1 

00006 

1 

50002 

31101 

0 

50C02 

c 

32 ,2570 

52156 

1 

11106 

12600 

1 

C0006 

1 

50CC2 

0 

31  761 

c 

50002 

0 

20156 

1 

32,26Cr 

1000  2 

1 

12553 

1 

52  156 

1 

5215  5 

1 

32775 

0 

54120 

0 

{47  13 

c 

C : 

C1C23 

1 

32,2610 

07535 

0 

111.06 

126  14 

1 

12  6 3C 

1 

000C4 

0 

00006 

1 

30036 

1 

53767 

1 

32,262L 

30033 

1 

5476  5 

1 

30034 

0 

54  76  7 

c 

30032 

0 

5 4 7 7 1 

1 

C46  16 

1 

C : 

47617 

1 

32, 2630 

46250 

1 

046  1 6 

1 

C : 

47677 

1 

11106 

0 

12636 

1 

127C3 

0 

OOOC4 

c 

55  K6 

c 

32 ,2640 

31766 

1 

P5f3  2 

0 

54  166 

1 

41766 

0 

C503  2 

1 

54163 

1 

00006 

1 

7C124 

1 

32,265C 

52155 

1 

31  767 

r 

05033 

1 

55766 

0 

C00C6 

1 

70166 

1 

C00C6 

1 

7C122 

1 

32,2660 

20  15  5 

1 

31767 

C 

05032 

c 

5576  7 

1 

C0006 

1 

70166 

1 

n0')0  6 

1 

7C  126 

c 

32  ,2670 

20  1 5 5 

1 

00006 

1 

3 .155 

0 

2015  5 

1 

lOOCC 

0 

34736 

1 

1267  7 

1 

00C06 

1 

32, 27CC 

06012 

1 

00003 

1 

12552 

0 

31767 

0 

00006 

1 

70122 

1 

53  1C7 

1 

4 1766 

c 

32,2710 

■ lOn  )6 

1 

7.1]  26 

(' 

21  I'  7 

1 

40163 

J. 

00006 

1 

71766 

0 

00006 

1 

70  122 

1 

32,272C 

52155 

1 

30166 

'I 

'10006 

1 

70124 

1 

20155 

1 

P0163 

1 

OOOC6 

1 

71767 

1 

32, 2730 

000  16 

1 

70126 

r 

20155 

1 

301  54 

1 

0000  6 

1 

72776 

1 

57354 

1 

CCCC6 

1 

32,2740 

12.11h 

1 

55355 

1 

34757 

1 

00006 

1 

02033 

0 

OOOC4 

0 

00006 

1 

127  53 

0 

32,2750 

C46  16 

1 

C : 

5231  7 

0 

12771 

0 

4474? 

0 

7011C 

0 

54  1 10 

0 

44752 

1 

CCCC6 

1 

32,2760 

0 301  2 

1 

34743 

c 

26077 

n 

11055 

1 

44776 

1 

64777 

1 

05203 

0 

C : 

C3  4C0 

Q 

32,277f 

c ; 

0 

44  740 

1 
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1 
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1 

1515  5 

1 

C; 

COO  5 2 

0 
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OCTAL  LISTING  FCR  PARAGRAPH  H 172,  WITH  PARITY  BIT  IN  BINARY  AT  TEE  RIGET  CF  EACH  ^,ORC,  "5"  CENOTES  UNLSED  FOED  NENCPY 
ALL  VALIC  WORTS  ARE  BASIC  INSTRUCTIONS  EXCEPT  THCSF  NARKED  "I"  (INTERPRETIVE  CPERATCR  WCRCS)  CP  "C"  (CCNSTANTS) 


32, Tree 

C : 

04024 

(1 

04616 

1 

C: 

11236 

0 

23254 

1 

5 5455 

0 

2 20  CO 

C 

5525C 

r 

34751 

0 

32,3010 

^5615 

0 

44752 

C 

55346 

(. 

34755 

1 

55622 

) 

44  736 

r 

0000  6 

1 

C3C  12 

1 

32,3020 

06042 

1 

I: 

43C  1 4 

',1 

C: 

02663 

0 

C : 

v 327l 

n 

I : 

43C  14 

'J 

C : 

C5660 

1 

C ; 

03067 

0 

I : 

430  14 

0 

32,^03f 

C : 

C0266 

c 

C : 

CO270 

1 

T : 

77201 

1 

C : 

0000  1 

0 

C: 

02022 

1 

I: 

4 1525 

c 

f : 

C24C  1 

C 

C : 

27625 

1 

32,3')A0 

C : 

55716 

1 

I : 

64312 

c 

r : 

0 17  2 4 

C 

C : 

27635 

c 

c ; 

71343 

) 

I : 

45345 

1 

C : 

024C  1 

C 

C: 

2 5 2 6 1 

c 

3 2 , 30  £0 

C : 

34C41 

0 

C : 

27060 

1 

I : 

77331 

1 i 

G : 

03647 

1 

c • 

CCC  5C 

1 

r • 

C65  22 

1 

C : 

26575 

1 

C: 

06520 

0 

32, 3060 

C : 

266C3 

0 

C : 

0651  6 

c 

r ; 

16611 

0 

C : 

25257 

0 

C : 

27665 

1 

C: 

06524 

1 

C : 

172  5 4 

1 

C : 

C 6 5 24 

1 

3 2,30  7'A 

C: 

03643 

0 

I: 

77745 

1 

C : 

000  15 

r 

C : 

27561 

c 

C : 

00017 

1 

I : 

64312 

n 

C: 

01734 

c 

C: 

3752  1 

0 

32,31CC 

C ; 

67067 

1 

r : 

35236 

0 

C : 

62402 

1 

55646 

0 

06042 

1 

I ; 

5 72  '‘5 

1 

C : 

03627 

1 

C : 

02501 

1 

32,3110 

I : 

44232 

1 

C : 

03623 

1 

I : 

45325 

1 

C : 

02477 

1 

C: 

02632 

■J 

I: 

65222 

0 

C: 

0262  1 

1 

I : 

5 7 2 16 

1 

32,3120 

C : 

;2503 

fl 

T : 

65232 

1 

C : 

02627 

0 

I : 

57225 

r 

C : 

02475 

C 

C : 

025C1 

1 

I : 

51515 

1 

C : 

03627 

1 

32,3120 

1 : 

57225 

0 

C : 

02473 

0 

C ; 

02505 

0 

1 : 

432  15 

0 

I: 

562  15 

1 

I: 

7766  1 

0 

C : 

216  12 

0 

I ; 

42206 

1 

32,31  AO 

r : 

03561 

0 

C; 

1404  1 

1 

T : 

45246 

0 

C : 

25263 

1 

I : 

4504C 

1 

C : 

65164 

1 

C: 

27412 

c 

I: 

43C  14 

0 

32,31 £C 

C : 

01473 

0 

C : 

000  6 3 

1 

I : 

77745 

1 

C: 

C356  1 

c 

C : 

255  1 7 

0 

C: 

OOC  17 

1 

C ; 

25525 

c 

C : 

0CC25 

0 

32,3160 

C : 

25543 

c 

C : 

271  1C 

1 

I : 

77650 

1 

C ; 

65071 

1 

I : 

54335 

0 

C: 

fi2423 

1 

C : 

206  17 

c 

I : 

7 7 6 2 1 

1 

32 ,31 70 

r : 

0>i04  1 

1 

C: 

27442 

0 

C: 

0 2 5 2 7 

1 

I : 

53435 

0 

C : 

0352  1 

1 

I : 

72441 

0 

r. ; 

03635 

1 

C : 

266  17 

c 

32,32CC 

r • 

03254 

1 

C: 

02621 

c 

I : 

7Y776 

1 

05353 

1 

C: 

04024 

0 

443  62 

r 

046  16 

1 

C : 

74  6 7C 

c 

32,3210 

15155 

1 

06A42 

1 

I : 

47  131 

1 

C : 

02747 

1 

C : 

652  16 

1 

C : 

31127 

1 

I : 

53575 

c 

C : 

0262  1 

c 

32,2220 

C : 

27773 

1 

C : 

065  2 2 

1 

r : 

03765 

0 

I : 

7 7 7 7 6 

1 

3 5016 

0 

54CC3 

0 

000C4 

c 

04  6 74 

0 

32,2220 

C : 

40143 

0 

00003 

1 

046  16 

1 

C : 

54123 

0 

05353 

1 

C : 

04024 

0 

34  74  6 

c 

CCCC6 

1 

32,3240 

0 2033 

n 

00006 

1 

1 2 2 50 

1 

33255 

c 

046  16 

1 

C : 

20624 

n 

16001 

1 

12236 

1 

32, 32=^0 

04616 

1 

r : 

677  13 

1 

04635 

0 

C: 

74  130 

0 

C: 

021CC 

1 

C ; 

005C0 

i 

C : 

00035 

1 

C : 

303  73 

0 

32,3260 

C : 

00004 

0 

C : 

o 1 6 1 C 

1 

C : 

ccoco 

1 

C : 

00010 

n 

37713 

0 

05105 

I 

C: 

03204 

c 

C : 

64C67 

1 

32  ,32  70 

1526  1 

0 

I: 

52375 

1 

C: 

0 2 5 1 1 

0 

C : 

C3627 

1 

I : 

5214  1 

1 

C : 

Q2517 

0 

C : 

63164 

1 

05253 

1 

32,33CC 

C : 

00003 

1 

3^777 

1 

J5  173 

1 

C: 

03264 

1 

00004 

0 

34755 

1 

57  7 4 6 

c 

C0CO6 

1 

32,3310 

71756 

n 

21645 

0 

0000  6 

1 

3L040 

c 

53764 

1 

52071 

n 

300  41 

1 

57765 

1 

32,^22C 

56072 

1 

00006 

1 

3 1025 

0 

5^762 

1 

31762 

1 

6 1157 

0 

54154 

c 

31764 

c 

32,3330 

6 1160 

1 

541  57 

c 

317  6 5 

1 

61161 

0 

5416  1 

0 

4 1763 

0 

61253 

1 

6GC7C 

c 

32,3340 

55766 

0 

41764 

1 

61254 

c 

6C071 

1 

5577C 

1 

41765 

c 

61255 

1 

60C72 

1 

32,335C 

55772 

0 

34755 

1 

54155 

1 

54160 

1 

54162 

c 

5 5 2 5 3 

c 

552  54 

1 

C C 2 P 5 

c 

32,3360 

44753 

0 

54163 

1 

06C42 

1 

I : 

65361 

c 

C : 

26022 

0 

C ; 

03762 

1 

l: 

776  2 5 

0 

C: 

01224 

c 

3 2,3370 

C-: 

0003  7 

0 

I: 

63271 

0 

C: 

27112 

0 

C : 

G1226 

1 

I : 

742  5 1 

1 

C : 

C262  1 

0 

I : 

53352 

c 

C: 

03527 

1 
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OCTAL  LISTING  F^R  OARAGRAPH  H 173,  WITH  PARITY  BIT  U BINARY  AT  TFE  RIGHT  CF  EAGH  WORD,  "3"  DENOTES  UMSEO  FOED  RERCPY 
ALL  VALID  WORDS  ARE  BASIC  INSTRUCTIONS  EYCEPT  THOSE  YAPKEC  "I”  (INTERPRETIVE  CPERATCR  WCRCS)  CR  "C"  (CCNSTANTS) 


32,^AGC 

I : 

45455 

1 

C : 

53746 

1 

32, 3A  10 

C : 

00037 

n 

I : 

41261 

1 

32,3420 

C : 

03474 

0 

I ; 

56221 

1! 

32,3A3C 

C : 

00025 

0 

I : 

7761  5 

0 

32,3440 

I : 

45465 

1 

C: 

503  1 3 

c 

32,3450 

I : 

65225 

1 

r ; 

03760 

0 

32,346C 

C : 

2 5 54"^ 

1 

I : 

56271 

0 

32,3470 

C: 

0H(T27 

1 

1 : 

43205 

1 

32,35C0 

C : 

02  54  5 

1 

C : 

01244 

1 

32,3510 

C : 

'^no0  3 

1 

C : 

6551  3 

c 

32  ,3520 

52  155 

1 

046  16 

1 

32, 3‘=3'- 

I : 

63342 

1 

r : 

03521 

1 

32,3540 

04616 

1 

C: 

63442 

0 

32,3550 

5551  5 

0 

33756 

0 

32, 3560 

C :■ 

03670 

0 

C : 

06464 

1 

32,3570 

13702 

0 

160  4 2 

1 

32,36CC 

C : 

0 1246 

1 

C: 

16271 

1 

32,3610 

1 : 

77665 

1 

C: 

25755 

1 

32,3620 

C : 

36265 

0 

C: 

6027  5 

1 

32,3630 

I : 

75240 

0 

r : 

65634 

0 

32 ,364(' 

C : 

20  606 

0 

C: 

'<3643 

0 

32,3650 

T : 

521  75 

0 

C : 

12551 

1 

32, 3660 

I : 

77414 

0 

C : 

0447  1 

1 

32,3670 

C : 

73707 

0 

03740 

1 

32 , 3700 

C : 

00004 

n 

15155 

1 

32,3710 

C : 

6025  1 

1 

I: 

45C14 

'• 

32,3720 

0 : 

0351  7 

1 

C : 

0350  2 

32, 3730 

13667 

1 

I : 

45234 

0 

32,3740 

34737 

0 

541  1 c K 

32,3750 

C : 

00021 

1 

C : 

33^00 

0 

32,3760 

C : 

70067 

1 

C5353 

1 

32  ,377D 

'a 

3 

C: 

03521 

1 

I : 

776  56 

1 

C: 

COO  17 

1 

C : 

20214 

1 

C : 

C3474 

0 

I : 

45215 

0 

C: 

03645 

0 

C : 

C2541 

f 

I : 

51515 

1 

1 : 

45115 

0 

C : 

06522 

1 

C : 

4766  2 

1 

C : 

03767 

1 

I : 

53361 

0 

C : 

260  2 2 

0 

C : 

03762 

1 

C : 

17760 

c 

I : 

5527  1 

0 

C : 

11244 

1 

C: 

22006 

1 

I : 

652  15 

1 

r : 

02  543 

1 

C : 

C3464 

1 

I : 

5632  5 

n 

I : 

4 4206 

0 

C: 

0000  3 

1 

I : 

7 124C 

1 

I : 

77745 

1 

I : 

77745 

1 

1 : 

77601 

0 

C: 

62147 

1 

0 6042 

1 

I : 

777  7 5 

1 

I : 

74256 

0 

C: 

0347^ 

0 

I : 

51372 

0 

C : 

00001 

(; 

C : 

rnooc 

1 

C : 

C40CC 

GJ 

55455 

0 

06042 

1 

I : 

43C  1^ 

0 

T : 

45C14 

0 

C : 

04462 

0 

r ; 

61071 

0 

I : 

77  624 

1 

c ■ 

65731 

1 

I : 

54345 

1 

C : 

■11244 

1 

I : 

7047  1 

1 

C: 

160  15 

1 

C : 

16263 

1 

C : 

340  15 

1 

r : 

02267 

0 

I : 

77745 

1 

C : 

02567 

1 

r : 

36273 

1 

C : 

02335 

0 

C : 

03633 

1 

1: 

45345 

1 

I : 

4 5614 

0 

C ; 

C4461 

0 

C : 

71554 

0 

C : 

65655 

1 

I : 

77775 

1 

C : 

0 2 5 ■=  5 

0 

03740 

1 

C5353 

1 

G : 

04024 

0 

35027 

1 

C5146 

1 

OOOG6 

1 

05516  n C:  00215  1 360CC  1 


C : 

04  707 

0 

C : 

6571  7 

f 

C : 

65731 

1 

I : 

777  76 

1 

C5353 

1 

r : 

C4C24 

C 

C : 

21574 

1 

C : 

03442 

0 

I : 

7766  ! 

0 

34  7 50 

1 

CC0C6 

1 

050  14 

1 

C : 

11021 

1 

C : 

000  00 

1 

C: 

00507 

0 

C ; 

0'1035 

1 

15  155 

1 

C : 

03  764 

1 

a 

a 

5 

I : 

( 244  1 

0 

C : 

tCC31 

C 

G ; 

17474 

0 

C: 

00045 

0 

C: 

C 2 3 3 3 

c 

C : 

17  775 

1 

C : 

01236 

1 

I : 

60471 

0 

C : 

05652 

0 

I : 

7764  1 

1 

C : 

00017 

1 

C : 

00C27 

1 

C : 

02621 

0 

I : 

65246 

1 

C : 

0 3 7 6 2 

1 

C : 

25544 

0 

I : 

41325 

f' 

C: 

03611 

1 

C: 

00001 

Q 

C : 

COC25 

0 

I : 

4 5 2 71 

1 

G : 

02547 

0 

C: 

01244 

1 

1 : 

56325 

0 

C : 

6 5 5 1 3 

c 

I : 

41545 

c 

I : 

51C21 

0 

G: 

000C3 

1 

C: 

17464 

1 

1 : 

7 7 7 7 6 

1 

C : 

00C31 

0 

I ; 

53352 

0 

C: 

03734 

1 

I : 

7 7 6 46 

c 

C : 

02263 

1 

I : 

7 7 77  6 

1 

C : 

00000 

1 

G: 

05075 

0 

3415  1 

c 

C : 

C46  6 5 

c 

C : 

04265 

1 

I : 

43C14 

0 

1 : 

77776 

1 

0532  1 

1 

C ; 

CO  K6 

c 

C: 

34CC3 

0 

C : 

20  20  5 

1 

1 : 

77665 

1 

C: 

C 3 6 3 5 

1 

C : 

C3637 

0 

C : 

03641 

1 

I: 

57535 

0 

C : 

260C2 

1 

I : 

7 7 702 

1 

C : 

573  12 

0 

I : 

45246 

0 

C : 

02565 

0 

C: 

03633 

1 

C: 

C2335 

c 

I : 

7766  1 

c 

I : 

51U25 

1 

C : 

02561 

1 

C: 

65653 

1 

C : 

166  2 1 

0 

r : 

C3631 

c 

C : 

02625 

1 

05504 

0 

C : 

002  16 

1 

C46  16 

1 

33  760 

0 

53252 

1 

053  53 

' 1 

552  50 

c 

06042 

1 

I : 

7 7624 

1 

l: 

77650 

1 

C; 

6 5622 

1 

I: 

72545 

0 

cccr6 

1 

315C2 

1 

53517 

1 

C: 

202  14 

1 

f : 

035  17 

1 

I : 

776  16 

c 

0C0C2 

c 

C : 

00000 

1 

C : 

01750 

1 

C: 

2 5 6C5 

c 

C : 

02114 

1 

C : 

03372 

1 

C: 

03765 

0 

CKSN 

67751 

c 

a 

3 

3 

S 

GAP:  ASSf^BLE  PEVISIPN  116  CF  AGC  PPHGPAM  LUMINARY  BY  NASA  202111P-071  19:09  AUG.  11,1969  PAGE  1689 

OCTAL  LISTING  FOR  PARAGRAPH  </  17A,  WITH  FAPITY  BIT  IN  BINARY  AT  THE  RIGHT  CF  EACH  WORD,  "a"  CENCTES  LNLSED  FIXED  HEHCFY 


ALL  VALID 

WORDS  ARE 

BASIC 

IMStRUCTTDNS 

EXCEPT  THOSE 

RARHEC  "I" 

( I MFRFRETIVE 

CPEPATCF 

; WCFCS  ) CR 

"C"  (CONSTANTS) 

33 ,20 JO 

C : 

■♦1545 

0 

C : 

t2341 

1 

c: 

61000 

U 

( ; 

7 1 2 1 C 

1 

C : 

cocor 

1 

C : 

Doroo 

1 

C;  72333 

1 

C; 

4 5 546 

1 

33,  2nif 

C : 

65363 

1 

C : 

64451 

0 

C : 

21241 

0 

C: 

03216 

1 

C : 

30153 

0 

C: 

23101 

0 

C:  63105 

0 

C : 

61733 

1 

33,2020 

r : 

.115.17 

1 

C : 

■M321 

1 

C : 

26716 

1 

C : 

on  5c 

C 

C : 

33343 

0 

r : 

02630 

0 

C:  25010 

1 

C; 

24402 

1 

33 , 2G3C 

C : 

26003 

0 

C : 

61377 

0 

C: 

55754 

1 

C: 

77644 

1 

C: 

655  56 

1 

C : 

644  53 

1 

C:  55670 

0 

C : 

0CCC2 

n 

33, 20A0 

r : 

11777 

0 

C : 

01023 

1 

C : 

3 715  5 

1 

C : 

C0065 

1 

C : 

0624  4 

0 

40110 

0 

74742 

0 

Q0C06 

1 

33  ,2050 

12123 

1 

1)0  0.)  4 

il 

26110 

0 

44736 

c 

00006 

1 

C3C  12 

1 

44740 

1 

70076 

1 

33, 206C 

54076 

1 

44753 

c 

70074 

D 

540  74 

0 

046  16 

1 

C: 

52167 

0 

34740 

c 

7C11C 

c 

33,2070 

10000 

0 

1210  4 

1 

35C3  1 

C 

C5072 

] 

C : 

02113 

0 

C : 

66067 

0 

44742 

c 

7C11C 

0 

33,21CC 

54110 

0 

34736 

1 

26  1 10 

n 

12  5 73 

c 

34  7 5 3 

1 

C52C3 

0 

C:  03564 

c 

C : 

52067 

1 

33, 2110 

3474  1 

1 

26110 

0 

12573 

0 

34753 

1 

05203 

0 

C: 

02202 

0 

C:  52067 

1 

C4f  16 

1 

33,2120 

C : 

17  706 

0 

1515  5 

1 

1 5 3 5 5 

1 

00006 

1 

41234 

1 

52155 

1 

00006 

1 

30025 

0 

33,2130 

20155 

1 

54163 

1 

30155 

0 

0000  6 

1 

74740 

1 

5 2155 

1 

06042 

1 

I : 

5 2 315 

1 

33, 21A0 

c • 

01726 

61 

C : 

03527 

1 

I : 

7 4 3 2 5 

c 

I : 

52255 

1 

C : 

01720 

0 

C : 

03521 

1 

I : 774  14 

0 

C ; 

0 1043 

1 

33  ,21 50 

C : 

66152 

1 

12573 

0 

C : 

25101 

0 

C : 

0000  1 

c 

I : 

7776  1 

1 

C : 

2 617  7 

1 

C : 0176  1 

0 

I : 

77414 

0 

33,2160 

C : 

01263 

1 

40074 

0 

74753 

0 

00006 

1 

12573 

0 

00004 

0 

2607A 

0 

11C55 

1 

33,2170 

44776 

1 

64777 

1 

05203 

n 

C : 

033  56 

1 

C : 

50067 

0 

12573 

0 

C:  00006 

1 

C; 

10000 

0 

33,22CC 

C : 

75751 

n 

C : 

41775 

1 

C: 

00022 

1 

C: 

07212 

1 

C : 

000  0 7 

0 

C : 

161D0 

1 

05353 

1 

C : 

16035 

0 

33,  2?  10 

C : 

20C0n 

0 

C : 

02217 

1 

C : 

66C67 

0 

37721 

1 

5507  4 

1 

04616 

1 

C:  15271 

1 

06042 

1 

33,2220 

! : 

51575 

1 

C: 

0032  5 

0 

I ; 

nilb 

1 

30154 

1 

552  4 5 

1 

QCCC6 

1 

72020 

0 

535  14 

1 

33, 223C 

00006 

1 

31244 

1 

53571 

1 

40104 

0 

747411 

0 

C0CC6 

1 

12254 

1 

30  106 

c 

33,22A0 

74737 

1 

lOCCC 

0 

00006 

1 

32001 

1 

54002 

1 

00006 

1 

315  14 

0 

0CC06 

1 

33,2250 

10002 

1 

00006 

1 

71243 

1 

21571 

1 

3202  1 

0 

07  3 12 

c 

52155 

1 

21510 

0 

02440 

47617 

1 

45C14 

33,2260 

(1 

046  1 6 

1 

C : 

32414 

1 

74616 

1 

C : 

200  37 

1 

0604  2 

1 

I : 

c 

33,2270 

C: 

03307 

a 

r : 

6677  1 

0 

C : 

66  735 

0 

I : 

7 7 7 7 6 

1 

03514 

1 

12423 

0 

55157 

1 

55  160 

0 

33,2300 

55161 

1 

44741 

0 

701176 

1 

54076 

1 

34745 

0 

7C1C3 

1 

10000 

0 

12342 

1 

33,2310 

40  l')2 

0 

74752 

1 

lOOOU 

0 

12346 

0 

41250 

0 

6 1245 

0 

00006 

1 

6 2 3 5 2 

1 

33  ,2320 

40076 

1 

7476  L 

0 

26076 

1 

34753 

1 

5551  5 

c 

301C6 

c 

74737 

1 

10000 

0 

33,2330 

1 2375 

0 

34743 

D 

00006 

1 

12032 

1 

00006 

1 

12375 

0 

44736 

c 

70111 

1 

33,2340 

54111 

1 

12  4>-  • 

0 

44  752 

1 

70102 

c 

54102 

0 

12375 

0 

40102 

0 

74752 

1 

33,2350 

26102 

0 

12375 

0 

03  5 14 

1 

11515 

c 

12366 

1 

10  7 60 

1 

12400 

0 

05353 

1 

33, 2360 

C : 

00374 

1 

3771  6 

c 

05072 

1 

r : 

02575 

1 

C : 

74067 

0 

124C.,1 

0 

555  70 

c 

035  14 

1 

33  ,23  70 

3157  > 

1 

555  15 

‘I 

00CC4 

c 

C4674 

0 

r : 

40166 

1 

40111 

1 

74736 

0 

26111 

1 

GAP:  ASSENBLE  REVISION  116  CF  AGC  PPCGRAf'  LUMNAPY  flV  NASA  202U12-071 


19:09  AUG.  11,1969 


FACE  1690 


octal  IISTING  FOR  PARAGRAPH  H 175,  WITH  PARITY  BIT  IN  BINARY  AT  THE  RIGHT  CF  EACH  WORD,  "a"  DENOTES  LNLSEC  FIXED  NEYCFY 
ALL  VALID  WORDS  AR  F BASIC  INSTRUCTIONS  EXCEPT  THOSE  HARKED  "I”  I I N T E P PR  <=T  I V E CPERATCP  WCRCS)  CR  "C"  (CONSTANTS) 


33  ,2400 

0000  3 

1 

046  16 

1 

C : 

40463 

1 

30167 

1 

75CC4 

1 

54166 

1 

22007 

0 

52121 

1 

3 3, 24  1C 

03514 

1 

00006 

1 

31252 

0 

52006 

0 

C: 

02  145 

0 

I: 

77624 

1 

C : 

66667 

C 

I : 

7 7 7 7 6 

1 

33,2420 

32437 

0 

02424 

1 

C 5 1 5 5 

r 

360C7 

0 

OOOC4 

0 

77752 

1 

5406  1 

1 

0CC06 

1 

33,243C 

50061 

0 

31545 

1 

5006  1 

0 

5322C 

1 

1006  1 

1 

1 2425 

1 

0CCC2 

C 

C : 

00C22 

1 

33, 24A0 

31155 

1 

54765 

1 

31156 

1 

54767 

0 

31154 

0 

54771 

1 

OOOC2 

C 

C 5 3 5 3 

1 

33 ,T450 

C : 

000  5 1 

0 

37723 

0 

C5  105 

r 

C : 

C3636 

1 

C : 

66C67 

c 

401C7 

C 

75015 

1 

26107 

C 

33 ,246C 

12546 

0 

I : 

77776 

1 

40!  0 7 

0 

74735 

0 

000C6 

1 

1 2 5 5 1 

c 

401C7 

C 

74743 

1 

33,2470 

0000  6 

1 

12506 

1 

0CCQ6 

1 

33  115 

1 

521  55 

1 

00006 

1 

31535 

C 

20  155 

1 

3 3 ,2  500 

IQOOC 

0 

12506 

1 

0 5 504 

0 

C : 

00  3 11 

1 

C55C4 

0 

r ; 

002  53 

c 

40  10  7 

0 

74742 

C 

33,  25  1C 

0000  6 

1 

12545 

0 

4U107 

0 

74751 

1 

J0006 

1 

13  117 

1 

401C7 

C 

7 4 741 

C 

33,2520 

00006 

1 

12540 

0 

3 1642 

c 

61427 

1 

00006 

1 

62536 

0 

34741 

1 

560C3 

1 

33,2'^3C 

54001 

1 

41  545 

1 

2 2003 

1 

61430 

1 

00006 

1 

6 24X7 

1 

34746 

C 

12541 

1 

33,  ’540 

34745 

0 

^3676 

C 

13  117 

1 

C5567 

0 

C : 

)05  1 1 

1 

000C4 

0 

43112 

r 

7C107 

C 

33,2550 

54  1 17 

0 

03  514 

1 

30077 

1 

7 501  4 

c 

lOOCC 

0 

12567 

0 

30110 

1 

72250 

0 

3’,256C 

10000 

n 

12567 

0 

3)110 

1 

777  1 3 

1 

loocr 

0 

12573 

0 

12C45 

c 

GCC04 

c 

33,2570 

44742 

0 

7cn  T 

r, 

541  10 

c 

C6042 

1 

I : 

51575 

I 

C : 

03573 

0 

I ; 

45206 

1 

C : 

0 2 3 3 2 

c 

33,26CC 

C : 

03  53  5 

1 

C : 

• 3775 

1 

T : 

47075 

0 

C : 

26026 

1 

C: 

2 16  13 

0 

C : 

2 7 7 X2 

c 

C : 

C3537 

c 

I : 

53435 

0 

33, 261G 

r : 

03720 

1 

C : 

27726 

1 

C : 

C3  573 

0 

I : 

60505 

1 

C : 

01734 

0 

C: 

27545 

0 

C: 

036C  1 

c 

I : 

7 6 5C5 

c 

33,2620 

C : 

01734 

0 

C : 

27553 

1 

C: 

03  537 

c 

I : 

51435 

1 

C : 

0360  1 

0 

I ; 

635  52 

0 

I : 

77671 

1 

1 ; 

47C75 

0 

33,2630 

C : 

26030 

0 

C : 

21613 

0 

I : 

7 1776 

1 

00004 

0 

31536 

0 

5 5743 

1 

3154C 

1 

5 5 744 

c 

33,2640 

31542 

0 

55745 

1 

30  1 54 

1 

55  7 16 

1 

000C6 

1 

31573 

1 

5352  1 

1 

CCCC6 

1 

33,2650 

31575 

1 

53523 

0 

OO006 

1 

31577 

0 

5352  5 

c 

C00C6 

1 

31601 

1 

53527 

1 

33, 266C 

000)6 

1 

316C3 

0 

53531 

0 

0000  6 

1 

31605 

0 

5 ’ 5 ’ 3 

1 

1 2275 

1 

I : 

41X56 

c 

33,2670 

C: 

03537 

n 

I : 

67340 

1 

C : 

C277  7 

1 

C : 

030CIC 

1 

I : 

50C76 

0 

C : 

66724 

0 

l: 

50375 

0 

C: 

06516 

c 

3 3 , 27CC 

C : 

03537 

n 

I : 

41552 

0 

I : 

443  16 

0 

C: 

26766 

1 

I : 

56325 

0 

C : 

26C40 

1 

C : 

OOC43 

c 

C : 

00C41 

1 

3 3,27  10 

I : 

4 1 2 ,)  5 

0 

C : 

260  4 2 

0 

I : 

65361 

r 

C : 

03537 

0 

I : 

41205 

0 

C: 

2&V.44 

n 

C: 

000  4 1 

1 

I : 

76  56  1 

1 

33,2720 

C : 

06516 

0 

I : 

45455 

1 

r : 

74256 

(, 

I ; 

41455 

c 

I : 

6034  5 

c 

C : 

CQC43 

0 

C : 

000  50 

1 

I; 

53663 

1 

33,2730 

C : 

26032 

1 

C : 

56623 

0 

I : 

45561 

1 

C : 

742  14 

0 

I: 

776  16 

0 

I: 

6 1375 

i 

C : 

00325 

0 

C : 

C1734 

c 

33, 2740 

I : 

76561 

1 

C : 

26022 

0 

C : 

0 35  27 

1 

I : 

41562 

c 

I : 

41455 

0 

C: 

01236 

1 

I : 

65255 

c 

C : 

C 1226 

c 

33,275C 

C : 

01247 

1 

I : 

74261 

1 

C: 

20207 

0 

I : 

44055 

1 

C : 

C 122C 

0 

C: 

CCC37 

c 

C : 

37545 

1 

f : 

66667 

0 

33,2760 

I : 

532  5 5 

0 

I : 

776” 

1 

C : 

01226 

0 

C : 

37553 

c 

C : 

000  37 

0 

C: 

01463 

1 

C: 

063  1 5 

c 

C : 

CCC  1C 

f 

33,2770 

C: 

00000 

1 

I : 

41575 

0 

C: 

C23  17 

0 

I : 

6 5255 

c 

C : 

017  2 6 

c 

C: 

C1247 

1 

I : 

74271 

0 

C ; 

26  7 70 

0 

gap:  ^S?pN(?LE  PFVISION  116  OF  AGC  PRCGR4N  LtPIN'ARY  BY  AASA  2021112-071 


1?  :09  AUG  . 11  , 1‘56S 


PAGE  16F1 


OCTAL  LIFTING  FCR  pArAGRAFF  M 176,  WITH  PARITY  BIT  IN  BINARY  AT  THE  RIGHT  CF  EACH  WORD  , "a"  CENGTES  LNLSFG  FIYEC  NENCFY 
ALL  VALID  WORDS  ARE  BASIC  INSTRUGTICNS  Fx-rFFT  THCSF  HARKEF  "I"  (INTERPRETIVE  CFEPATCR  WCRCS)  CR  "C"  (CONSTANTS) 


33  ,3000 

I : 

77655 

1 

C: 

01720 

0 

C : 

3 7 5 7 3 

1 

C : 

67C67 

1 

I : 

C Q 2 F A 

C 

C : 

C 1 726 

C 

T ; 

77626 

0 

G : 

74  176 

1 

33, TO  1C 

I : 

77776 

1 

03  51  4 

1 

■J6042 

1 

I : 

77775 

1 

C: 

03563 

1 

C ; 

26  2 17 

C 

C ; 

02573 

c 

C : 

2 5 72  0 

C 

33, 30  20 

C: 

036U1 

0 

C: 

; 17  26 

C 

T ; 

77776 

1 

03514 

1 

06042 

1 

I : 

74375 

) 

C: 

002  2 5 

0 

C : 

26C24 

c 

33, 303F 

I : 

53206 

0 

C : 

■U236 

1 

I : 

53206 

0 

C: 

03527 

1 

1 : 

5632  5 

0 

C : 

C 12A7 

1 

C : 

267  7C 

c 

I : 

77761 

1 

33, 30A0 

I : 

77655 

1 

C : 

0352  1 

1 

G : 

37573 

1 

C : 

67C67 

1 

1 : 

53255 

0 

I : 

776  55 

1 

G: 

0 3 5 2 7 

I 

C : 

C36C  1 

c 

33, 3050 

1 : 

77646 

0 

C : 

27472 

0 

C : 

03537 

c 

1 : 

72441 

C 

C : 

0360  1 

0 

G : 

2 74  74 

0 

G : 

035  7 3 

0 

1 : 

7 243  5 

0 

33,3C6G 

C : 

02325 

1 

C : 

17  734 

1 

r : 

n045 

I : 

77625 

1' 

C: 

02332 

0 

C: 

27  5 2 5 

c 

C : 

66461 

1 

1 : 

77656 

1 

33, 3070 

C : 

17537 

fl 

C : 

O0''43 

0 

I : 

55261 

1 

C : 

20207 

0 

C : 

263  36 

3 

I: 

74205 

0 

G : 

26770 

0 

C : 

03  537 

c 

33  ,31T0 

C : 

03563 

1 

I: 

77616 

n 

C : 

30303 

1 

C : 

coco  5 

1 

r ; 

332  1 2 

0 

C : 

00C14 

1 

r : 

20300 

0 

G : 

00000 

1 

3^,3110 

r ; 

C0310 

p 

C : 

00(100 

1 

C : 

00620 

0 

C: 

00110 

1 

C: 

37767 

0 

C : 

32  200 

1 

C : 

04445 

c 

34742 

1 

33,3120 

7010  7 

0 

10000 

0 

1 2 545 

3475C 

1 

70107 

3 

00006 

1 

13252 

0 

30120 

1 

33,3130 

541  66 

1 

0604  2 

1 

I : 

61375 

1 

C: 

02273 

(' 

C : 

02146 

0 

I : 

7 2 5 1 5 

c 

c : 

C36C1 

c 

1 : 

5C255 

0 

33, 31  AO 

C : 

03734 

1 

G : 

00  (■Cl 

0 

I : 

774C5 

0 

C : 

C1352 

1 

401  10 

.3 

74743 

1 

00006 

1 

13  152 

0 

33  ,31  SC 

31353 

r> 

j 7 3 1 2 

0 

06G  42 

1 

I : 

542  1 5 

c 

C : 

C3655 

1 

C : 

20210 

c 

I ; 

74205 

0 

G : 

2601  1 

0 

3^,316C 

1 : 

45241 

1 

C : 

C3537 

0 

C : 

03535 

1 

C ; 

03665 

1 

I : 

777  7 6 

1 

2C1C7 

1 

7474  1 

G 

CCCC6 

1 

33,3170 

13205 

1 

06042 

1 

I : 

45246 

c 

C : 

C2521 

t 

I : 

45252 

0 

C : 

13525 

1 

I : 

77776 

1 

2 5 6 7L 

1 

33 ,32CC 

06726 

1 

13522 

0 

1 3522 

c 

C55  16 

c 

C : 

CC263 

c 

AO  10  7 

c 

74744 

r 

10000 

0 

33,3210 

13252 

0 

C6G42 

1 

I : 

40545 

1 

C: 

03535 

1 

I : 

77776 

1 

OOOC6 

1 

31665 

0 

52155 

1 

33,3220 

07547 

r i 

00006 

1 

13224 

1 

13252 

0 

54156 

1 

430  G1 

1 

61420 

0 

00C0  6 

1 

33,3230 

63252 

1 

■noo6 

1 

71421 

'J 

0003  6 

1 

1142C 

1 

54135 

1 

P73  16 

1 

06C42 

1 

33,3240 

I : 

77752 

1 

I : 

5336  1 

c 

C : 

03537 

0 

C : 

035  73 

0 

C : 

37657 

1 

G: 

67067 

1 

I : 

77776 

1 

C351A 

1 

33 ,3250 

34755 

1 

034  76 

1 

03514 

1 

40  ir  7 

0 

74745 

1 

lOCCO 

0 

13456 

1 

41651 

0 

33, "260 

5400  1 

1 

260C1 

1 

60001 

n 

60001 

0 

5012C 

1 

52047 

0 

3474  1 

1 

54CG3 

c 

33,3270 

31655 

r\ 

5476  5 

1 

3 16  56 

0 

54767 

0 

31654 

1 

54771 

1 

046  16 

1 

C; 

476  17 

1 

33,33CC 

3ul  20 

1 

54166 

1 

16042 

1 

1 ; 

45173 

0 

C: 

0222  1 

0 

C: 

4 76  75 

c 

I : 

54325 

1 

C ; 

03653 

1 

3 3 , ’ 3 1 G 

C : 

202  1 5 

0 

I : 

4 1 A c 3 

r 

C : 

51764 

c 

I 

77776 

1 

44753 

0 

54  163 

1 

31657 

1 

2 200  7 

c 

33  ,3320 

52155 

1 

3166-; 

3 

2 2007 

1' 

5216C 

1 

316  6 1 

1 

22C.C7 

0 

52162 

0 

35016 

0 

33,333C 

54003 

n 

r604  2 

1 

I : 

65361 

0 

C : 

260  2 2 

0 

C: 

02252 

1 

I : 

5 6 2 2 5 

1 

C : 

C1224 

0 

c : 

27110 

1 

33,3340 

I : 

76561 

1 

C : 

0 1236 

1 

I : 

53255 

p 

C : 

C3527 

1 

I : 

53352 

7 

C : 

03724 

1 

1 : 

51406 

1 

I : 

43202 

0 

33,335C 

r : 

27104 

1 

r : 

24U25 

0 

I : 

44  241 

0 

C: 

00001 

Q 

I ; 

5 1 4 C 6 

1 

I : 

7742  5 

1 

C : 

00025 

0 

25672 

0 

33, ^36C 

06726 

1 

13537 

1 

13537 

1 

05516 

C 

C : 

33262 

1 

201f'7 

1 

747  4C 

1 

CCCC6 

1 

33,3370 

13377 

0 

05516 

(■ 

C : 

cn  2 50 

0 

31651 

1 

6775  1 

0 

00006 

1 

13456 

1 

40  107 

c 

GAP:  4SSENBLP  RTVISIPN  116  OF  AC-C  PRCGRAR  LLPINARV  B>  ^flSA  2021112-071  19  :09  AUG.  11  ,1969  PAGE  1692 
octal  lifting  FGR  PAPAGRAFF  tf  177,  WITF  PARITY  BIT  IN  BINARY  AT  TFE  RIGHT  CF  EACH  WORD,  "5"  CENCTES  LNLSEC  FIXED  HEHCPY 
ALL  VALID  WORDS  ARF  RASTG  INSTRUCTIONS  EXCEPT  THESE  NARKED  "I"  (INTERPRETIVE  CPEPATCP  WCRDS)  CR  "C"  (CGNSTANTS) 


33  ,3AO0 

74744 

0 

lOOOD 

0 

1 34  56 

1 

54  155 

1 

3147  1 

1 

54130 

1 

31651 

1 

54131 

0 

33 ,3A1  r 

35014 

1 

54CC3 

0 

41527 

1 

60  1 30 

0 

00006 

1 

6 34  30 

0 

4013C 

1 

61526 

1 

33,3A20 

0007  6 

1 

63433 

0 

00CC6 

1 

5013  1 

1 

7153C 

1 

00006 

1 

11526 

c 

13^34 

c 

33  ,343G 

50  131 

1 

31533 

0 

13434 

0 

34  75  5 

1 

54154 

0 

44745 

1 

61010 

1 

00006 

1 

33, 34AC 

63443 

1 

31536 

G 

54154 

0 

35016 

0 

54003 

) 

06042 

1 

I : 

742C5 

c 

I : 

7 7 6 5 5 

1 

33,345C 

C : 

03601 

0 

C: 

13657 

0 

I : 

7 77  76 

1 

C35  14 

1 

36245 

1 

03475 

1 

03514 

1 

34747 

1 

33 ,346C 

70107 

0 

lOnO'i 

0 

13471 

1 

41471 

0 

63116 

1 

G0CC6 

1 

62545 

1 

05504 

0 

33, 34  7C 

C : 

002  57 

1 

37723 

c 

C5072 

1 

C : 

03560 

1 

r ; 

66067 

0 

12545 

0 

54130 

1 

ocrc6 

1 

33 ,3500 

31657 

1 

50 ' 3 0 

0 

53573 

n 

00006 

1 

3166  1 

1 

50130 

0 

53575 

0 

00C06 

1 

33,3510 

31663 

c 

5013G 

0 

53577 

1 

0000  2 

0 

35007 

0 

56003 

1 

520C2 

1 

55446 

1 

33 ,3520 

2 200  3 

1 

onooR 

1 

41671 

1 

COG06 

1 

13534 

1 

61670 

1 

77750 

0 

CCC06 

1 

33,3530 

13532 

1 

13534 

1 

05504 

0 

C: 

002  6 3 

c 

31676 

1 

5 5 6 7 1 

1 

13252 

c 

41673 

0 

33, 354C 

0000  6 

I 

1355  1 

1 

61672 

0 

77750 

0 

J000  6 

1 

1 3547 

c 

135  5 1 

1 

C5  5C4 

G 

33,3550 

f : 

on  26  2 

1 

31672 

0 

55673 

0 

116  51 

0 

13456 

1 

C55C4 

c 

C : 

00250 

0 

13456 

1 

33,3560 

34361 

1 

0 520  3 

0 

C: 

03632 

0 

C : 

70064 

1 

1165  1 

0 

13567 

1 

3 4 7 5 2 

C 

6CC00 

1 

33,3570 

046  16 

1 

r.  ; 

53116 

1 

046  16 

1 

C : 

1 7706 

0 

13627 

0 

11675 

0 

13630 

0 

00004 

0 

33 ,3600 

00i)'i6 

1 

31101 

0 

53653 

1 

34  74  1 

1 

54CC3 

0 

00006 

1 

31653 

0 

53740 

1 

33,  36  1C 

0000  6 

1 

31655 

c 

53735 

0 

31656 

0 

55736 

0 

3 50  16 

0 

54CC3 

c 

4C1C7 

c 

33,3620 

74745 

1 

26  V 7 

r 

11651 

0 

13625 

1 

34  7 52 

0 

5565  1 

0 

1515  5 

1 

34752 

c 

33,363C 

55675 

0 

13622 

0 

0000  4 

0 

40107 

0 

750  15 

1 

261C7 

0 

C4616 

1 

C : 

53454 

1 

33,3640 

046  16 

1 

G : 

17  7G6 

c 

13655 

0 

37714 

1 

15146 

1 

03721 

0 

05504 

c 

C : 

002  56 

c 

33,3650 

05516 

0 

G: 

U02  5 2 

1 

05353 

1 

C : 

COOCl 

0 

C5155 

0 

33761 

1 

046  16 

1 

C; 

21563 

1 

33,366C 

13652 

1 

13664 

1 

13672 

0 

05155 

0 

055C4 

0 

C : 

C02  6 1 

1 

34746 

c 

C 3 6 76 

c 

33,3670 

03650 

1 

13643 

1 

34  74  5 

r 

03676 

0 

13643 

1 

13655 

0 

00006 

1 

C2C33 

c 

33,37CC 

000:16 

1 

16745 

0 

16742 

1 

C4645 

1 

556  5 6 

1 

34  7 52 

c 

556  74 

1 

55675 

0 

33, ’7  K 

3 4 7 5 5 

1 

5567C 

0 

55672 

1 

55671 

1 

55673 

0 

556  51 

0 

C3722 

c 

31656 

c 

33,3720 

04640 

1 

3475? 

f 

56CC2 

0 

I=565C 

1 

35014 

1 

5 4CC3 

0 

00006 

1 

50C02 

0 

33 ,373G 

31523 

1 

54771 

1 

22765 

0 

34755 

1 

54  76  7 

0 

3 50  16 

c 

54CC3 

c 

06C42 

1 

33,  3740 

I : 

45175 

0 

C ; 

065  20 

G 

C : 

476  53 

1 

C : 

26237 

0 

C : 

06522 

1 

I: 

77624 

1 

C : 

47673 

0 

C : 

C2  245 

c 

33 ,3750 

I : 

76435 

1 

C: 

02237 

0 

C: 

26231 

0 

C : 

26003 

0 

I : 

77624 

1 

C : 

47673 

0 

C ; 

02273 

0 

I : 

77776 

1 

33  , ?'76C 

C165C 

0 

G : 

0052  3 

r 

C : 

03762 

1 

C: 

03763 

0 

CKSN 

056C4 

0 

5 

a 

a 

33,3770 

S' 

a 

a 

S 

a 

a 

S 

5 

gap:  ASSf^-BlF  REVISION'  116  OF  AGC  PROGRAM  LLMINAPY  BY  NASA  20211  12-071 


19:09  AUG.  11,1969 


PAGE  1692 


OCTAL  LISTING  '"OP  PARAGPAFF  # 200,  W ITF  PARITY  BIT  IN  BINARY  AT  THE  RIGHT  CF  EACH  NORD,  "a"  CENCTES  UNLSEC  FIXEC  PEPCFY 
ALL  VALID  InOPCS  ARE  BASIC  I NSTRLO TT CNS  EXCEPT  THCSE  NAPKEE  "I"  (INTERPRETIVE  OPERATOR  WORDS)  CR  "C"  (CONSTANTS) 


3 A, 2090 

I : 

7122U 

1 

c ; 

)3632 

0 

C : 

C3442 

0 

C : 

34L41 

r 

C : 

2706C 

1 

I : 

67175 

0 

C: 

0000  1 

0 

C: 

02777 

1 

3A , 201C 

0 : 

03642 

1 

I : 

57456 

1 

C: 

27656 

1 

C: 

0003  7 

n 

C: 

03650 

1 

I : 

53435 

r 

C : 

C3642 

1 

I : 

66C01 

0 

3A, 2f  20 

C : 

000  3 1 

0 

r : 

02776 

C 

I : 

472C6 

f 

C : 

C3656 

1 

1 : 

63372 

1 

I: 

633  15 

0 

C; 

03656 

1 

C : 

03  434 

1 

34,R03") 

T ; 

76505 

0 

C: 

00  O'-  1 

C: 

03656 

1 

I : 

77646 

c 

C : 

276  6 4 

0 

C : 

C3642 

1 

I : 

53315 

0 

C: 

03650 

1 

34,2040 

C : 

03  6 56 

1 

I : 

77624 

1 

C : 

46341 

0 

I : 

77624 

1 

C: 

4645  1 

C 

I: 

77624 

1 

C : 

456  36 

c 

C : 

1632  1 

C 

34,2050 

C: 

0000  5 

1 

I : 

77624 

1 

C : 

4645  1 

0 

I : 

776  24 

1 

C : 

45636 

0 

C : 

36317 

1 

C: 

03632 

0 

C : 

OOCOO 

1 

34,2CCr 

C: 

00020 

0 

C : 

0000  3 

1 

r : 

3466  1 

1 

C: 

C06C6 

1 

C: 

C446  7 

c 

C: 

006C1 

C 

C : 

332  16 

1 

c ; 

lOCOO 

0 

34,207C 

r : 

OOOOti 

1 

C : 

CO!  : ■'/ 

1 

C : 

nocci 

c 

C : 

00004 

0 

C : 

31566 

0 

C: 

00000 

1 

C: 

C!  177 

1 

C : 

0CCC2 

c 

34,2100 

C : 

2731  1 

1 

C: 

77754 

1 

C: 

576  1 1 

0 

C : 

COCCC 

1 

C : 

12326 

c 

C : 

CCl  16 

1 

C : 

00730 

0 

C : 

00000 

1 

34,211C 

C : 

06433 

0 

C : 

03003 

1 

C : 

2 5140 

0 

I : 

430  14 

0 

C : 

0326C 

0 

C : 

C3C61 

0 

I : 

43C14 

f 

C : 

03262 

1 

34,2120 

C : 

03063 

1 

I : 

77745 

1 

C : 

32425 

0 

C : 

C3  6C6 

1 

C : 

03614 

1 

I: 

77201 

1 

C : 

none  1 

0 

C : 

02303 

c 

34,2130 

I : 

41446 

1 

I : 

7J5'.'1 

1 

C : 

300  50 

1 

I : 

51515 

1 

C: 

C3552 

c 

I : 

553C1 

0 

C : 

000  47 

1 

I : 

53664 

0 

34, 214C 

C : 

00046 

0 

f,  : 

571  75 

0 

I : 

412  15 

1 

C: 

30070 

0 

I : 

65301 

0 

C: 

00047 

1 

C : 

0232  1 

0 

I : 

56  342 

1 

34,2150 

I : 

75457 

0 

C : 

2 ,1 1 7 2 

1 

I : 

5 3 5 1 5 

c 

C : 

C 2 3C3 

r, 

I : 

47315 

0 

C : 

02261 

0 

1 : 

77656 

1 

I: 

72441 

0 

34,2160 

C : 

03472 

0 

I : 

45421 

1 

C : 

60  203 

0 

C: 

30362 

0 

C : 

036  12 

1 

I : 

4-345 

1 

C : 

036C6 

1 

C : 

3CC72 

1 

34,2170 

C : 

036  >6 

1 

I : 

7 7 C 2 5 

c 

C : 

30060 

1 

C : 

COO  06 

1 

I ; 

77644 

1 

C : 

70776 

0 

t : 

77601 

0 

C : 

OOCO  1 

c 

34,2200 

I : 

5154S 

1 

C: 

03  5 74 

1 

I : 

50025 

0 

C : 

300  6 4 

r 

C : 

70224 

1 

I : 

43174 

1 

C : 

00007 

0 

C: 

03300 

1 

34,2210 

C ; 

70776 

0 

I : 

43C14 

0 

r : 

03342 

1 

C: 

70216 

0 

C: 

033C3 

1 

C: 

7C776 

0 

I : 

712  14 

c 

C : 

C3C6C 

1 

34,2220 

C: 

3006  6 

1 

I : 

77765 

0 

C : 

03  574 

1 

C : 

C3574 

1 

I : 

41575 

0 

C : 

02303 

0 

1 : 

63256 

0 

C: 

02  2 6 1 

c 

34,223C 

I : 

53435 

0 

I : 

7656  1 

1 

C: 

03574 

1 

C: 

C2267 

c 

I ; 

4005  5 

0 

C : 

C 3 4 -/  2 

c 

C : 

70237 

0 

C : 

37566 

c 

34, 2240 

C : 

46441 

] 

C : 

26744 

1 

I : 

776  14 

1 

c ; 

C3466 

c 

C: 

266  5 5 

3 

C: 

32421 

1 

r ; 

36720 

c 

C : 

24732 

1 

34,2250 

I : 

72142 

0 

Ct 

02776 

c 

C: 

37604 

1 

C : 

46351 

1 

1 : 

77624 

1 

f : 

46451 

0 

C : 

17602 

0 

C : 

03621 

1 

?4,226C 

I : 

52054 

1 

C : 

70263 

1 

r ; 

70  372 

0 

I : 

77745 

1 

C : 

02752 

0 

I: 

50025 

0 

C : 

3011C 

1 

C : 

70372 

c 

34,2270 

I : 

4 514  5 

0 

C: 

000  4 1 

1 

C : 

464  51 

c 

I : 

60201 

1 

C : 

00003 

1 

C: 

00047 

1 

I : 

503  15 

0 

C : 

C2303 

c 

34,2300 

C : 

■13566 

1 

1: 

56246 

1 

C: 

00'J0  3 

1 

I : 

4 5 2 5 7 

G 

C: 

2020  1 

0 

C : 

301C0 

c 

I : 

71240 

1 

C : 

7C372 

0 

34,2310 

c ; 

C2740 

0 

I : 

45312 

0 

C : 

30070 

u 

C : 

140  17 

1 

C: 

02317 

0 

I : 

56342 

1 

I : 

41325 

t 

C : 

C2  740 

c 

34,2320 

C : 

000^,1 

1 

l: 

77624 

1 

C : 

46451 

0 

I : 

72412 

0 

I : 

41366 

1 

I : 

52414 

1 

C; 

04343 

1 

C: 

70330 

c 

34,2330 

I : 

59315 

0 

C : 

02303 

0 

C: 

03566 

1 

r : 

C3617 

1 

I ; 

77646 

0 

I : 

4 13C1 

C 

C : 

C0C5C 

1 

I : 

53660 

1 

34, 2340 

C : 

00047 

1 

C ; 

20204 

c 

C : 

14C1  5 

0 

C : 

3242  5 

0 

C : 

TOO  2 1 

1 

I: 

53575 

c 

C: 

000  15 

0 

C ; 

2 6 7 30 

1 

34,2350 

C: 

■023J3 

0 

1 : 

75315 

1 

C: 

03566 

1 

C: 

036  1 7 

1 

I ; 

45076 

1 

C : 

46441 

1 

C : 

26744 

1 

I : 

776  14 

1 

34, 236C 

C : 

C3466 

0 

r : 

36655 

1 

r : 

24732 

1 

I : 

51125 

0 

C: 

036  17 

1 

C: 

7C3  76 

1 

I : 

4 5 3 4 5 

1 

C : 

C36C4 

c 

34,2370 

1 : 

52006 

n 

r ; 

70376 

1 

I ; 

7 1201 

1 

C : 

OCOOl 

c 

C : 

3242  5 

0 

I ; 

77606 

1 

I : 

41345 

0 

C: 

03467 

1 

GAP:  ASSEMBLE  REVISION  116  CF  AGC  PRCGRAv  LU^INARV  BV  ^ASA  2021112-(71 


19:09  AUG.  11,1969 


PAGE  169A 


OCTAL  LISTIAG  FCP  PARAGRAPH  it  2'T  1 , WITH  PARITY  RIT  IN  BINARY  AT  THE  RIGHT  CF  EACH  WORD,  "5)"  CENCTES  UMSFC  FIXEC  VEPCFY 
ALL  VALID  kOPCS  ARE  “ASIC  INSTRUCTICNS  EXCEPT  THCSE  H'RKEC  "I"  (INTERPRETIVE  OPERATOR  WORDS)  CR  "C"  (CCNSTANTSI 


34.24C0 

C: 

■;i36  >4 

0 

I: 

45261 

C : 

202  17 

1 

I : 

7 7 61  5 

C 

r : 

C3634 

0 

C : 

01777 

1 

I : 

77021 

1 

C : 

03636 

1 

34 ,241 C 

c ; 

COM.)  5 

1 

I : 

40240 

') 

C : 

70776 

0 

C: 

COOOl 

C 

1 : 

63375 

0 

C: 

03566 

1 

C : 

C23C3 

0 

I ; 

77624 

1 

34  , ?42C 

C : 

7 I ■^62 

0 

r : 

2631  1 

7 

C : 

00C07 

C 

C : 

27514 

1 

C: 

03506 

1 

I : 

63201 

1 

c; 

OQOC  1 

0 

C : 

C3500 

1 

34 ,243f 

I : 

77624 

I 

C: 

71062 

0 

C : 

27  522 

1 

C : 

OCOC7 

c 

r : 

3753  C 

Q 

C : 

71133 

0 

I : 

403  75 

1 

C : 

0 2 3 1 1 

0 

34, 24PC 

C : 

OOODl 

0 

I : 

45115 

0 

r : 

13544 

1 

C : 

4634  1 

0 

I : 

776  2P 

1 

C: 

4 64  5 1 

C 

C : 

276C4 

C 

C : 

C3  544 

1 

34,2450 

I : 

632  )1 

1 

C : 

OODCl 

0 

C : 

C23  11 

0 

I : 

65325 

c 

C : 

01777 

1 

C : 

03636 

1 

I : 

41525 

0 

C: 

3364  1 

1 

34 ,2460 

T : 

77624 

1 

C : 

73376 

1 

T ; 

77624 

1 

C: 

46425 

c 

I : 

7 774  5 

1 

C : 

C 2257 

0 

I : 

734C1 

c 

C; 

00GP7 

0 

34, 247C 

I : 

53515 

0 

f : 

03536 

1 

C : 

10001 

0 

I : 

47315 

f1 

C : 

0226  1 

0 

I: 

77656 

1 

I : 

71525 

f. 

C : 

C 2 2 57 

c 

34,25''’n 

I : 

45561 

1 

C : 

77754 

1 

I : 

74345 

0 

I : 

764  5 5 

1 

C : 

00023 

0 

I ; 

5C2C6 

c 

C: 

03536 

1 

I : 

4 1552 

c 

34,2510 

I : 

7231  6 

0 

r : 

0)155 

n 

I : 

51)315 

0 

C : 

13536 

1 

c; 

03536 

1 

I ; 

5 7 5 51 

1 

C : 

00155 

0 

I : 

50315 

0 

34,2520 

r : 

03552 

n 

C : 

'■355  2 

r 

1 : 

76371 

c 

I : 

71244 

0 

C : 

70542 

0 

C : 

036G6 

1 

I: 

77025 

c 

C : 

30C72 

1 

34,2530 

C : 

'lOODl 

0 

I: 

77654 

0 

C : 

72  743 

0 

I : 

70545 

1 

C : 

036  12 

1 

C : 

03612 

1 

I : 

77621 

1 

C : 

03576 

c 

34,2540 

C : 

37574 

r 

r : 

70165 

1 

T : 

41566 

1 

1 : 

45276 

0 

r : 

10007 

0 

C : 

14013 

0 

I : 

45425 

c 

C : 

7 7 7 6 2 

1 

34,2550 

I : 

77646 

n 

C : 

14!  17 

1 

C : 

00013 

0 

I : 

45246 

c 

C : 

OM017 

1 

I : 

7124  1 

1 

C : 

70561 

1 

C : 

00015 

0 

34,2560 

C : 

00013 

n 

1 : 

77745 

1 

C ; 

■)0013 

0 

I : 

7656  1 

1 

I : 

534  5 5 

0 

C: 

C 3 5 36 

1 

I : 

53515 

c 

C : 

03552 

c 

34,2570 

I : 

53515 

0 

C ; 

0 356'’ 

1 

T : 

63235 

c 

r : 

00007 

0 

C : 

0UOO7 

0 

I : 

50235 

0 

C: 

OOCC  1 

c 

I : 

7 7 6 26 

c 

34,2600 

C : 

53762 

1 

I: 

72441 

i. 

I : 

75  326 

1 

C : 

COO  15 

0 

I : 

41542 

1 

I ; 

71214 

0 

C : 

03301 

0 

C : 

70644 

0 

34,261' 

C : 

0000  1 

0 

I : 

65225 

1 

C : 

136  10 

0 

C : 

03574 

1 

I: 

60225 

1 

C: 

C 3 5 7 6 

c 

C ; 

0O047 

1 

I : 

6 526  5 

c 

34,2620 

C: 

000  13 

1 

C: 

03574 

1 

C : 

03576 

c 

I : 

43014 

c 

C : 

03342 

1 

C : 

7,0  6 56 

u 

C : 

03343 

0 

C: 

70656 

c 

34,2630 

I : 

41345 

0 

C : 

■)00ij3 

1 

C : 

036  10 

17 

I : 

712  4 4 

c 

C: 

7C663 

0 

C : 

3CC62 

0 

I : 

77765 

c 

C: 

03612 

1 

34, 264C 

C : 

0361  2 

1 

I : 

43P  14 

0 

r * 

7 3062 

c 

C: 

r-32  6 3 

0 

I : 

77745 

1 

C: 

00001 

:J 

C: 

176  IG 

c 

C : 

C 3 574 

1 

34,2650 

C : 

03576 

D 

I : 

43T:2  5 

I 

C : 

0 3 6 12 

1 

C ; 

03261 

1 

C : 

37574 

0 

C : 

7)165 

1 

I : 

43014 

0 

C: 

03302 

c 

34,266C 

C : 

70702 

6 

C: 

03  303 

1 

C: 

7 7702 

0 

T ; 

75345 

1 

C : 

301C2 

1 

C : 

00CC5 

1 

I : 

77765 

c 

C : 

C3610 

■J 

34,2670 

r : 

03612 

1 

I : 

43276 

r 

C : 

03574 

1 

C : 

17574 

1 

C ; 

0000  1 

) 

1: 

430  14 

0 

C: 

0 3063 

1 

C: 

03C62 

c 

34  ,2700 

C : 

37610 

1 

C: 

70176 

0 

I ; 

60  34  5 

0 

C: 

0000  5 

1 

C : 

C005C 

1 

I : 

54065 

c 

C : 

00001 

0 

C : 

00047 

1 

34,2710 

I : 

77657 

r 

C : 

2DbP  1 

1 

C : 

17612 

1 

C; 

00001 

;i 

r ; 

036  10 

0 

1 : 

51545 

1 

C : 

036  12 

1 

I : 

452C6 

1 

34,2720 

C: 

30076 

c> 

I: 

7124:'- 

1 

C : 

70  7 37 

0 

I : 

5CC25 

C 

C : 

3D1C6 

u 

C : 

70732 

0 

I: 

75345 

1 

C: 

30  106 

0 

34,273C 

C : 

03612 

1 

C : 

036  12 

1 

I : 

45345 

1 

C: 

03574 

1 

C : 

036  12 

1 

C : 

37574 

c 

C : 

70165 

1 

I : 

77145 

1 

34,2740 

C : 

03  60  2 

0 

C : 

Onuii? 

0 

T : 

7 7 7 5C 

c 

C : 

02776 

0 

I : 

50023 

0 

C : 

300  72 

I 

C : 

70  7 76 

c 

I : 

7 1374 

I 

34,2750 

C : 

0000  3 

1 

C : 

•‘3604 

0 

I : 

50023 

r, 

C : 

300  7 2 

1 

C : 

7C776 

0 

I : 

45345 

1 

C : 

01777 

1 

C : 

03634 

0 

34,276C 

C ; 

■J2253 

1 

I : 

453  74 

c 

C : 

■101)04 

0 

C : 

30112 

0 

I : 

77C4f 

0 

C : 

7C776 

c 

C : 

0O0C5 

1 

I : 

45345 

1 

34,2770 

C: 

03636 

1 

C : 

01777 

1 

C : 

0 2 255 

1 

I : 

51025 

1 

C : 

30112 

0 

C : 

72157 

1 

I : 

43014 

n 

C: 

03302 

0 

GAP:  ASSFPBLE  REVISION  116  CF  AGO  FRfGFAP  LU’^’INARY  RV  NASA  20211  12-071 


19:09  AUG.  11,1969 


PAGE  1695 


OCTAL  LISTING 

FCR  PAPAGRAFF 

il  2V2, 

W ITh 

PARITY 

BIT 

IN 

BINARY 

AT 

THE 

RIGHT  CF 

EACH  hORC,  "iJ" 

CENCTES  UNLSEC 

FIX  EC 

: NERCRY 

ALL  VALID 

kOR 

CS  ARP 

BASIC 

INSTRUCTIONS 

EXCEPT  THOSE 

NARK  ft  "I" 

( INTERPRET  IVE 

OPERATOR 

: VtOROS) 

CR  "C"  (CCNSTANTS) 

3A ,3000 

r 

: 72C45 

o 

C: 

CI3343 

ft 

r 

: 72045 

0 

I 

: 71334 

C 

C 

: 03613 

v) 

C : 

32425 

0 

I : 

430  14 

C 

C : 

C3260 

0 

3A,30ir 

c 

: 03C6! 

I : 

430  14 

(I 

C 

: 03262 

1 

c 

: 03263 

0 

C 

: 376T6 

0 

C: 

7C125 

0 

I : 

7122C 

1 

C : 

C3470 

1 

39,3020 

c 

: 03442 

0 

C : 

34041 

0 

r 

: 46403 

1 

I 

: 77214 

0 

c 

: 01067 

1 

C: 

03560 

1 

C : 

C353C 

1 

C ; 

27506 

1 

34,303c 

G 

: 03552 

0 

C: 

)3522 

1 

C 

: 03500 

1 

I 

: 47256 

Q 

r 

: C35C6 

1 

I : 

77656 

1 

C : 

26261 

0 

C : 

03536 

1 

34 , 304C 

c 

: 37642 

0 

C : 

71052 

0 

C 

: 12311 

0 

C 

: 26303 

0 

C 

: 03544 

1 

C: 

3 7 6 50 

C 

C : 

71052 

c 

C : 

G3514 

1 

34, 305C 

c 

: 3747? 

1 

C : 

034  7 7 

1 

I 

: 41406 

c 

I 

: 74241 

c 

c 

: 02261 

0 

C : 

02  2 61 

0 

1 : 

513  5 2 

1 

I : 

6 3 2 5 6 

C 

3 4,30  60 

I 

: 74246 

1 

I : 

43572 

n 

I 

: 65325 

n 

c 

: 03634 

0 

C 

: 01777 

1 

I : 

41525 

c 

C : 

33641 

1 

I : 

77650 

1 

34, 30 7 C 

c 

: 73376 

1 

I : 

65325 

C 

c 

: 11777 

1 

c 

: 03636 

1 

1 

: 41525 

0 

C: 

32425 

0 

I : 

7765C 

1 

C : 

7 3 3 7 6 

1 

34,3100 

T 

: 76020 

1 

C : 

13471 

1 

c 

: 01521 

0 

I 

: 77624 

1 

c 

: 72375 

0 

I : 

77624 

1 

C: 

71120 

1 

l: 

6 1375 

1 

34,31  1C 

c 

: 03434 

1 

C: 

00001 

0 

I 

: 77772 

(1 

C 

: 03656 

1 

I 

: 51406 

1 

C : 

2 7 6 64 

0 

I : 

7765C 

1 

C : 

C3470 

1 

34,3120 

I 

: 772)1 

1 

C : 

00'  C7 

c 

c 

: C2261 

0 

I 

: 63276 

1 

c 

: 72303 

0 

I: 

5 7456 

1 

l: 

47206 

0 

C: 

C 2 2 6 1 

c 

34,3130 

I 

: 7777? 

C: 

OOu  1 1 

0 

I 

: 77616 

0 

I 

: 77220 

1 

c 

: C347C 

1 

C : 

02311 

0 

I : 

53406 

0 

C: 

27544 

1 

34, 3! 4C 

c 

: 03522 

1 

I : 

5 3256 

c 

c 

: )3544 

1 

I 

: 72406 

C 

c 

: 16732 

0 

I : 

6 53  16 

0 

C : 

065  14 

1 

I : 

4 5 302 

1 

34,3150 

I 

: 72566 

1 

I: 

57515 

1 

I 

: 77635 

1 

C 

: C.3  522 

1 

I 

: 65241 

3 

C : 

02261 

0 

I : 

45565 

0 

C: 

51C47 

0 

34,316C 

c 

: 33522 

1 

I ; 

45115 

0 

c 

: 13530 

1 

c 

: 46441 

1 

c 

: 26744 

1 

I : 

776  14 

1 

C : 

03666 

1 

C : 

36655 

1 

34,3170 

c 

: 24732 

1 

I : 

537  54 

1 

c 

: C2777 

1 

c 

: 57576 

1 

c 

: 00323 

0 

I: 

7 6441 

1 

C : 

03544 

1 

I ; 

5 15  15 

! 

34 ,32CO 

I 

: 63257 

1 

C: 

57576 

1 

c 

: U2311 

0 

I 

: 65246 

1 

I 

: 77625 

c 

C : 

000C3 

1 

C: 

17600 

1 

C : 

02742 

1 

34,321C 

I 

: 65301 

0 

r : 

C0047 

1 

c 

: rno41 

1 

I 

: 77624 

1 

c 

: 4645! 

0 

I: 

5 6 3 62 

C 

I : 

41457 

1 

C : 

2C174 

1 

34,3220 

I 

: 65225 

1 

C: 

C3600 

1 

I 

: 563C2 

t 

c 

; 00OQ5 

1 

I 

: 75406 

1 

I : 

41275 

1 

C: 

00007 

u 

C : 

OCCCl 

C 

34,3230 

I 

: 65272 

0 

C: 

0000  3 

1 

I 

: 65301 

0 

c 

; 00047 

1 

c 

: C2321 

0 

I : 

56342 

1 

I : 

65257 

1 

C : 

20174 

1 

34, 324C 

c 

: 00005 

1 

I : 

6 53''1 

0 

c 

: U0050 

1 

c 

: 02321 

n 

I 

: 56342 

1 

l: 

4 4 2 57 

1 

C: 

576C4 

1 

I ; 

63  525 

c 

34,3250 

c 

: non  1 1 

1 

I : 

75421 

1 

I 

: 47315 

n 

c 

: C2261 

c 

0 

c 

: 03544 

1 

I : 

74256 

c 

C: 

00013 

LI 

I : 

7431  5 

0 

34,3260 

c 

: 03544 

1 

C : 

00(1 1 1 

1 

I 

: 76455 

1 

I 

: 77626 

c 

: 74233 

0 

I : 

7 7 6 5 1 

c 

C : 

C35  14 

1 

C : 

36275 

1 

34,3270 

c 

: 03470 

1 

05353 

1 

c 

: 04C24 

c 

00004 

0 

74616 

1 

C; 

40154 

u 

0604  2 

1 

I : 

7 7 6 1 4 

1 

34 ,3300 

c 

: :)646U 

0 

I: 

43014 

1 

c 

: 04067 

1 

c 

: C4666 

c 

1 

: 77214 

0 

C : 

05062 

c 

C : 

01220 

0 

C : 

16032 

1 

34, 33  1C 

r 

: C1234 

0 

I : 

45014 

0 

c 

: 01463 

1 

c 

: 26351 

1 

I 

: 772C1 

1 

C: 

OOOCl 

0 

C : 

r 122C 

c 

I : 

6 5352 

c 

34,3320 

C 

: 01234 

0 

I: 

45CC6 

c 

c 

: 51677 

c 

c 

: C2C23 

1 

I 

: 77776 

1 

33342 

1 

04616 

1 

C : 

20477 

1 

34 ,333C 

16001 

1 

13333 

0 

13325 

1 

C6042 

1 

I 

: 77775 

1 

C : 

06  5 22 

1 

C : 

36231 

1 

C : 

33471 

c 

34,3340 

I 

: 77776 

1 

1600  1 

1 

c 

: C1453 

1 

I 

: 40220 

0 

c 

: 01163 

1 

C: 

0000 1 

0 

l: 

4 15  75 

c 

C : 

06  5 16 

c 

34,3350 

I 

: 41434 

1 

C: 

21574 

1 

T 

: 77624 

1 

c 

: 55716 

1 

I 

: 74321 

1 

C : 

01734 

0 

C : 

16027 

0 

C : 

26325 

1 

34,3360 

C 

: 02023 

1 

I : 

52446 

c 

c 

: 36333 

1 

c 

: 01163 

1 

c 

: 00046 

0 

C: 

C 7374 

c 

C : 

C4145 

c 

C : 

15  527 

c 

34,3370 

c 

: 00007 

0 

r : 

23346 

1 

053  53 

1 

c 

: C0035 

1 

06042 

1 

T ; 

77614 

1 

C: 

047C5 

1 

C*. 

603  1 5 

0 

GAP:  ASSEMBLE  RFVI<;iON  116  CF  A GC  fRCGPAN  LUMNAPV  BV  NASA  20211  12-071 


19:09  AUG.  11,1969 


PAGE  1696 


OCTAL  LISTING  FTP  PAPAGRAFF  A 207,  W ITp  PARITy  BIT  IN  BINARY  AT  THE  RIGHT  CF  EACH  RCRC,  "3"  CENCTES  UNLSEC  FIXEC  REPCFY 
ALL  VALID  FORCS  AOE  BASIC  INSTRUCTICNS  EXCEPT  TFCSE  VARKEC  "I"  (INTERPRETIVE  OPERATOR  NOPOSI  CR  "C"  (CONSTANTS) 


34,3400 

T : 

45345 

] 

C: 

03514 

1 

C : 

262C3 

1 

I : 

43C4C 

1 

C : 

60756 

0 

C:  04267 

0 

I : 

67214 

1 

C:  Q2676 

1 

34,34ir 

C : 

31446 

0 

I : 

77471 

4 

C: 

035  14 

1 

52155 

1 

5364  1 

1 

53637 

0 

53635 

1 

53571 

1 

34, 342C 

3604  2 

1 

! : 

43345 

1 

C ; 

C3571 

1 

C : 

C3635 

1 

I : 

432  15 

0 

C:  03637 

0 

C: 

0364  1 

1 

I:  412C5 

C 

34,3430 

C : 

•12265 

1 

C : 

21017 

1 

I : 

65252 

1 

C : 

02271 

1 

I : 

43342 

1 

I : 7 7 6 2 5 

0 

C : 

21014 

1 

C:  16271 

1 

34,344( 

C : 

0226  5 

1 

I : 

56342 

1 

C : 

02  271 

1 

C : 

36263 

0 

C: 

603  15 

0 

C:  C0CC4 

0 

I : 

45575 

1 

C : 745  1 5 

C 

34,3450 

T : 

77775 

1 

C: 

C3537 

c 

C : 

37254 

Q 

C : 

607  30 

0 

053  53 

1 

C:  04024 

0 

33474 

c 

C4616 

1 

34,3460 

C : 

20477 

1 

13464 

n 

13464 

0 

13454 

f 

05353 

1 

C:  C4024 

0 

00004 

0 

04674 

0 

34,  34  7C 

C : 

40115 

0 

C551  6 

c 

C : 

00215 

1 

16001 

1 

C : 

14125 

1 

I:  77745 

1 

C : 

06524 

1 

C : C2345 

1 

34,3504 

C: 

02351 

1 

l: 

4 1345 

0 

C : 

0235  1 

1 

C : 

C351  7 

1 

I : 

432C5 

1 

C:  33645 

0 

C : 

02345 

1 

l:  41205 

0 

34,35ir 

C : 

03517 

1 

C : 

03517 

1 

I : 

72471 

0 

C: 

0227  1 

1 

I : 

652  15 

1 

C:  023C1 

1 

C : 

034  74 

0 

I : 43205 

1 

34,3520 

C: 

035  17 

1 

T : 

77626 

c 

C : 

75152 

0 

I : 

77616 

0 

I : 

45(1  20 

1 

C:  02574 

0 

C : 

71554 

r 

l:  43205 

1 

34 ,3530 

C: 

>2623 

1 

C: 

02621 

0 

I : 

41425 

1 

C : 

02625 

1 

I : 

51C25 

1 

C:  02563 

0 

C : 

71541 

1 

I:  65345 

0 

34,3540 

C : 

02563 

0 

1 ; 

41345 

c 

C : 

71001 

0 

C : 

16025 

1 

I : 

77725 

1 

I;  41215 

1 

C : 

02625 

1 

C : C2  62  5 

1 

34,3550 

I : 

75465 

1 

1: 

77626 

c 

C : 

41500 

I 

C : 

C2  5 74 

c 

T : 

53575 

0 

C : 03521 

1 

I: 

535  15 

0 

C:  01720 

c 

34,356C 

I : 

47206 

0 

C: 

00001 

0 

I ; 

7764  1 

1 

C: 

C232  5 

1 

C : 

24C3  7 

c 

I : 7 244  1 

c 

I : 

75326 

1 

C : 00C37 

0 

34, 357C 

T : 

7 7616 

t 

04616 

1 

C : 

531C2 

1 

C4616 

1 

C : 

17  706 

0 

13621 

1 

11674 

1 

13  6 3C 

c 

34,3600  ■ 

U'Oi, 

I'i 

O0O06 

1 

3 110  1 

0 

53655 

1 

C00C6 

1 

31561 

1 

53755 

0 

00006 

1 

34,361C 

31156 

1 

5346C 

0 

31154 

0 

5546  1 

1 

4'11C7 

0 

7 4 7 50 

c 

26  1C7 

c 

0 5155 

c 

34,3620 

30  1 ) 1 

1 

74742 

0 

0CCC6 

1 

136  27 

0 

05516 

0 

C : 'W  1 2 1 

1 

05155 

0 

3 4 7 5 2 

c 

34,3630 

55674 

1 

05155 

0 

00006 

1 

30025 

c 

53653 

1 

OOOC6 

1 

30033 

1 

53655 

1 

34, 3640 

30C34 

0 

55656 

1 

30037 

0 

55657 

0 

00006 

1 

3004  1 

1 

5366  1 

c 

C526  1 

1 

34,3650 

C : 

03  650 

1 

C : 

■'3651 

0 

CKSV 

7 2 3 2 7 

1 

a 

a 

a 

a 

a 

34,366C 

a 

a 

a 

a 

a 

a 

a 

a 

34,3670 

5 

a 

a 

a 

a 

a 

a 

a 

34,3700 

a 

a 

a 

a 

a 

a 

a 

a 

34 , 37  IC 

2 

a 

a 

a 

a 

a 

a 

a 

34,3720 

Jl 

a 

a 

a 

a 

a 

a 

a 

34 ,377C 

a 

a 

a 

a 

a 

a 

a 

a 

34, 374C 

a 

a 

a 

a 

a 

a 

a 

a 

34,3750 

a 

s 

5 

a 

3 

a 

a 

c 

34, 376C 

a 

a 

5 

a 

a 

tt 

a 

a 

34,3770 

a 

a 

a 

a 

3 

a 

a 

a 

GAP 


ASSENBLE  REVISION  116  CE  AGO  PRCGPAP  LUPINARY  BY  NASA  2021112-J71 


19:09  AUC . 11,1969 


PAGE  1697 


OCTAL  LISTING  FCR  PARAGRAPE  20A,  WITH  PARITY  SIT  IN  BINARY  AT  THE  RIGHT  TF  EACH  WCRC,  "S"  CENCTES  UNLSFC  FIXEC  MEMORY 


ALL  VALID 

FORD 

S ARE 

BASIC 

INSTRUOTICNS 

EXCEPT  TFCSE 

PARKFC  "I" 

(INTER  FRET  I VE 

OPERATOR 

FCRO 

E)  CR 

"C 

•'  (CCNSIANT 

S ) 

35,2000 

05506 

0 

C : 

0002  7 

1 

C55C6 

C 

L : 

C0031 

0 

1 

036  21 

1 

33636 

1 

0 3 6 2 1 

1 

35,2010 

05516 

C: 

oof'27 

1 

,16062 

1 

I : 

77626 

1 

C : 

70CCC 

C 

I : 

63C16 

0 

C : 

00670 

1 

C: 

01C67 

1 

35, 2020 

I : 

77776 

1 

3213  3 

C 

13621 

1 

06062 

1 

1: 

77616 

1 

C; 

01071 

0 

I : 

77626 

1 

C : 

72  5 1 5 

1 

35,2030 

I : 

77650 

1 

r : 

72'' 26 

r 

C : 

C1661 

1 

C : 

016  52 

G 

02356 

1 

02037 

1 

02361 

1 

00006 

1 

35,20AC 

32625 

0 

5362  1 

1 

02060 

0 

I: 

77736 

1 

C ; 

036  1 3 

0 

I : 

7 7 7 6 r 

1 

C : 

036  13 

0 

I : 

77533 

1 

35,2050 

C : 

32630 

1 

3 1 5 6 

1 

C 5 736 

1 

35006 

1 

766  16 

1 

C: 

20677 

1 

06001 

0 

0 2C  5 3 

C 

35,2060 

02366 

0 

32626 

1 

55667 

1 

5 6 3 3 

1 

556?F 

c 

32615 

C 

03621 

1 

06062 

1 

35,2070 

1 : 

57565 

1 

C : 

C3  634 

0 

I : 

7126') 

1 

C : 

72120 

1 

C: 

0166  3 

1 

C : 

36(61 

C. 

C : 

666C3 

1 

I : 

5 3 7 7 5 

1 

35,2100 

C: 

03536 

1 

C : 

57176 

0 

r . 

266  55 

(' 

C : 

03566 

1 

I : 

63057 

1 

C : 

57176 

0 

C: 

03666 

0 

C: 

16  766 

1 

35,21K 

C : 

06532 

0 

C : 

36756 

0 

C : 

25557 

1 

I: 

776  1 5 

C 

C : 

C 3 5 7 6 

1 

C : 

C 3636 

c 

I : 

77776 

1 

C2C65 

0 

35,2120  ■ 

I : 

77776 

1 

336  3 3 

1 

06616 

1 

C : 

20677 

1 

(J60C1 

0 

02127 

1 

02121 

1 

33632 

c 

35,2130 

0362  1 

1 

0606  2 

1 

I : 

77  765 

1 

C : 

C3636 

0 

C : 

3766  2 

1 

r ; 

2CCC0 

0 

I : 

77626 

1 

C: 

71C  16 

0 

35,2160 

I : 

77  20  1 

1 

C : 

OOfFl 

c 

C : 

0 3 506 

1 

1 : 

65315 

0 

C : 

C35GC 

1 

C: 

C 36  36 

0 

I : 

65325 

c 

C : 

03636 

1 

35,2150 

C: 

33661 

1 

1 : 

650C6 

r 

C : 

73  3 76 

1 

I : 

77626 

1 

C : 

66635 

1 

I: 

77626 

1 

C: 

70113 

0 

! : 

63C  16 

c 

3 5 ,21 60 

C : 

01311 

0 

C: 

72  1 63 

0 

C : 

006  70 

1 

T : 

7 7 7 6 5 

1 

f : 

C2253 

1 

C : 

(22  53 

1 

I : 

5 10  25 

1 

C : 

32627 

1 

35, 2 17C 

C : 

72165 

0 

I : 

77765 

1 

C : 

02255 

1 

C: 

02255 

1 

I : 

51025 

1 

C: 

32627 

1 

C : 

72172 

1 

1 : 

7 7 776 

1 

35,2200 

32617 

1 

03621 

1 

06Q  6 2 

1 

I : 

6 517  5 

c 

C : 

02267 

0 

C : 

711C0 

0 

C: 

26267 

0 

C : 

023  1 1 

0 

35,2210 

C : 

2 63  03 

0 

C : 

02275 

0 

I : 

65170 

0 

C: 

01522 

0 

r ; 

72375 

0 

I : 

77765 

1 

C : 

03636 

1 

C : 

37660 

1 

35, 2220 

C : 

73515 

1 

I : 

77650 

1 

C : 

72136 

0 

023  56 

1 

72226 

0 

0236  1 

1 

02366 

0 

226  1 6 

c 

35,2230 

0362  1 

1 

0 60  6 2 

1 

I : 

77765 

1 

C : 

0366C 

0 

C : 

1763  ( 

1 

C : 

01777 

1 

C : 

37662 

1 

C : 

20000 

0 

35,2260 

I ; 

77626 

1 

C : 

7 1 '.i  1 6 

0 

I : 

77626 

1 

C : 

71133 

0 

I: 

7720  1 

1 

C: 

COCCI 

0 

C : 

035X6 

1 

I : 

65115 

c 

35,2250 

C: 

02311 

n 

C : 

7 10  7 1 

1 

I : 

77626 

1 

r : 

66625 

c 

I : 

77201 

1 

C : 

00001 

0 

C: 

03530 

1 

I ; 

65115 

c 

35.226C 

C : 

03522 

1 

C : 

71071 

1 

T : 

77626 

1 

C: 

66635 

1 

T ; 

63165 

c 

C : 

3 2 6 2 5 

r 

C : 

C366C 

0 

C : 

36217 

1 

35, 227C 

r : 

72676 

1 

I : 

77656 

1 

r : 

72307 

r 

C5567 

0 

C : 

■70  6 1 1 

1 

35<706 

1 

066  16 

1 

C : 

2C677 

1 

35,2300 

J60n  1 

0 

;<2  30  3 

« 

02226 

c 

I 6062 

1 

I : 

77765 

1 

C : 

32625 

0 

C: 

02317 

0 

I : 

63C  16 

0 

35,2310 

C : 

0 1311 

ri 

r : 

0 

C: 

00670 

1 

I : 

63365 

1 

C : 

0 2 3 17 

c 

C : 

036  36 

1 

C : 

03636 

1 

I : 

77625 

c 

35,2320 

C: 

01777 

1 

I : 

M025 

1 

C : 

32627 

1 

r ; 

7232  1 

1 

I : 

77615 

■7 

C: 

32627 

1 

C: 

16253 

1 

C : 

03636 

1 

35  ,2330 

'T  : 

61625 

1 

C: 

03660 

0 

I : 

65266 

n 

C : 

32627 

1 

I : 

63266 

1 

C : 

72332 

0 

r : 

32627 

1 

I : 

65565 

0 

35, 2360 

C : 

75522 

0 

I : 

niih 

1 

32617 

1 

03621 

1 

06062 

1 

1: 

65175 

0 

C. : 

02275 

0 

C : 

7 1 1 C C 

c 

35,2350 

C : 

36275 

1 

C; 

735  1 5 

1 

I : 

77650 

1 

C : 

7226C 

1 

00006 

1 

2 36  7 1 

0 

05506 

0 

C ; 

00050 

1 

35,2360 

01670 

0 

Ofj006 

1 

2367J 

0 

05516 

0 

C : 

0005C 

1 

C1670 

c 

000C6 

1 

23670 

0 

35,2370 

C5506 

0 

C : 

00027 

1 

C5506 

c 

r : 

00031 

0 

01670 

0 

C; 

03636 

1 

I: 

6502f 

1 

C : 

03X63 

0 

gap:  ASSEPBLE  REVISION  116  CF  AGO  FRCGRAN  LGMNAPY  PY  ^ASA  202 1 1 IZ-f'Yl 


19:0P  AUG.  U.1S6S 


PAGE  use 


octal  listing  >=rR  PARAGPAPI-  # 205,  WI'^H  PARITY  BIT  in  BINARY  AT  THE  RIGHT  CF  EACH  WCRC,  "3"  CENCTES  UNUSED  FIXED  MEMORY 


ALL  VALID 

NORDS  ARE 

BASIC 

INSTPUCTICNS 

EXCEPT  THCSE 

MARKED  "I" 

( INTERPRETIVE 

OPERATOR 

nCROS 

) CR 

"C 

" (CCNS 

lANTS) 

35, 2ACG 

C: 

7112  ' 

1 

I : 

643  >5 

1 

C : 

03434 

1 

C : 

00001 

G 

I : 

66172 

0 

C: 

036  15 

0 

C: 

03434 

1 

1 : 

7 7 7 7 6 

1 

35  ,2410 

31615 

1 

036  21 

1 

060A2 

1 

I : 

7765C 

1 

C: 

C3462 

C 

C: 

C1413 

0 

C : 

01415 

0 

C : 

01513 

1 

35, 2420 

C : 

77776 

1 

C : 

62F6C 

1 

C : 

1 7777 

0 

C : 

37776 

C 

C: 

OOOCC 

1 

C: 

ooooo 

1 

C : 

OCC2  5 

c 

C : 

37  ICC 

1 

35,2430 

C: 

00  60  0 

1 

C : 

00  6f  1 

0 

C : 

00602 

0 

C : 

CO603 

1 

C : 

0O6C4 

0 

C : 

Pi)  605 

1 

C: 

00606 

1 

0CCC6 

1 

35,2440 

23465 

1 

34755 

1 

55  162 

1 

34752 

f 

0000  4 

0 

C52C3 

c 

C ; 

02723 

c 

C : 

74C67 

0 

35, 245C 

05327 

1 

C : 

4 If  3 6 

c 

C : 

05024 

1 

C : 

13000 

0 

01465 

1 

023  54 

1 

0246C 

1 

C 2 3 6 1 

1 

3 5 ,2460: 

>2366 

U 

33632 

T 

03621 

1 

( 0CQ6 

1 

33655 

1 

53621 

1 

32424 

1 

55466 

0 

35 ,24  1C 

0 360  3 

1 

06C47 

1 

I : 

71214 

0 

C; 

01270 

0 

C : 

03636 

1 

C: 

174'^2 

0 

C : 

C2257 

c 

I : 

430  54 

1 

35,2500 

C : 

72502 

f.l 

C : 

0107  1 

1 

I : 

77624 

1 

C : 

2000C 

0 

I : 

43145 

o 

C : 

06524 

1 

C: 

03460 

0 

I : 

43C  14 

t 

35 ,25  10 

C : 

01310 

1 

C: 

72513 

1 

C : 

03660 

1 

C : 

C231  7 

f. 

1 : 

4334  5 

1 

C : 

03636 

1 

C : 

.>23  17 

c 

C: 

34C41 

c 

35, 

C : 

46403 

1 

I : 

77624 

1 

C : 

72674 

1 

I ; 

77454 

1 

C: 

72535 

1 

05567 

0 

C : 

00  6 1 1 

1 

35CC6 

1 

35,2530 

04616 

1 

C : 

2.>4  7 7 

1 

06CC1 

c 

C246C 

1 

02  52  5 

1 

I : 

43014 

0 

C: 

03600 

1 

C: 

725  14 

1 

35,2540 

C : 

01311 

1 

C : 

72545 

n 

I : 

77776 

1 

03603 

1 

0255C 

0 

I : 

777  76 

1 

33632 

c 

03621 

1 

35,2550 

06042 

1 

I : 

712  1 

1 

C : 

OOCCl 

c 

C : 

C2777 

1 

C : 

14047 

1 

C: 

03621 

1 

I : 

714C6 

c 

C : 

16  7 3 2 

c 

35,2560 

I : 

77756 

0 

C: 

2673  ■ 

1 

C: 

03552 

0 

I : 

776  5 7 

c 

C : 

57176 

0 

C : 

26655 

0 

C : 

03  5 60 

1 

I : 

43057 

1 

35,2570 

C : 

57176 

n 

C : 

C3F6  6 

0 

C : 

36744 

0 

C : 

24732 

1 

1 : 

7774  5 

1 

C : 

C 3636 

1 

C : 

036  1C 

c 

I : 

77  6 1 5 

c 

35,26C0 

0 : 

000  3 7 

0 

C: 

3763  1 

1 

C : 

732  16 

p 

I : 

51575 

1 

C : 

02366 

0 

f : 

27576 

0 

C; 

73506 

1 

l; 

51451 

0 

35,261C 

C : 

03566 

1 

C : 

26350 

0 

C: 

03536 

1 

1 : 

45115 

f 

C : 

C2337 

1 

C : 

46  34  1 

c 

I : 

77624 

1 

C : 

46451 

0 

35,262C 

C : 

1760  6 

1 

r : 

03636 

1 

C : 

03442 

r 

1 : 

77776 

1 

33634 

0 

03621 

1 

0604  2 

1 

I : 

7 7 6 24 

1 

35,2630 

C : 

73432 

i'\ 

1 : 

77624 

1 

C: 

7 3 5 1 5 

1 

1 : 

7 76  5C 

1 

6 : 

72504 

0 

C23  54 

1 

00006 

1 

31401 

c 

35,2640 

02644 

0 

L'2361 

1 

00006 

1 

31403 

1 

53576 

0 

C2366 

c 

06G42 

1 

I : 

77624 

1 

35,2650 

C: 

20000 

0 

I : 

77634 

r 

C : 

21574 

1 

C : 

C36  12 

1 

I : 

77615 

0 

f : 

0 3 576 

rj 

C: 

03442 

0 

C ; 

036  10 

c 

35  ,2660 

C : 

34041 

0 

C: 

46403 

1 

T : 

77624 

1 

C : 

73204 

0 

I : 

77624 

1 

f.  : 

73216 

0 

I : 

77624 

1 

C : 

73432 

0 

35, 2670 

I : 

77624 

1 

C : 

7351  5 

1 

I : 

776  50 

1 

C: 

72651 

0 

I : 

66220 

1 

C: 

03463 

c 

C : 

036  14 

1 

C : 

4CCCC 

c 

35,2700 

I : 

40345 

1 

r : 

33643 

0 

C : 

00001 

0 

C : 

27574 

1 

C : 

C3536 

1 

C : 

2 7 5CU 

1 

C: 

03544 

1 

C: 

27  506 

1 

35,2710 

C : 

03552 

0 

C : 

27522 

1 

r : 

'13  560 

1 

C: 

03530 

1 

I : 

77624 

1 

C: 

7 3 2G4 

0 

I : 

63235 

0 

C : 

03536 

1 

35, 2720 

I : 

535  15 

0 

r : 

03536 

1 

I : 

46315 

1 

I : 

51352 

1 

r : 

0231  1 

0 

I: 

63256 

0 

1 : 

63241 

p 

C: 

Of  CC  1 

c 

35,2730 

T : 

75241 

1 

C: 

0231  1 

0 

T : 

65552 

0 

I : 

503  1 5 

c 

C : 

023  1 1 

0 

C : 

C3536 

1 

I : 

71244 

0 

C : 

72742 

0 

35.27AC 

C : 

06532 

0 

1 : 

41425 

1 

I : 

71214 

0 

C : 

(13740 

1 

C: 

73171 

1 

C : 

C 3 5 76 

G 

C : 

14033 

1 

I : 

7 7 6 2 5 

c 

35,2750 

C : 

02257 

0 

C; 

03576 

G 

I : 

45246 

c 

C : 

33647 

1 

I : 

7764F 

u 

C : 

73201 

0 

I: 

705  35 

0 

C : 

C36  14 

1 

3'^,2760 

1 : 

72030 

1 

C : 

03463 

0 

C : 

MO  154 

1 

I : 

7 73  3f 

1 

C: 

036  13 

0 

C : 

C 3 5 52 

c 

I : 

65256 

c 

C : 

0CC45 

0 

35,2770 

I-; 

5 3 5 1 

c 

C : 

0 3 5 3 6 

1 

I : 

77725 

1 

I : 

41525 

n 

r ; 

00045 

0 

I : 

77621 

1 

C: 

one  1 5 

G 

C : 

14C37 

gap:  assemble  REVISION  116  OF  AGC  FRCGRAv  LLPINARY  BY  NASA  2021112-C71 


1S:CS  ALG.  11,196? 


fAGE  16SS 


OCTAL  LISTING 

for  paragrapf 

4 20  6, 

W IT 

H 

PARITY  1 

3 I T 

IN 

BINARY 

AT 

THE 

RIGHT  CF 

EACH  inCRC,  ’• 

i" 

CENCTES  UNUSEC 

FIXE! 

' MEMORY 

ALL  VALin 

N.TRCS  ARE 

BASIF 

INSTRUCTIONS 

FXCFPT  ThOSP 

PARKEC  "I" 

( INTERPRET  I VF 

OPERATCP 

NCRQS) 

CP  "C 

" (CCNSTANTS) 

3B, TOCO 

C : 

06522 

1 

T : 

41*25 

1 

r 

: G2257 

c 

I 

: 50165 

0 

( 

: J0037 

I 

L : 

0346  3 

C 

l: 

71545 

0 

I : 

56  2C5 

C 

35  ,3-no 

C : 

•ii|.tl7 

1 

C: 

1 !U  1 5 

II 

1 

: 77676 

0 

C 

: 00035 

1 

I 

; 44246 

1 

C : 

06522 

1 

I : 

77240 

1 

r : 

03463 

0 

35,302^ 

C : 

0226  1 

0 

I : 

53435 

0 

c 

:■  0,1007 

' 1 

I 

: 41241 

(I 

c 

: 0354* 

1 

C: 

ccr.  15 

0 

I : 

473  1 5 

C 

f : 

COCCI 

C 

35,3030 

C: 

03560 

1 

I : 

534  3 5 

c 

c 

: COCCI 

r. 

I 

: 41241 

c 

c 

: C356C 

1 

C : 

000  17 

1 

I : 

77621 

1 

I: 

6330  1 

C 

35,3CA0 

C : 

00047 

I 

r : 

f'lOOT 

0 

I 

: 51235 

0 

c 

: COOCl 

c 

c 

: 022  6 1 

0 

I : 

50  3 15 

C 

C : 

OOOC  1 

C 

C : 

CCC07 

0 

35, 305G 

I : 

65552 

0 

I : 

77765 

0 

I 

: 43225 

c 

c 

: 06522 

1 

c 

: U2257 

0 

I : 

65525 

0 

C: 

00035 

1 

I : 

7 5221 

1 

35,3060 

C : 

06522 

1 

C: 

. '13037 

0 

1 

: 77615 

0 

I 

: 562C5 

c 

c 

; 33641 

1 

I : 

7 7 6C5 

1 

1 : 

41257 

1 

C : 

20176 

c 

35,307C 

I : 

51406 

1 

I : 

5 >6  2.5 

0 

c 

: 13574 

1 

c 

: 73,177 

n 

I 

: 75345 

1 

C: 

0 3 5 74 

1 

I : 

776C6 

1 

I : 

51135 

1 

35, 3100 

r : 

03614 

1 

C : 

731  7 

0 

I 

: 71331 

0 

c 

: C3614 

1 

c 

: 37777 

1 

I: 

776  50 

1 

C: 

73145 

0 

I : 

4 1345 

C 

35,31  It) 

C : 

03576 

0 

C: 

000  3 3 

1 

I 

: 71244 

c 

: 73123 

C 

c 

: 03574 

1 

I : 

776C5 

1 

C : 

33645 

0 

C: 

17574 

1 

3 5,  M2C 

I : 

70446 

c 

I : 

52076 

i 

c 

: 73133 

1 

I 

: 51545 

1 

c 

: 03576 

0 

I: 

51525 

1 

C : 

00033 

1 

I : 

7 7 6 2 5 

C 

35,31 30 

I : 

71240 

1 

C : 

73136 

1 

1 

: 77646 

I 

: 52165 

1 

c 

: 03606 

1 

C : 

73145 

1 

l: 

57545 

1 

C: 

03606 

1 

3 5 , 3 1 A G 

I : 

70406 

1 

C : 

0 36  0 6 

1 

T 

: 77615 

0 

I 

: 776  50 

1 

c 

: 73146 

0 

C : 

0 36  06 

1 

I t 

77615 

c 

C : 

02317 

0 

35,  ?>15r 

C : 

02317 

0 

I : 

63375 

0 

C 

: 035C6 

1 

G 

: C350C 

1 

I 

: 77624 

1 

C: 

73  3 72 

0 

I : 

77624 

1 

C : 

46*25 

0 

35,3160 

I : 

63375 

0 

C: 

0 3 5 3'' 

1 

C 

: 03522 

1 

I 

: 77624 

1 

c 

: 73372 

0 

I : 

77624 

1 

C : 

46435 

1 

I : 

77650 

1 

35,317C 

C : 

72714 

0 

I : 

43345 

1 

c 

: 03636 

1 

c 

; C2317 

0 

c 

: 17636 

1 

1 : 

7 7 6 14 

1 

C : 

013  10 

1 

C : 

7 3 2C1 

c 

35,3200 

C; 

02251 

0 

I : 

52145 

c 

c 

: 06524 

1 

c 

: C3463 

c 

I 

: 52375 

1 

C : 

03552 

0 

C; 

03536 

1 

1 : 

4 1*56 

c 

35,3?1C 

C : 

2 6311 

0 

G : 

035  36 

1 

T 

: 53435 

0 

r 

: 03544 

1 

c 

: C2261 

c 

I : 

776  16 

0 

I : 

7722C 

1 

C ; 

C3470 

1 

35, 322C 

C : 

03560 

1 

T : 

65315 

0 

C 

: 03552 

f 

C 

: C3610 

0 

I 

: 65325 

0 

C : 

03631 

0 

C: 

3364  1 

1 

I : 

*6125 

c 

35,3230 

r : 

0 3 467 

1 

C : 

73235 

1 

T 

: 77745 

1 

I 

: 41545 

c 

c 

: 065  24 

1 

I : 

77624 

1 

C: 

73376 

1 

C : 

27444 

0 

35,32AF 

C : 

00007 

0 

C : 

27506 

1 

C 

: :)3444 

(' 

I 

; 63256 

0 

c 

: 03536 

1 

I : 

* 14  56 

c 

I : 

50235 

c 

C : 

OOCOl 

0 

35, 3250 

r • 

0226  1 

0 

I : 

7771  5 

1 

I 

: 72441 

c 

C 

: COOOl 

0 

I 

: 75326 

1 

I: 

43244 

1 

C: 

73260 

1 

C : 

06  532 

c 

35,3260 

r : 

15756 

1 

C; 

03631 

n 

1 

: 77625 

0 

c 

: C3610 

0 

c 

: C3452 

1 

I : 

40335 

0 

C: 

03467 

1 

C: 

00001 

0 

35, 327C 

1 : 

63  32  5 

0 

C : 

33653 

1 

C 

: 03536 

1 

c 

: 26323 

1 

r 

: 03544 

1 

C; 

36  3 3 1 

0 

C ; 

220CC 

1 

I : 

77624 

1 

35,3300 

C: 

73357 

1 

I: 

6437  5 

1 

C 

: 02366 

, 

c 

: 06 1.) Cl 

c 

I 

: 77772 

0 

C : 

37434 

.1 

C: 

034  70 

1 

I: 

45020 

1 

35,33K 

C : 

03463 

0 

C; 

73357 

1 

I 

: 61375 

1 

c 

: 03434 

1 

c 

: OOOCl 

0 

I : 

77  7 72 

c 

C : 

02  366 

c 

I : 

63255 

0 

35,^320 

C: 

03544 

1 

r : 

03536 

1 

I 

: 65325 

r 

c 

: 03442 

0 

c 

: 03631 

0 

I: 

41525 

c 

C: 

065  3 2 

c 

I : 

7 76  24 

1 

35 ,3330 

C : 

73376 

1 

l; 

73775 

1 

C 

: 00001 

r 

c 

: 03444 

0 

I 

: 41575 

c 

C : 

02311 

0 

I : 

57435 

1 

C : 

0226  1 

0 

35, 33?C 

1 : 

41456 

( 

I : 

76435 

1 

c 

: 02311 

0 

I 

: 77715 

1 

I 

: 64315 

1 

C; 

C2366 

c 

C : 

OOOC  1 

0 

I : 

7 7 7 72 

c 

■35,3350 

C: 

363.'.I3 

1 

C: 

0346  3 

0 

I 

: 40220 

0 

c 

: P3463 

f 

c 

: 00001 

0 

I : 

7 76  5.) 

1 

r : 

733  34 

1 

I : 

575  75 

1 

35,336'" 

C : 

02261 

0 

C: 

2400  7 

0 

r 

: 03536 

1 

I 

: 57456 

1 

c 

: 00C15 

0 

I : 

7 6 4 3 5 

1 

C : 

02261 

c 

C : 

COCCI 

0 

35, 337C 

I : 

43401 

r 

C : 

00n2  3 

0 

I 

: 65325 

1 

c 

: 06524 

1 

c 

: 02317 

J 

I : 

4 1406 

0 

I ; 

45020 

1 

C : 

C3*65 

c 

F^GE  17CC 


GAP:  ASSF^BLE  REVISION  116  CF  AGC  FRCGFAN  LUMINARY  BY  NASA  2021112-071  1S:09  AUG.  11,IS6S 

octal  listing  FPR  paRAGRAPF  n 207,  NITH  PARITY  BIT  IN  BINARY  AT  ThF  RIGHT  CF  EAGH  NCRC,  "S"  CENCTES  UNUSEC  FTYEC  MEMORY 
ALL  VAIIP  YCRCS  are  BASIC  INSTRUCTIONS  EXCEPT  THOSE  markEC  "I"  (INTERPRETIVE  OPERATOR  HCROSI  ER  "C"  (CENSTANTSl 


35, 3ACC 

C: 

27A12 

r 

I : 

71214 

C 

C : 

C1673 

1 

I : 

43054 

1 

C : 

73406 

1 

C: 

01473 

0 

I: 

4 c c ^ c 

1 

C : 

6 3 7 36 

C 

35 ,3A  10 

I : 

730 14 

n 

C: 

OOP  6 3 

1 

C : 

02777 

1 

I : 

43C  14 

D 

C : 

C43C3 

n 

C : 

73417 

1 

C : 

00263 

0 

C : 

255  17 

0 

35 ,3A2C 

I : 

77657 

0 

C ; 

571  76 

C 

C : 

25535 

0 

I : 

77657 

0 

r ; 

57176 

0 

C.; 

3 5 5 ^3 

C 

C : 

27  1 10 

1 

I : 

52175 

C 

35,3A30 

r ; 

00031 

P 

C: 

C3465 

C 

I : 

43320 

1 

C: 

03470 

1 

C : 

0131  1 

0 

C ; 

73441 

1 

T : 

520  14 

0 

C : 

0C47C 

1 

35 , 3AA0 

C : 

73  5U5 

0 

I : 

77214 

0 

C: 

03274 

0 

C : 

03434 

1 

r : 

01236 

1 

I : 

7 7 7 76 

1 

33636 

1 

04616 

1 

35, 3A5C 

C: 

20477 

1 

060C1 

n 

C3454 

1 

0344  6 

1 

350  16 

n 

54003 

0 

220C7 

C 

34  756 

1 

35,3A60 

54.102 

1 

E-'K,  '2 

0 

4 1^(33 

0 

SCO  02 

c, 

61235 

1 

26001 

1 

1000  2 

1 

13*60 

1 

35,347C 

22000 

1 

00006 

1 

15475 

0 

05504 

0 

C: 

00146 

1 

060^2 

1 

I : 

45014 

0 

C : 

03354 

0 

35, 3500 

C: 

73502 

1 

C : 

733C7 

1 

I : 

7 7 7 7 5 

1 

C : 

C2366 

0 

C : 

33656 

1 

I: 

77624 

1 

C: 

73352 

1 

I : 

7 7 7 7 6 

1 

35,3510 

33635 

1 

0 3621 

1 

76042 

1 

I : 

776  50 

1 

C : 

C347C 

1 

I : 

71220 

1 

C : 

03470 

1 

C : 

33651 

0 

35, 352C 

C : 

02253 

1 

I : 

71214 

r 

C : 

.113  51 

1 

C: 

73543 

1 

C: 

336  5 1 

0 

I: 

776  15 

0 

C : 

336  5 1 

c 

C : 

C 2 2 53 

1 

35,3530 

■I ; 

77414 

0 

C : 

01742 

1 

r ; 

73543 

1 

C3613 

r. 

03  53  6 

1 

03  544 

1 

06042 

1 

l: 

41575 

Q 

35,35RC 

C : 

03656 

1 

I : 

77624 

1 

C: 

1 5 7 2 5 

0 

I : 

7 7 7 7 6 

1 

C2437 

0 

3 1470 

0 

55464 

1 

34777 

1 

35,3550 

046  16 

1 

C : 

' 1736 

1 

33637 

0 

C4616 

1 

C : 

20477 

1 

03  5 60 

1 

03563 

1 

C 3573 

c 

35  ,3560 

3000  5 

1 

55162 

1 

06CC1 

n 

40076 

1 

74746 

1 

00006 

1 

13560 

0 

05353 

1 

35,3570 

C ; 

(4024 

0 

C5  5‘'4 

0 

C : 

0004  7 

1 

300.3  5 

1 

56  16  i 

1 

C 53  53 

1 

C : 

04C24 

c 

C6C42 

1 

35,3600 

I : 

52,114 

0 

C: 

(,,16  7 C 

0 

C : 

C3464 

1 

0000  6 

1 

23463 

1 

33633 

1 

046  16 

1 

C : 

20*7  7 

1 

35 ,36  IP 

16001 

1 

01463 

1 

13605 

0 

3 7 7 4 7 

1 

7101C 

0 

C00C6 

1 

13620 

1 

24C02 

0 

35,3620 

00002 

0 

000(16 

1 

23465 

1 

55615 

0 

31615 

1 

046  16 

1 

C : 

20477 

1 

16CC1 

1 

35 ,3630 

01465 

1 

13624 

0 

C : 

01445 

0 

C : 

014  6 7 

r 

C : 

01472 

1 

C : 

01473 

0 

C: 

01521 

0 

C : 

04055 

0 

35,36RC 

C : 

14441 

0 

C : 

37325 

1 

C: 

00001 

0 

C: 

206  50 

0 

C : 

12525 

0 

C: 

12‘:25 

c 

C : 

000C4 

c 

C : 

21505 

1 

35,3650 

C : 

77777 

p 

C : 

613  3 7 

1 

C : 

01252 

0 

C : 

25253 

1 

C : 

13434 

0 

C: 

16  162 

Q 

35026 

0 

05072 

1 

35  ,3666' 

C : 

0 3245 

1 

C: 

74  06  7 

0 

05516 

0 

C : 

00303 

1 

05353 

1 

C : 

C0CC6 

1 

15261 

0 

05321 

1 

35,367C 

C : 

00077 

1 

13677 

0 

05  504 

0 

C: 

0012  2 

0 

04674 

0 

C: 

6 2 3 16 

1 

137C4 

c 

34  737 

c 

36,3700  5A055  P 3A7‘^0  1 00006  1 0501R  1 05353  1 C:  00003  1 15261  0 0R6A5  1 


35,371C 

55163 

0 

■'46  16  1 

C:  54261  0 

ICOCC 

c 

13  7 26 

c 

34  73  7 

C 

70  1C6 

1 

ICCCO 

0 

35, 3720 

13733 

1 

34747  1 

00006  1 

C2U30 

0 

00006 

1 

13733 

1 

33735 

c 

CA6  16 

1 

35,3730 

C : 

20  62  4 

0 

16001  1 

13711  1 

31163 

1 

0464C 

1 

C:  C02C3 

0 

C : 03736 

0 

C:  03737 

1 

35 ,3  74  C 

CK  SM 

60115 

1 

a 

a 

a 

5 

a 

a) 

2 

35,7750 

2 

2 

a 

a 

a 

2 

a 

a 

35 ,3760 

a 

a 

a 

a 

a 

a 

a 

a 

35,7770 

3 

3 

a. 

a 

a 

2 

S 

a 

G<^P:  ASSE^BLP  R^VtSIPN  116  Cf-  AGC  FPCGFAW  LUMINARY  PY  NASA  2021112-1.71  19:C9  AUG.  )!fl9t9  p/SGE  X701 


OCTAL  LISTING 

FOR  paragraph 

21^>, 

WITH 

PARITY 

SIT 

I A 

BINARY 

AT 

THE 

RIGHT  CF 

EACH  WCPC, 

S" 

CENOTES  UNUSED 

FIXED 

1 MEMORY 

ALL  VALID 

I.GRCS  ARE 

FAS  IC 

INSTRUCT 

TONS 

EXCEPT  THOSE 

marked  "I" 

( INTERPPETI VE 

OPERATOR 

wcpo 

5) 

CR  "C 

" (CCNSTANTS) 

36,2000 

C ; 

: Ul.’56 

C 

C : 

37167 

0 

C 

: 00457 

1 

c 

: U3250 

C 

C 

: 77777 

u 

C: 

7773  1 

1 

C : 

Q03C7 

C 

C : 

11C40 

C 

3 6,  PfUO 

C; 

1 00151 

1 

C : 

15214 

0 

C 

: 77777 

C 

c 

: 77765 

C 

( 

: 00004 

'\ 

C : 

300GO 

1 

C ; 

000  26 

0 

C : 

30605 

1 

36,202C 

r ; 

: 00013 

0 

C : 

143U3 

1 

c 

; 00030 

1 

c 

; 00014 

! 

c 

; 01512 

C 

1 2 3 2 7 

1 

12616 

C 

13C66 

0 

36, 20 3C 

15261 

n 

121  50 

0 

C 

: '^0000 

1 

c 

: C3761 

1 

c 

: 64067 

1 

12402 

1 

12567 

0 

12  525 

0 

36,2040 

C ; 

; 0145-I 

1 

12327 

1 

12620 

0 

13053 

C 

1526  1 

0 

12157 

0 

C : 

04300 

0 

C : 

03672 

1 

36,2060 

C : 

; 74C66 

1 

12372 

1 

12567 

0 

12  510 

LI 

13127 

1 

12153 

0 

C : 

777  76 

1 

C : 

C34C2 

1 

36,2060 

C: 

74066 

1 

124C4 

1 

12  573 

0 

c 

; C145Q 

1 

12324 

1 

126  20 

) 

13053 

0 

1 5 2 6 1 

c 

36 ,2C7C 

12150 

0 

f : 

05120 

1 

c 

: 03672 

1 

c 

: 74066 

1 

123  72 

1 

1 2 5 6 7 

(7 

12545 

c 

13424 

1 

36,2100 

r : 

01476 

0 

12327 

1 

12616 

0 

13003 

0 

1526  1 

0 

12153 

0 

C: 

043C0 

c 

C : 

C376  1 

1 

36,2110 

C : 

: 64067 

1 

124  '2 

1 

1 2 567 

c 

124  64 

1 

c 

: 01477 

1 

12327 

1 

12616 

0 

13C66 

0 

36,2120 

15261 

0 

12122 

0 

12123 

1 

12124 

0 

12125 

1 

124C2 

1 

12567 

0 

12535 

1 

36, 2130 

05353 

1 

C : 

04024 

c 

34  75  5 

1 

55507 

c 

555  1C 

0 

046  16 

1 

C; 

73707 

c 

Q0rC6 

1 

36,2140 

31442 

1 

53512 

1 

00004 

0 

04674 

r 

c 

: 7557C 

1 

OOOC3 

1 

51455 

1 

10005 

0 

36,2160 

44762 

1 

04616 

1 

c 

: 74670 

0 

06042 

1 

I 

: 45345 

1 

C; 

03442 

0 

C : 

35147 

0 

C : 

34C41 

c 

36,2160 

C; 

61C71 

0 

I: 

45014 

0 

c 

: U3347 

1 

c 

: 74202 

1 

c 

: 27044 

1 

I : 

64375 

1 

C: 

000  2 5 

G 

C: 

C 1734 

0 

36,2170 

T : 

77762 

1 

C : 

25726 

0 

c 

: 0 10  17 

1 

I 

5 64312 

0 

c 

: 0173^ 

c 

C: 

3 5 7 2C 

1 

C : 

6 7067 

1 

C : 

16317 

0 

36,2200 

C : 

00015 

n 

C : 

0004  1 

1 

I 

: 77624 

1 

c 

: 27555 

1 

122  13 

1 

oonc6 

1 

3156  1 

1 

52^42 

0 

36,2210 

00006 

1 

33147 

0 

21442 

C 

52155 

1 

535CC 

1 

COOC6 

1 

43762 

0 

21500 

1 

36 ,222C 

00006 

1 

315C0 

c 

05277 

0 

c 

: 02242 

1 

c 

: 74067 

0 

C 53  53 

1 

C : 

20  2 54 

c 

C 532  1 

1 

36,2230 

C: 

00077 

1 

15  15  5 

1 

44762 

1 

55162 

1 

06042 

1 

I ; 

51575 

1 

C : 

035  53 

1 

C : 

03472 

c 

36,2240 

I : 

77776 

1 

15155 

1 

33762 

1 

C5173 

1 

c 

; C23CC 

0 

C 5 3 53 

1 

C : 

40154 

c 

44752 

1 

36,2250 

55162 

1 

51455 

1 

4!1006 

0 

00006 

1 

65261 

1 

33  151 

1 

05173 

1 

C : 

C2  27C 

c 

36,2260 

35027 

1 

05072 

1 

c 

: 02265 

1 

c 

: 74C67 

0 

15261 

3 

04616 

1 

C: 

20457 

0 

15155 

1 

36,2270 

3 5 027 

1 

050  72 

1 

c 

: 02275 

0 

c 

: 74067 

0 

1526  1 

0 

3 3 7 65 

c 

04616 

1 

C : 

20466 

1 

36, 2300 

33  1 50 

0 

05173 

I 

c 

: 02354 

1 

44762 

1 

55162 

1 

51455 

1 

3000  6 

1 

0GCC6 

1 

36,23ir 

62327 

0 

55477 

'1 

>5  173 

1 

c 

; C235C 

c 

3625C 

0 

540C1 

1 

46250 

1 

52752 

0 

36,2320 

40025 

1 

55C52 

0 

51455 

1 

nuo  1 

! 

401C6 

1 

74737 

1 

261C6 

1 

cccce 

1 

36,2330 

51455 

1 

3'TIO 

0 

53252 

1 

34  7 52 

C 

5400  1 

1 

44752 

1 

52760 

1 

40C25 

1 

36,2340 

55060 

1 

0C)On6 

1 

34755 

1 

527  54 

C 

10762 

Q 

1 5 2 6 1 

c 

C4635 

c 

C : 

77410 

1 

36,2350 

02663 

0 

C'53  5 3 

1 

c 

: OCOCl 

0 

15261 

0 

,10006 

1 

34  7 5 5 

1 

527  56 

1 

337  62 

1 

36,2360 

05173 

1 

C : 

02407 

0 

C55  16 

c 

c 

: cm  53 

c 

055  16 

c 

C : 

CC!154 

1 

05516 

c 

C : 

00  122 

0 

36,237( 

51455 

1 

10  C 1 1 

0 

10756 

1 

12402 

1 

34736 

1 

C51C5 

c 

C : 

02540 

1 

C : 

56C67 

0 

GAP:  ASSP^BLE  RFVISinN  116  CF  AGC  FPCC-RA*'  LUMINARY  RY  NASA  2nsill?-cn 


1S:C9  ALG.  11  , ISf S 


FACE  17C2 


OCTAL  LISTING  FOR  PARAGRAPH  « 211,  I TH  PARITY  BIT  IN  BINARY  AT  THE  RIGHT  CF  FACF  WCPC,  "5"  CENOTES  UNLSED  FIXED  MEMCPY 


ALL  VALIE 

NGRCS  APE 

PASIG 

INSTRLIGT 

ICN"; 

EXCEPT  THOSE 

MARKFD  "I" 

( I NTER  FPETI VE 

CFEPATCP 

NC  PC  S 

I CP 

"C 

" (CCNSTANTS) 

36, 2A0G 

C5353 

1 

C : 

noi‘=3 

1 

A476a 

55162 

1 

053  53 

1 

C : 

ACC  / A 

G 

1 526  1 

C 

AC  1C3 

1 

36.2A10 

7A737 

1 

26113 

1 

05321 

1 

C : 

GLC77 

1 

12A25 

1 

31A22 

1 

05203 

0 

C: 

02  66  7 

C 

36,242C 

r. : 

72C67 

0 

■I5’2  7 

1 

C : 

AO033 

0 

C: 

050  lA 

1 

C; 

/ / M ( 

C 

3A7A0 

0 

7C1C3 

1 

00006 

1 

36, 2A3f 

C ^ c c 

1 

10012 

0 

A‘l  10  1 

0 

7A7A5 

1 

26  1 C)  1 

0 

^^355 

1 

00CC6 

1 

02C11 

C 

3 6, 2 A AG 

6A737 

0 

6 

1 

10  11 

c 

L00C6 

1 

3002  5 

0 

533A2 

1 

AA735 

0 

70  111 

1 

36,2A5G 

5A1  11 

1 

One.  .6 

1 

31517 

0 

53AA2 

0 

00006 

1 

3CC25 

C 

21AA2 

0 

AA  1 A2 

0 

36, 2A60 

70MA 

0 

5A10A 

0 

51A55 

1 

10013 

1 

0)006 

1 

3 3 1 A3 

1 

53252 

1 

2CfC5 

1 

36 ,2A70 

55162 

1 

Aol  ■ 5 

1 

7A7A3 

1 

26105 

1 

AO  1C  3 

1 

7A7A1 

0 

26103 

1 

00006 

1 

36, 25CC 

30'^i2f 

0 

53A62 

n 

3A755 

1 

553A6 

0 

55621 

1 

3A7  52 

0 

55623 

r 

125A5 

c 

36,2610 

AO  1 > 1 

0 

7A7A'. 

1 

0<i006 

1 

125A5 

c 

31  A22 

1 

05203 

0 

r : 

0366  7 

0 

C: 

72067 

0 

36,252C 

■>532  7 

1 

C : 

A JO  3 3 

0 

C : 

J50  1 A 

1 

C: 

77777 

c 

125A5 

0 

3 50  1 5 

c 

5ACC3 

c 

31A12 

1 

36,  253C- 

55537 

C 

P1A1  3 

r 

55541 

1 

35016 

c 

5A00  3 

0 

30005 

1 

55162 

1 

0CCO6 

1 

3 6 ,25AO 

331A5 

1 

53252 

1 

AO  103 

1 

7A7A1 

c 

26  K3 

1 

AA7AA 

c 

70111 

1 

5A  1 11 

1 

36 , 266C 

3A7A3 

0 

70076 

1 

1 1O0J 

0 

i:*526 

1 

055  1 6 

c 

C: 

CO  1 53 

c 

055  16 

c 

r ; 

CC15A 

1 

36,2560 

05516 

0 

G : 

Li  16  1 

1 

C5353 

1 

C : 

A005A 

1 

15221 

0 

C : 

00062 

0 

Ci2657 

1 

0CCC6 

1 

36,2570 

3‘^‘755 

1 

5276  1 

1 

15261 

O 

OA635 

c 

C : 

73656 

c 

C55CA 

c 

C : 

00161 

1 

0550A 

0 

36, 26CC 

C : 

00175 

1 

OA75  1 

c 

55  515 

c 

1076^ 

12607 

0 

0A6  16 

1 

r : 

7A667 

c 

AA765 

c 

36,261> 

55  162 

1 

0 53  53 

1 

C : 

OOOOA 

15155 

1 

51A55 

1 

10C02 

1 

30005 

1 

1262  1 

1 

36,262F 

AA762 

1 

55  162 

1 

15516 

0 

C: 

00  1 6 1 

I 

055  1 6 

C 

C : 

C0175 

1 

15155 

1 

05353 

1 

36,2630 

C: 

'I0:)0  3 

1 

rioooA 

0 

06C32 

0 

C : 

73667 

1 

IA67A 

0 

C: 

75565 

0 

055CA 

c 

c : 

CC3  12 

1 

36 ,?6Ar 

126^51 

1 

r : 

•i  1310 

i 

15  50  A 

0 

C: 

00  3 1 A 

1 

3A75  3 

1 

000  C A 

0 

05  173 

1 

C : 

0235A 

1 

36 ,265C 

15155 

1 

3 0 i-2 

i 

05522 

1 

AOOOO 

0 

000C6 

1 

060C1 

c 

155  11 

c 

AA7A6 

1 

36,266C 

70  I 11 

1 

5A1  11 

1 

00L02 

0 

AOlll 

1 

7A7A6 

1 

26111 

1 

0000  2 

0 

3 A 7 5 5 

1 

36 ,267C 

55162 

1 

OA6A5 

1 

5 50  60 

1 

00006 

1 

31AA2 

1 

5 2 15  5 

1 

00CG6 

1 

AOC25 

1 

36, 27CC 

20  1 5 5 

1 

L7262 

3A777 

1 

54002 

1 

52  155 

1 

7A3A6 

c 

OO0Q6 

1 

1CC02 

1 

36,2710 

300  ) 1 

0 

6A752 

0000  A 

0 

C 5 1 ? 3 

1 

C : 

C2723 

c 

C5327 

1 

C : 

A0036 

V 

C : 

0 50  2 A 

1 

36,2720 

r : 

13r-.)0 

0 

31  ‘60 

OA5A0 

1 

AOU  2 5 

1 

5 50  6 A 

0 

11162 

1 

12737 

1 

1273C 

c 

36,2730 

37720 

0 

05L72 

1 

C : 

02  7 A3 

0 

C : 

7A067 

0 

05221 

0 

C: 

OOIAA 

) 

12723 

1 

00006 

1 

3 6, 27  AO 

3A755 

1 

5276A 

0 

1526! 

c 

00006 

1 

A1AA2 

0 

53A5A 

1 

00006 

1 

30C25 

0 

36, 2750 

2 1 A 5 A 

1 

r 0 R r A 

0 

1 1162 

1 

15155 

1 

15155 

1 

AOOOO 

0 

000C3 

1 

5CCCC 

1 

36,2760 

13T15 

1 

AA755 

55C66 

1 

3G3  71 

1 

G46  16 

1 

C : 

20A7A 

1 

13017 

0 

1261A 

1 

36,277C 

12627 

1 

3315? 

1 

TA616 

1 

C: 

20  A 60 

1 

13017 

0 

1303A 

1 

12771 

c 

51A55 

1 

G'\P:  ^SSENRLE  revision  116  OF  /'C-C  PRCGRA«  LUMINARY  BY  NASA  2021  1 12-071  1S:CS  ALG.  11,1969  FACE  17C3 
OCTAL  LISTING  FOP  PARAGRAPH  H 212,  tilTH  PARITY  BIT  IN  BINARY  AT  THE  RIGHT  CF  EACH  WORD,  "S"  CcNGTES  UNLSFC  FINED  MENCRY 
ALL  VALID  WCRCS  ARE  BASIC  IMSTP.UCT TCNS  EXCEPT  THOSE  MARKED  "I"  (INTERPRETIVE  CPEPAICP  WCRCS)  CR  "C"  (CCNSTANTS) 


36,3C00 

30000 

1 

066  16 

1 

C; 

20466 

1 

66763 

1 

55066 

1 

51655 

1 

3U0CC 

1 

066  16 

1 

36, 3010 

C : 

20676 

1 

1 3 M 7 

C 

13065 

1 

13050 

0 

06616 

1 

C: 

20657 

0 

15  155 

1 

03P21 

1 

3 6 ,302-7 

1 60n  1 

1 

07006 

1 

10006 

1 

2316  1 

1 

C26  5 7 

1 

G6P32 

0 

C : 

76  3 50 

1 

05353 

1 

36, 303C 

C : 

0007  1 

0 

3r-'--';5 

1 

55162 

1 

01161 

1 

05353 

1 

C: 

06026 

0 

36755 

1 

55162 

1 

36,3060 

35023 

0 

75105 

.7 

r : 

032  1 1 

0 

c ; 

e6Ct5 

C 

15155 

1 

05506 

0 

C : 

00156 

1 

13  106 

1 

36,3C6C 

700U6 

0 

51455 

1 

1 J0U3 

0 

34666 

c 

051C5 

0 

C: 

C 3 2 2 7 

c 

C : 

76C67 

C 

00C06 

0 

36, 306 r 

C6676 

0 

C : 

602  7 5 

1 

03021 

1 

C5353 

1 

C: 

TO  13  6 

1 

15155 

1 

35027 

1 

05  105 

C 

3 6,3  '70 

C : 

7 2616 

0 

C: 

37067 

0 

C5516 

c 

C ; 

CO  17  5 

1 

CCOCA 

0 

06  6 76 

0 

C : 

40205 

1 

03021 

1 

36, ’ICC 

05353 

1 

C : 

07C24 

0 

C : 

1 7O0-0 

1 

C : 

02616 

0 

C: 

30067 

0 

15  155 

1 

40  1C  3 

1 

7 6 7 3 7 

1 

36,3110 

10000 

0 

13122 

1 

367  53 

1 

C0CC6 

c 

05173 

1 

C : 

02432 

7 

34360 

c 

56C01 

1 

36,3120 

600'JU 

0 

52767 

1 

66762 

1 

5 516  2 

1 

15  15  5 

1 

C5567 

0 

C ; 

0 1 7 C 6 

1 

35C06 

1 

36,3130 

06616 

1 

C : 

204  7 7 

1 

1600  1 

1 

1313  5 

1 

13127 

1 

516  55 

1 

100  16 

c 

C;  C2C60 

1 

36,3160 

C : 

O2057 

f\ 

C ; 

02 ''6  3 

0 

C ; 

”26  10 

0 

C : 

62C67 

1 

C : 

03372 

1 

C : 

70067 

1 

C: 

00700 

1 

C : 05656 

1 

36,’15r 

■ C : 

04672 

0 

C : 

V77  5 2 

1 

C: 

11675 

0 

05353 

1 

C : 

06026 

0 

33  137 

1 

5 5655 

c 

30106 

0 

36,3160 

76737 

1 

1 7 

0 

13125 

c 

C66  16 

1 

C : 

11236 

0 

6'l  1 1 1 

1 

76737 

1 

KCCC 

c 

36 ,31 70 

32022 

n 

62u2  3 

1 

55  2 50 

0 

36  7 5 1 

c 

555  15 

0 

06062 

1 

I : 

43175 

0 

C:  36001 

1 

36,3200 

r ; 

02663 

0 

C : 

03735 

0 

I : 

77735 

0 

C : 

26002 

1 

I : 

70476 

7 

C; 

37763 

r 

C: 

562  66 

1 

I : 77626 

1 

36,3210 

C; 

56613 

1 

T; 

77776 

1 

70006 

0 

C4676 

c 

C : 

47163 

7 

03217 

0 

12130 

0 

00C06 

1 

36 , 322C 

23161 

1 

000)3 

1 

15516 

0 

C : 

00126 

c 

C46  16 

1 

C : 

56123 

Q 

Cl  161 

1 

3CC05 

1 

36, 323P 

55162 

1 

0000  6 

1 

32C60 

r 

53252 

1 

33766 

1 

066  16 

1 

C ; 

20636 

c 

03262 

1 

36,3260 

13245 

(' 

03727 

c 

c -a  c 5 

1 

C : 

CCC  lA 

1 

15155 

1 

00CC6 

C 

04676 

0 

C;  60156 

0 

36,3?5C 

04676 

0 

C; 

6'il41 

1 

00  713 

1 

33765 

0 

066  16 

1 

C : 

206  63 

1 

C3262 

1 

13262 

c 

36,3260 

03253 

0 

13262 

1 

0CCC6 

1 

32110 

0 

53252 

1 

36755 

1 

55662 

1 

30CC5 

1 

36,3270 

55162 

1 

0 11  16 

0 

J6676 

o 

C : 

60115 

c 

OOOC3 

1 

C6CC1 

0 

33160 

1 

55655 

0 

36, 33CC 

06616 

1 

C : 

11236 

r 

16062 

1 

I : 

71216 

0 

C: 

70  700 

0 

C: 

7 53  1 1 

0 

C : 

360  17 

c 

C:  37735 

1 

36,3310 

C: 

75316 

1 : 

77765 

1 

C : 

3602  1 

0 

C : 

C3735 

c 

I : 

77626 

1 

C : 

56266 

1 

1: 

77626 

1 

C:  56613 

1 

36,332C 

I : 

77776 

1 

000  16 

0 

14676 

0 

C: 

61 1 56 

0 

06  6 7^ 

0 

C: 

60161 

1 

03217 

c 

06C62 

1 

36,3330 

I : 

65175 

0 

C : 

037  ’ 1 

1 

C : 

57267 

0 

C : 

C3502 

r 

I : 

77776 

1 

33765 

2 

066  16 

1 

C:  20^67 

1 

36 ,3360 

35017 

1 

55162 

1 

05  105 

0 

C : 

03365 

1 

C : 

76C67 

0 

C5327 

1 

C ; 

00076 

0 

C:  06026 

0 

36,3350 

12  137 

1 

36777 

1 

■146  16 

1 

C: 

11/36 

1 

31162 

c 

667  52 

c 

U00C6 

1 

1 3 3 5 1 

1 

36,3360 

33765 

0 

066  16 

1 

C ; 

20667 

1 

3 5017 

1 

C5166 

1 

31162 

0070  6 

1 

65155 

c 

36,337C 

06062 

1 

I; 

65175 

■0 

C : 

13  70  1 

1 

C: 

5 7267 

c 

C: 

035C2 

0 

I : 

7 7 7 7 6 

1 

36777 

1 

06616 

1 

GiP:  fiSSPNBLE  REVISiriN  116  CF  AGC  FRCGRAM  LUMINARY  BY  NASA  2021112-071 


1F:C?  AUG.  11 ,1969 


PAGE  17CA 


octal  listing 

FOR  paragraph' 

# 213, 

WITH 

PARITY 

BIT 

IN  E IN  ARY 

AT 

THE 

RIGHT  CF 

EACH 

wnpc,  "5 

" 

CENGTES  UNLSED 

FI  XED 

vencPY 

ALL  VALID 

WORDS  ARE 

BAS  IC 

IN 

STRUCT  IONS 

EXCEPT  THESE 

V RKEC  "I  " 

( I NTERPRFT I VP 

CPERATCP 

WCRDS  ) 

CR  "C 

" (CCNSTANTSt 

36,34CC 

C 1 

: 01736 

1 

1 3365 

: » 

16042 

1 

i; 

1 6624 

1 

C 

: 75615 

1 

I ; 

451  (5 

c 

C : 

037C1 

1 

C : 

57267 

0 

36, ^AlC 

r : 

0.3  50  2 

r, 

T : 

77776 

1 

04635 

C 

C : 

65761 

1 

,15353 

1 

C: 

04024 

0 

33141 

r 

c c 4 c c 

0 

36,3426 

40  1' 16 

1 

74737 

1 

lOOCO 

C 

03125 

1 

C4616 

1 

C : 

11236 

yj 

36000 

1 

55250 

0 

36 ,343C 

34751 

0 

^5515 

06042 

1 

I ; 

772  14 

0 

C 

: 01072 

0 

C; 

340C7 

1 

C : 

03  7 35 

c 

I : 

52135 

1 

36,3440 

r 1 

26001 

1 

r : 

75204 

046  16 

1 

C : 

11236 

c 

06042 

1 

I ; 

77624 

1 

C : 

2755  1 

c 

30  155 

c 

36,3450 

05173 

1 

C : 

13453 

0 

15  155 

1 

C53  53 

1 

C 

: 05014 

1 

C : 

7 7 7 7 7 

c 

O00C6 

1 

33770 

1 

36, 346C 

53252 

1 

?47^  ^ 

1 

■J5  10  5 

(1 

C ; 

03517 

1 

c 

: 74067 

0 

12344 

1 

0 60  A 2 

1 

I : 

c *2  -a  c 

0 

36 , 3470 

C: 

0 3 50? 

0 

C: 

03521 

1 

C 

: •'3  6 56 

1 

I : 

7 76  24 

1 

c 

: 57267 

0 

C : 

03623 

0 

I : 

niib 

1 

05353 

1 

36,35CC 

6 : 

10035 

0 

0604  2 

1 

1 

: 77775 

1 

C; 

0 3 6 5 6 

1 

c 

: 035C2 

0 

I : 

7 7 7 76 

1 

C4635 

c 

C : 

65761 

1 

36, 35  10 

33766 

0 

046  16 

1 

C 

: 20636 

0 

06001 

0 

16001 

0 

13517 

0 

13242 

1 

C6C42 

1 

36,3520 

I : 

77775 

1 

C: 

16524 

1 

c 

; 03623 

0 

C : 

03502 

c 

I 

: 77776 

1 

C3510 

0 

31517 

0 

03/41 

0 

36,3530 

0 517’ 

1 

C : 

1.3  54  6 

C 

■05516 

0 

C: 

00153 

0 

055  16 

0 

C: 

00154 

1 

C55  16 

c 

c ; 

CCC44 

1 

36,3540 

05353 

1 

C: 

40  114 

1 

0522  1 

0 

C : 

00062 

0 

02657 

1 

05261 

1 

04674 

0 

C : 

7 555  1 

1 

36,3556 

05261 

1 

34644 

0 

05  105 

0 

C: 

0322  7 

0 

c 

: 74067 

0 

3 4 7 5 3 

1 

C52C3 

c 

C ; 

03612 

1 

36, 3560 

C : 

74066 

1 

40  I.;  ’ 

1 

74745 

I 

26103 

1 

12657 

1 

00006 

1 

300  2 5 

c 

53  34  2 

1 

36,3970 

A4  /4b 

1 

70  un 

54  U 1 

0 

443  55 

1 

00006 

1 

C2C11 

0 

64736 

1 

00C06 

1 

36,3606 

0 1 0 1 1 

0 

40111 

1 

74  7 36 

0 

26111 

1 

44737 

1 

54C55 

c 

34750 

1 

CCCC6 

1 

36,3610 

.I5'>14 

1 

04707 

0 

04674 

fl 

r. : 

40205 

1 

C5261 

1 

1 : 

4 50  2 > 

1 

C: 

036  6 5 

1 

C : 

56^4  7 

0 

36,3620 

I : 

43  114 

0 

f : 

0 1307 

1 

c 

: 03665 

1 

C : 

C37C5 

c 

c 

: 75637 

1 

I : 

45345 

1 

C : 

01234 

0 

C: 

03763 

0 

36, 363C 

I : 

50C25 

0 

r : 

03432 

1 

c 

: 75662 

1 

I : 

43345 

1 

c 

: 03763 

0 

C: 

03432 

1 

C : 

03765 

c 

I : 

77  776 

1 

36,3640 

10  754 

0 

13667 

1 

34  737 

c 

C0OC4 

c 

0516  5 

0 

C : 

02707 

0 

r : 

56067 

0 

05327 

1 

36,3650 

C : 

00172 

ri 

C : 

10035 

0 

16042 

1 

I: 

77745 

1 

c 

: 03765 

0 

r : 

2 7 7 6 3 

c 

C : 

C1220 

c 

C : 

26323 

1 

36,3660 

C : 

01226 

0 

f : 

02331 

1 

I 

: 45345 

1 

C : 

C3631 

0 

r 

: 01234 

0 

C: 

37452 

0 

C; 

03665 

1 

0 6 C ^ 2 

1 

36,3670 

I : 

7765., 

1 

C: 

03665 

1 

06042 

1 

I : 

7 7 6 2^ 

1 

c 

; 75615 

1 

I : 

7 77  76 

1 

00004 

0 

35C  16 

c 

36,37CC 

54003 

f) 

40076 

1 

74743 

1 

10000 

0 

137  1 1 

1 

40103 

1 

74  745 

1 

ICCLC 

c 

36,3710 

13713 

0 

04635 

c 

: 65761 

1 

046  74 

0 

c 

: 4'166 

1 

0 5516 

0 

C: 

00044 

1 

055C4 

c 

36,3720 

C : 

00161 

1 

.00004 

10006 

1 

31442 

1 

52155 

1 

0CCC6 

1 

40025 

1 

20155 

1 

36,3736 

07262 

0 

3015  5 

0 

03741 

c 

05173 

1 

c 

: 03546 

') 

05327 

1 

C: 

40114 

1 

C; 

CCC  35 

1 

36 ,3740 

15155 

1 

I'lO'i'l 

0 

1 3 7 4 5 

0 

13745 

0 

3475  5 

1 

64753 

1 

56001 

0 

34755 

1 

.6  t 1 ^ ^ L 

5 3 5 17 

1 

31517 

c 

ao‘io2 

0 

C : 

00000 

I 

c 

; 02734 

0 

C: 

COOCO 

1 

C : 

0567C 

0 

C : 

COCCO 

1 

36,3760! 

C : 

10624 

0 

6 : 

COO  00 

1 

c 

: TC764 

1 

C : 

0 50  50 

1 

c 

; 0405-' 

0 

C : 

.04125 

n 

r : 

04123 

0 

C: 

03466 

c 

36  , 57  76 

C : 

74' 167 

0 

C: 

13771 

c 

: 03772 

0 

CKSM 

666C4 

r 

o) 

a 

3 

a 

gap:  iSSFNPLE  RFVISinN  116  CP  AGC  PROGRAw  LUMINARY  BY  NASA  205111?-071  1G:CS  AUG.  lUlSe?  FACE  17C5 


OCTAL  LISTING 

for  PARAGRAPH 

# 214, 

WITH 

parity 

BIT 

I N 

e iNAPY 

AT 

THE  PIGHT  CF 

FACE 

WORD,  " 

5" 

DENOTES  UNLSPD 

FIXED  PEPCFY 

ALL  valid 

VvORPS  APF 

BAS  IP 

instructions 

FYCEPT  THCSF 

PARKED  "I  " 

( I NTPPPRET  I Vf 

CFEBATCP  kvCPCS) 

CR  "C 

" (CCNSTANTS) 

37,2CCC 

C : 

07623 

1 

C : 

; 26552 

1 

0 5 311 

1 

c 

: COCO? 

C 

■0  23  2 5 

1 

5 4 7 5 5 

1 

554  14 

C 

55440 

1 

37,  2P>  IG 

55AA1 

0 

55576 

0 

34361 

1 

555  n 

1 

32476 

0 

02367 

1 

34736 

1 

55664 

C 

37,  ? »20 

06342 

1 

I ; 

; 62545 

1 

C 

: 02'^L3 

1 

C 

: 15C46 

1 

C : 0240  1 

0 

I 

: 77434 

1 

C : 

21615 

0 

56  154 

1 

37,2P3C 

55044 

1 

3R473 

r 

046  16 

1 

C 

: 20477 

1 

0227C 

0 

C2027 

1 

C2C31 

1 

06C42 

1 

37,  PO<10 

I : 

47135 

r.) 

C: 

: Oil. 45 

1 

r 

; 21577 

1 

C 

; C2401 

0 

I:  60535 

1 

C 

; 01046 

1 

C : 

024C3 

1 

I : 

57  5 46 

1 

37  ,205O 

I : 

77752 

1 

r: 

16437 

n 

c 

: 02403 

1 

I 

: 72556 

1 

r:  16435 

1 

C 

: C24C1 

C 

I : 

73406 

1 

C : 

02675 

1 

37, 2.)6C 

C : 

16705 

1 

1 ! 

; 77746 

1 

c 

: 02677 

0 

I 

: 77676 

0 

C:  367C3 

0 

C 

: 47355 

1 

I : 

77776 

1 

C46  16 

1 

37,2070 

C: 

16772 

1 

34736 

1 

7CC77 

0 

CCCP6 

1 

12076 

0 

25414 

1 

055  16 

0 

r : 

Q0C56 

1 

37,21 CC 

02315 

1 

11414 

0 

02126 

0 

02320 

1 

OOOCfc 

1 

2 15  7 5 

1 

C5277 

c 

C : 

02113 

0 

37, 21 10 

C : 

76065 

0 

32116 

0 

C5133 

0 

32116 

0 

05  137 

1 

05261 

1 

C: 

76500 

c 

3 4 7 5 5 

1 

37,2120 

55047 

1 

31504 

1 

5 50  50 

1 

51416 

c 

5542C 

1 

C2457 

n 

51414 

1 

02  130 

1 

37,213C 

32447 

1 

34361 

1 

55476 

1 

32474 

1 

554  1 2 

0 

2 4 7 5 3 

1 

55  5 37 

c 

3475  5 

1 

3 7 , 2 1 AO 

5 1 4 1 p 

0 

54037 

1 

55472 

r 

02332 

1 

00004 

0 

34  752 

0 

0 517  3 

1 

C : 

02  151 

c 

37 ,21  SC 

051  55 

0 

000:)6 

1 

27412 

0 

21412 

1 

C0CC6 

1 

62161 

c 

34742 

1 

05173 

1 

37, 21 fO 

r ; 

02151 

0 

34736 

1 

J5105 

0 

C 

: 02166 

1 

C:  76065 

0 

0 5 2 6 1 

1 

51414 

1 

C217C 

c 

3 7,21 70 

02447 

1 

31412 

1 

OOOC6 

1 

62175 

c 

05155 

0 

34756 

1 

55537 

0 

02232 

1 

37.22C0 

11473 

1 

0223  5 

1 

J5675 

n 

41476 

1 

55476 

1 

CCCC6 

1 

41473 

1 

21477 

0 

37, 2210 

06042 

1 

I : 

45345 

1 

r 

: 02501 

1 

c 

; C2475 

0 

I:  45044 

0 

c 

: 76217 

1 

C: 

76275 

fl 

I : 

56  2 2 5 

0 

37,2220 

C : 

,02477 

1 

I : 

47(  75 

'1 

c 

: 37C56 

0 

c 

: 21613 

0 

r:  C105C 

0 

I 

: 77776 

1 

11414 

0 

02  301 

1 

37,2230 

' 02457 

0 

32471 

1 

554  12 

r. 

51416 

0 

414  17 

0 

5 5442 

0 

114  15 

1 

12245 

1 

37 ,22AO 

44747 

0 

27565 

1 

34  7 4 7 

1 

2 7 5 6 7 

G 

12251 

1 

44747 

0 

27565 

1 

34747 

1 

37,2260 

27563 

1 

02447 

1 

34755 

1 

55404 

1 

554C5 

0 

3 4 7 2 3 

1 

5544C 

1 

55441 

0 

37, 22C0 

30032 

0 

55413 , 

1 

C25CO 

0 

31  502 

1 

55050 

1 

34755 

1 

55047 

1 

02^57 

0 

37,2270 

.15516 

0 

C: 

0000  7 

0 

4 4 7 5 5 

c 

C5314 

1 

0 5472 

0 

I 

: 43215 

0 

r : 

U6532 

0 

C : 

37C64 

1 

37,2300 

1 : 

77616 

fl 

00006 

1 

23571 

u 

34755 

1 

5432  1 

0 

54322 

G 

54323 

1 

C4616 

1 

37,2310 

C: 

16772 

1 

046  16 

1 

C 

: 17710 

1 

03C47 

1 

01571 

0 

OOOT16 

1 

2357  1 

0 

0 2 31  1 

c 

37,2320 

000  36 

1 

23571 

0 

046  16 

1 

c 

: 17202 

1 

023  1 1 

0 

COOC6 

1 

23571 

c 

04616 

1 

37, 2330 

C : 

16706 

1 

02311 

r 

1000  6 

1 

23417 

1 

72342 

0 

00003 

1 

30067 

c 

C0C06 

1 

37,23A0 

62346 

1 

05122 

0 

00rC4 

0 

51415 

0 

4 103  7 

1 

555  71 

1 

00004 

0 

514  15 

0 

37 ,236C 

30037 

0 

61571 

3 

00006 

1 

12335 

1 

51415 

0 

20027 

c 

51537 

.1 

55472 

0 

37,2360 

04  102 

0 

51537 

1 

55^73 

1 

51537 

1 

23474 

1 

00003 

1 

014  17 

1 

54C01 

1 

37,23  70 

12372 

1 

55571 

1 

34755 

1 

50001 

c 

540CC 

0 

240C1 

0 

11571 

1 

12271 

1 

Gap:  ?SSEN0LE  REVISION  116  CF  AGO  PRCGRAR  LUMINARY  3Y  NASA  2021112-C71 


19  :09  AUG.  11  ,1969 


PAGE  1706 


OCTAL  LISTING  FCR  PARAGRAPH  « 215,  WITH  PARITY  EIT  IN  BINARY  AT  THE  RIGHT  CF  EACH  WORE,  "5"  CENCTES  LNLSED  FIXEC  RERCPY 
ALL  VALIG  WnPCS  ARE  BA S IC  I N STRUC T I ON S EXCEPT  THOSE  PARKED  "I"  (INTERPRETIVE  CPERATCR  KCRCS)  CR  "C"  (CONSTANTS) 


37  ,24CC 

00002 

0 

l: 

65345 

0 

C : 

37057 

1 

C : 

024C3 

1 

I : 

57546 

1 

I : 

73525 

1 

C; 

02403 

1 

I : 

74266 

0 

37, 2A 10 

C : 

36CC1 

C 

C : 

0240  5 

1 

I : 

77634 

0 

r : 

21574 

1 

r : 

26433 

1 

r : 

37057 

1 

C : 

02564 

1 

I : 

776  16 

C 

37,2A2C 

I : 

47''>20 

f! 

C: 

001-5  1 

C : 

21574 

1 

C: 

C2431 

r 

I : 

51025 

1 

C : 

02433 

1 

C: 

76431 

0 

I ; 

77624 

1 

37,2A3C 

C : 

76275 

0 

I : 

74261 

1 

C: 

202  12 

1 

C: 

G2405 

1 

I : 

523  2 1 

1 

C : 

0 26^2 

1 

C : 

C2564 

1 

C : 

16564 

1 

37, 2AA" 

r : 

02431 

0 

C : 

02433 

1 

1 : 

47170 

1 

C : 

02563 

C 

C : 

21706 

0 

I: 

77650 

1 

C: 

000  5 1 

0 

0CCC6 

1 

37,2450 

2342  T 

0 

0 60  4 2 

1 

I : 

77624 

1 

C : 

764  20 

C 

I : 

77776 

1 

02315 

1 

014  20 

0 

00006 

1 

37,2460 

23417 

1 

31416 

c 

55051 

1' 

32472 

1 

046  16 

1 

r : 

2 C 4 7 7 

1 

C227C 

c 

C 1 4 1 7 

1 

37,2470 

12461 

1 

r ; 

07626 

1 

r * 

C1542 

0 

C : 

01451 

f 

C : 

00'>7  2 

1 

C : 

02737 

0 

C: 

01664 

1 

C: 

01642 

0 

37,25CC 

0O0')4 

0 

31572 

r 

05173 

1 

C; 

C25  36 

c 

34  7 5 5 

1 

5^037 

1 

5404C 

1 

54C41 

0 

37,251C 

0000  3 

1 

33C75 

0 

55571 

1 

33076 

0 

02367 

1 

06042 

1 

I : 

77735 

c 

C : 

3 7 C 5 7 

1 

37,2520 

r : 

25477 

1 

r : 

370  7 J 

1 

C: 

2 6 4 4 5 

c 

C : 

37C57 

1 

C : 

00325 

0 

C : 

C1472 

1 

I: 

77735 

c 

C : 

0264  1 

1 

37,253C 

I : 

50076 

0 

C: 

76 -=34 

1 

I : 

77624 

1 

C: 

7640  1 

0 

I : 

77776 

1 

03C25 

1 

31576 

1 

00C06 

1 

37,2540 

12542 

1 

05261 

1 

11530 

1 

30000 

1 

55531 

0 

40000 

0 

55530 

1 

46753 

c 

37,2550 

61562 

1 

00006 

1 

12556 

1 

21412 

1 

OOOF6 

1 

62562 

1 

31572 

0 

05  173 

1 

37, 256C 

C : 

02536 

34755 

1 

56037 

0 

54324 

0 

34-755 

1 

56040 

0 

54326 

1 

3475  5 

1 

37,2570 

56041 

1 

54336 

n 

34  736 

1 

C51C5 

0 

C : 

02577 

0 

C : 

76065 

0 

05261 

1 

11562 

c 

37,26CC 

02  6 )2 

1 

02604 

1 

14  6 16 

1 

C: 

15271 

1 

06U4  2 

1 

I ; 

7 7 7 4 5 

1 

C : 

37066 

c 

C : 

24C51 

0 

37,  26  1C 

C : 

00325 

0 

I : 

765C  5 

f 

C : 

02643 

1 

I : 

57545 

1 

C ; 

0:il6C 

0 

C: 

16523 

1 

C: 

00  162 

1 

C : 

02  5 27 

c 

37,2620 

I : 

7600  1 

1 

C; 

061  r>  - 1 

0 

C: 

TOO  10 

0 

I : 

5 7 5 3 5 

(. 

C : 

02563 

c 

I : 

77640 

0 

r : 

76772 

1 

I : 

50  135 

0 

37,2636 

C ; 

02532 

1 

C : 

76644 

0 

I : 

721  74 

0 

C : 

000  14 

1 

f : 

02444 

1 

I: 

621P3 

c 

C : 

02243 

0 

C : 

7 7 7 7 5 

1 

37,2640 

C: 

12545 

t< 

I: 

661C4 

1 

C : 

76635 

c 

C : 

C 2 4 4 A 

1 

I ; 

7777C 

1 

C : 

000  111 

0 

T : 

41343 

c 

C : 

C2  53  3 

c 

37,2650 

C ; 

37100 

1 

I ; 

43661, 

1 

G : 

21212 

0 

C; 

0250  1 

1 

C: 

065C  1 

0 

I ; 

4C725 

c 

C : 

37102 

c 

C : 

02521 

0 

37, 266f 

I : 

77732" 

1 

I : 

454  25 

0 

C : 

71216 

1 

C: 

06563 

1 

I : 

77100 

0 

C: 

76646 

1 

C: 

C0CC4 

c 

I : 

56  743 

1 

37,2670 

C : 

75324 

0 

r : 

75240 

0 

C : 

12653 

0 

I : 

77104 

1 

C ; 

76667 

1 

C : 

000  10 

0 

I : 

66  140 

1 

C : 

C2445 

0 

3 7 , 2 7 C C 

C : 

02445 

fl 

I : 

56  74  3 

1 

C : 

02450 

1 

C : 

752  16 

0 

I : 

776  1 2 

0 

f : 

7 5 2 76 

c 

C ; 

125C1 

c 

I : 

42743 

1 

37,27  10 

C : 

7 5314 

0 

r ; 

75231' 

1 

r : 

12663 

c 

I : 

42673 

0 

C : 

75216 

0 

C: 

75266 

1 

C : 

125  11 

1 

T ; 

40  743 

c 

37,2720 

C : 

371  15 

1 

C: 

75216 

0 

T: 

42772 

0 

C : 

752  56 

1 

C : 

1252  1 

1 

I : 

761C4 

0 

C : 

76676 

1 

C ; 

00010 

0 

37, 273C 

1 : 

64  743 

0 

r : 

02523 

1 

C : 

02521 

0 

I : 

55523 

0 

C: 

0253  1 

1 

I : 

76521 

0 

C : 

020C1 

1 

I : 

77745 

1 

37,2740 

r : 

00155 

0 

C: 

06531 

0 

I : 

77745 

1 

C : 

C016C 

c 

C : 

065  21 

1 

I : 

77745 

1 

C: 

00  162 

1 

C : 

06523 

c 

3 7-,  2 7 5 C 

I : 

77700 

6) 

C : 

767  30 

1 

I : 

76174 

1 

C; 

0000  6 

1 

C : 

00002 

0 

I : 

5 7363 

1 

C : 

025C3 

c 

C ; 

37110 

0 

37,2760 

I : 

77722 

0 

I : 

734C6 

1 

I ; 

56C72 

1 

C : 

C0046 

0 

r : 

100  2 1 

0 

l: 

77745 

1 

I: 

77746 

1 

C : 

1CC27 

c 

37,2770 

I : 

77704 

1 

C: 

76755 

1 

I : 

7 7 7 7 6 

1 

250  16 

c 

54003 

0 

C14C0 

1 

11412 

0 

03034 

0 

Gap:  aSSPNBLE  REVISION  116  CF  A GC  PRCGRAW  LURINAPY  BY  NASA  2021112-071 


19:09  AUG.  11  ,1969 


PAGE  17C7 


octal  listing  FcR  paragraph  « 216,  WITH  PARITY  BIT  IN  BINARY  AT  THE  RIGHT  CF  EACH  WORD,  "a"  CENCTES  INLSFO  FIXEC  NENCFY 


ALL  VALIC 

Y:)RCS  APE 

BASIC 

1N<:TRUCTI  OMS 

except  thcsf 

NARKED  "I" 

( I NTERPRETIVE 

CFERATCR  WCRCS) 

CR  "C 

" (CONSTANTS) 

37,30CO 

11440 

1 

13003 

13005 

1 

300  3 2 

f 

554  14 

C 

06CJ42 

1 

I : 

65345 

0 

L ; 

02473 

0 

37,3010 

C : 

02477 

1 

1 : 

55525 

C 

C : 

■I25'il 

) 

I : 

74276 

1 

C : 

371  K 

0 

I: 

74521 

1 

C : 

026^3 

1 

C : 

C274C 

C 

37,3020 

I : 

77776 

1 

32475 

c 

C46  16 

1 

C : 

17315 

0 

02315 

1 

1144-) 

1 

02263 

1 

06C42 

1 

37,3030 

I : 

77624 

1 

C : 

764  0 1 

0 

I : 

77776 

1 

021  17 

1 

554  12 

0 

114^0 

1 

02447 

1 

05155 

0 

37, 30AC 

350  14 

1 

54>.'U3 

c 

34753 

1 

55576 

0 

'355  6 7 

3 

C: 

01600 

0 

C227C 

C 

33054 

C 

37,3050 

.15734 

1 

S>5516 

c 

C: 

00007 

0 

C5155 

0 

C : 

€160  1 

1 

C : 

C62CU 

G 

C ; 

00000 

1 

C : 

OOOOO 

1 

37,3060 

C : 

OCO  JO 

1 

C : 

COOC'i 

1 

C : 

OOOO'J 

1 

C : 

00000 

1 

C: 

OOOC  1 

0 

C; 

OOOC4 

0 

C : 

C00C2 

c 

C : 

CC22C 

1 

37,3070 

C : 

77776 

1 

r : 

3 5 73C 

c 

C : 

0CC3  5 

1 

C : 

10317 

0 

C : 

1 75  5C 

1 

C: 

O'U  15 

1 

C: 

01443 

c 

C: 

04  133 

1 

37,3100 

C : 

02265 

1 

C : 

57223 

(' 

C : 

6645  1 

1 

C: 

C5427 

c 

C : 

1 2 5 7 7 

1 

C : 

77567 

0 

C : 

442C2 

1 

C: 

24276 

1 

37, 3110 

C : 

14;)66 

1 

r : 

23C73 

1 

C : 

11773 

1 

33407 

1 

146  16 

1 

C: 

20334 

1 

05563 

1 

C 5 5 63 

1 

37,3120 

13113 

0 

40  1C  3 

1 

7 4 7 4 7 

C 

CP0G6 

1 

13377 

0 

4 1104 

J 

74744 

c 

00C06 

1 

37,3130 

13  403 

1 

n6t'42 

1 

I : 

77634 

0 

C: 

21574 

1 

C: 

3404  1 

0 

c; 

27060 

1 

I : 

77775 

1 

C : 

00017 

1 

37, 31A0 

C : 

26170 

0 

C. : 

00025 

0 

C : 

161C5 

1 

C : 

C0015 

0 

C : 

32  1 14 

1 

C: 

34041 

3 

C: 

27044 

1 

I : 

77  7 7 5 

1 

37,3150 

C : 

00017 

1 

C: 

26141 

0 

C : 

0002  5 

(J 

C : 

02120 

c 

I : 

777  7 6 

1 

40103 

1 

74747 

0 

00006 

1 

37,3160 

13326 

1 

401 

0 

74744 

0 

0000  6 

1 

1337C 

1 

06042 

1 

I : 

77634 

0 

C : 

21574 

1 

37,3170 

C : 

34041 

0 

C : 

274  12 

0 

I : 

43175 

0 

C : 

021  7C 

0 

C : 

00263 

J 

C : 

2 5535 

0 

C: 

02105 

1 

C : 

15  5 4 3 

1 

3 7 , 3 2 C C 

C : 

02114 

1 

I : 

43014 

() 

C : 

04344 

0 

C: 

772C5 

0 

C : 

000  6 3 

1 

I : 

77  6 14 

1 

C : 

01473 

0 

C : 

35517 

1 

37, 321C 

C: 

27110 

1 

I : 

77775 

1 

C : 

COCCI 

0 

C : 

26207 

r 

C : 

00007 

0 

C: 

362  15 

1 

C : 

274  12 

c 

I ; 

71214 

c 

37,3220 

C : 

01473 

0 

C: 

ono  1 5 

0 

C: 

,70>’4  1 

1 

I : 

43175 

0 

C : 

0214C 

0 

C : 

00263 

0 

C : 

25535 

n 

C : 

02  120 

0 

37,3230 

C : 

15543 

•1 

C: 

02114 

1 

I : 

43014 

0 

C : 

04344 

0 

C: 

77236 

0 

C : 

00063 

1 

C : 

355  17 

1 

C : 

27110 

1 

37,3240 

I : 

52375 

1 

C : 

OOCOl 

0 

C : 

C2207 

c 

I : 

6 5234 

1 

C : 

21725 

1 

C : 

00045 

0 

I : 

77657 

0 

C: 

2C2C1 

c 

37,3250 

C : 

26201 

0 

C : 

>0007 

0 

T : 

50251 

1 

C: 

C221  5 

c 

I : 

77752 

1 

C ; 

262C3 

1 

C : 

02207 

0 

I : 

63256 

0 

37,3260 

C : 

06516 

r 

I : 

77624 

1 

C : 

47663 

1 

I : 

41505 

1 

C: 

01734 

0 

I : 

72431 

1 

C : 

once  I 

c 

T : 

53445 

1 

37,3270 

C: 

00007 

0 

I : 

47315 

0 

C : 

nooo  1 

c 

C : 

C2215 

0 

I : 

50235 

0 

C : 

OOOCl 

■J 

C : 

00015 

0 

I: 

777  15 

1 

37,33CC 

1 : 

75241 

1 

r : 

00(10  7 

0 

C : 

000  15 

0 

I: 

655  12 

1 

C: 

262C  5 

1 

C : 

00001 

0 

I : 

51041 

c 

C : 

00007 

0 

37,3310 

C : 

77315 

0 

I : 

45345 

1 

C : 

' 6 532 

c 

C : 

022  05 

1 

r : 

■)220  5 

1 

I: 

77776 

1 

34747 

1 

7 1 C 4 3 

0 

37.,3320 

0O0O6 

1 

15472 

1 

41043 

0 

74740 

1 

27C43 

0 

13155 

1 

37713 

0 

05146 

1 

37,3330 

06042 

1 

I : 

40375 

1 

C : 

01220 

0 

C : 

00001 

0 

C: 

262  C 7 

0 

C: 

■3  12  26 

0 

C : 

262  1 5 

c 

C : 

C1726 

c 

37,3340 

I : 

65315 

0 

C : 

0172J 

0 

C : 

'112  3 4 

r 

I : 

7 7 7 7 6 

1 

35015 

0 

3 5146 

1 

06042 

1 

1 : 

77214 

0 

37,3350 

C : 

0334  7 

1 

C : 

77363 

1 

I : 

6 05C5 

1 

C: 

01734 

c 

I : 

7 7 7 15 

1 

I : 

7 6 50  5 

c 

C : 

01734 

c 

I : 

40206 

1 

37,3360 

C : 

0000  1 

0 

I : 

7765C 

1 

C : 

77240 

1 

I : 

77624 

1 

C: 

27412 

0 

I: 

520  14 

0 

C ; 

01673 

1 

C : 

7 7222 

c 

37,3370 

0604? 

1 

T ; 

77634 

a 

r : 

21574 

1 

C : 

34L41 

c 

C : 

2706C 

1 

T : 

776  50 

1 

C : 

77211 

0 

40  102 

0 

GAP:  iSSSF^BLF  PFVTSTON  116  CP  AGC  PRCGPAV  UJMNAPY  BV  NASA  20211  12-0/1 


19:09  AUG.  11  , 1969 


PAOS  17C8 


OCTAL  LISTING  ‘^CR  PARAGFAFH  » 217,  WITP  FAPITY  BIT  IN  BINARY  AT  Tt-F  RIGHT  CF  EACH  WORO  , "2"  CENCIES  UMSED  FIXEC  RERCFY 
ALL  VALID  NORCS  ARE  PASIF  INSTRUCTIONS  FXCFPT  THOSE  NARKED  "I"  (INTERPRETIVE  OPERATOR  WORDS)  OR  "C"  (CONSTANTS) 


37 ,3A00 

74744 

n 

OUO0  6 

1 

13326 

1 

06042 

1 

I : 

52034 

1 

C : 

21574 

1 

C : 

77144 

0 

C : 

04C66 

0 

37, 3A  10 

34757 

0 

03527 

1 

35031 

0 

05072 

1 

C: 

0367  1 

1 

C: 

14C63 

1 

035/1 

1 

40103 

1 

37,3A29 

74773 

1 

261  03 

1 

4 4 7 3 5 

0 

70C76 

1 

54076 

1 

34751 

0 

55256 

0 

3 7 7 1 3 

c 

37,3430 

05105 

c> 

C : 

02463 

1 

C : 

46067 

1 

347  5 2 

0 

C3523 

C 

3 5003 

1 

C5224 

c 

43535 

0 

37, 344C 

60030 

1 

1P(  00 

0 

44  7 53 

0 

13445 

0 

34753 

1 

26030 

0 

C3536 

1 

34  756 

1 

37,3450 

03527 

1 

34  7^3 

1 

55  2 56 

0 

34736 

1 

05  105 

n 

C : 

U 22C6 

1 

C: 

66067 

0 

34743 

c 

37,3460 

000  76 

1 

0501  1 

1 

30103 

0 

74747 

0 

00006 

1 

13515 

1 

30  102 

1 

74744 

c 

37,3470 

00006 

1 

1 3 ■=  1 2 

1 

10754 

0 

13513 

1 

34757 

3 

5 50  55 

1 

4002  5 

1 

6 4 7 5 6 

1 

37,3500 

64734 

0 

64734 

0 

57C54 

1 

3436  1 

1 

540C  1 

1 

4QCC0 

0 

52754 

0 

36007 

0 

37,3510 

0 5 203 

0 

C : 

02C06 

0 

C : 

42067 

0 

347  5 1 

0 

13434 

0 

00006 

1 

33534 

c 

5 3 2 52 

1 

37,3520 

3475) 

ft 

03523 

0 

05261 

1 

540C1 

1 

4002  5 

1 

55062 

0 

13530 

0 

54CC  1 

1 

37,3530 

40001 

1 

52762 

0 

■7000  2 

0 

C: 

03661 

C 

C : 

440  6 7 

0 

C ; 

3 7 7 7 1 

1 

rnoc6 

1 

30C25 

0 

37,3540 

5356! 

0 

44755 

r 

55  2 53 

0 

55254 

1 

55255 

0 

3475  5 

1 

5433C 

c 

5 4 3 3 1 

1 

37,3550 

54326 

1 

54327 

0 

c 4 -a  2 5 

1 

552  56 

c 

000C6 

1 

40040 

1 

53254 

1 

52C40 

1 

37,3560 

54224 

0 

22326 

0 

4 1041 

0 

57255 

1 

5604  1 

1 

5/330 

c 

00006 

1 

31561 

1 

37,3570 

53247 

0 

00006 

1 

41234 

1 

2124  7 

c 

30032 

0 

55154 

1 

30)0  3 3 

1 

55155 

c 

37,3600 

30034 

r\ 

55156 

r, 

3)324 

1 

5 515  7 

1 

30326 

0 

55  160 

0 

30  3 30 

1 

55161 

1 

37,3610 

C0002 

0 

11256 

0 

13437 

u 

3365  1 

0 

54J02 

1 

10  3 30 

•1 

13566 

c 

13622 

c 

37,3620 

13566 

{'• 

13566 

c 

22007 

0 

10326 

1 

13627 

0 

136  36 

') 

13627 

0 

22041 

1 

37,3630 

11255 

0 . 

41255 

0 

1 3 565 

0 

1363  1 

1 

2233C 

1 

) 3 5 6 6 

c 

11253 

0 

41253 

0 

37,3640 

13  6 4 3 

I 

13637 

1 

13554 

I 

54324 

0 

412  54 

1 

54326 

1 

44755 

0 

52C40 

1 

37,3650 

13562 

1 

C: 

■73467 

0 

05  574 

0 

r : 

000  54 

c 

00004 

0 

OOOC6 

1 

30025 

0 

523  15 

1 

37,3660 

0371  1 

0 

03654 

0 

52155 

1 

523  17 

0 

OOOC4 

0 

046  16 

1 

C : 

17167 

1 

05  5 16 

c 

37,3670 

C: 

70007 

0 

05516 

0 

C : 

000  in 

0 

34  741 

1 

00006 

1 

050  13 

0 

05353 

1 

C : 

07C24 

0 

37,3700 

C : 

2'';000 

n 

C : 

73731 

1 

C: 

76060 

0 

34  774 

1 

Q46  16 

1 

C: 

20  6 2 4 

0 

137C3 

1 

13703 

1 

37,3710 

13773 

1 

U0OC6 

1 

22156 

c 

C4103 

1 

noon  3 

1 

52155 

1 

34747 

1 

54C01 

1 

37,3720 

3475  5 

1 

20  155 

1 

44346 

c 

70  15  5 

1 

56155 

0 

74346 

c 

moon 

0 

24  156 

c 

37,3730 

00156 

0 

44741 

c 

00006 

1 

03'7  13 

0 

00004 

0 

347  55 

1 

54CC  1 

1 

52C25 

1 

37,3740 

0371  1 

0 

03734 

1 

0C0C6 

1 

/031  7 

c 

20155 

1 

34742 

1 

073  12 

0 

3 4 7 5 5 

1 

37  ,3750 

54156 

1 

J7262 

0 

10  154 

c 

0,3760 

c 

C ’ 7 6 C 

0 

C3756 

0 

34742 

1 

26154 

0 

37, 376C 

00u06 

1 

30315 

0 

27  155 

1 

07262 

0 

52155 

1 

23025 

1 

C55  16 

c 

C : 

nCC54 

c 

37,3770 

0600  1 

0 

C : 

0 3 7 71 

C : 

03772 

c 

CKSN 

/67'=] 

c 

3 

3 

a 

a 

G&P:  ^SSE^RLE  REVISION,  lit  OF  AGO  PRCGRA-W  LLMINARY  6V  NASA  2C2U12-C71 


19:09  AUG.  11  ,1969 


page  ncs 


octal  listing  ‘^CP  ’’ARAGRAFF  H 220,  WITF  parity  sit  in  pinary  at  tee  right  CF  each  NOPD,  "a"  CFNCTES  UNUSeC  fixec  peycfy 
ALL  VALIC  NQROS  ARE  BASIC  INSTRUCTIONS  EXCEPT  THCSF  VARKFF  "I"  ( I N T E F F R FT  I V E CPERATCR  ViCROS)  CR  "C"  (CONSTANTS) 


A0,2O0C 

3 5017 

1 

'5105 

0 

C; 

02017 

0 

C : 

60104 

1 

34  7 4C 

0 

05146 

1 

32076 

1 

04616 

1 

40,2010 

r : 

20353 

0 

35563 

1 

05563 

1 

0 55  6 3 

1 

3475  1 

0 

C 5464 

1 

05155 

C 

0GCO6 

1 

40,2020 

23T36 

1 

52155 

1 

06042 

1 

I : 

77624 

1 

C : 

460  6 5 

0 

C: 

00001 

0 

C: 

14GC7 

0 

C : 

06  5 24 

1 

40,2030 

C : 

2401  1 

1 

C; 

TOO  -)7 

0 

I : 

77656 

1 

C : 

00007 

r 

1 : 

7764  1 

1 

C : 

C6516 

0 

r : 

243  21 

1 

C: 

06522 

1 

40, 2f'AC 

I ; 

7764  1 

1 

C : 

C0CC7 

0 

r : 

34-T23 

1 

C: 

47322 

1 

I : 

43244 

1 

C: 

60047 

1 

C : 

06532 

C 

C : 

262C3 

1 

40,2050 

C : 

oooni 

0 

I : 

7764  1 

1 

C : 

06520 

L 

C : 

24023 

0 

C : 

000  Cl 

0 

I ; 

77641 

1 

C ; 

00007 

0 

C: 

3402  1 

0 

40, 206C 

C : 

47322 

1 

I : 

43244 

1 

C : 

60064 

' • 

C: 

C6532 

0 

C : 

0220  1 

0 

I : 

7 7 7 76 

1 

34777 

1 

04616 

1 

40, 20 7 C 

r : 

01736 

1 

34747 

1 

71C43 

0 

10000 

0 

02017 

0 

05472 

3 

T: 

C407C 

1 

34  7 53 

1 

40 ,2100 

57m 

0 

54115 

0 

11641 

1 

02  105 

1 

02112 

1 

42156 

0 

6(1 154 

1 

00006 

1 

40,2110 

12112 

0 

043  74 

0 

56154 

1 

54117 

1 

5OOOC 

1 

C2  1 16 

C 

0347C 

1 

0 217  5 

c 

40,2120 

32175 

0 

02175 

0 

02175 

r; 

021  75 

c 

021  75 

0 

02175 

) 

0 216  1 

0 

02161 

c 

43,2130 

03470 

1 

0347  -I 

1 

•33470 

1 

L3470 

1 

Q347C 

1 

C3470 

1 

C2173 

r 

02354 

1 

40, 21A0 

03646 

0 

C3470 

1 

03470 

1 

03470 

1 

0347C 

1 

03470 

1 

C347C 

1 

C3524 

1 

4 T , 2 1 50 

02407 

0 

<12374 

0 

02157 

0 

C347C 

1 

02467 

0 

02370 

1 

C : 

00022 

1 

04635 

0 

40,21 6 C 

C : 

62002 

1 

1-776 

0 

02  166 

1 

02166 

1 

05155 

0 

C5155 

0 

3625G 

0 

70777 

1 

40,2170 

10000 

0 

02175 

0 

C34  ?C 

1 

34755 

1 

54117 

1 

UJ776 

0 

02202 

0 

02202 

0 

40,220r 

0 22-1 

(' 

05155 

ft 

02324 

0 

110  14 

1 

34  75  5 

1 

55C  14 

1 

02207 

0 

50117 

Q 

40,2210 

34C66 

0 

74346 

0 

54124 

1 

30776 

1 

54143 

0 

03356 

1 

362  5C 

f 

7C777 

1 

4T,2220 

10000 

0 

02232 

0 

50137 

1 

570  00 

c 

54Q22 

0 

400  22 

J 

400  2 2 

0 

56C22 

1 

40,2220 

60L17 

0 

32247 

1 

50  137 

1 

57C0C 

0 

54154 

0 

3 4 7 5 5 

1 

54155 

1 

34363 

0 

40, 2240 

07312 

0 

56155 

0 

60117 

c 

54155 

1 

02247 

1 

26154 

Q 

02265 

1 

50  137 

1 

40,2250 

55000 

1 

40776 

c 

50137 

1 

6231  5 

1 

C00C6 

1 

12257 

1 

02312 

0 

36  2 5i'J 

0 

4C , 2 26  0 

7C777 

1 

1 <^000 

n 

02265 

1 

40776 

0 

023  13 

1 

44753 

C 

60137 

1 

CCCC6 

1 

40,2270 

62263 

1 

07106 

1 

C ; 

02322 

0 

36250 

( 

70777 

1 

50000 

1 

02276 

0 

02303 

0 

40 ,23CG 

00006 

1 

40156 

1 

52  156 

1 

56156 

c 

5013  7 

1 

5 500  3 

1 

56155 

c 

50137 

1 

43, 2310 

550  13 

1 

02263 

1 

1 I 776 

f 

54776 

0 

05155 

0 

C: 

COO  2 2 

1 

C: 

0002  c 

c 

C: 

000  12 

1 

43,2320 

C: 

000  3 5 

1 

C : 

Onf-or) 

1 

C : 

05  174 

c 

C : 

1326  1 

0 

50776 

1 

3 23  30 

0 

54137 

0 

00002 

0 

40,2330 

C : 

00004 

0 

C: 

1 30(34 

0 

r ; 

00(304 

0 

C: 

00004 

0 

C: 

OOOCF 

0 

C : 

00CC3 

1 

C : 

00CC3 

1 

C : 

CC003 

1 

40,2340 

C : 

Onn03 

1 

C : 

'00'"  3 

1 

C : 

00002 

0 

C : 

00002 

0 

C : 

30002 

0 

C : 

00002 

3 

C : 

00002 

0 

056  7 5 

c 

40,2350 

C : 

■OOOUl 

0 

r : 

• 3(101 

0 

C : 

0',l  TOO 

I 

C: 

0/3000 

1 

34  75  5 

1 

5 5COO 

1 

34360 

0 

54776 

0 

43,2360 

026U  1 

1 

34753 

1 

54777 

1 

34755 

1 

55012 

1 

342  17 

1 

54136 

1 

05155 

c 

40,2370 

34755 

1 

550c  1 

I' 

3436  1 

1 

P2357 

1 

02446 

0 

,)2433 

1 

34752 

0 

50137 

1 

PAGE  171C 


GAP:  ASSFPBLF  REVISION  116  TP  AGC  PRCGRA''«  LLMINAPY  8V  NASA  20211  1?-071  19:09  AUG.  11,1969 


OCTAL  LIFTING  PCR  PARAGRAFP  « 221,  WITH  PARHY  BIT  IN  BINARY  AT  THE  RIGHT  GF  EACH  WORC,  "3"  CENCTES  UNUSEC  FIXEC  NENCFY 
ALL  VALID  NOPDS  APE  RASIF  I N S TP,  UC  I CN  S EXCEPT  THESE  VARKEC  "I"  (INTERPRETIVE  OPERATOR  ViOROS)  CR  "C"  (CCNSTANTS) 


Ai,2A00 

64745 

0 

2677  7 

1 

1 1C  14 

1 

■^4755 

1 

55014 

1 

02406 

1 

05155 

Q 

02446 

0 

A0,2A1C 

02413 

0 

367.53 

1 

02377 

0 

22C02 

o 

02324 

0 

50137 

1 

32441 

1 

54  123 

0 

AO, 2A2C 

64753 

1 

5 412  2 

1 

34755 

1 

541  24 

1 

56  123 

1 

03440 

1 

3474  1 

1 

54  124 

1 

AO  ,2430 

56122 

o 

■■■|344  0 

1 

00001 

0 

22002 

C 

C232  4 

C 

5C137 

1 

32441 

1 

54  122 

1 

40, 2AAF 

64753 

1 

54123 

C 

02422 

1 

C : 

0000  5 

1 

C: 

OOOC  3 

1 

C:  CCCCO 

1 

220C2 

0 

3 6 2 50 

C 

40 , 24 50 

7077  7 

1 

1 lOt"'. 

0 

C5155 

0 

F4317 

1 

02462 

0 

44320 

0 

0 2462 

0 

4432  1 

1 

40 , 246C 

02462 

fl 

05155 

0 

60776 

1 

C00C6 

1 

1246  6 

0 

0QCC2 

0 

OOOC  1 

0 

1C776 

C 

40, 24  70 

1 

024  73 

c 

64753 

1 

50000 

1 

32330 

0 

54137 

0 

110  14 

1 

C25C5 

c 

40,2500 

725T2 

1 

02  50  2 

1 

30  137 

1 

C2  52  7 

c 

0252  2 

0 

1C137 

0 

54137 

0 

02527 

c 

40, 2 5 1C 

32577 

0 

27012 

1 

30  1 37 

1 

54125 

0 

000C6 

1 

27CCO 

1 

046  16 

1 

C : 

62342 

0 

4.0,2  5 20 

30  12  5 

1 

56137 

c 

02525 

1 

25014 

0 

J5155 

0 

2 2002 

0 

02540 

1 

6 7 7 5 1 

c 

40,2530 

10(300 

c 

Quo  02 

0 

05675 

0 

0515  5 

c 

00002 

0 

54  7 76 

c 

22002 

0 

02324 

0 

40, 25AC 

34  75  5 

1 

5013  7 

1 

55000 

1 

50137 

1 

55003 

1 

54  124 

1 

50137 

1 

44745 

1 

43,2550 

70777 

1 

72600 

1 

54777 

1 

50137 

1 

3257C 

1 

54143 

0 

03356 

1 

50  137 

1 

40,256C 

32573 

1 

54776 

0 

02601 

1 

44752 

1 

26776 

0 

C26C1 

1 

50137 

1 

343  15 

1 

40, 257C 

54776 

c 

nooiJi 

0 

C : 

CCC16 

0 

C : 

0000  5 

1 

C : 

00004 

0 

C:  00015 

0 

C:  00011 

1 

C : 

00CC3 

1 

40,2600 

C : 

1111 

0 

30  7 16 

1 

5 4 C 2 1 

6 

426  14 

1 

0QCC6 

c 

50C21 

1 

57022 

0 

00006 

1 

40,26  1C 

626  12 

0 

256  15 

1 

00003 

1 

0000  2 

0 

C : 

040CC 

0 

34  7 55 

1 

54  156 

1 

C 2 7 C 6 

1 

40,2620 

02622 

0 

C127C1 

0 

027  17 

1 

02625 

1 

02615 

1 

30154 

1 

74733 

0 

00CC6 

1 

4 > ,2630 

12634 

0 

4'i!  54 

0 

64753 

1 

54154 

c 

C00C2 

0 

CCCC6 

1 

OOT33 

1 

00C06 

1 

40, 264C 

74742 

0 

4 0000 

0 

7625C 

1 

541  54 

0 

J2733 

1 

02671 

0 

401  10 

0 

74751 

1 

40,2650 

1001 1 7 

0 

026  5 7 

1 

52155 

1 

20001 

1 

200C1 

1 

20001 

1 

52155 

1 

07106 

1 

4C ,266C 

r : 

00123 

1 

12745 

0 

02671 

0 

0000  6 

1 

4267C 

0 

20  1 55 

1 

02657 

1 

C : 

OOCtl 

0 

4 I,  2670 

r 1 

0 1150 

1 

34733 

1 

70154 

0 

541  55 

1 

3 115  4 

1 

600CO 

1 

74753 

0 

54  154 

c 

40  ,2700 

00002 

0 

CnH>'6 

1 

50156 

0 

32730 

1 

5212F 

1 

C0CC2 

0 

10  154 

0 

O0CO2 

c 

40,2710 

COCO  2 

0 

12712 

c 

44735 

0 

70154 

0 

54  154 

0 

5QOC2 

0 

nocc  1 

c 

CCCC6 

1 

40,2720 

50156 

0 

327  30 

1 

52  155 

1 

C7312 

0 

52124 

1 

20155 

1 

02736 

1 

C: 

C56C5 

1 

40,273C 

C : 

03656 

1 

C:  16314 

0 

C: 

3 1463 

1 

52124 

1 

52  155 

1 

C4415 

c 

04635 

0 

C : 

62570 

1 

40, 2740 

52124 

1 

52155 

1 

044  15 

0 

02745 

0 

J2757 

0 

56156 

0 

56155 

c 

54  154 

0 

40 ,2750 

■02736 

1 

12757 

0 

02726 

1 

C2757 

c 

3624  5 

1 

C32C7 

1 

02736 

1 

56CC2 

0 

40,2760 

54  16  2 

0 

03  007 

1 

07262 

0 

07106 

1 

C : 

00  12  3 

1 

00162 

1 

C2536 

c 

0 2413 

c 

4 t,?770 

30  154 

1 

33^4  2 

1 

46  3 5C 

1 

50117 

1 

64317 

0 

54776 

0 

03003 

1 

30155 

c 
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ClCTAl  LISTING  FCR  PApAGRAPh 

* 222, 

WITH  PAR  I TY 

B IT 

IN  rsINARY  , 

AT 

the  right  CF 

■ EACH 

NCPC, 

S" 

DENOTES  UNUSED  FIXED 

: pEPCFY 

ALL  VALID 

NORCS  ARE 

BASIC 

INSTRUCTICNS 

EXCEPT  ThCSP 

parked  "I" 

(I NTFPFRETIVE 

OPERATOR  NCRD 

S ) 

CR  "C 

'■  (CCN 

S1ANTS) 

4 1,3000 

33342 

1 

046  3 5 

0 

C : 6 2 5 7 2 

0 

56CC2 

C 

54144 

1 

50140 

1 

03U06 

1 

C3C23 

c 

40,3010 

50117 

0 

30 1 50 

(1 

74356 

1 

C4313 

1 

OOOC6 

1 

5CCC0 

1 

3CCC1 

C 

52155 

1 

40, 302C 

34755 

1 

54156 

1 

13  144 

0 

30145 

1 

>30  14 

1 

50  14-1 

1 

03C26 

C 

C3C31 

c 

43,3039 

33454 

1 

003  3 6 

1 

50  145 

1 

30001 

0 

52  155 

1 

34317 

5 

54776 

0 

34755 

1 

4C,3C4C 

54156 

1 

17262 

n 

33327 

1 

0013  6 

0 

07  106 

1 

C:  03130 

C 

10155 

1 

34  741 

1 

40, 3350 

03052 

0 

4474  1 

C 

60155 

0 

03221 

0 

04404 

0 

04404 

0 

0 3 2 30 

0 

C44C4 

c 

40,3060 

10  1 5 4 

0 

03.3  65 

1 

03065 

1 

400  OC 

c 

5415X 

0 

10162 

0 

03124 

0 

03077 

1 

40, 307C 

10154 

n 

C5675 

0 

0 3122 

0 

03U74 

1 

56154 

1 

74733 

0 

54  1 54 

C 

5C  14C 

1 

4 0,310(3 

03100 

0 

031i:4 

1 

03  114 

c 

C3105 

0 

03117 

J 

40000 

0 

64752 

0 

CGC06 

1 

40,3110 

13112 

1 

02625 

1 

04635 

0 

C:  63161 

1 

046  16 

1 

C:  6 30  4'7 

0 

C31C3 

0 

04616 

1 

40,  •’12G 

C ; 63(132 

0 

03105 

0 

44  733 

c 

03076 

0 

40154 

) 

74733 

0 

40CC0 

c 

C3C76 

c 

40,3130 

P : 26  16  1 

0 

C : 

3D7C7 

1 

07  1C6 

1 

C:  CO  12 3 

1 

56156 

0 

56155 

0 

56154 

1 

00006 

1 

40,3140 

13  142 

1 

04145 

0 

)3217 

0 

032  30 

0 

03112 

0 

C 7 I C 6 

1 

C : 

00  123 

1 

C3142 

c 

40,3150 

07  106 

1 

C : 

00  123 

1 

56  156 

c 

60C00 

1 

54156 

1 

34755 

1 

60155 

0 

C 3 22  1 

c 

43,3160 

C3230 

0 

50  14  Vi 

1 

33  162 

1 

0 317  3 

1 

30117 

c 

60145 

1 

54CC2 

1 

56155 

0 

40,3170 

53002 

0 

540f  1 

1 

33112 

0 

34755 

1 

.33  165 

;l 

07  106 

1 

C : 

00  123 

1 

3624  5 

1 

40,3200 

032D7 

1 

03152 

1 

07  1C6 

1 

C:  00123 

1 

34752 

0 

03207 

1 

U3152 

1 

56002 

0 

40,3210 

54124 

1 

56002 

3 

54123 

0 

34404 

( 

10  123 

0 

03212 

c 

00124 

0 

56155 

0 

43, 3220 

6 '■70  0 0 

1 

54155 

1 

00002 

0 

60154 

1 

54154 

0 

00002 

0 

54162 

0 

UCC02 

0 

40,3230 

10162 

0 

•;)41  45 

0 

3000  2 

0 

04  14  5 

c 

56CC2 

0 

54144 

1 

10154 

0 

03247 

0 

40, 324f 

03247 

0 

64753 

1 

5X,154 

11 

02433 

1 

40155 

1 

54  155 

1 

00144 

c 

CZ413 

c 

40,3250 

00144 

0 

0000  6 

1 

333  15 

c 

201  5 5 

1 

00006 

1 

13261 

.) 

000C6 

1 

34733 

1 

40,3260 

52155 

1 

non02 

0 

56002 

0 

54115 

c 

03234 

I 

G 3 2 5 1 

1 

3475  1 

c 

54137 

0 

40, 3270 

34363 

0 

07312 

c 

50154 

1 

34066 

0 

74346 

0 

5 4 124 

1 

347  5 5 

1 

56  156 

c 

40 ,3300 

56155 

0 

54154 

0 

5 6 7 7 6 

1 

54143 

0 

ICCCC 

c 

54776 

c 

03356 

1 

10137 

0 

40,33  U 

03267 

1 

4436Q 

1 

54776 

0 

Of  1 1 5 

1 

C:  OOOOC 

1 

C:  024 76 

c 

56CC2 

0 

54115 

c 

4 1 , 3320 

03234 

1 

03266 

0 

56CC2 

r 

54115 

c 

03234 

1 

34753 

1 

03267 

1 

56CC2 

0 

40,3330 

54115 

0 

34755 

1 

54124 

1 

362  50 

c 

0344C 

1 

34751 

0 

03440 

1 

C3234 

1 

43,3340 

34320 

I 

03267 

1 

0000  6 

1 

73352 

1 

22154 

1 

34755 

1 

54155 

1 

56CC2 

c 

4 3,33  50 

54115 

0 

03325 

0 

C:  00244 

0 

C3342 

1 

0463  5 

0 

C:  62351 

1 

56002 

0 

54114 

1 

40,336C 

34346 

1 

71143 

0 

54021 

0 

560  21 

1 

5414  1 

1 

34  7 53 

1 

7C143 

0 

lOCOO 

0 

40,3370 

03372 

1 

0 3 4 C 2 

1 

56124 

0 

C4340 

1 

54124 

1 

34736 

1 

70  14  3 

0 

ICCOC 

c 
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OCTAL  LI'^TING  FOR  PARAGRAPF  * 223,  WITH  PARITY  BIT  I\  BINARY  AT  THE  RIGHT  CF  EACH  WCRC,  "2"  CENCTFS  UNLSEC  FIXEC  MEMORY 


ALL  VALin 

kORDS  APE 

BASIC 

INSTRUCTIONS 

EXCEPT  THOSE 

MARKEC  "I" 

( I NTFR  fret  I VE 

OPERATOR  ROROS)  CR 

"C 

" ( C C N S 

lANTS ) 

40,3400 

34752 

C 

64753 

1 

54143 

C 

cnoo4 

0 

5014  1 

0 

11022 

1 

034  10 

1 

C56  75 

0 

47,3410 

64753 

1 

54142 

1 

50  143 

1 

73434 

0 

00006 

1 

6C124 

0 

00006 

1 

13432 

0 

40, 342C 

50  143 

1 

43434 

0 

70142 

1 

60124 

0 

40000 

0 

50141 

n 

57022 

C 

CGCC6 

1 

47,3430 

63432 

1 

25'  1“^ 

1 

00CC3 

1 

CCl  14 

C;  00037 

0 

C:  01740 

0 

C: 

02000 

0 

C: 

03740 

1 

40 ,344C 

54141 

1 

34752 

0 

54143 

0 

56002 

0 

54  114 

1 

C34C3 

c 

03356 

1 

33451 

1 

40, 34E0 

04640 

1 

C : 

634  1 7 

0 

44360 

1 

54776 

c 

43475 

0 

60136 

c 

000  C 6 

1 

13472 

1 

40,3460 

43474 

1 

60  1 3 6 

n 

0OC06 

1 

13465 

1 

C347C 

1 

C42C4 

0 

04364 

1 

04  124 

1 

40,347C 

04364 

1 

C51  55 

7 

75642 

1 

C : 

21501 

0 

C:  J4126 

1 

C42C2 

c 

347  53 

1 

55C13 

n 

40,3500 

042  74 

0 

044  5 7 

C 

04433 

1 

C3612 

1 

44753 

0 

03477 

0 

41000 

1 

6 3 5 2 3 

c 

4 7 ,3510 

00006 

1 

26000 

0 

00906 

1 

134  70 

0 

34755 

1 

55C  12 

1 

4436C 

1 

54776 

0 

40, 352C 

03476 

1 

44755 

c 

13477 

0 

C: 

000  26 

0 

44751 

1 

000C6 

1 

030  1 1 

1 

1Q115 

c 

40,3930 

34736 

1 

7 lORO 

n 

lOQOO 

c 

C3542 

1 

044  5 7 

0 

11041 

1 

03  540 

0 

05  155 

0 

4C,354C 

0463  5 

0 

C: 

210  51 

0 

34755 

1 

550  1 1 

1 

1 104  1 

1 

C 5 1 55 

0 

04502 

1 

05155 

0 

47, 3550 

30776 

1 

54132 

C 

34753 

1 

C3572 

1 

34317 

7 

02535 

0 

34752 

c 

0 3 5 7 2 

1 

47,3560 

■ 34320 

1 

72535 

■> 

34  751 

0 

03572 

1 

3432  1 

0 

C2535 

0 

30132 

1 

54776 

c 

4C,357C 

52131 

0 

C51  66 

0 

70123 

0 

10000 

0 

000C2 

0 

500C2 

0 

rooc2 

c 

3 4 3 6 2 

1 

47 ,3600 

56776 

1 

5414C 

0 

110  10 

n 

64753 

1 

03342 

1 

03607 

) 

.‘2601 

1 

56  140 

1 

40, 361C 

54776 

0 

05155 

lY 

1 1)4  1 

1 

C3615 

0 

05155 

0 

3 4 7 5 5 

1 

57041 

c 

00004 

0 

40, 362F 

05  137 

1 

I ICl  3 

r 

C3644 

1 

C51  55 

0 

03642 

1 

347  52 

0 

50C64 

c 

6C  164 

1 

40  ,3630 

50064 

n 

54164 

0 

31001 

1 

540r  1 

1 

310CC 

c 

50C64 

0 

52155 

1 

00C03 

1 

40 ,3  64 C 

0 4 4 5 7 

0 

C51  55 

r 

34755 

1 

03626 

0 

34753 

1 

C 3 6 2 6 

c 

56  115 

1 

55C11 

1 

40,3650 

00<70  4 

0 

34742 

1 

00CC6 

1 

0 5.1  11 

1 

33  73  5 

0 

71035 

1 

64735 

1 

55C35 

1 

40,3660 

45026 

1 

71373 

1 

65026 

0 

5 530C 

1 

44742 

0 

71277 

c 

6 47  4 2 

1 

55277 

0 

40, 3670 

4 3 734 

c 

701  1 0 

0 

64745 

0 

541 10 

0 

>60  2 2 

1 

44742 

Q 

OOOC6 

1 

C3C13 

C 

40 ,3700 

43733 

1 

0000  6 

1 

030  1 1 

1 

34363 

c 

54117 

1 

0O0C4 

0 

50117 

0 

11022 

1 

40, 37K 

64  753 

1 

03716 

1 

64753 

1 

40000 

0 

73736 

1 

C 3 7 2 1 

C 

40CCC 

c 

73736 

1 

40, 3720 

4-70LK' 

0 

5-J117 

0 

55022 

1 

00003 

1 

1.1  1 17 

1 

C37C4 

1 

34755 

1 

54375 

1 

40,3730 

54376 

1 

55357 

05  155 

0 

C : 

COl  06 

1 

C:  C033C 

1 

C:  00050 

1 

C : 

73777 

1 

35015 

0 

40 ,3740 

05105 

0 

C : 

03121 

0 

C : 76067 

1 

05221 

0 

C:  00144 

0 

3 1 C 4 3 

1 

7476C 

1 

CCCC6 

1 

40,3750 

13743 

0 

35C  17 

1 

05072 

1 

C : 

03113 

1 

C:  76067 

1 

15261 

0 

C: 

03756 

c 

C: 

C 3 7 57 

1 

40 ,376C 

CX'N  52475 

f) 

0' 

5 

2 

a 

a 

a 

a 

40, 377C 

2 

S 

7) 

3 

a 

a 

a 

3 
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OGTAL  listing  for  PARAGR'AFI-  H 22A,  WITH  PARITY  BIT  IN  BINARY  AT  THE  RIGHT  CF  EAGH  WCFC,  "5"  CENCTFS  UNUSEC  FINEC  MEMQPV 
ALL  VALID  WORDF  ARE  EASIC  INSTRUCTIONS  EXCEPT  THOSE  'lARKEC  "I"  (INTERPRETIVE  OPERATOR  NCPDS)  CR  "C"  (CCNSTANTS) 


Al, 2000 

03552 

0 

C3>in  1 

0 

3A755 

1 

5501A 

1 

3A2  17 

1 

5A136 

1 

1 10  12 

1 

0 2C35 

C 

A1  ,2010 

0203  5 

I'l 

02012 

0 

22033 

C 

61C12 

C 

00006 

1 

12027 

1 

36250 

0 

70777 

1 

A 1, 20  20 

lOCOO 

0 

C20-P3 

1 

0232  7 

0 

10776 

0 

023  5 2 

0 

C 2 3 5 3 

C 

02C27 

c 

A1C12 

1 

A1.2030 

550  12 

1 

0AA33 

1 

0 10  12 

0 

C : 

C3A37 

1 

C : 

0003A 

0 

3A755 

1 

5A777 

1 

AA26C 

1 

A1 ,2C.F.C 

5A776 

0 

Ali'OO 

1 

550A0 

0 

6203A 

1 

C0CC6 

1 

62123 

1 

00CC6 

1 

32UA 

1 

A1,205C 

52006 

0 

5;;JAC 

1 

02C52 

1 

C2055 

0 

0222  1 

1 

101A6 

Q 

0213  1 

0 

C22  53 

C 

A1,206C 

(T206A 

1 

25016 

1 

0A3  1 1 

0 

C212C 

c 

3A735 

1 

5 50  1 A 

1 

AA2  17 

0 

60  136 

C 

A1,2CT<- 

00006 

1 

12073 

M 

;'I2U6 

u 

02311 

0 

1077  7 

1 

CA  1A5 

0 

AA360 

1 

5A776 

0 

A 1,2100 

liriAl 

1 

C21  CA 

c 

02105 

1 

021CA 

n 

1AA27 

1 

57C0A 

1 

OA3C3 

0 

00C06 

1 

A 1 ,21  10 

3211A 

1 

52006 

0 

J2133 

1 

C : 

02  103 

1 

C : 

6A1C1 

0 

C : 

77772 

0 

30156 

0 

0A303 

0 

A1,212C 

AA756 

0 

611  CO 

0 

00006 

1 

1213  3 

c 

3A32  1 

0 

5A776 

c 

21C  16 

1 

C22  71 

1 

A1 ,2130 

02133 

1 

6A7‘^3 

1 

0A303 

0 

A21A5 

1 

610CC 

0 

10000 

0 

6A753 

1 

C2  lAl 

1 

A1,21A0 

021A6 

0 

5A1  5A 

') 

0AA57 

0 

CA635 

r 

C ; 

660GC 

1 

0 : 

C0C50 

1 

510CC 

c 

32151 

0 

A1,21£C 

C A6A0 

1 

C : 

62353 

c 

C ; 

62367 

1 

C : 

62375 

1 

C : 

62A02 

1 

C: 

62362 

1 

C: 

62355 

c 

C : 

6 2 5 2 5 

1 

A1  ,2160 

C : 

61025 

1 

C: 

62353 

II 

C : 

623  53 

c 

0.  : 

6 lA  5A 

0 

C : 

63236 

0 

C : 

63236 

0 

C : 

63236 

0 

C : 

63236 

0 

A 1 , 2 1 7 C 

0 : 

63236 

0 

C: 

632  3 6 

c 

C : 

63236 

n 

C : 

62353 

0 

C: 

62353 

0 

C : 

6 2 2 5 3 

0 

C : 

627  26 

1 

C : 

627A7 

1 

Al , 2200 

C: 

6276A 

f> 

0 ; 

627C7 

c 

C : 

6 26  22 

C 

C : 

62353 

r 

C : 

63361 

0 

C : 

62353 

') 

C : 

62352 

0 

C: 

63A7A 

c 

Al,22in 

0 : 

63520 

0 

C : 

61521 

'■ 

C : 

61A76 

0 

0: 

6 150  A 

1 

C: 

6362  1 

1 

C : 

12AA7 

0 

C : 

63A36 

c 

C: 

62353 

0 

A 1 , 2 2 20 

C : 

62353 

0 

101  A6 

0 

02226 

0 

02353 

0 

02226 

0 

02226 

0 

A62A5 

c 

6 ICOO 

c 

Al,2230 

00006 

1 

62233 

1 

0 2 13  3 

1 

3A752 

c 

5A1  17 

1 

62260 

1 

5A1A5 

0 

50117 

0 

A1,22AC 

3*1150 

0 

5A122 

1 

J30AJ 

0 

02261 

0 

022A6 

0 

2A122 

0 

3C122 

0 

7A356 

1 

Al, 2250 

OA313 

1 

5nru'C 

1 

3CCCC 

1 

501  A5 

1 

56000 

1 

10117 

1 

0222A 

c 

0 2 133 

1 

Al  ,22  60 

00  125 

1 

50000 

1 

12263 

0 

00002 

0 

00002 

0 

00002 

0 

00002 

0 

12303 

1 

A 1,2 2 70 

12303 

1 

000C2 

0 

12303 

1 

00002 

0 

OOOC2 

0 

12303 

1 

OOOC2 

c 

CCCC2 

c 

Al  ,230'J 

000.12 

0 

C0'HI2 

0 

.1000  2 

0 

50002 

0 

OOUO  1 

0 

3A3  17 

0 

123  12 

1 

3A320 

1 

Al  ,231C 

12312 

1 

3A32  1 

0 

5A776 

c 

AQ00  2 

1 

550  1 2 

1 

CA6  16 

1 

C : 

60526 

1 

QAA27 

1 

A1,232C 

00136 

0 

5 50-,  1 

0 

56002 

n 

5A1  17 

1 

00006 

1 

32  1 1 A 

1 

52CC6 

c 

1C  1A6 

c 

Al  ,2330 

6A753 

1 

1233A 

0 

1 23  25 

1 

12335 

1 

0A3C3 

0 

3A361 

1 

5A776 

0 

3 1001 

1 

A1,23A0 

123A7 

1 

550'OG 

1 

56002 

0 

5A117 

1 

3A36C 

0 

5 A 7 7 6 

c 

310CC 

c 

CA635 

c 

A 1 , 2 3 50 

r ; 

61353 

0 

COl  1 7 

0 

OA  1A5 

c 

CA635 

c 

r : 

61A5A 

0 

AA752 

1 

02A26 

0 

501A5 

1 

Al  ,2360 

A00'l2 

1 

56132 

1 

AA753 

0 

02A26 

0 

5C1A5 

1 

Acrci 

1 

56131 

1 

02AA5 

0 

Al, 2370 

02A70 

0 

501  A5 

1 

AOOOO 

0 

5613C 

0 

02A07 

0 

AA753 

0 

02AA  1 

1 

50  1A5 

1 
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OCTAt  LISTING  FOR  PARAGRAFF  # 22F,  FITH  PARITY  BIT  IN  BINARY  AT  THE  BIGHT  CF  EACH  WORE,  "3"  CENCTES  UNUSFC  FIXEC  MEMORY 
ALL  VALID  WGRCS  APE  BASIC  IMSTRUCTIGNS  EXCEPT  THOSE  MtRKEC  "I"  ( INTERPRET  I VE  OPFRATCP  HCPOS)  CP  “C"  (CCNSTANTS) 


41,24Cf 

40001 

1 

C2373 

1 

44752 

1 

02441 

1 

50145 

1 

40002 

1 

02373 

1 

44  75  2 

1 

41,2410 

610  Yo 

0 

106CO 

(, 

C24  1 5 

C 

00136 

0 

024  1 5 

0 

54122 

1 

50000 

1 

342  17 

0 

41.242C 

54776 

0 

50  I 22 

0 

4 1130 

1 

03371 

1 

56122 

0 

C24  11 

1 

54123 

C 

22C02 

0 

41,2470 

02517 

0 

04331 

1 

76250 

I 

60123 

1 

1 1000 

0 

0000  1 

0 

05675 

0 

0 2 2 53 

C 

41  ,2440 

00001 

0 

54123 

0 

22002 

0 

02445 

C 

C243C 

1 

OOC06 

1 

22156 

0 

025  17 

0 

41, 245C 

74736 

0 

lOCCC 

0 

02353 

n 

00156 

0 

22002 

) 

025  17 

0 

74736 

C 

icccc 

c 

41 ,24f0 

04145 

0 

OtK'O  1 

0 

22C02 

r 

025  1 7 

f 

lOOOC 

0 

■JO  001 

I 

OOQOl 

0 

02252 

0 

41,247C 

22002 

0 

30146 

1 

64753 

1 

CCCC6 

1 

12506 

1 

5C  no 

1 

C2476 

r 

Q25C1 

1 

41, 25CC 

onno  1 

0 

C3C32 

c 

02261 

0 

00001 

0 

24145 

1 

00001 

0 

31C  16 

1 

75C04 

1 

41  ,2510 

■10006 

1 

5 H,o-. 

1 

OOOQO 

1 

40000 

0 

12  3 7 3 

c 

C:  00147 

0 

C : 

001  46 

1 

50140 

1 

41,2520 

32514 

0 

50000 

1 

30000 

1 

74350 

1 

OOOC2 

0 

C2517 

c 

042  2 1 

1 

1625C 

1 

41,2530 

54117 

1 

54  122 

1 

6C145 

1 

5OO0C 

1 

4000C 

0 

50  122 

0 

57002 

1 

1C  122 

1 

4U254C 

02531 

1 

34755 

1 

54  155 

1 

,54  156 

1 

5Cin 

c 

3 4 3 1 7 

0 

54776 

C 

50117 

0 

41,2550 

4 1002 

0 

541  54 

130  53 

1 

54123 

0 

0000  6 

1 

32567 

1 

52CC6 

C 

5C  14C 

1 

41 ,2560 

■J2  560 

0 

02564 

1 

03040 

0 

L2  57  7 

c 

03032 

0 

02577 

0 

C : 

02141 

1 

C:  64101 

0 

4 1 , 2 5 7 r 

04616 

1 

r : 

61262 

1 

10117 

1 

02575 

1 

00136 

0 

54  117 

1 

C2541 

c 

50000 

1 

41 , 2600 

3 2 60  2 

1 

C464C 

1 

C : 

61452 

c 

C : 

62570 

1 

C: 

606  15 

0 

C:  60733 

0 

C : 

60744 

0 

C:  6C751 

1 

41 ,26ir 

C : 

60635 

1 

C: 

60  7 53 

0 

C : 

65230 

0 

C : 

6 5303 

1 

C : 

607  5 1 

1 

C:  6C740 

1 

C : 

60766 

0 

C:  60623 

0 

41, 262C 

C: 

60645 

0 

r : 

60662 

0 

44752 

1 

02426 

0 

02462 

0 

330  12 

1 

022A  1 

c 

C23C5 

c 

41,2630 

33013 

0 

02341 

c 

0 2 307 

1 

33C  14 

1 

02341 

0 

02311 

0 

46245 

0 

C 3 C 1 5 

c 

41  ,264C 

■0O006 

1 

321  14 

1 

52006 

0 

34  7 5 5 

1 

0310  1 

1 

50  n5 

1 

54CCC 

c 

34753 

1 

41, 265C 

03101 

1 

5.114  5 

1 

54CC1 

1 

34752 

0 

03101 

1 

50  145 

1 

540C2 

1 

4 4 7 5 7 

1 

41 ,266G 

6 mil 

1 

00  ; 6 

1 

1 2 6 6 4 

c 

0300  1 

c 

310C2 

1 

C43C4 

1 

310C4 

1 

00C04 

0 

41 ,267C 

00006 

1 

12700 

0 

5 1145 

1 

400OU 

n 

7 IOC  3 

1 

50  145 

1 

260CQ 

0 

02  7C5 

1 

41, 2700 

41003 

1 

5014  5 

1 

70CC0 

0 

5014  5 

1 

54CCr. 

Cl 

00003 

1 

0300  1 

0 

4 4 7 5 3 

c 

41 ,2710 

0 2 426 

n 

02462 

I'l 

33012 

1 

02341 

0 

C 2 3 C 5 

0 

33013 

0 

02341 

0 

C2307 

1 

41, 2720 

44756 

G 

03015 

c 

00006 

1 

32114 

1 

52006 

0 

34755 

1 

03  1C  1 

1 

5C  145 

1 

41,2730 

540'1'1 

0 

34753 

I 

03  101 

1 

50145 

1 

54001 

1 

03001 

0 

02305 

0 

00006 

1 

41,^74G 

32114 

I 

52006 

0 

34755 

1 

0310  1 

1 

50  14  5 

1 

54GCC 

0 

030C  1 

0 

44753 

c 

41,2750 

02426 

0 

3473  5 

1 

55014 

1 

C2307 

1 

00006 

1 

32114 

1 

52006 

0 

34/53 

1 

41 ,2760 

»31  U 

1 

50145 

1 

5400  1 

1 

03C01 

0 

44752 

1 

C2426 

0 

34735 

1 

55C14 

1 

41,2770 

0 2 311 

n 

C0OC6 

1 

32114 

1 

52006 

0 

34  752 

0 

C31C1 

1 

50  145 

1 

54CC2 

1 
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for  PARAGRAPH 
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WITH 

PARITY  1 

BIT 
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BINARY 

AT 

THE  RIGHT  CF 

EACH 

WORE,  " 

a " 

CENOTES  UNUSED 

FIXED  MEMORY 

ALL  VALir 

l»CRCS  APE 

PAS  IC 

INSTRUCTIONS  EXCEPT  THOSE 

PARKED  "I" 

( I NTERPRETI VE 

OPERATOR  HERD 

S 1 

CR  "C"  (CONSTANTS) 

Al, 30CC 

0300  1 

0 

34755 

1 

1 

44755 

0 

551 13 

0 

04457 

0 

4436C 

1 

5 4 7 7 6 

C 

4 1 , 30  10 

04635 

f.' 

C: 

616  12 

0 1 

: OOC25 

C 

C 

: CCI(;2  6 

0 

C : 00027 

1 

54117 

1 

407  7 7 

1 

54C21 

0 

41 ,30?C 

41021 

0 

4002  1 

1 

10000 

0 

13025 

1 

00 OC  2 

0 

6C1  1 7 

c 

COCO  6 

1 

13C31 

1 

41, ?n;o 

04145 

0 

core  2 

C 

56CC2 

0 

54114 

1 

34347 

0 

70  147 

1 

04322 

C 

00  114 

c 

41 ,3040 

56102 

0 

54114 

1 

50!  17 

0 

33072 

1 

540C  1 

1 

50117 

0 

34346 

1 

71153 

1 

41 , 30  50 

51011 

c 

C0001 

1 

00114 

0 

56002 

0 

54114 

1 

5('14C 

1 

03C56 

1 

C3C75 

c 

41,3060 

5'U17 

0 

33072 

1 

54CC  1 

1 

5C 1 n 

c 

34346 

1 

7014  7 

1 

50  OC  1 

0 

COCOC 

1 

41,3070 

60000 

1 

01114 

1 

•130  31 

0 

G4322 

c 

C43  3 1 

1 

34346 

1 

70  147 

1 

6CC00 

1 

41, 3I0C 

00114 

0 

541  1 7 

1 

5600  2 

0 

54115 

0 

34755 

1 

54  162 

0 

50117 

c 

57CC5 

c 

41,3110 

54155 

1 

50  117 

0 

57002 

1 

54154 

r 

5014C 

1 

03115 

1 

03143 

1 

50  117 

0 

41,312C 

30150 

0 

74356 

1 

04303 

0 

0000  6 

1 

60117 

0 

54  145 

Q 

10777 

1 

03200 

0 

41, 31 30 

02454 

0 

C3f:41 

c 

02261 

c 

P3161 

1 

24145 

1 

30145 

1 

26  117 

1 

3 4 7 5 5 

I 

41 ,3140 

50  117 

0 

53  77  7 

0 

03  161 

1 

043  11 

C 

10777 

1 

C32CO 

r 

02454 

0 

03C32 

0 

41,3150 

02261 

1 

C31  55 

0 

34755 

1 

54117 

1 

03134 

1 

30146 

1 

647  5 3 

1 

CCf  C6 

1 

41,3160 

13  165 

1 

56154 

1 

00  115 

1 

C 

: 02147 

1 

C:  64101 

0 

44757 

1 

61016 

1 

00C06 

1 

4 1 , 3 1 7 C 

1 3001 

1 

31016 

1 

75004 

1 

56  154 

1 

CCCC6 

1 

50154 

1 

OICCC 

c 

J30U  1 

0 

4 1 , 3 7 : n 

03U53 

1 

54123 

1 

0CC06 

1 

331  64 

1 

52006 

0 

51140 

1 

C32C6 

C3212 

c 

41,3210 

13040 

1 

03213 

1 

H3C  32 

c 

5COOC 

1 

332  1 6 

1 

C4640 

1 

C:  62352 

1 

C : 

6 1142 

1 

41, 322C 

C ; 

: 61044 

n 

C : 

61132 

0 c 

: 61150 

1 

C 

: 61175 

0 

C:  61454 

0 

C 

: 61150 

1 

C:  65452 

1 

C : 

6 1454 

c 

41,3230 

0 : 

: 6121? 

0 

C: 

61145 

0 c 

: 61454 

c 

C 

: 61044 

0 

C:  61454 

0 

C 

: 61454 

'I 

43245 

P 

7 1C  16 

c 

41,3240 

54155 

1 

4(1136 

1 

64217 

I 

lOOOC 

0 

C3253 

c 

C. 

: 6CCC0 

1 

0 3 2 5 3 

0 

34736 

1 

41, 3250 

76  155 

1 

34755 

1 

550  21 

1 

36077 

1 

71000 

1 

0 4 3 31 

1 

54022 

c 

ACC22 

c 

41,3261 

56022 

1 

61001 

1 

54  154 

c 

347  55 

1 

55011 

1 

11041 

1 

03270 

1 

04502 

1 

41 ,3270 

000U4 

0 

11117 

1 

03277 

0 

34753 

1 

05203 

0 

C 

: 03303 

1 

C : 621C1 

c 

52155 

1 

41 , 3300 

53020 

0 

00003 

1 

C0136 

0 

04400 

1 

11020 

1 

033  11 

1 

033  1 1 

1 

0 3 3 2 2 

1 

41 ,3310 

03322 

1 

33326 

! 

C5203 

0 

c 

: C3303 

1 

C : 621C  1 

0 

34355 

0 

05072 

1 

C : 

03327 

1 

41, 3320 

c 

: 62101 

n 

C5261 

1 

34755 

1 

550  17 

1 

5 502C 

0 

C 526  1 

1 

C:  00144 

c 

11C2C 

C 

41,3330 

03334 

0 

03334 

0 

05  155 

r 

05155 

c 

11011 

1 

03357 

1 

36077 

1 

7K17 

1 

41,3340 

02321 

0 

34144 

1 

7 10  17 

I 

63355 

1 

54C  23 

1 

30C23 

C 

550CC 

1 

33356 

1 

41, 3350 

54  136 

1 

43245 

1 

7102J 

0 

541  56 

1 

02146 

1 

C 

: 75377 

0 

C:  04124 

1 

C4374 

c 

41,3350 

05155 

1 

343  17 

,7 

54  7 7 6 

c 

3K  46 

1 

5400  1 

1 

31C16 

1 

04651 

1 

03371 

1 

41,3370 

05155 

0 

54022 

0 

5600  2 

'1 

541  15 

0 

34736 

1 

2 6 7 7 6 

c 

34751 

c 

54137 

c 
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nCTAL  IISTTNG  FOP  dARAGRAPF  H 227,  WI7H  PARITY  BIT  IN  BINARY  AT  THE  RIGHT  CF  EACH  WCiPC,  "5"  CENCTES  UNUSED  FIXED  PEYCRY 
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A1  ,3ACC 

40022 

n 

4CC?2 

c 

40022 

0 

40000 

0 

74757 

1 

5C0C0 

1 

34C66 

0 

7 4 3 4 6 

c 

A1,3A10 

54124 

! 

56776 

1 

54143 

c 

10000 

0 

54776 

0 

04635 

1 

C: 

61446 

0 

10137 

0 

41  ,3420 

■1337  7 

1 

443611 

1 

54  7 76 

c 

00115 

1 

5402C 

1 

56CC2 

0 

54  1 15 

0 

34753 

1 

41,3430 

54137 

0 

40020 

1 

4O020 

1 

560  20 

0 

5472  2 

■7 

03404 

1 

03460 

c 

34747 

1 

41,3449 

60776 

1 

P0(".)6 

1 

13444 

1 

C41  45 

c 

34755 

1 

57001 

1 

54  154 

0 

34361 

1 

41  , 34EC 

54776 

0 

04616 

1 

C: 

60601 

n 

4 4 3 6 C 

1 

54776 

c 

30  154 

1 

04635 

c 

c ; 

1C040 

1 

41,3460 

40002 

1 

5 5C  12 

1 

34361 

1 

54776 

0 

34755 

1 

5S0C1 

c 

C46  16 

1 

C : 

60601 

c 

41  ,3470 

34427 

1 

34753 

1 

5 4 7 7 7 

1 

fCl  36 

c 

34753 

1 

71044 

1 

10000 

0 

035  16 

c 

41 ,35CC 

3435  1 

1 

541  54 

0 

44753 

0 

71044 

1 

5416C 

1 

C4457 

c 

342  17 

1 

54157 

c 

41,3510 

0000  6 

1 

3 1 '■  4 6 

1 

52156 

1 

an  6C 

0 

00004 

0 

00  154 

1 

34354 

1 

03501 

c 

41,352C 

34352 

1 

54]  54 

0 

31044 

0 

C3504 

C 

64  75  7 

c 

C0004 

0 

54124 

1 

44740 

1 

41, 3530 

50124 

0 

57C22 

0 

lO’lOO 

0 

25015 

1 

035  3 5 

1 

10  124 

1 

03526 

r 

0CCC3 

1 

41,3540 

50  123 

1 

03546 

c 

03543 

c 

5500C 

1 

55QC  1 

0 

55C14 

1 

44360 

1 

54776 

c 

41,3550 

04433 

1 

0 35  7 4 

1 

33576 

0 

541  36 

1 

10  123 

0 

035  61 

c 

02353 

0 

03524 

1 

41,3560 

02353 

0 

36077 

1 

7C123 

0 

54157 

0 

3*)123 

1 

54023 

1 

300  2 3 

0 

54  160 

1 

41  ,3570 

1'157 

0 

035  77 

1 

30  160 

0 

02341 

c 

34755 

1 

55012 

1 

04202 

0 

10160 

1 

41,3600 

036  )4 

0 

30157 

1 

02321 

0 

04202 

0 

30156 

0 

54161 

0 

30160 

C 

C2341 

c 

41,3610 

30157 

1 

'123  2 1 

0 

34  7 55 

1 

55C13 

c 

5 5014 

1 

55012 

1 

30161 

1 

54  156 

1 

41,3620 

02035 

0 

00004 

n 

746  16 

1 

C: 

66117 

0 

44  7 5 3 

0 

7 13C0 

1 

64753 

1 

55300 

1 

41,3620 

33667 

0 

000  C 6 

1 

050  11 

1 

33670 

0 

550  3 5 

1 

06022 

1 

347x2 

1 

rrc06 

1 

41 ,3640 

0 5013 

0 

34363 

0 

54117 

1 

43665 

0 

50117 

c 

55022 

1 

10117 

1 

03642 

1 

41,365C 

4 366  6 

0 

5502  3 

c 

55026 

!l 

55)30 

1 

3476.C 

1 

5 50  1 5 

0 

COO03 

1 

33  6 72 

1 

41,3660 

00004 

0 

C5203 

0 

C : 

036  7 3 

c 

C : 

621C2 

0 

C51  55 

0 

C : 
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07,2576 

259 

1 ' ,2527 

TC 

10  ,2572 

1399 

11,31"5 

TC 

11,3166 

12  2 6 

13,20QC 

TC 

13 ,2C25 

96 

07,2577 

TC 

>7,2626 

260 

10 ,2573 

T '' 

1">  , 26  33 

1 35C 

11,3167 

TC 

11  ,3250 

1227 

13,2026 

TC 

13,2067 

237 

07,2627 

1C 

r 7 ,2666 

261 

11  ,2639 

TC 

10,2700 

135  1 

11,3251 

TC 

11,3332 

1228 

13,2C7C 

U 

13,2113 

321 

07,2667 

TO 

07,2705 

895 

1'  , 270  1 

TC 

10,2790 

1352 

1 1 ,3333 

TC 

11,3919 

1229 

13,2119 

TO 

13,2132 

3 22 

07,27C6 

TC 

07  ,2799 

1300 

1 ',  279  1 

TC 

1C  , 3007 

1353 

11,3915 

T C 

1 1 ,3979 

123P 

13,2133 

TC 

13,2160 

323 

07,2795 

TC 

07,2771 

1301 

10,3010 

TC 

1 > ,3052 

1359 

1 1,3975 

TC 

11,3553 

1232 

13,2161 

TC 

13,2206 

329 

07,2772 

TC 

07,3031 

1302 

!'■  , 3053 

1C 

10 ,3 122 

1355 

1 1 ,3559 

TC 

11,3633 

1233 

13,2207 

TC 

13,2232 

7C9 

07,3032 

jr 

:i7  ,3376 

1303 

10,3123 

TC 

10,3173 

1356 

1 1 , 36  39 

TC 

11,3711 

1239 

13  ,2233 

TC 

13,2319 

710 

07, 3077 

TO 

07, 3135 

13C9 

10,3179 

Tr 

1 1 ,3293 

1357 

1 1,3712 

TC 

11,3713 

1235 

13, 2315 

TO 

13,2350 

711 

07,3136 

TC 

07,3201 

1305 

10,3299 

TC 

10,3311 

135E 

1 1 ,3719 

TC 

11  ,3772 

123  6 

13,2351 

TC 

13,2377 

1125 

07,32C2 

TC 

07 ,3225 

13  C6 

1 ' ,3312 

TC 

10 ,3362 

1359 

11,3773 

1237 

13,290C 

1C 

13,2921 

1126 

07,3226 

TO 

07,3269 

13C7 

10,3363 

TC 

10 ,392  1 

136C 

1 1 ,3779 

TC 

11  ,3775 

29 

13,2922 

TC 

13,2957 

112  7 

07,3265 

TC 

>7,3319 

13,18 

1 1, 392? 

TO 

10,3971 

136  1 

12,20CO 

TC 

12,2C22 

1C93 

13  ,2960 

TC 

13  ,2507 

1128 

07,3315 

TC 

0 7-,  3 3 6 C 

13C9 

10 ,34  72 

TC 

10  ,3531 

1362 

12,2023 

TC 

12,2073 

1 166 

n,251C 

TC 

13,2597 

1129 

07,3361 

TC 

>^7,3376 

1310 

10.3532 

TC 

10 ,3599 

136:> 

12,2079 

TC 

12,2155 

1 167 

13,2550 

TC 

13,2557 

1 13C 

07,3377 

TC 

.17 ,39  22 

1311 

1 > ,3595 

TC 

10,3562 

1369 

12,2156 

TC 

12,2235 

1168 

1^,2560 

TC 

13  ,2603 

1131 
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PAGE 

13,?6P6 

TC 

13, 2623 

120C 

14,3060 

TC 

14  ,314C 

935 

1 5,32  77 

TC 

15,3351 

967 

16,3741 

TC 

16,3771 

1466 

1 3 ,2621 

TC 

1 3 ,26  67 

1201 

14,3141 

TO 

14,31‘=5 

936 

15,3352 

TC 

15,3431 

968 

1 6 ,377  2 

TC 

16,3775 

1467 

1^, 2670 

TC 

13,2734 

12C2 

14,3156 

TC 

1 4 ,3215 

937 

15,3432 

TC 

15 , 3444 

969 

16,3776 

31 

13,2735 

TC 

13,3013 

1203 

■ 14 ,32  !6 

TC 

14,3247 

936 

1 5,3445 

TC 

15  ,3470 

970 

17,2000 

TC 

17,2042 

563 

13,3011 

TC 

13,3043 

12  04 

14,32  50 

TC 

14,3315 

939 

1 5, 3471 

TC 

15,3523 

971 

17,2043 

TC 

17  ,2054 

564 

13, 30^F 

TC 

13,31  14 

1205 

14,3316 

TO 

14,3366 

94f 

1 5 ,3524 

TC 

15,3557 

972 

17, 2055 

TO 

17,2116 

1394 

13,3105 

TC 

13  ,3134 

1206 

14,3367 

TC 

14,3420 

94  1 

15,3560 

TC 

15,3616 

973 

17,2117 

TC 

17  ,2123 

1395 

13,3135 

■"C 

13,3212 

12C7 

14,3421 

TC 

14  ,34  76 

943 

15,3617 

TC 

15,3634 

9 74 

17,2124 

TC 

17,2152 

1432 

13,3213 

TC 

13,3257 

12CF 

14,3477 

TO 

14,3555 

944 

15,3635 

TC 

15  ,3646 

975 

17,2153 

TC 

17,2226 

1433 

13 , 32  6C 

TC 

1 ’ ,333  7 

12  C9 

14,3556 

TC 

14,3617 

94  5 

15,3647 

TC 

15, 3670 

977 

17,2227 

TC 

17,2270 

1434 

13, 33^0 

TO 

13,3421 

121C 

14,3620 

TC 

14  ,365C 

946 

15,3671 

TC 

15,3752 

978 

17,227  1 

TO 

17,2346 

1435 

13,3422 

fC 

13 ,3464 

12  1 1 

14,3651 

TC 

14,3670 

94  7 

1 5 ,3753 

TC 

15,3757 

979 

17,2347 

TC 

17,2414 

14  3 6 

13,3465 

TC 

1^,3522 

12  12 

14,3671 

TC 

14,3724 

948 

15,3760 

TC 

15,3761 

31  . 

17,2415 

TC 

17,2476 

1437 

13,3523 

TO 

13,355,' 

1213 

14,3725 

TC 

14,3774 

949 

16 ,2000 

TC 

16,2023 

1400 

17,2477 

TC 

17,2560 

14  38 

13,3551 

TC 

1 3,3576 

1214 

14, 3775 

TO 

14,3776 

3 1 

16, 2024 

TC 

16,2075 

14C1 

17  ,2561 

TC 

17 ,2627 

1439 

13,3577 

TC 

13,3654 

1215 

15,20Cu 

TC 

15  ,2  J4  5 

2 5C 

16,2076 

TC 

16,2153 

1402 

17, 263C 

TO 

17,2654 

144C 

13,3655 

TC 

13,3672 

12  16 

15,2046 

TC 

15,2047 

25  1 

16,2154 

TC 

16  ,2212 

1 403 

17,2655 

TC 

17 , 2 7 G 7 

144  1 

13,3673 

TC 

13,3717 

1231 

15,2050 

TC 

1 5 ,2054 

92C 

16,2213 

TC 

16 , 2246 

l^^ll 

17,271C 

TC 

17,2755 

1442 

13, 372C 

TC 

13, ’731 

1237 

15,2055 

TC 

15,2133 

921 

16,2247 

TC 

16,2313 

1412 

17,2756 

TC 

17,3013 

14^3 

13 ,3731 

TC 

13  ,3747 

1238 

15,2134 

TO 

15,2136 

922 

16,2314 

TC 

16,2357 

1413 

17  ,3014 

TC 

17,3064 

1444 

13,3750 

TC 

1 3,3757 

1374 

15,2137 

TC 

15,2170 

92? 

16,2360 

TC 

16,2434 

14  14 

17,3065 

TC 

17,3136 

1445 

13,3760 

•^C 

13,3761 

1375 

15,2171 

TC 

15,2217 

924 

16,2435 

TC 

16  ,2514 

1415 

17,3137 

TC 

17,3157 

1446 

13,3762 

TC 

13,3763 

3C 

15,2220 

TT 

15,2244 

925 

16,2515 

TC 

16,2575 

1-:  16 

17,316C 

TC 

17,3225 

1447 

14,2030 

TC 

14,2007 

45 

15,2245 

TC 

15,2311 

95C 

1 6 ,25  76 

T C 

16,2646 

1417 

17,3226 

TO 

17,3276 

1448 

14,2010 

TC 

1 4 ,2'16  5 

47 

15,2312 

TO 

15,2365 

951 

16,2647 

TO 

16,2717 

1418 

17,3277 

TC 

17,3303 

1449 

14,2066 

TC 

14,2147 

48 

15,2366 

TC 

15,2442 

952 

16, 2720 

TO 

16,2757 

l-i  19 

17,3304 

TC 

1 7 ,3344 

1451 

'14, 2150 

TC 

14, 2231 

49 

15,2443 

TO 

15,2471 

953 

16,2760 

TC 

16,3031 

1 420 

17,3345 

TC 

17,3416 

1452 

14,2232 

TC 

14,2313 

50 

15,2472 

TQ 

15,2533 

9 5 4 

16, 3031 

TC 

16,3070 

1421 

17  ,3417 

TC 

17,3464 

1453 

14,2314 

TC 

14,2346 

51 

15,2534 

TC 

15  ,25  60 

955 

16, 3 '71 

TC 

16,3124 

1422 

17,3465 

TO 

17,3532 

14  54 

14,2347 

TC 

14,2357 

845 

15,2561 

TC 

15,2572 

956 

16,3125 

TC 

16  ,3175 

1423 

17,3533 

TC 

17,3575 

1455 

14,2360 

TC 

14  ,242  7 

846 

15,2573 

TC 

15,2636 

957 

16,3176 

TC 

16,3254 

1^24 

17,3576 

TC 

17,3640 

1456 

14,2430 

TC 

14,2437 

847 

15,2637 

TC 

15,2712 

958 

16  ,3  2 55 

TC 

16 , 3336 

M25 

17,  364  1 

TO 

17,3662 

14  5 7 

14,2440 

TC 

1 4 , 2477 

926 

1^,2713 

TO 

15,2763 

959 

16,3337 

TC 

16,3373 

1426 

17,3663 

TC 

17,3724 

1458 

14,2500 

TC 

1^  ,2556 

928 

15,2764 

TC 

15,3022 

960 

16,3374 

TC 

16,3446 

1427 

17,3725 

TC 

17,3776 

1459 

14,2557 

TC 

14,2602 

929 

15,3023 

TC 

15,3027 

96  1 

16,3447 

TC 

16  ,3516 

1428 

20 , 200C 

42 

14,26C3 

TC 

14,2615 

9 30 

15,3030 

TC 

15,3063 

962 

16, 3517 

TC 

16 ,3  534 

1429 

2C,2CC1 

TC 

If  ,2003 

43 

14,2616 

TC 

14, 2677 

931 

15,3064 

TC 

15,3142 

963 

16,3535 

TC 

16,3606 

143- 

2C, 2004 

TO 

20,20C5 

2 9 3 

14,2700 

TC 

14,2761 

932 

15,3143 

TO 

15,3221 

9 64 

1 6 ,3  6C  7 

TC 

16,3644 

1431 

20, 2006 

TC 

20  ,2066 

294 

14,2761 

TC 

1 4 ,3':i;)6- 

933 

15,3222 

TC 

15,3236 

965 

16 , 3645 

TC 

16,3716 

1 46C 

2C  ,2067 

TC 

20  ,21  14 

295 

14, 3''i07 

TC 

17,3057 

934 

15,3237 

TC 

1^,3276 

966 

16  ,3717 

TC 

16,3740 

1461 

2'!,  2115 

TO 

20,2142 

1397 
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PAGE 
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PAGE 

21,?1A3 

YG 

2G  ,2204 

13SP 

7 1,260  1 

TC 

21,2660 

E57 

20, 2 2'' 5 

TC 

20,2226 

13SS 

21,2661 

YC 

2 1 ,2742 

898 

2 1 ,P227 

TC 

27,2236 

1 4 7 4 

21,2743 

TO 

21,3024 

855 

27,2237 

TG 

EF , 2307 

14C5 

21 ,302  5 

TC 

21  ,3067 

900 

27,2310 

TC 

2'’, 2375 

1406 

21,3070 

TO 

21,3113 

1462 

20,2336 

TC 

20,2376 

1408 

21,3114 

TC 

21,3165 

1 463 

20,2377 

TC 

20,2451 

1405 

21,3166 

TC 

21,3233 

1464 

27,2A52 

TC 

2 1,2462 

141'- 

21,3234 

TO 

21,33G6 

1465 

2J,2A63 

TC 

20,2476 

1476 

21  ,3307 

TC 

21,3317 

1466 

2 7, 2A77 

TO 

20, 25^12 

1477 

2 1 , 33  20 

TO 

21,3325 

1468 

2 ) ,7533 

YC 

2 7,2627 

1478 

21,3326 

TO 

21,3400 

1465 

20, 263C 

TC 

20  , 26  7 7 

1475 

2 1 ,3401 

TC 

21  ,3431 

1470 

2 7,2.700 

TC 

2'7,2755 

1480 

21,3432 

TO 

21,3470 

1471 

20,2756 

TC 

2G  ,3001 

1481 

21,3471 

TC 

21,3537 

1472 

20,3002 

YC 

2 1 , 3022 

1462 

21,3540 

TC 

21  ,3611 

1473 

2 ) ,3023 

TC 

20  ,3762 

1483 

21,3612 

TO 

21,3636 

1474 

20, 3063 

TC 

20,3134 

14E4 

21,3637 

TC 

2 1 ,3646 

1476 

27,3135 

TC 

20,3212 

148'^ 

21,3647 

TC 

21,3665 

145E 

27,3213 

TC 

20,3233 

I486 

2 1 ,3666 

TC 

21,3745 

1495 

20, 323A 

TO 

20,3277 

1487 

21  ,3746 

TC 

21  ,377C 

150C 

20,3300 

TC 

2 i ,3357 

1488 

21,3771 

TO 

21,3772 

3 1 

20,3351 

YC 

27,3426 

1489 

22 ,2000 

TG 

22 ,2  >03 

44 

2 ), 3427 

TC 

20,3476 

145C 

22,2fC4 

TO 

22,2053 

352 

2 7 ,3^77 

TC 

2 1 ,3552 

1491 

22, 2054 

TO 

22,2126 

3 5 3 

2 ), 3557 

TC 

20, 3622 

1452 

22,2127 

TC 

22  ,220  1 

354 

20 ,3623 

TC 

2' , 3675 

1493 

22,2292 

TC 

22,2262 

-3  C C 

20,3676 

TC 

2'i  ,3746 

1454 

22,2263 

TO 

22,2311 

356 

27,3747 

TO 

?<'  , 3765 

149'= 

22,2312 

TC 

22,2357 

357 

2 ) ,3766 

TC 

27  ,3776 

1496 

22,2360 

TO 

22,2421 

358 

21,2000 

TC 

21,2005 

42 

22,2422 

TC 

22  ,2503 

359 

21,2006 

TC 

2 1, 2046 

823 

22, 2504 

TO 

22,2546 

36f 

2 1 , 20  4 7 

TC 

2 1 ,2104 

824 

22,2547 

TC 

22,2625 

36  1 

21,2105 

TC 

21,2124 

829 

22,2626 

TC 

22  ,2653 

362 

21,2125 

TC 

21,2144 

867 

22,2654 

TO 

22,2723 

363 

21,2145 

TC' 

21  ,2216 

891 

22,2724 

YC 

22,2743 

364 

21,2217 

TC 

21,2276 

R52 

22,2744 

TC 

22 ,3QC2 

365 

21,2277 

YC 

2 1 ,2367 

893 

22,3003 

TC 

22,3053 

36  6 

2 1, 23  6 1 

TC 

21,2441 

854 

22,3054 

TC 

22  ,3124 

367 

21,2442 

TC 

21,2520 

895 

22,3125 

TC 

22,32( 2 

=■66 

21,2521 

TC 

2 1 ,2600 

8 96 

22 ,32  73 

TC 

22,3212 

365 

21U2-C71 


ISrO'J  8LG.  U,1?6S 


FAGE  172S 


CCCLPTFO  LCCATICAS  PAGE  rCCUPIEC  LCCAT  IONS  PAGE 


22,3213 

TC 

22,3241 

370 

23,3306 

1C 

23,3321 

1240 

22,3242 

TC 

22,3300 

713 

23,3322 

TC 

23,3354 

124  1 

22, 33C1 

TC 

22,3355 

714 

23,3355 

TC 

23,3421 

1243 

22,3356 

TC 

22,3427 

715 

23,3422 

TC 

23,3442 

1244 

22,3430 

TC 

22  ,3464 

716 

23,3443 

TC 

23,3502 

1245 

22,3465 

TC 

22,3537 

7 17 

23,3503 

TC 

23,3534 

1246 

22,3540 

TC 

22  ,3550 

718 

23,3535 

TO 

23,3540 

1247 

22,3551 

TC 

22,3611 

729 

23,3541 

TC 

23 ,3554 

1249 

22, 3612 

TO 

22,3646 

72  1 

23,3555 

1C 

23,36  16 

1250 

22,3647 

TC 

22,3660 

822 

23,3617 

TC 

23,3647 

1251 

22,3661 

TC 

22,3703 

658 

23  ,3650 

TC 

23 ,3672 

1252 

22,3704 

TC 

22,3710 

859 

23,3673 

TC 

23,3717 

1253 

22,3711 

TC 

22 ,3736 

1 149 

23,3720 

TC 

23,3767 

1254 

22,3737 

TC 

22,3772 

1 1 50 

23,3770 

1255 

22,3773 

TC 

22,3774 

32 

2 3,  37  7 1 

TO 

23,3772 

3 2 

23,2000 

TC 

23 ,2C4C 

271 

24,2000 

TC 

24 ,2034 

4 94 

23, 2041 

TC 

23,2102 

325 

24,2005 

TC 

24,2035 

4 9 5 

23,2103 

TC 

23,2115 

487 

24,2036 

TC 

24,2051 

49  7 

23,2116 

TC 

23  ,2134 

5 19 

24,2052 

TC 

24,2131 

498 

23, 2135 

TC 

23,2216 

520 

24,2132 

TO 

24 ,220  1 

499 

23,2217 

TC 

23,2276 

521 

24,22  )2 

TC 

24,2253 

500 

23,2277 

TC 

23,2336 

522 

24,2254 

TC 

24  ,231  7 

5C  1 

23,2337 

TC 

23,2366 

695 

24, 2320 

TC 

24,2377 

5C  2 

23,2367 

TC 

23,2402 

696 

24,2400 

TC 

24 ,2422 

504 

23,2403 

TC 

23,2440 

697 

24,2423 

TC 

24,2444 

c d 5 

23,2441 

TC 

23  ,2450 

698 

24,2445 

TC 

24 , 2466 

506 

23,  2451 

TG 

23,2454 

699 

24,2467 

TC 

24  ,2546 

507 

23,2455 

TC 

23,2462 

8 16 

24, 2547 

TC 

24,2626 

5t  E 

23,2463 

TC 

23,2512 

862 

24,2627 

TC 

24 ,2674 

509 

23,2513 

TC 

23,2532 

1C92 

24,2675 

TC 

24,2715 

5 1C 

23,2533 

TC 

23  ,2552 

1 141 

24,2716 

TC 

24,2776 

5 1 1 

23,2553 

TC 

23,2634 

1 14  2 

24,2777 

TC 

2^,3056 

512 

23,2635 

TC 

23,2716 

1 143 

24, 3057 

TO 

24,3134 

513 

2^,2111 

TC 

23,2744 

1144 

24,3135 

5 14 

23, 2745 

TC 

23,2773 

1145 

24,3136 

TC 

24  ,3167 

5 15 

23 ,2774 

TC 

23,3055 

1 146 

24,3170 

TC 

24 , 3206 

5 16 

23,3056 

TC 

23,3137 

1147 

24 ,32  J7 

TC 

24  ,3226 

517 

23,3140 

TC 

23,3221 

1148 

24,3227 

TC 

24,3254 

518 

23,3222 

TC 

23  ,3250 

1 149 

24,3255 

TC 

24,3332 

569 

23,3251 

TC 

23,3305 

1239 

24,3333 

TC 

24  ,3347 

576 
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24,3503 
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25,3274 
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24,3552 
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26,3442 
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27,3360 
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27,2407 
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25,3346 
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25,3402 
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26,3523 
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27,2106 

TC 
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535 
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TC 

31,2575 
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TO 

32,3032 
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33,2771 

TC 

33,3043 
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34,3372 

TC 

34,3443 

31,2576 
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31,2625 

796 

32,3033 

TC 
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779 

33,3044 

TC 

33,3116 
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34,3444 

TO 

34,3445 

31,2626 

TC 

31 ,2670 

797 

32,3103 

TC 

32,3155 
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33,3117 

TC 

33  ,3170 
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34,3446 

TC 

34,3453 

31,2671 

TC 

31  ,2745 

798 

32  ,3156 

TC 

32,3230 

78  1 

33, 3171 

TC 

33,3246 
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34,3454 

TC 
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31, 2746 

TC 
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"2,3251 

TC 

32,3263 
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TC 
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TC 

35,2454 
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36,2566 
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36,2574 

733 

35,2455 

Tn 

35,2510 

66  1 

36,2575 

TC 

36,2630 

734 

35,2511 

TC 

35,2571 

662 

36,2631 

Tn 

36,2670 

73  5 

35,2572 

TC 

35,2634 

663 

36,2671 

TC 

36,2741 

736 

35,2635 

TC 

35,2673 

666 

36,2742 

TC 

36  ,30C4 

737 

35  ,2674 

TC 

35,2753 

6,67 

36, 3005 

TO 

36 , 3050 

738 

35, 2754 

TC 

35, 3C35 
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36,3051 
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739 
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36,3117 

TC 
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35,3201 
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36 ,3137 
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35, 3202 

TO 
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35,3215 
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NYLON  P#ST  BINDER 

25-1411N 


2 PURPOSE  BINDER 

This  binder  may  be  used  to  bind  both  marginal-punched  sheets  and  forms 
punched  with  2%",  6",  7',  8>^",  13^^"  and  14^'  eenter-to-center  holes. 


insert  posts  thru  end  holes 
of  bottom  cover  stub.  Al- 
low approximately  2 inches 
of  the  posts  to  extend  in- 
side the  metal  channel. 


FOR  TOP-AND-BOTTOM  LOADING  OF  UNBURST  SHEETS 


At  this  point  the  forms  will 
be  held  in  the  binder  in  this 
unburst  continuous  fash- 
ion so  that  they  can  be 
read  like  the  leaves  of  a 
stenographer's  note  book. 


Bend  these  sections  down  into 
the  channel,  toward  the  center. 
Move  the  plastic  slide  locks  over 
the  posts  and  toward  each  end  of 
the  stub  until  they  are  snug. 


Gather  forms  in  even  stack. 
Insert  posts  in  top  holes 
at  both  sides  of  forms. 


Bend  the  exposed  lengths  of  the 
posts  down  into  the  top  cover 
channel.  Move  the  slide  locks  over 
the  posts  toward  the  outside  ends 
of  the  channel  until  snug. 


Hold  the  top  cover  over  the 
sheet  body  with  the  stub 
turned  under.  Insert  the 
upper  end  of  the  posts  thru 
the  end  holes  of  the  stub. 


2.  FOR  CONVENTIONALLY  PUNCHED  LOOSE  LEAF  FORMS 
AND  STRIPPED  UNBURST  FORMS 

Follow  steps  (a)  thru  (f),  except  that  posts  should  be  inserted  thru 
holes  in  stub  that  correspond  to  holes  in  forms  to  be  bound. 
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